w8 · tx · 88y···ACD

tx · 88ypHPvw5M59gbBb4cud6TYNdzmvPhUucA8EH7asfACD

3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq:  -0.01000000 Waves

2023.09.19 00:06 [2761353] smart account 3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "88ypHPvw5M59gbBb4cud6TYNdzmvPhUucA8EH7asfACD",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1695071261810,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq",
    "senderPublicKey": "ERewvWFUFQfR1eCnipNAv9n7SdQhof2ESP6PGVjTueLd",
    "proofs": [
        "3xvCBiknvC5uA1qSePXv1cbvw3BU1KDUvCxmmRhX35h4FnLGMrS75CtAgfXwof8ex5eYAo2LxDRB5VaLa6gsnBuJ"
    ],
    "script": "base64:BgINCAISABIAEgASAwoBAQcABnVzZG5JZAEgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQADndhdmVzMkxUb2tlbklkASDkzSnqu8EXlTZRNkvkaX2ITlFTrbuGFIX8CY7Zd2/OsQAMcHV6emxlTGVuZFNDAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAAQZmFrZVB1enpsZVN3YXBTQwIjM01zOGZxYlhNNFJobU02Q1BUcjQ0aFV3SGUyQ0NtVkNmVkEADnVzZG5BZGRyZXNzU3RyAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAAPd2F2ZXMyTFRva2VuU3RyAixHUTlRTlZMR2ZZU2JOWjRkUzhOUnl2R0dFTFpMNHNXUEtpVmo4OENWMXJKTAENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAQBaQEJbWludExvbmcyAAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAkAAgECITEgcGF5bWVudCBoYXMgdG8gYmUgYXR0YWNoZWQgbWludAQNZmlyc3RBbW91bnRJbggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECGNhbGxlcklkCQClCAEIBQFpBmNhbGxlcgQXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwILc3dhcFRvV2F2ZXMJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUNZmlyc3RBbW91bnRJbgUDbmlsBQNuaWwDCQAAAgUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BAckbWF0Y2gwBRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAMJAAECBQckbWF0Y2gwAgNJbnQEF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gwBBlmaXJzdERlcG9zaXRlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDHB1enpsZUxlbmRTQwIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBHVuaXQFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQNuaWwDCQAAAgUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAQObGlzdFBlcmNlbnRhZ2UJAMwIAgBGCQDMCAIAMQkAzAgCACIJAMwIAgAYCQDMCAIAEQUDbmlsCgEKcmVwZWF0RnVuYwIFYWNjdW0EbmV4dAQNc3dhcHBlZEFtb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBRBmYWtlUHV6emxlU3dhcFNDAgtzd2FwVG9XYXZlcwkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCCQBpAgkAaAIFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQVhY2N1bQBkBQNuaWwFA25pbAMJAAACBQ1zd2FwcGVkQW1vdW50BQ1zd2FwcGVkQW1vdW50BAckbWF0Y2gxBQ1zd2FwcGVkQW1vdW50AwkAAQIFByRtYXRjaDECA0ludAQSc3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gxBA5kZXBvc2l0ZWRXYXZlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRJzd2FwcGVkQW1vdW50VmFsdWUFA25pbAMJAAACBQ5kZXBvc2l0ZWRXYXZlcwUOZGVwb3NpdGVkV2F2ZXMJAGQCBQVhY2N1bQUEbmV4dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBANyZXMKAAIkbAUObGlzdFBlcmNlbnRhZ2UKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAaQIJAGgCBRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDcmVzAGQFDndhdmVzMkxUb2tlbklkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQttaW50TG9uZzJfMwADAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABBgkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAJAAIBAiExIHBheW1lbnQgaGFzIHRvIGJlIGF0dGFjaGVkIG1pbnQEDWZpcnN0QW1vdW50SW4ICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAhjYWxsZXJJZAkApQgBCAUBaQZjYWxsZXIEF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFDWZpcnN0QW1vdW50SW4FA25pbAUDbmlsAwkAAAIFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAQHJG1hdGNoMAUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQDCQABAgUHJG1hdGNoMAIDSW50BBdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUHJG1hdGNoMAQZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDbmlsAwkAAAIFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQEDmxpc3RQZXJjZW50YWdlCQDMCAIARgkAzAgCADEFA25pbAoBCnJlcGVhdEZ1bmMCBWFjY3VtBG5leHQEDGJvcnJvd2VkVXNkbgkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBmJvcnJvdwkAzAgCBQ51c2RuQWRkcmVzc1N0cgkAzAgCCQBpAgkAaAIFDWZpcnN0QW1vdW50SW4FBG5leHQAZAUDbmlsBQNuaWwDCQAAAgUMYm9ycm93ZWRVc2RuBQxib3Jyb3dlZFVzZG4EDXN3YXBwZWRBbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwILc3dhcFRvV2F2ZXMJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgkAaQIJAGgCBQ1maXJzdEFtb3VudEluBQRuZXh0AGQFA25pbAUDbmlsAwkAAAIFDXN3YXBwZWRBbW91bnQFDXN3YXBwZWRBbW91bnQEByRtYXRjaDEFDXN3YXBwZWRBbW91bnQDCQABAgUHJG1hdGNoMQIDSW50BBJzd2FwcGVkQW1vdW50VmFsdWUFByRtYXRjaDEJAGQCBQVhY2N1bQUEbmV4dAkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBANyZXMKAAIkbAUObGlzdFBlcmNlbnRhZ2UKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBpAgkAaAIFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQNyZXMAZAUOd2F2ZXMyTFRva2VuSWQJAMwIAgkBDEludGVnZXJFbnRyeQICA3JlcwUDcmVzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5taW50TG9uZzJfdGVzdAADAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABBgkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAJAAIBAiExIHBheW1lbnQgaGFzIHRvIGJlIGF0dGFjaGVkIG1pbnQEDWZpcnN0QW1vdW50SW4ICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAhjYWxsZXJJZAkApQgBCAUBaQZjYWxsZXIEF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFDWZpcnN0QW1vdW50SW4FA25pbAUDbmlsAwkAAAIFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAQHJG1hdGNoMAUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQDCQABAgUHJG1hdGNoMAIDSW50BBdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUHJG1hdGNoMAQZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDbmlsAwkAAAIFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQEDmxpc3RQZXJjZW50YWdlCQDMCAIARgkAzAgCADEJAMwIAgAiCQDMCAIAGAkAzAgCABEFA25pbAoBCnJlcGVhdEZ1bmMCBWFjY3VtBG5leHQJAGQCBQVhY2N1bQUEbmV4dAQDcmVzCgACJGwFDmxpc3RQZXJjZW50YWdlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQkAzAgCCQEMSW50ZWdlckVudHJ5AgIDcmVzBQNyZXMJAMwIAgkBDEludGVnZXJFbnRyeQICDWZpcnN0QW1vdW50SW4FDWZpcnN0QW1vdW50SW4JAMwIAgkBDEludGVnZXJFbnRyeQICF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGkCCQBoAgUXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUFA3JlcwBkBQ53YXZlczJMVG9rZW5JZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIXSW5jb3JyZWN0IGludm9rZSByZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEGcmVkZWVtAQt3YXZlc0Ftb3VudAQLdXNlckFkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBBJyZWRlZW1lZFVTRE5BbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwIKc3dhcFRvVVNETgkAzAgCBQt3YXZlc0Ftb3VudAkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQNuaWwDCQAAAgUScmVkZWVtZWRVU0ROQW1vdW50BRJyZWRlZW1lZFVTRE5BbW91bnQEByRtYXRjaDAFEnJlZGVlbWVkVVNETkFtb3VudAMJAAECBQckbWF0Y2gwAgNJbnQEE3JlZGVlbWVkQW1vdW50VmFsdWUFByRtYXRjaDAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgULdXNlckFkZHJlc3MCCV9yZWRlZW1lZAUTcmVkZWVtZWRBbW91bnRWYWx1ZQUDbmlsCQACAQIXSW5jb3JyZWN0IGludm9rZSByZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5ofS3hQ==",
    "height": 2761353,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DJELd6nir5R88NN8uQtaPMwtv7k3fnAiwFQHHD2gAKCT
