w8 · tx · jfg···6Lt

tx · jfgpPEEwCUBLbdRbH6KsSP7qa5PT9BrVeugnF5xu6Lt

3PJUm112svcu4gPU9GKpsBGwYNEVQEPiQ1t:  -0.01000000 Waves

2022.11.30 16:14 [3405349] smart account 3PJUm112svcu4gPU9GKpsBGwYNEVQEPiQ1t > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "jfgpPEEwCUBLbdRbH6KsSP7qa5PT9BrVeugnF5xu6Lt",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1669814130754,
    "version": 2,
    "chainId": 87,
    "sender": "3PJUm112svcu4gPU9GKpsBGwYNEVQEPiQ1t",
    "senderPublicKey": "6BTduxfT4CkTidY6P35nYzafiLpun4QLUZCQUU6pcJQM",
    "proofs": [
        "25B9MwseH4NoEEyHNC5m5JLeuARM3vStdndyY1wb2ABX4dkfmTzybhEsDwzM6m3MguhDKQN1PwoYYvJJm1d9QqfF"
    ],
    "script": "base64:BgIeCAISABIDCgEBEgMKAQgSAwoBBBIECgIECBIDCgEEFQAGU2NhbGU2AMCEPQAGU2NhbGU4AIDC1y8AB1NjYWxlMTYJAGgCBQZTY2FsZTgFBlNjYWxlOAATcG9maXRBY2NvdW50QWRkcmVzcwkBB0FkZHJlc3MBARoBV6lAs/JQjYpYhnwlRsr973lVvk50FZ4aQwAHYXNzZXRJZAIsREcyeEZrUGREd0tVb0JrekdBaFF0THBTR3pmWExpQ1lQRXplS0gyQWQyNHAACnZhbGlkYXRvcnMJAMwIAgIjM1BFcUM5NTMzaDZBRG5KdlhiOGN2WGNhU2tlY2Q5WVROdnoFA25pbAALcHV6emxlUG9vbHMJAMwIAgIjM1A0REs1VnpEd0wzdmZjNWFoVUVodG9lNUJ5Wk55YWNKM1gJAMwIAgIjM1A0dUE1ZXRuWmk0QW1CYWJLaW5xMmJNaVdVOEtjbkhaZEgFA25pbAEKZ2V0QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgRVbml0BAF4BQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQdhc3NldElkAQl0cnlHZXRJbnQCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEJdHJ5R2V0U3RyAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgABDmdldEFzc2V0U3RyaW5nAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAJANgEAQUBYgIFV0FWRVMBG2dldFB1enpsZVBvb2xTdXBwbGllZEFtb3VudAEOcG9vbEFkZHJlc3NTdHIEC3Bvb2xBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUOcG9vbEFkZHJlc3NTdHIEBnRva2VucwQHJG1hdGNoMAkAnQgCBQtwb29sQWRkcmVzcwIMc2V0dXBfdG9rZW5zAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcgUHJG1hdGNoMAkAtQkCBQFyAgEsCQACAQkArAICAipDYW5ub3QgZmluZCBzZXR1cF90b2tlbnMgaW4gc3RhdGUgb2YgcG9vbCAFDnBvb2xBZGRyZXNzU3RyBAp0b2tlbkluZGV4BAckbWF0Y2gwCQDPCAIFBnRva2VucwUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgNJbnQEAXIFByRtYXRjaDAFAXIJAAIBCQCsAgIJAKwCAgkArAICAgxjYW5ub3QgZmluZCAFB2Fzc2V0SWQCCCBpbiBwb29sBQ5wb29sQWRkcmVzc1N0cgQSdG9rZW5SYXRlc1Jlc3BvbnNlCQD8BwQFC3Bvb2xBZGRyZXNzAhNjYWxjdWxhdGVUb2tlblJhdGVzCQDMCAIHBQNuaWwFA25pbAMJAAACBRJ0b2tlblJhdGVzUmVzcG9uc2UFEnRva2VuUmF0ZXNSZXNwb25zZQQRdG9rZW5zUmF0ZXNTdHJpbmcEByRtYXRjaDAFEnRva2VuUmF0ZXNSZXNwb25zZQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXIFByRtYXRjaDAFAXIJAAIBCQCsAgICO0Z1bmMgJ2NhbGN1bGF0ZVRva2VuUmF0ZXMnIHJldHVybnMgbm90IHN0cmluZyB2YWx1ZSBpbiBwb29sBQ5wb29sQWRkcmVzc1N0cgQNc3VwcGx5UmF0ZVN0cgkAkQMCCQC1CQIJAJEDAgkAtQkCBRF0b2tlbnNSYXRlc1N0cmluZwIBLAUKdG9rZW5JbmRleAIBfAABBApzdXBwbHlSYXRlBAckbWF0Y2gwCQC2CQEFDXN1cHBseVJhdGVTdHIDCQABAgUHJG1hdGNoMAIDSW50BAF0BQckbWF0Y2gwBQF0CQACAQInQ2Fubm90IHBhcnNlIHN1cHBseSByYXRlIGZyb20gZGVmaSBwb29sBAZzdXBwbHkJAQl0cnlHZXRJbnQCBQtwb29sQWRkcmVzcwkArAICCQCsAgIJAKUIAQUEdGhpcwIKX3N1cHBsaWVkXwUHYXNzZXRJZAQGYW1vdW50CQBrAwUGc3VwcGx5BQpzdXBwbHlSYXRlBQdTY2FsZTE2BQZhbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BFmdldFRvdGFsU3VwcGxpZWRBbW91bnQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sCQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBnBvb2xJZAZhbW91bnQEC3Bvb2xBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkBAp3aXRoZHJhd1R4AwkAZgIFBmFtb3VudAAACQD8BwQFC3Bvb2xBZGRyZXNzAgh3aXRoZHJhdwkAzAgCBQdhc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwCAAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ53aXRoZHJhd1Jlc3VsdAAEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgULY3VycmVudFBvb2wCAAkAAgEJAKwCAgIZQ2Fubm90IGZpbmQgcG9vbCB3aXRoIGlkIAULY3VycmVudFBvb2wEBmFtb3VudAkBG2dldFB1enpsZVBvb2xTdXBwbGllZEFtb3VudAEFC2N1cnJlbnRQb29sBAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUGYW1vdW50AwkAAAIFAnR4BQJ0eAUCdHgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDHN1cHBseVJlc3VsdAEGcG9vbElkAwkAAAIJAM8IAgULcHV6emxlUG9vbHMFBnBvb2xJZAUEdW5pdAkAAgEJAKwCAgIPVW5rbm93biBwb29sSWQgBQZwb29sSWQECmFzc2V0Qnl0ZXMJANkEAQUHYXNzZXRJZAQHYmFsYW5jZQkBCmdldEJhbGFuY2UBBQphc3NldEJ5dGVzBANpbnYJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBnBvb2xJZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCmFzc2V0Qnl0ZXMFB2JhbGFuY2UFA25pbAMJAAACBQNpbnYFA2ludgkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDmNhbGN1bGF0ZVNSYXRlAAQObGFzdENoZWNrU1JhdGUJAQl0cnlHZXRJbnQCBQR0aGlzAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQED2xhc3RDaGVja0hlaWdodAkBCXRyeUdldEludAIFBHRoaXMCG2dsb2JhbF9sYXN0Q2hlY2tTUmF0ZUhlaWdodAQGYmxvY2tzCQBlAgUGaGVpZ2h0BQ9sYXN0Q2hlY2tIZWlnaHQECGVtaXNzaW9uCQBlAgkBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQACQBrAwUMc3Rha2VkQW1vdW50BQ5sYXN0Q2hlY2tTUmF0ZQUGU2NhbGU4BA9zdGFraW5nRW1pc3Npb24JAGsDBQhlbWlzc2lvbgDAq6YtBQZTY2FsZTgDCQAAAgUMc3Rha2VkQW1vdW50AAAFBlNjYWxlOAQFc1JhdGUJAGQCBQ5sYXN0Q2hlY2tTUmF0ZQkAawMJAGgCBQZibG9ja3MFBlNjYWxlOAUPc3Rha2luZ0VtaXNzaW9uBQxzdGFrZWRBbW91bnQDCQBmAgUGU2NhbGU4BQVzUmF0ZQUGU2NhbGU4BQVzUmF0ZQEMcmVjYWxjUmVzdWx0AQxzdGFrZWRDaGFuZ2UEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQEBXNSYXRlCQEOY2FsY3VsYXRlU1JhdGUABAZwcm9maXQJAGUCCQEWZ2V0VG90YWxTdXBwbGllZEFtb3VudAAJAGsDBQxzdGFrZWRBbW91bnQFBXNSYXRlBQZTY2FsZTgJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTcG9maXRBY2NvdW50QWRkcmVzcwMJAGYCBQZwcm9maXQAAAUGcHJvZml0AAAJANkEAQUHYXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFDHN0YWtlZEFtb3VudAUMc3Rha2VkQ2hhbmdlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUFBXNSYXRlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhtnbG9iYWxfbGFzdENoZWNrU1JhdGVIZWlnaHQFBmhlaWdodAUDbmlsARVjYWxjdWxhdGVTdGFrZWRBbW91bnQBBHVzZXIEBmFtb3VudAkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAkAawMFBmFtb3VudAkBDmNhbGN1bGF0ZVNSYXRlAAUGU2NhbGU4AQtzdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAkAzggCCQEMcmVjYWxjUmVzdWx0AQUHc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBkAgkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAUHc0Ftb3VudAUDbmlsAQ11bnN0YWtlUmVzdWx0AgR1c2VyBmFtb3VudAQFc1JhdGUJAQ5jYWxjdWxhdGVTUmF0ZQAEB3NBbW91bnQDCQAAAgUFc1JhdGUAAAUGYW1vdW50CQBrAwUGYW1vdW50BQZTY2FsZTgFBXNSYXRlBAp1c2VyU3Rha2VkCQEJdHJ5R2V0SW50AgUEdGhpcwkArAICBQR1c2VyAgdfc3Rha2VkBA5jdXJyZW50U0Ftb3VudAMJAAACBQVzUmF0ZQAABQp1c2VyU3Rha2VkCQBrAwUKdXNlclN0YWtlZAUGU2NhbGU4BQVzUmF0ZQQNdW5zdGFrZUFtb3VudAMJAGYCBQdzQW1vdW50BQ5jdXJyZW50U0Ftb3VudAUOY3VycmVudFNBbW91bnQFB3NBbW91bnQJAM4IAgkBDHJlY2FsY1Jlc3VsdAEJAQEtAQUHc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBlAgUOY3VycmVudFNBbW91bnQFDXVuc3Rha2VBbW91bnQFA25pbAYBaQEFc3Rha2UABAR1c2VyCQClCAEIBQFpBmNhbGxlcgQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAMDCQBnAgAABQZhbW91bnQGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJANkEAQUHYXNzZXRJZAkAAgECFmludmFsaWQgdG9rZW4gYXR0YWNoZWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wJAM4IAgkBC3N0YWtlUmVzdWx0AgUEdXNlcgUGYW1vdW50CQEMc3VwcGx5UmVzdWx0AQULY3VycmVudFBvb2wBaQEHdW5zdGFrZQEGYW1vdW50BAR1c2VyCQClCAEIBQFpBmNhbGxlcgQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAQCdHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgULY3VycmVudFBvb2wFBmFtb3VudAMJAAACBQJ0eAUCdHgJAM4IAgkBDXVuc3Rha2VSZXN1bHQCBQR1c2VyBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQZhbW91bnQJANkEAQUHYXNzZXRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCXJlYmFsYW5jZQEGcG9vbElkBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIJAM8IAgUKdmFsaWRhdG9ycwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAAIBAg1BY2Nlc3MgZGVuaWVkAwkAAAIFC2N1cnJlbnRQb29sBQZwb29sSWQJAAIBCQCsAgICE0FscmVhZHkgc3VwcGxpZWQgdG8FC2N1cnJlbnRQb29sBAp3aXRoZHJhd1R4CQEOd2l0aGRyYXdSZXN1bHQAAwkAAAIFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgJAM4IAgkBDHN1cHBseVJlc3VsdAEFBnBvb2xJZAkBDHJlY2FsY1Jlc3VsdAEAAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhnZXRTUmF0ZQEFZGVidWcECXBhcmFtZXRlcgkBDmNhbGN1bGF0ZVNSYXRlAAMFBWRlYnVnCQACAQkApAMBBQlwYXJhbWV0ZXIJAJQKAgUDbmlsBQlwYXJhbWV0ZXIBaQEPZ2V0U3Rha2VkQW1vdW50AgVkZWJ1Zwt1c2VyQWRkcmVzcwQJcGFyYW1ldGVyCQEVY2FsY3VsYXRlU3Rha2VkQW1vdW50AQULdXNlckFkZHJlc3MDBQVkZWJ1ZwkAAgEJAKQDAQUJcGFyYW1ldGVyCQCUCgIFA25pbAUJcGFyYW1ldGVyAWkBFGdldFRvdGFsU3Rha2VkQW1vdW50AQVkZWJ1ZwQGYW1vdW50CQEJdHJ5R2V0SW50AgUEdGhpcwINZ2xvYmFsX3N0YWtlZAQJcGFyYW1ldGVyCQBrAwUGYW1vdW50CQEOY2FsY3VsYXRlU1JhdGUABQZTY2FsZTgDBQVkZWJ1ZwkAAgEJAKQDAQUJcGFyYW1ldGVyCQCUCgIFA25pbAUJcGFyYW1ldGVyAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tlebXiQiI=",
    "height": 3405349,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7q4BHjpunpKDeB4rA25QLxWvwsd3n5wcvN7LMKgyC9qU
