w8 · tx · 6Wm···iNt

tx · 6WmY16KmZX5yHg2aiYizHuPD5pKwYAdrL941kkg2MiNt

3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq:  -0.01000000 Waves

2023.09.19 00:21 [2761368] smart account 3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6WmY16KmZX5yHg2aiYizHuPD5pKwYAdrL941kkg2MiNt",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1695072162212,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq",
    "senderPublicKey": "ERewvWFUFQfR1eCnipNAv9n7SdQhof2ESP6PGVjTueLd",
    "proofs": [
        "3uzvoDCV79zvHFWztnxoqz2fQaJBrYHDKVufy2iST9Q2XBG7hvBsgHNzjQF48hQCg6LVTceSAomLVxTREQywqUex"
    ],
    "script": "base64:BgINCAISABIAEgASAwoBAQcABnVzZG5JZAEgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQADndhdmVzMkxUb2tlbklkASDkzSnqu8EXlTZRNkvkaX2ITlFTrbuGFIX8CY7Zd2/OsQAMcHV6emxlTGVuZFNDAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAAQZmFrZVB1enpsZVN3YXBTQwIjM01zOGZxYlhNNFJobU02Q1BUcjQ0aFV3SGUyQ0NtVkNmVkEADnVzZG5BZGRyZXNzU3RyAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAAPd2F2ZXMyTFRva2VuU3RyAixHUTlRTlZMR2ZZU2JOWjRkUzhOUnl2R0dFTFpMNHNXUEtpVmo4OENWMXJKTAENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAQBaQEJbWludExvbmcyAAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAkAAgECITEgcGF5bWVudCBoYXMgdG8gYmUgYXR0YWNoZWQgbWludAQNZmlyc3RBbW91bnRJbggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECGNhbGxlcklkCQClCAEIBQFpBmNhbGxlcgQXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwILc3dhcFRvV2F2ZXMJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUNZmlyc3RBbW91bnRJbgUDbmlsBQNuaWwDCQAAAgUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BAckbWF0Y2gwBRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAMJAAECBQckbWF0Y2gwAgNJbnQEF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gwBBlmaXJzdERlcG9zaXRlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDHB1enpsZUxlbmRTQwIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBHVuaXQFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQNuaWwDCQAAAgUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAQObGlzdFBlcmNlbnRhZ2UJAMwIAgBGCQDMCAIAMQkAzAgCACIJAMwIAgAYCQDMCAIAEQUDbmlsCgEKcmVwZWF0RnVuYwIFYWNjdW0EbmV4dAQNc3dhcHBlZEFtb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBRBmYWtlUHV6emxlU3dhcFNDAgtzd2FwVG9XYXZlcwkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCCQBpAgkAaAIFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQVhY2N1bQBkBQNuaWwFA25pbAMJAAACBQ1zd2FwcGVkQW1vdW50BQ1zd2FwcGVkQW1vdW50BAckbWF0Y2gxBQ1zd2FwcGVkQW1vdW50AwkAAQIFByRtYXRjaDECA0ludAQSc3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gxBA5kZXBvc2l0ZWRXYXZlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRJzd2FwcGVkQW1vdW50VmFsdWUFA25pbAMJAAACBQ5kZXBvc2l0ZWRXYXZlcwUOZGVwb3NpdGVkV2F2ZXMJAGQCBQVhY2N1bQUEbmV4dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBANyZXMKAAIkbAUObGlzdFBlcmNlbnRhZ2UKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAaQIJAGgCBRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDcmVzAGQFDndhdmVzMkxUb2tlbklkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQttaW50TG9uZzJfMwADAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABBgkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAJAAIBAiExIHBheW1lbnQgaGFzIHRvIGJlIGF0dGFjaGVkIG1pbnQEDWZpcnN0QW1vdW50SW4ICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAhjYWxsZXJJZAkApQgBCAUBaQZjYWxsZXIEF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFDWZpcnN0QW1vdW50SW4FA25pbAUDbmlsAwkAAAIFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAQHJG1hdGNoMAUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQDCQABAgUHJG1hdGNoMAIDSW50BBdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUHJG1hdGNoMAQZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDbmlsAwkAAAIFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQEDmxpc3RQZXJjZW50YWdlCQDMCAIARgkAzAgCADEJAMwIAgAiBQNuaWwKAQpyZXBlYXRGdW5jAgVhY2N1bQRuZXh0BAxib3Jyb3dlZFVzZG4JAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUMcHV6emxlTGVuZFNDAgZib3Jyb3cJAMwIAgUOdXNkbkFkZHJlc3NTdHIJAMwIAgkAaQIJAGgCBQ1maXJzdEFtb3VudEluBQRuZXh0AGQFA25pbAUDbmlsAwkAAAIFDGJvcnJvd2VkVXNkbgUMYm9ycm93ZWRVc2RuBA1zd2FwcGVkQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAGkCCQBoAgUNZmlyc3RBbW91bnRJbgUEbmV4dABkBQNuaWwFA25pbAMJAAACBQ1zd2FwcGVkQW1vdW50BQ1zd2FwcGVkQW1vdW50BAckbWF0Y2gxBQ1zd2FwcGVkQW1vdW50AwkAAQIFByRtYXRjaDECA0ludAQSc3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gxCQBkAgUFYWNjdW0FBG5leHQJAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQDcmVzCgACJGwFDmxpc3RQZXJjZW50YWdlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAzCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBpAgkAaAIFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQNyZXMAZAUOd2F2ZXMyTFRva2VuSWQJAMwIAgkBDEludGVnZXJFbnRyeQICA3JlcwUDcmVzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5taW50TG9uZzJfdGVzdAADAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABBgkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAJAAIBAiExIHBheW1lbnQgaGFzIHRvIGJlIGF0dGFjaGVkIG1pbnQEDWZpcnN0QW1vdW50SW4ICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAhjYWxsZXJJZAkApQgBCAUBaQZjYWxsZXIEF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFDWZpcnN0QW1vdW50SW4FA25pbAUDbmlsAwkAAAIFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAQHJG1hdGNoMAUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQDCQABAgUHJG1hdGNoMAIDSW50BBdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUHJG1hdGNoMAQZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDbmlsAwkAAAIFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQFGWZpcnN0RGVwb3NpdGVkV2F2ZXNBbW91bnQEDmxpc3RQZXJjZW50YWdlCQDMCAIARgkAzAgCADEJAMwIAgAiCQDMCAIAGAkAzAgCABEFA25pbAoBCnJlcGVhdEZ1bmMCBWFjY3VtBG5leHQJAGQCBQVhY2N1bQUEbmV4dAQDcmVzCgACJGwFDmxpc3RQZXJjZW50YWdlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQkAzAgCCQEMSW50ZWdlckVudHJ5AgIDcmVzBQNyZXMJAMwIAgkBDEludGVnZXJFbnRyeQICDWZpcnN0QW1vdW50SW4FDWZpcnN0QW1vdW50SW4JAMwIAgkBDEludGVnZXJFbnRyeQICF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGkCCQBoAgUXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUFA3JlcwBkBQ53YXZlczJMVG9rZW5JZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIXSW5jb3JyZWN0IGludm9rZSByZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEGcmVkZWVtAQt3YXZlc0Ftb3VudAQLdXNlckFkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBBJyZWRlZW1lZFVTRE5BbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwIKc3dhcFRvVVNETgkAzAgCBQt3YXZlc0Ftb3VudAkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQNuaWwDCQAAAgUScmVkZWVtZWRVU0ROQW1vdW50BRJyZWRlZW1lZFVTRE5BbW91bnQEByRtYXRjaDAFEnJlZGVlbWVkVVNETkFtb3VudAMJAAECBQckbWF0Y2gwAgNJbnQEE3JlZGVlbWVkQW1vdW50VmFsdWUFByRtYXRjaDAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgULdXNlckFkZHJlc3MCCV9yZWRlZW1lZAUTcmVkZWVtZWRBbW91bnRWYWx1ZQUDbmlsCQACAQIXSW5jb3JyZWN0IGludm9rZSByZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V56CMeig==",
    "height": 2761368,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3U9MAr1SrfkDsYCkVapfdMonK1pvdtrebsivixk3fQky