Next: FgcvHAynJKxeBzDkdHCKhbPXYY3cDjUJLAPMHBwHRjub

Diff: 
Old New Differences
101 101                                          if ((swappedAmount == swappedAmount))
102 102                                              then                                             match swappedAmount {
103 103                                                  case swappedAmountValue: Int => 
104 -                                                     let depositedWaves = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, swappedAmountValue)])
105 -                                                     if ((depositedWaves == depositedWaves))
106 -                                                         then (accum + next)
107 -                                                         else throw("Strict value is not equal to itself.")
104 +                                                     (accum + next)
108 105                                                  case _ => 
109 106                                                      throw("Incorrect invoke result")
110 107                                              }
127 124  
128 125                                  $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
129 126                                  }
130 - [IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
127 + [IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
131 128                              }
132 129                          else throw("Strict value is not equal to itself.")
133 130                  case _ => 
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let usdnId = base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'
5 5  
6 6  let waves2LTokenId = base58'GQ9QNVLGfYSbNZ4dS8NRyvGGELZL4sWPKiVj88CV1rJL'
7 7  
8 8  let puzzleLendSC = "3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"
9 9  
10 10  let fakePuzzleSwapSC = "3Ms8fqbXM4RhmM6CPTr44hUwHe2CCmVCfVA"
11 11  
12 12  let usdnAddressStr = "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"
13 13  
14 14  let waves2LTokenStr = "GQ9QNVLGfYSbNZ4dS8NRyvGGELZL4sWPKiVj88CV1rJL"
15 15  
16 16  func tryGetInteger (key) = match getInteger(this, key) {
17 17      case b: Int => 
18 18          b
19 19      case _ => 
20 20          0
21 21  }
22 22  
23 23  
24 24  @Callable(i)
25 25  func mintLong2 () = if (if ((size(i.payments) != 1))
26 26      then true
27 27      else (i.payments[0].amount == 0))
28 28      then throw("1 payment has to be attached mint")
29 29      else {
30 30          let firstAmountIn = i.payments[0].amount
31 31          let callerId = toString(i.caller)
32 32          let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
33 33          if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
34 34              then             match firstSwappedWavesAmount {
35 35                  case firstSwappedAmountValue: Int => 
36 36                      let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
37 37                      if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
38 38                          then {
39 39                              let listPercentage = [70, 49, 34, 24, 17]
40 40                              func repeatFunc (accum,next) =                             {
41 41                                  let swappedAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), ((firstSwappedAmountValue * accum) / 100)], nil)
42 42                                  if ((swappedAmount == swappedAmount))
43 43                                      then                                     match swappedAmount {
44 44                                          case swappedAmountValue: Int => 
45 45                                              let depositedWaves = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, swappedAmountValue)])
46 46                                              if ((depositedWaves == depositedWaves))
47 47                                                  then (accum + next)
48 48                                                  else throw("Strict value is not equal to itself.")
49 49                                          case _ => 
50 50                                              throw("Incorrect invoke result")
51 51                                      }
52 52                                      else throw("Strict value is not equal to itself.")
53 53                                  }
54 54  
55 55                              let res = {
56 56                                  let $l = listPercentage
57 57                                  let $s = size($l)
58 58                                  let $acc0 = 0
59 59                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
60 60                                      then $a
61 61                                      else repeatFunc($a, $l[$i])
62 62  
63 63                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
64 64                                      then $a
65 65                                      else throw("List size exceeds 5")
66 66  
67 67                                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
68 68                                  }
69 69  [ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
70 70                              }
71 71                          else throw("Strict value is not equal to itself.")
72 72                  case _ => 
73 73                      throw("Incorrect invoke result")
74 74              }
75 75              else throw("Strict value is not equal to itself.")
76 76          }
77 77  
78 78  
79 79  
80 80  @Callable(i)
81 81  func mintLong2_3 () = if (if ((size(i.payments) != 1))
82 82      then true
83 83      else (i.payments[0].amount == 0))
84 84      then throw("1 payment has to be attached mint")
85 85      else {
86 86          let firstAmountIn = i.payments[0].amount
87 87          let callerId = toString(i.caller)
88 88          let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
89 89          if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
90 90              then             match firstSwappedWavesAmount {
91 91                  case firstSwappedAmountValue: Int => 
92 92                      let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
93 93                      if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
94 94                          then {
95 95                              let listPercentage = [70, 49]
96 96                              func repeatFunc (accum,next) =                             {
97 97                                  let borrowedUsdn = invoke(addressFromStringValue(puzzleLendSC), "borrow", [usdnAddressStr, ((firstAmountIn * next) / 100)], nil)
98 98                                  if ((borrowedUsdn == borrowedUsdn))
99 99                                      then {
100 100                                          let swappedAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), ((firstAmountIn * next) / 100)], nil)
101 101                                          if ((swappedAmount == swappedAmount))
102 102                                              then                                             match swappedAmount {
103 103                                                  case swappedAmountValue: Int => 
104 -                                                     let depositedWaves = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, swappedAmountValue)])
105 -                                                     if ((depositedWaves == depositedWaves))
106 -                                                         then (accum + next)
107 -                                                         else throw("Strict value is not equal to itself.")
104 +                                                     (accum + next)
108 105                                                  case _ => 
109 106                                                      throw("Incorrect invoke result")
110 107                                              }
111 108                                              else throw("Strict value is not equal to itself.")
112 109                                          }
113 110                                      else throw("Strict value is not equal to itself.")
114 111                                  }
115 112  
116 113                              let res = {
117 114                                  let $l = listPercentage
118 115                                  let $s = size($l)
119 116                                  let $acc0 = 0
120 117                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
121 118                                      then $a
122 119                                      else repeatFunc($a, $l[$i])
123 120  
124 121                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
125 122                                      then $a
126 123                                      else throw("List size exceeds 2")
127 124  
128 125                                  $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
129 126                                  }
130 - [IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
127 + [IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
131 128                              }
132 129                          else throw("Strict value is not equal to itself.")
133 130                  case _ => 
134 131                      throw("Incorrect invoke result")
135 132              }
136 133              else throw("Strict value is not equal to itself.")
137 134          }
138 135  
139 136  
140 137  
141 138  @Callable(i)
142 139  func mintLong2_test () = if (if ((size(i.payments) != 1))
143 140      then true
144 141      else (i.payments[0].amount == 0))
145 142      then throw("1 payment has to be attached mint")
146 143      else {
147 144          let firstAmountIn = i.payments[0].amount
148 145          let callerId = toString(i.caller)
149 146          let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
150 147          if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
151 148              then             match firstSwappedWavesAmount {
152 149                  case firstSwappedAmountValue: Int => 
153 150                      let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
154 151                      if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
155 152                          then {
156 153                              let listPercentage = [70, 49, 34, 24, 17]
157 154                              func repeatFunc (accum,next) =                             (accum + next)
158 155  
159 156                              let res = {
160 157                                  let $l = listPercentage
161 158                                  let $s = size($l)
162 159                                  let $acc0 = 0
163 160                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
164 161                                      then $a
165 162                                      else repeatFunc($a, $l[$i])
166 163  
167 164                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
168 165                                      then $a
169 166                                      else throw("List size exceeds 5")
170 167  
171 168                                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
172 169                                  }
173 170  [IntegerEntry("res", res), IntegerEntry("firstAmountIn", firstAmountIn), IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
174 171                              }
175 172                          else throw("Strict value is not equal to itself.")
176 173                  case _ => 
177 174                      throw("Incorrect invoke result")
178 175              }
179 176              else throw("Strict value is not equal to itself.")
180 177          }
181 178  
182 179  
183 180  
184 181  @Callable(i)
185 182  func redeem (wavesAmount) = {
186 183      let userAddress = toString(i.caller)
187 184      let redeemedUSDNAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToUSDN", [wavesAmount, userAddress], nil)
188 185      if ((redeemedUSDNAmount == redeemedUSDNAmount))
189 186          then         match redeemedUSDNAmount {
190 187              case redeemedAmountValue: Int => 
191 188  [IntegerEntry((userAddress + "_redeemed"), redeemedAmountValue)]
192 189              case _ => 
193 190                  throw("Incorrect invoke result")
194 191          }
195 192          else throw("Strict value is not equal to itself.")
196 193      }
197 194  
198 195  
199 196  @Verifier(tx)
200 197  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
201 198

Old	New		Differences
101	101		if ((swappedAmount == swappedAmount))
102	102		then match swappedAmount {
103	103		case swappedAmountValue: Int =>
104		-	let depositedWaves = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, swappedAmountValue)])
105		-	if ((depositedWaves == depositedWaves))
106		-	then (accum + next)
107		-	else throw("Strict value is not equal to itself.")
	104	+	(accum + next)