Next: 7VKvLJ8DaojteokigZpo9gREVsfZwrmeALZuzCHR8eme

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = 1000000
5 5  
6 6  let b = 100000000
7 7  
8 8  let c = (b * b)
9 9  
10 10  let d = Address(base58'3PHMpSJXoCTAJTmdVXgxXAFrkHBRyjNRuMU')
11 11  
12 12  let e = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
13 13  
14 14  let f = ["3PEqC9533h6ADnJvXb8cvXcaSkecd9YTNvz"]
15 15  
16 16  let g = ["3P4DK5VzDwL3vfc5ahUEhtoe5ByZNyacJ3X", "3P4uA5etnZi4AmBabKinq2bMiWU8KcnHZdH"]
17 17  
18 18  func h (e) = {
19 19      let i = e
20 20      if ($isInstanceOf(i, "Unit"))
21 21          then {
22 22              let j = i
23 23              wavesBalance(this).available
24 24              }
25 25          else assetBalance(this, value(e))
26 26      }
27 27  
28 28  
29 29  func k (l,m) = {
30 30      let i = getInteger(l, m)
31 31      if ($isInstanceOf(i, "Int"))
32 32          then {
33 33              let n = i
34 34              n
35 35              }
36 36          else 0
37 37      }
38 38  
39 39  
40 40  func o (l,m) = {
41 41      let i = getString(l, m)
42 42      if ($isInstanceOf(i, "String"))
43 43          then {
44 44              let n = i
45 45              n
46 46              }
47 47          else ""
48 48      }
49 49  
50 50  
51 51  func p (e) = {
52 52      let i = e
53 53      if ($isInstanceOf(i, "ByteVector"))
54 54          then {
55 55              let n = i
56 56              toBase58String(n)
57 57              }
58 58          else "WAVES"
59 59      }
60 60  
61 61  
62 62  func q (r) = {
63 63      let s = Address(fromBase58String(r))
64 64      let t = {
65 65          let i = getString(s, "setup_tokens")
66 66          if ($isInstanceOf(i, "String"))
67 67              then {
68 68                  let u = i
69 69                  split(u, ",")
70 70                  }
71 71              else throw(("Cannot find setup_tokens in state of pool " + r))
72 72          }
73 73      let v = {
74 74          let i = indexOf(t, e)
75 75          if ($isInstanceOf(i, "Int"))
76 76              then {
77 77                  let u = i
78 78                  u
79 79                  }
80 80              else throw(((("cannot find " + e) + " in pool") + r))
81 81          }
82 82      let w = invoke(s, "calculateTokenRates", [false], nil)
83 83      if ((w == w))
84 84          then {
85 85              let x = {
86 86                  let i = w
87 87                  if ($isInstanceOf(i, "String"))
88 88                      then {
89 89                          let u = i
90 90                          u
91 91                          }
92 92                      else throw(("Func 'calculateTokenRates' returns not string value in pool" + r))
93 93                  }
94 94              let y = split(split(x, ",")[v], "|")[1]
95 95              let z = {
96 96                  let i = parseInt(y)
97 97                  if ($isInstanceOf(i, "Int"))
98 98                      then {
99 99                          let A = i
100 100                          A
101 101                          }
102 102                      else throw("Cannot parse supply rate from defi pool")
103 103                  }
104 104              let B = k(s, ((toString(this) + "_supplied_") + e))
105 105              let C = fraction(B, z, c)
106 106              C
107 107              }
108 108          else throw("Strict value is not equal to itself.")
109 109      }
110 110  
111 111  
112 112  func D () = {
113 113      let E = o(this, "currentPool")
114 114      if ((E == ""))
115 115          then throw(("Cannot find pool with id " + E))
116 116          else q(E)
117 117      }
118 118  
119 119  
120 120  func F (G,C) = {
121 121      let s = Address(fromBase58String(G))
122 122      let H = if ((C > 0))
123 123          then invoke(s, "withdraw", [e, C], nil)
124 124          else ""
125 125      if ((H == H))
126 126          then H
127 127          else throw("Strict value is not equal to itself.")
128 128      }
129 129  
130 130  
131 131  func I () = {
132 132      let E = o(this, "currentPool")
133 133      if ((E == ""))
134 134          then throw(("Cannot find pool with id " + E))
135 135          else {
136 136              let C = q(E)
137 137              let J = F(E, C)
138 138              if ((J == J))
139 139                  then J
140 140                  else throw("Strict value is not equal to itself.")
141 141              }
142 142      }
143 143  
144 144  
145 145  func K (G) = if ((indexOf(g, G) == unit))
146 146      then throw(("Unknown poolId " + G))
147 147      else {
148 148          let L = fromBase58String(e)
149 149          let M = h(L)
150 150          let N = invoke(Address(fromBase58String(G)), "supply", nil, [AttachedPayment(L, M)])
151 151          if ((N == N))
152 152              then [StringEntry("currentPool", G)]
153 153              else throw("Strict value is not equal to itself.")
154 154          }
155 155  
156 156  
157 157  func O () = {
158 158      let P = k(this, "global_lastCheckSRate")
159 159      let Q = k(this, "global_staked")
160 160      let R = k(this, "global_lastCheckSRateHeight")
161 161      let S = (height - R)
162 162      let T = (D() - fraction(Q, P, b))
163 163      let U = fraction(T, 95000000, b)
164 164      if ((Q == 0))
165 165          then b
166 166          else {
167 167              let V = (P + fraction((S * b), U, Q))
168 168              if ((b > V))
169 169                  then b
170 170                  else V
171 171              }
172 172      }
173 173  
174 174  
175 175  func W (X) = {
176 176      let Q = k(this, "global_staked")
177 177      let V = O()
178 178      let Y = (D() - fraction(Q, V, b))
179 179  [ScriptTransfer(d, if ((Y > 0))
180 180          then Y
181 181          else 0, fromBase58String(e)), IntegerEntry("global_staked", (Q + X)), IntegerEntry("global_lastCheckSRate", V), IntegerEntry("global_lastCheckSRateHeight", height)]
182 182      }
183 183  
184 184  
185 185  func Z (aa) = {
186 186      let C = k(this, (aa + "_staked"))
187 187      fraction(C, O(), b)
188 188      }
189 189  
190 190  
191 191  func ab (aa,C) = {
192 192      let ac = fraction(C, b, O())
193 193      (W(ac) ++ [IntegerEntry((aa + "_staked"), (k(this, (aa + "_staked")) + ac))])
194 194      }
195 195  
196 196  
197 197  func ad (aa,C) = {
198 198      let V = O()
199 199      let ac = if ((V == 0))
200 200          then C
201 201          else fraction(C, b, V)
202 202      let ae = k(this, (aa + "_staked"))
203 203      let af = if ((V == 0))
204 204          then ae
205 205          else fraction(ae, b, V)
206 206      let ag = if ((ac > af))
207 207          then af
208 208          else ac
209 209      (W(-(ac)) ++ [IntegerEntry((aa + "_staked"), (af - ag))])
210 210      }
211 211  
212 212  
213 213  @Callable(ah)
214 214  func stake () = {
215 215      let aa = toString(ah.caller)
216 216      let C = ah.payments[0].amount
217 217      if (if ((0 >= C))
218 218          then true
219 219          else (ah.payments[0].assetId != fromBase58String(e)))
220 220          then throw("invalid token attached")
221 221          else {
222 222              let E = o(this, "currentPool")
223 223              (ab(aa, C) ++ K(E))
224 224              }
225 225      }
226 226  
227 227  
228 228  
229 229  @Callable(ah)
230 230  func unstake (C) = {
231 231      let aa = toString(ah.caller)
232 232      let E = o(this, "currentPool")
233 233      let J = F(E, C)
234 234      if ((J == J))
235 235          then (ad(aa, C) ++ [ScriptTransfer(ah.caller, C, fromBase58String(e))])
236 236          else throw("Strict value is not equal to itself.")
237 237      }
238 238  
239 239  
240 240  
241 241  @Callable(ah)
242 242  func rebalance (G) = {
243 243      let E = o(this, "currentPool")
244 244      if ((indexOf(f, toString(ah.caller)) == unit))
245 245          then throw("Access denied")
246 246          else if ((E == G))
247 247              then throw(("Already supplied to" + E))
248 248              else {
249 249                  let H = I()
250 250                  if ((H == H))
251 251                      then (K(G) ++ W(0))
252 252                      else throw("Strict value is not equal to itself.")
253 253                  }
254 254      }
255 255  
256 256  
257 257  
258 258  @Callable(ah)
259 259  func getSRate (ai) = {
260 260      let aj = O()
261 261      if (ai)
262 262          then throw(toString(aj))
263 263          else $Tuple2(nil, aj)
264 264      }
265 265  
266 266  
267 267  
268 268  @Callable(ah)
269 269  func getStakedAmount (ai,ak) = {
270 270      let aj = Z(ak)
271 271      if (ai)
272 272          then throw(toString(aj))
273 273          else $Tuple2(nil, aj)
274 274      }
275 275  
276 276  
277 277  
278 278  @Callable(ah)
279 279  func getTotalStakedAmount (ai) = {
280 280      let C = k(this, "global_staked")
281 281      let aj = fraction(C, O(), b)
282 282      if (ai)
283 283          then throw(toString(aj))
284 284          else $Tuple2(nil, aj)
285 285      }
286 286  
287 287  
288 288  @Verifier(J)
289 289  func al () = sigVerify(J.bodyBytes, J.proofs[0], J.senderPublicKey)
290 290

