w8 · tx · HS4···JBd

tx · HS4HLRSDf67DZd9VsUcHy7dF6jN4DKdHcw2R3LRXPJBd

3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq:  -0.01000000 Waves

2023.09.18 22:57 [2761280] smart account 3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HS4HLRSDf67DZd9VsUcHy7dF6jN4DKdHcw2R3LRXPJBd",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1695067078917,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq",
    "senderPublicKey": "ERewvWFUFQfR1eCnipNAv9n7SdQhof2ESP6PGVjTueLd",
    "proofs": [
        "5u2caMjAC8oAWoowVmxiCsAFz6pZHqzy8ACVse4ADuKrTdqkcBjkZJHYKo3uRUGTKDdPMbnnwzNGtdu9vveodCW5"
    ],
    "script": "base64:BgINCAISABIAEgASAwoBAQcABnVzZG5JZAEgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQADndhdmVzMkxUb2tlbklkASDkzSnqu8EXlTZRNkvkaX2ITlFTrbuGFIX8CY7Zd2/OsQAMcHV6emxlTGVuZFNDAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAAQZmFrZVB1enpsZVN3YXBTQwIjM01zOGZxYlhNNFJobU02Q1BUcjQ0aFV3SGUyQ0NtVkNmVkEADnVzZG5BZGRyZXNzU3RyAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAAPd2F2ZXMyTFRva2VuU3RyAixHUTlRTlZMR2ZZU2JOWjRkUzhOUnl2R0dFTFpMNHNXUEtpVmo4OENWMXJKTAENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAQBaQEJbWludExvbmcyAAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAkAAgECITEgcGF5bWVudCBoYXMgdG8gYmUgYXR0YWNoZWQgbWludAQNZmlyc3RBbW91bnRJbggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECGNhbGxlcklkCQClCAEIBQFpBmNhbGxlcgQXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwILc3dhcFRvV2F2ZXMJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUNZmlyc3RBbW91bnRJbgUDbmlsBQNuaWwDCQAAAgUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BAckbWF0Y2gwBRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAMJAAECBQckbWF0Y2gwAgNJbnQEF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gwBBlmaXJzdERlcG9zaXRlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDHB1enpsZUxlbmRTQwIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBHVuaXQFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQNuaWwDCQAAAgUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAQObGlzdFBlcmNlbnRhZ2UJAMwIAgBGCQDMCAIAMQkAzAgCACIJAMwIAgAYCQDMCAIAEQUDbmlsCgEKcmVwZWF0RnVuYwIFYWNjdW0EbmV4dAQNc3dhcHBlZEFtb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBRBmYWtlUHV6emxlU3dhcFNDAgtzd2FwVG9XYXZlcwkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCCQBpAgkAaAIFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQVhY2N1bQBkBQNuaWwFA25pbAMJAAACBQ1zd2FwcGVkQW1vdW50BQ1zd2FwcGVkQW1vdW50BAckbWF0Y2gxBQ1zd2FwcGVkQW1vdW50AwkAAQIFByRtYXRjaDECA0ludAQSc3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gxBA5kZXBvc2l0ZWRXYXZlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQxwdXp6bGVMZW5kU0MCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BRJzd2FwcGVkQW1vdW50VmFsdWUFA25pbAMJAAACBQ5kZXBvc2l0ZWRXYXZlcwUOZGVwb3NpdGVkV2F2ZXMJAGQCBQVhY2N1bQUEbmV4dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBANyZXMKAAIkbAUObGlzdFBlcmNlbnRhZ2UKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAaQIJAGgCBRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDcmVzAGQFDndhdmVzMkxUb2tlbklkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQttaW50TG9uZzJfMwADAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABBgkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAJAAIBAiExIHBheW1lbnQgaGFzIHRvIGJlIGF0dGFjaGVkIG1pbnQEDWZpcnN0QW1vdW50SW4ICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAhjYWxsZXJJZAkApQgBCAUBaQZjYWxsZXIEF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFDWZpcnN0QW1vdW50SW4FA25pbAUDbmlsAwkAAAIFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAQHJG1hdGNoMAUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQDCQABAgUHJG1hdGNoMAIDSW50BBdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUHJG1hdGNoMAQObGlzdFBlcmNlbnRhZ2UJAMwIAgBGBQNuaWwKAQpyZXBlYXRGdW5jAgVhY2N1bQRuZXh0BA1zd2FwcGVkQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEGZha2VQdXp6bGVTd2FwU0MCC3N3YXBUb1dhdmVzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAGkCCQBoAgUXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUFBWFjY3VtAGQFA25pbAUDbmlsAwkAAAIFDXN3YXBwZWRBbW91bnQFDXN3YXBwZWRBbW91bnQEByRtYXRjaDEFDXN3YXBwZWRBbW91bnQDCQABAgUHJG1hdGNoMQIDSW50BBJzd2FwcGVkQW1vdW50VmFsdWUFByRtYXRjaDEFEnN3YXBwZWRBbW91bnRWYWx1ZQkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBANyZXMKAAIkbAUObGlzdFBlcmNlbnRhZ2UKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDEJAQUkZjBfMgIJAQUkZjBfMQIFBSRhY2MwAAAAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1zd2FwcGVkQW1vdW50BQNyZXMFA25pbAkAAgECF0luY29ycmVjdCBpbnZva2UgcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDm1pbnRMb25nMl90ZXN0AAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAkAAgECITEgcGF5bWVudCBoYXMgdG8gYmUgYXR0YWNoZWQgbWludAQNZmlyc3RBbW91bnRJbggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECGNhbGxlcklkCQClCAEIBQFpBmNhbGxlcgQXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQZmFrZVB1enpsZVN3YXBTQwILc3dhcFRvV2F2ZXMJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUNZmlyc3RBbW91bnRJbgUDbmlsBQNuaWwDCQAAAgUXZmlyc3RTd2FwcGVkV2F2ZXNBbW91bnQFF2ZpcnN0U3dhcHBlZFdhdmVzQW1vdW50BAckbWF0Y2gwBRdmaXJzdFN3YXBwZWRXYXZlc0Ftb3VudAMJAAECBQckbWF0Y2gwAgNJbnQEF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQckbWF0Y2gwBBlmaXJzdERlcG9zaXRlZFdhdmVzQW1vdW50CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDHB1enpsZUxlbmRTQwIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBHVuaXQFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlBQNuaWwDCQAAAgUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAUZZmlyc3REZXBvc2l0ZWRXYXZlc0Ftb3VudAQObGlzdFBlcmNlbnRhZ2UJAMwIAgBGCQDMCAIAMQkAzAgCACIJAMwIAgAYCQDMCAIAEQUDbmlsCgEKcmVwZWF0RnVuYwIFYWNjdW0EbmV4dAkAZAIFBWFjY3VtBQRuZXh0BANyZXMKAAIkbAUObGlzdFBlcmNlbnRhZ2UKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgNyZXMFA3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgINZmlyc3RBbW91bnRJbgUNZmlyc3RBbW91bnRJbgkAzAgCCQEMSW50ZWdlckVudHJ5AgIXZmlyc3RTd2FwcGVkQW1vdW50VmFsdWUFF2ZpcnN0U3dhcHBlZEFtb3VudFZhbHVlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAaQIJAGgCBRdmaXJzdFN3YXBwZWRBbW91bnRWYWx1ZQUDcmVzAGQFDndhdmVzMkxUb2tlbklkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQZyZWRlZW0BC3dhdmVzQW1vdW50BAt1c2VyQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEEnJlZGVlbWVkVVNETkFtb3VudAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBRBmYWtlUHV6emxlU3dhcFNDAgpzd2FwVG9VU0ROCQDMCAIFC3dhdmVzQW1vdW50CQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA25pbAMJAAACBRJyZWRlZW1lZFVTRE5BbW91bnQFEnJlZGVlbWVkVVNETkFtb3VudAQHJG1hdGNoMAUScmVkZWVtZWRVU0ROQW1vdW50AwkAAQIFByRtYXRjaDACA0ludAQTcmVkZWVtZWRBbW91bnRWYWx1ZQUHJG1hdGNoMAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQt1c2VyQWRkcmVzcwIJX3JlZGVlbWVkBRNyZWRlZW1lZEFtb3VudFZhbHVlBQNuaWwJAAIBAhdJbmNvcnJlY3QgaW52b2tlIHJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXneQP7r",
    "height": 2761280,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4AGwHrnaUpdKLzkJ6Hi3JkDTVe3v2VkZx2B82QHmGpW5
Next: 7urSnEJgK8PXic7rEuK4g929V5t233LMoa8DCQLn61G6

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

Old	New		Differences
116	116
117	117		$f0_2($f0_1($acc0, 0), 1)
118	118		}
119		-	[IntegerEntry("swappedAmount", res)]
	119	+	[IntegerEntry("firstSwappedAmountValue", firstSwappedAmountValue), IntegerEntry("swappedAmount", res)]
120	120		case _ =>
121	121		throw("Incorrect invoke result")
122	122		}

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

github/deemru/w8io/169f3d6 
33.99 ms ◑