108	105		case _ =>
109	106		throw("Incorrect invoke result")
110	107		}

127	124
128	125		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
129	126		}
130		-	[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
	127	+	[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
131	128		}
132	129		else throw("Strict value is not equal to itself.")
133	130		case _ =>

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let usdnId = base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'
5	5
6	6		let waves2LTokenId = base58'GQ9QNVLGfYSbNZ4dS8NRyvGGELZL4sWPKiVj88CV1rJL'
7	7
8	8		let puzzleLendSC = "3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"
9	9
10	10		let fakePuzzleSwapSC = "3Ms8fqbXM4RhmM6CPTr44hUwHe2CCmVCfVA"
11	11
12	12		let usdnAddressStr = "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"
13	13
14	14		let waves2LTokenStr = "GQ9QNVLGfYSbNZ4dS8NRyvGGELZL4sWPKiVj88CV1rJL"
15	15
16	16		func tryGetInteger (key) = match getInteger(this, key) {
17	17		case b: Int =>
18	18		b
19	19		case _ =>
20	20		0
21	21		}
22	22
23	23
24	24		@Callable(i)
25	25		func mintLong2 () = if (if ((size(i.payments) != 1))
26	26		then true
27	27		else (i.payments[0].amount == 0))
28	28		then throw("1 payment has to be attached mint")
29	29		else {
30	30		let firstAmountIn = i.payments[0].amount
31	31		let callerId = toString(i.caller)
32	32		let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
33	33		if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
34	34		then match firstSwappedWavesAmount {
35	35		case firstSwappedAmountValue: Int =>
36	36		let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
37	37		if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
38	38		then {
39	39		let listPercentage = [70, 49, 34, 24, 17]
40	40		func repeatFunc (accum,next) = {
41	41		let swappedAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), ((firstSwappedAmountValue * accum) / 100)], nil)
42	42		if ((swappedAmount == swappedAmount))
43	43		then match swappedAmount {
44	44		case swappedAmountValue: Int =>
45	45		let depositedWaves = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, swappedAmountValue)])
46	46		if ((depositedWaves == depositedWaves))
47	47		then (accum + next)
48	48		else throw("Strict value is not equal to itself.")
49	49		case _ =>
50	50		throw("Incorrect invoke result")
51	51		}
52	52		else throw("Strict value is not equal to itself.")
53	53		}
54	54
55	55		let res = {
56	56		let $l = listPercentage
57	57		let $s = size($l)
58	58		let $acc0 = 0
59	59		func $f0_1 ($a,$i) = if (($i >= $s))
60	60		then $a
61	61		else repeatFunc($a, $l[$i])
62	62
63	63		func $f0_2 ($a,$i) = if (($i >= $s))
64	64		then $a
65	65		else throw("List size exceeds 5")
66	66
67	67		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
68	68		}
69	69		[ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
70	70		}
71	71		else throw("Strict value is not equal to itself.")
72	72		case _ =>
73	73		throw("Incorrect invoke result")
74	74		}
75	75		else throw("Strict value is not equal to itself.")
76	76		}
77	77
78	78
79	79
80	80		@Callable(i)
81	81		func mintLong2_3 () = if (if ((size(i.payments) != 1))
82	82		then true
83	83		else (i.payments[0].amount == 0))
84	84		then throw("1 payment has to be attached mint")
85	85		else {
86	86		let firstAmountIn = i.payments[0].amount
87	87		let callerId = toString(i.caller)
88	88		let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
89	89		if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
90	90		then match firstSwappedWavesAmount {
91	91		case firstSwappedAmountValue: Int =>
92	92		let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
93	93		if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
94	94		then {
95	95		let listPercentage = [70, 49]
96	96		func repeatFunc (accum,next) = {
97	97		let borrowedUsdn = invoke(addressFromStringValue(puzzleLendSC), "borrow", [usdnAddressStr, ((firstAmountIn * next) / 100)], nil)
98	98		if ((borrowedUsdn == borrowedUsdn))
99	99		then {
100	100		let swappedAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), ((firstAmountIn * next) / 100)], nil)
101	101		if ((swappedAmount == swappedAmount))
102	102		then match swappedAmount {
103	103		case swappedAmountValue: Int =>
104		-	let depositedWaves = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, swappedAmountValue)])
105		-	if ((depositedWaves == depositedWaves))
106		-	then (accum + next)
107		-	else throw("Strict value is not equal to itself.")
	104	+	(accum + next)