Old	New	Differences
1	1	{-# STDLIB_VERSION 6 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let a = 1000000
5	5
6	6	let b = 100000000
7	7
8	8	let c = (b * b)
9	9
10	10	let d = Address(base58'3PHMpSJXoCTAJTmdVXgxXAFrkHBRyjNRuMU')
11	11
12	12	let e = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
13	13
14	14	let f = ["3PEqC9533h6ADnJvXb8cvXcaSkecd9YTNvz"]
15	15
16	16	let g = ["3P4DK5VzDwL3vfc5ahUEhtoe5ByZNyacJ3X", "3P4uA5etnZi4AmBabKinq2bMiWU8KcnHZdH"]
17	17
18	18	func h (e) = {
19	19	let i = e
20	20	if ($isInstanceOf(i, "Unit"))
21	21	then {
22	22	let j = i
23	23	wavesBalance(this).available
24	24	}
25	25	else assetBalance(this, value(e))
26	26	}
27	27
28	28
29	29	func k (l,m) = {
30	30	let i = getInteger(l, m)
31	31	if ($isInstanceOf(i, "Int"))
32	32	then {
33	33	let n = i
34	34	n
35	35	}
36	36	else 0
37	37	}
38	38
39	39
40	40	func o (l,m) = {
41	41	let i = getString(l, m)
42	42	if ($isInstanceOf(i, "String"))
43	43	then {
44	44	let n = i
45	45	n
46	46	}
47	47	else ""
48	48	}
49	49
50	50
51	51	func p (e) = {
52	52	let i = e
53	53	if ($isInstanceOf(i, "ByteVector"))
54	54	then {
55	55	let n = i
56	56	toBase58String(n)
57	57	}
58	58	else "WAVES"
59	59	}
60	60
61	61
62	62	func q (r) = {
63	63	let s = Address(fromBase58String(r))
64	64	let t = {
65	65	let i = getString(s, "setup_tokens")
66	66	if ($isInstanceOf(i, "String"))
67	67	then {
68	68	let u = i
69	69	split(u, ",")
70	70	}
71	71	else throw(("Cannot find setup_tokens in state of pool " + r))
72	72	}
73	73	let v = {
74	74	let i = indexOf(t, e)
75	75	if ($isInstanceOf(i, "Int"))
76	76	then {
77	77	let u = i
78	78	u
79	79	}
80	80	else throw(((("cannot find " + e) + " in pool") + r))
81	81	}
82	82	let w = invoke(s, "calculateTokenRates", [false], nil)
83	83	if ((w == w))
84	84	then {
85	85	let x = {
86	86	let i = w
87	87	if ($isInstanceOf(i, "String"))
88	88	then {
89	89	let u = i
90	90	u
91	91	}
92	92	else throw(("Func 'calculateTokenRates' returns not string value in pool" + r))
93	93	}
94	94	let y = split(split(x, ",")[v], "\|")[1]
95	95	let z = {
96	96	let i = parseInt(y)
97	97	if ($isInstanceOf(i, "Int"))
98	98	then {
99	99	let A = i
100	100	A
101	101	}
102	102	else throw("Cannot parse supply rate from defi pool")
103	103	}
104	104	let B = k(s, ((toString(this) + "_supplied_") + e))
105	105	let C = fraction(B, z, c)
106	106	C
107	107	}
108	108	else throw("Strict value is not equal to itself.")
109	109	}
110	110
111	111
112	112	func D () = {
113	113	let E = o(this, "currentPool")
114	114	if ((E == ""))
115	115	then throw(("Cannot find pool with id " + E))
116	116	else q(E)
117	117	}
118	118
119	119
120	120	func F (G,C) = {
121	121	let s = Address(fromBase58String(G))
122	122	let H = if ((C > 0))
123	123	then invoke(s, "withdraw", [e, C], nil)
124	124	else ""
125	125	if ((H == H))
126	126	then H
127	127	else throw("Strict value is not equal to itself.")
128	128	}
129	129
130	130
131	131	func I () = {
132	132	let E = o(this, "currentPool")
133	133	if ((E == ""))
134	134	then throw(("Cannot find pool with id " + E))
135	135	else {
136	136	let C = q(E)
137	137	let J = F(E, C)
138	138	if ((J == J))
139	139	then J
140	140	else throw("Strict value is not equal to itself.")
141	141	}
142	142	}
143	143
144	144
145	145	func K (G) = if ((indexOf(g, G) == unit))
146	146	then throw(("Unknown poolId " + G))
147	147	else {
148	148	let L = fromBase58String(e)
149	149	let M = h(L)
150	150	let N = invoke(Address(fromBase58String(G)), "supply", nil, [AttachedPayment(L, M)])
151	151	if ((N == N))
152	152	then [StringEntry("currentPool", G)]
153	153	else throw("Strict value is not equal to itself.")
154	154	}
155	155
156	156
157	157	func O () = {
158	158	let P = k(this, "global_lastCheckSRate")
159	159	let Q = k(this, "global_staked")
160	160	let R = k(this, "global_lastCheckSRateHeight")
161	161	let S = (height - R)
162	162	let T = (D() - fraction(Q, P, b))
163	163	let U = fraction(T, 95000000, b)
164	164	if ((Q == 0))
165	165	then b
166	166	else {
167	167	let V = (P + fraction((S * b), U, Q))
168	168	if ((b > V))
169	169	then b
170	170	else V
171	171	}
172	172	}
173	173
174	174
175	175	func W (X) = {
176	176	let Q = k(this, "global_staked")
177	177	let V = O()
178	178	let Y = (D() - fraction(Q, V, b))
179	179	[ScriptTransfer(d, if ((Y > 0))
180	180	then Y
181	181	else 0, fromBase58String(e)), IntegerEntry("global_staked", (Q + X)), IntegerEntry("global_lastCheckSRate", V), IntegerEntry("global_lastCheckSRateHeight", height)]
182	182	}
183	183
184	184
185	185	func Z (aa) = {
186	186	let C = k(this, (aa + "_staked"))
187	187	fraction(C, O(), b)
188	188	}
189	189
190	190
191	191	func ab (aa,C) = {
192	192	let ac = fraction(C, b, O())
193	193	(W(ac) ++ [IntegerEntry((aa + "_staked"), (k(this, (aa + "_staked")) + ac))])
194	194	}
195	195
196	196
197	197	func ad (aa,C) = {
198	198	let V = O()
199	199	let ac = if ((V == 0))
200	200	then C
201	201	else fraction(C, b, V)
202	202	let ae = k(this, (aa + "_staked"))
203	203	let af = if ((V == 0))
204	204	then ae
205	205	else fraction(ae, b, V)
206	206	let ag = if ((ac > af))
207	207	then af
208	208	else ac
209	209	(W(-(ac)) ++ [IntegerEntry((aa + "_staked"), (af - ag))])
210	210	}
211	211
212	212
213	213	@Callable(ah)
214	214	func stake () = {
215	215	let aa = toString(ah.caller)
216	216	let C = ah.payments[0].amount
217	217	if (if ((0 >= C))
218	218	then true
219	219	else (ah.payments[0].assetId != fromBase58String(e)))
220	220	then throw("invalid token attached")
221	221	else {
222	222	let E = o(this, "currentPool")
223	223	(ab(aa, C) ++ K(E))
224	224	}
225	225	}
226	226
227	227
228	228
229	229	@Callable(ah)
230	230	func unstake (C) = {
231	231	let aa = toString(ah.caller)
232	232	let E = o(this, "currentPool")
233	233	let J = F(E, C)
234	234	if ((J == J))
235	235	then (ad(aa, C) ++ [ScriptTransfer(ah.caller, C, fromBase58String(e))])
236	236	else throw("Strict value is not equal to itself.")
237	237	}
238	238
239	239
240	240
241	241	@Callable(ah)
242	242	func rebalance (G) = {
243	243	let E = o(this, "currentPool")
244	244	if ((indexOf(f, toString(ah.caller)) == unit))
245	245	then throw("Access denied")
246	246	else if ((E == G))
247	247	then throw(("Already supplied to" + E))
248	248	else {
249	249	let H = I()
250	250	if ((H == H))
251	251	then (K(G) ++ W(0))
252	252	else throw("Strict value is not equal to itself.")
253	253	}
254	254	}
255	255
256	256
257	257
258	258	@Callable(ah)
259	259	func getSRate (ai) = {
260	260	let aj = O()
261	261	if (ai)
262	262	then throw(toString(aj))
263	263	else $Tuple2(nil, aj)
264	264	}
265	265
266	266
267	267
268	268	@Callable(ah)
269	269	func getStakedAmount (ai,ak) = {
270	270	let aj = Z(ak)
271	271	if (ai)
272	272	then throw(toString(aj))
273	273	else $Tuple2(nil, aj)
274	274	}
275	275
276	276
277	277
278	278	@Callable(ah)
279	279	func getTotalStakedAmount (ai) = {
280	280	let C = k(this, "global_staked")
281	281	let aj = fraction(C, O(), b)
282	282	if (ai)
283	283	then throw(toString(aj))
284	284	else $Tuple2(nil, aj)
285	285	}
286	286
287	287
288	288	@Verifier(J)
289	289	func al () = sigVerify(J.bodyBytes, J.proofs[0], J.senderPublicKey)
290	290

github/deemru/w8io/3ef1775 
47.82 ms ◑