Next: AxTD8udrmhv3kobQQfj1wkFbvfQnJg3aEXo6jWBe7ogw

Diff: 
Old New Differences
92 92                      let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
93 93                      if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
94 94                          then {
95 -                             let listPercentage = [70, 49]
95 +                             let listPercentage = [70, 49, 34]
96 96                              func repeatFunc (accum,next) =                             {
97 97                                  let borrowedUsdn = invoke(addressFromStringValue(puzzleLendSC), "borrow", [usdnAddressStr, ((firstAmountIn * next) / 100)], nil)
98 98                                  if ((borrowedUsdn == borrowedUsdn))
120 120  
121 121                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
122 122                                      then $a
123 -                                     else throw("List size exceeds 2")
123 +                                     else throw("List size exceeds 3")
124 124  
125 -                                 $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
125 +                                 $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
126 126                                  }
127 127  [IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
128 128                              }
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 -                             let listPercentage = [70, 49]
95 +                             let listPercentage = [70, 49, 34]
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 104                                                      (accum + next)
105 105                                                  case _ => 
106 106                                                      throw("Incorrect invoke result")
107 107                                              }
108 108                                              else throw("Strict value is not equal to itself.")
109 109                                          }
110 110                                      else throw("Strict value is not equal to itself.")
111 111                                  }
112 112  
113 113                              let res = {
114 114                                  let $l = listPercentage
115 115                                  let $s = size($l)
116 116                                  let $acc0 = 0
117 117                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
118 118                                      then $a
119 119                                      else repeatFunc($a, $l[$i])
120 120  
121 121                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
122 122                                      then $a
123 -                                     else throw("List size exceeds 2")
123 +                                     else throw("List size exceeds 3")
124 124  
125 -                                 $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
125 +                                 $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
126 126                                  }
127 127  [IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
128 128                              }
129 129                          else throw("Strict value is not equal to itself.")
130 130                  case _ => 
131 131                      throw("Incorrect invoke result")
132 132              }
133 133              else throw("Strict value is not equal to itself.")
134 134          }
135 135  
136 136  
137 137  
138 138  @Callable(i)
139 139  func mintLong2_test () = if (if ((size(i.payments) != 1))
140 140      then true
141 141      else (i.payments[0].amount == 0))
142 142      then throw("1 payment has to be attached mint")
143 143      else {
144 144          let firstAmountIn = i.payments[0].amount
145 145          let callerId = toString(i.caller)
146 146          let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
147 147          if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
148 148              then             match firstSwappedWavesAmount {
149 149                  case firstSwappedAmountValue: Int => 
150 150                      let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
151 151                      if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
152 152                          then {
153 153                              let listPercentage = [70, 49, 34, 24, 17]
154 154                              func repeatFunc (accum,next) =                             (accum + next)
155 155  
156 156                              let res = {
157 157                                  let $l = listPercentage
158 158                                  let $s = size($l)
159 159                                  let $acc0 = 0
160 160                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
161 161                                      then $a
162 162                                      else repeatFunc($a, $l[$i])
163 163  
164 164                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
165 165                                      then $a
166 166                                      else throw("List size exceeds 5")
167 167  
168 168                                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
169 169                                  }
170 170  [IntegerEntry("res", res), IntegerEntry("firstAmountIn", firstAmountIn), IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
171 171                              }
172 172                          else throw("Strict value is not equal to itself.")
173 173                  case _ => 
174 174                      throw("Incorrect invoke result")
175 175              }
176 176              else throw("Strict value is not equal to itself.")
177 177          }
178 178  
179 179  
180 180  
181 181  @Callable(i)
182 182  func redeem (wavesAmount) = {
183 183      let userAddress = toString(i.caller)
184 184      let redeemedUSDNAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToUSDN", [wavesAmount, userAddress], nil)
185 185      if ((redeemedUSDNAmount == redeemedUSDNAmount))
186 186          then         match redeemedUSDNAmount {
187 187              case redeemedAmountValue: Int => 
188 188  [IntegerEntry((userAddress + "_redeemed"), redeemedAmountValue)]
189 189              case _ => 
190 190                  throw("Incorrect invoke result")
191 191          }
192 192          else throw("Strict value is not equal to itself.")
193 193      }
194 194  
195 195  
196 196  @Verifier(tx)
197 197  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
198 198

Old	New		Differences
92	92		let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
93	93		if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
94	94		then {
95		-	let listPercentage = [70, 49]
	95	+	let listPercentage = [70, 49, 34]
96	96		func repeatFunc (accum,next) = {
97	97		let borrowedUsdn = invoke(addressFromStringValue(puzzleLendSC), "borrow", [usdnAddressStr, ((firstAmountIn * next) / 100)], nil)
98	98		if ((borrowedUsdn == borrowedUsdn))

120	120
121	121		func $f0_2 ($a,$i) = if (($i >= $s))
122	122		then $a
123		-	else throw("List size exceeds 2")
	123	+	else throw("List size exceeds 3")
124	124
125		-	$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
	125	+	$f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
126	126		}
127	127		[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
128	128		}

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		-	let listPercentage = [70, 49]
	95	+	let listPercentage = [70, 49, 34]
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	104		(accum + next)
105	105		case _ =>
106	106		throw("Incorrect invoke result")
107	107		}
108	108		else throw("Strict value is not equal to itself.")
109	109		}
110	110		else throw("Strict value is not equal to itself.")
111	111		}
112	112
113	113		let res = {
114	114		let $l = listPercentage
115	115		let $s = size($l)
116	116		let $acc0 = 0
117	117		func $f0_1 ($a,$i) = if (($i >= $s))
118	118		then $a
119	119		else repeatFunc($a, $l[$i])
120	120
121	121		func $f0_2 ($a,$i) = if (($i >= $s))
122	122		then $a
123		-	else throw("List size exceeds 2")
	123	+	else throw("List size exceeds 3")
124	124
125		-	$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
	125	+	$f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
126	126		}
127	127		[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId), IntegerEntry("res", res)]
128	128		}
129	129		else throw("Strict value is not equal to itself.")
130	130		case _ =>
131	131		throw("Incorrect invoke result")
132	132		}
133	133		else throw("Strict value is not equal to itself.")
134	134		}
135	135
136	136
137	137
138	138		@Callable(i)
139	139		func mintLong2_test () = if (if ((size(i.payments) != 1))
140	140		then true
141	141		else (i.payments[0].amount == 0))
142	142		then throw("1 payment has to be attached mint")
143	143		else {
144	144		let firstAmountIn = i.payments[0].amount
145	145		let callerId = toString(i.caller)
146	146		let firstSwappedWavesAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToWaves", [toString(i.caller), firstAmountIn], nil)
147	147		if ((firstSwappedWavesAmount == firstSwappedWavesAmount))
148	148		then match firstSwappedWavesAmount {
149	149		case firstSwappedAmountValue: Int =>
150	150		let firstDepositedWavesAmount = invoke(addressFromStringValue(puzzleLendSC), "supply", nil, [AttachedPayment(unit, firstSwappedAmountValue)])
151	151		if ((firstDepositedWavesAmount == firstDepositedWavesAmount))
152	152		then {
153	153		let listPercentage = [70, 49, 34, 24, 17]
154	154		func repeatFunc (accum,next) = (accum + next)
155	155
156	156		let res = {
157	157		let $l = listPercentage
158	158		let $s = size($l)
159	159		let $acc0 = 0
160	160		func $f0_1 ($a,$i) = if (($i >= $s))
161	161		then $a
162	162		else repeatFunc($a, $l[$i])
163	163
164	164		func $f0_2 ($a,$i) = if (($i >= $s))
165	165		then $a
166	166		else throw("List size exceeds 5")
167	167
168	168		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
169	169		}
170	170		[IntegerEntry("res", res), IntegerEntry("firstAmountIn", firstAmountIn), IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), ScriptTransfer(i.caller, ((firstSwappedAmountValue * res) / 100), waves2LTokenId)]
171	171		}
172	172		else throw("Strict value is not equal to itself.")
173	173		case _ =>
174	174		throw("Incorrect invoke result")
175	175		}
176	176		else throw("Strict value is not equal to itself.")
177	177		}
178	178
179	179
180	180
181	181		@Callable(i)
182	182		func redeem (wavesAmount) = {
183	183		let userAddress = toString(i.caller)
184	184		let redeemedUSDNAmount = invoke(addressFromStringValue(fakePuzzleSwapSC), "swapToUSDN", [wavesAmount, userAddress], nil)
185	185		if ((redeemedUSDNAmount == redeemedUSDNAmount))
186	186		then match redeemedUSDNAmount {
187	187		case redeemedAmountValue: Int =>
188	188		[IntegerEntry((userAddress + "_redeemed"), redeemedAmountValue)]
189	189		case _ =>
190	190		throw("Incorrect invoke result")
191	191		}
192	192		else throw("Strict value is not equal to itself.")
193	193		}
194	194
195	195
196	196		@Verifier(tx)
197	197		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
198	198

github/deemru/w8io/169f3d6 
50.32 ms ◑