108	105		case _ =>
109	106		throw("Incorrect invoke result")
110	107		}
111	108		else throw("Strict value is not equal to itself.")
112	109		}
113	110		else throw("Strict value is not equal to itself.")
114	111		}
115	112
116	113		let res = {
117	114		let $l = listPercentage
118	115		let $s = size($l)
119	116		let $acc0 = 0
120	117		func $f0_1 ($a,$i) = if (($i >= $s))
121	118		then $a
122	119		else repeatFunc($a, $l[$i])
123	120
124	121		func $f0_2 ($a,$i) = if (($i >= $s))
125	122		then $a
126	123		else throw("List size exceeds 2")
127	124
128	125		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
129	126		}
130		-	[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
	127	+	[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
131	128		}
132	129		else throw("Strict value is not equal to itself.")
133	130		case _ =>
134	131		throw("Incorrect invoke result")
135	132		}
136	133		else throw("Strict value is not equal to itself.")
137	134		}
138	135
139	136
140	137
141	138		@Callable(i)
142	139		func mintLong2_test () = if (if ((size(i.payments) != 1))
143	140		then true
144	141		else (i.payments[0].amount == 0))
145	142		then throw("1 payment has to be attached mint")
146	143		else {
147	144		let firstAmountIn = i.payments[0].amount
148	145		let callerId = toString(i.caller)
149	146		let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
150	147		if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
151	148		then match firstSwappedWavesAmount {
152	149		case firstSwappedAmountValue: Int =>
153	150		let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
154	151		if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
155	152		then {
156	153		let listPercentage = [70, 49, 34, 24, 17]
157	154		func repeatFunc (accum,next) = (accum + next)
158	155
159	156		let res = {
160	157		let $l = listPercentage
161	158		let $s = size($l)
162	159		let $acc0 = 0
163	160		func $f0_1 ($a,$i) = if (($i >= $s))
164	161		then $a
165	162		else repeatFunc($a, $l[$i])
166	163
167	164		func $f0_2 ($a,$i) = if (($i >= $s))
168	165		then $a
169	166		else throw("List size exceeds 5")
170	167
171	168		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
172	169		}
173	170		[IntegerEntry("res", res), IntegerEntry("firstAmountIn", firstAmountIn), IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
174	171		}
175	172		else throw("Strict value is not equal to itself.")
176	173		case _ =>
177	174		throw("Incorrect invoke result")
178	175		}
179	176		else throw("Strict value is not equal to itself.")
180	177		}
181	178
182	179
183	180
184	181		@Callable(i)
185	182		func redeem (wavesAmount) = {
186	183		let userAddress = toString(i.caller)
187	184		let redeemedUSDNAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToUSDN", [wavesAmount, userAddress], nil)
188	185		if ((redeemedUSDNAmount == redeemedUSDNAmount))
189	186		then match redeemedUSDNAmount {
190	187		case redeemedAmountValue: Int =>
191	188		[IntegerEntry((userAddress + "_redeemed"), redeemedAmountValue)]
192	189		case _ =>
193	190		throw("Incorrect invoke result")
194	191		}
195	192		else throw("Strict value is not equal to itself.")
196	193		}
197	194
198	195
199	196		@Verifier(tx)
200	197		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
201	198

github/deemru/w8io/c3f4982 
66.85 ms ◑