w8 · tx

2022.07.04 20:58 [3190854] smart account 3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9q9MVoEsTt68EPCZxz9MHRBQhyhXdPnja2iumBCj1Zdg",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1656957529108,
    "version": 2,
    "chainId": 87,
    "sender": "3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe",
    "senderPublicKey": "HiH9eknsCZ417kt2aJnJ9HrnrWCYcdRoGsFi8yANmYx8",
    "proofs": [
        "293HkjmwNrR1xPoWo23XnWxYB6iF4QaQ2nDMUPPUwHhVKeSALXoCt14WoRpLT96yBPraVK68YWACziU2sA5SqJ6n"
    ],
    "script": "base64:AAIFAAAAAAAAAA4IAhIDCgEEEgUKAwQIAQAAAA0AAAAAB3BsdXRvSWQBAAAAIAgLS31S8qASJW+T7s99SrIspsrLF1j9hxE9vHm2pxfdAAAAAApwbHV0b0lkU3RyAgAAACtZUUZZb013QVJNUXpaczN3cXVjQlRkSk5XU2JzWWszR0F3N3dzcVU0Z3lBAAAAABFwYXJhbWV0ZXJzQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV+7WJYtq2Ae0X0s1eNtV5rMlFw/bMdew9AAAAAAOc3Rha2luZ0FkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVeLUO7DeRdqLE5bu+tJgOeuQ/CF8GxmH1wAAAAADWlzc3VlckFkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVeQ2vEGuhKb4rJE7aJ51glAjlqSLZbroBYAAAAAD3RyZWFzdXJ5QWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV1+Rpd7Pm8BtrouF5KfCv9sVtrVAjPeXYgAAAAALdGVhbUFkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVfX4SNRjnyriFrV1yiXddiIddOPriMFpuEAAAAABlNjYWxlOAAAAAAABfXhAAEAAAANdHJ5R2V0SW50ZWdlcgAAAAEAAAADa2V5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF4BQAAAAckbWF0Y2gwBQAAAAF4AAAAAAAAAAAAAQAAABJ0cnlHZXRJbnRQYXJhbWV0ZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAABFwYXJhbWV0ZXJzQWRkcmVzcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXgFAAAAByRtYXRjaDAFAAAAAXgAAAAAAAAAAAABAAAAEnRyeUdldFN0clBhcmFtZXRlcgAAAAEAAAADa2V5BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAAEXBhcmFtZXRlcnNBZGRyZXNzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAIAAAAAAQAAABJjYWxjdWxhdGVQb29sUHJpY2UAAAACAAAAC3Bvb2xBZGRyZXNzAAAACGFzc2V0U3RyBAAAAAhhMFdlaWdodAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfBQAAAAhhc3NldFN0cgIAAAAHX3dlaWdodAQAAAAIYTFXZWlnaHQJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAC3Bvb2xBZGRyZXNzCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwUAAAAKcGx1dG9JZFN0cgIAAAAHX3dlaWdodAQAAAAJYTBCYWxhbmNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAtwb29sQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8FAAAACGFzc2V0U3RyAgAAAAhfYmFsYW5jZQQAAAAJYTFCYWxhbmNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAtwb29sQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8FAAAACnBsdXRvSWRTdHICAAAACF9iYWxhbmNlCQAAawAAAAMFAAAABlNjYWxlOAkAAGgAAAACBQAAAAlhMUJhbGFuY2UFAAAACGEwV2VpZ2h0CQAAaAAAAAIFAAAACWEwQmFsYW5jZQUAAAAIYTFXZWlnaHQBAAAAE2NhbGN1bGF0ZUlzc3VlUGx1dG8AAAADAAAAB2Fzc2V0SWQAAAAGYW1vdW50AAAACmV2YWx1YXRpb24EAAAAFG9uYm9hcmRpbmdQYXJhbWV0ZXJzBAAAAAckbWF0Y2gwCQAD/AAAAAQFAAAAEXBhcmFtZXRlcnNBZGRyZXNzAgAAABdnZXRPbmJvYXJkaW5nUGFyYW1ldGVycwkABEwAAAACBwUAAAADbmlsBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACUxpc3RbQW55XQQAAAACaW4FAAAAByRtYXRjaDAFAAAAAmluCQAAAgAAAAECAAAAFmNhbm5vdCBsb2FkIHBhcmFtZXRlcnMDCQAAAAAAAAIFAAAAFG9uYm9hcmRpbmdQYXJhbWV0ZXJzBQAAABRvbmJvYXJkaW5nUGFyYW1ldGVycwQAAAAMYnV5YmFja1JhdGlvBAAAAAckbWF0Y2gwCQABkQAAAAIFAAAAFG9uYm9hcmRpbmdQYXJhbWV0ZXJzAAAAAAAAAAAEAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXgFAAAAByRtYXRjaDAFAAAAAXgJAAACAAAAAQIAAAAXY2Fubm90IHBhcnNlIHBhcmFtZXRlcnMEAAAAB3ByZW1pdW0EAAAAByRtYXRjaDAJAAGRAAAAAgUAAAAUb25ib2FyZGluZ1BhcmFtZXRlcnMAAAAAAAAAAAEDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAkAAAIAAAABAgAAABdjYW5ub3QgcGFyc2UgcGFyYW1ldGVycwQAAAALdGVhbVByZW1pdW0EAAAAByRtYXRjaDAJAAGRAAAAAgUAAAAUb25ib2FyZGluZ1BhcmFtZXRlcnMAAAAAAAAAAAMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAkAAAIAAAABAgAAABdjYW5ub3QgcGFyc2UgcGFyYW1ldGVycwQAAAAGcGVyaW9kBAAAAAckbWF0Y2gwCQABkQAAAAIFAAAAFG9uYm9hcmRpbmdQYXJhbWV0ZXJzAAAAAAAAAAACAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXgFAAAAByRtYXRjaDAFAAAAAXgJAAACAAAAAQIAAAAXY2Fubm90IHBhcnNlIHBhcmFtZXRlcnMEAAAACmFzc2V0SWRTdHIJAAJYAAAAAQUAAAAHYXNzZXRJZAQAAAAHcG9vbFN0cgkBAAAAEnRyeUdldFN0clBhcmFtZXRlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAZhc3NldF8FAAAACmFzc2V0SWRTdHICAAAABV9wb29sBAAAAAtwb29sQWRkcmVzcwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAHcG9vbFN0cgQAAAAPYW1vdW50VG9CdXliYWNrCQAAawAAAAMFAAAABmFtb3VudAUAAAAMYnV5YmFja1JhdGlvAAAAAAAAACcQBAAAAA1hbW91bnRUb0lzc3VlCQAAZQAAAAIFAAAABmFtb3VudAUAAAAPYW1vdW50VG9CdXliYWNrBAAAAANpbnYDBQAAAApldmFsdWF0aW9uCQAD/AAAAAQFAAAAC3Bvb2xBZGRyZXNzAgAAAAhjYWxjU3dhcAkABEwAAAACBQAAAA9hbW91bnRUb0J1eWJhY2sJAARMAAAAAgUAAAAKYXNzZXRJZFN0cgkABEwAAAACBQAAAApwbHV0b0lkU3RyBQAAAANuaWwFAAAAA25pbAkAA/wAAAAEBQAAAAtwb29sQWRkcmVzcwIAAAAEc3dhcAkABEwAAAACBQAAAApwbHV0b0lkU3RyCQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAkABEwAAAACCQEAAAAPQXR0YWNoZWRQYXltZW50AAAAAgUAAAAHYXNzZXRJZAUAAAAPYW1vdW50VG9CdXliYWNrBQAAAANuaWwDCQAAAAAAAAIFAAAAA2ludgUAAAADaW52BAAAAAtwbHV0b0JvdWdodAQAAAAHJG1hdGNoMAUAAAADaW52AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXgFAAAAByRtYXRjaDAFAAAAAXgAAAAAAAAAAAAEAAAAEWFzc2V0UHJpY2VUb1BsdXRvCQEAAAASY2FsY3VsYXRlUG9vbFByaWNlAAAAAgUAAAALcG9vbEFkZHJlc3MFAAAACmFzc2V0SWRTdHIEAAAAC3BsdXRvSXNzdWVkCQAAawAAAAMFAAAADWFtb3VudFRvSXNzdWUFAAAAEWFzc2V0UHJpY2VUb1BsdXRvBQAAAAZTY2FsZTgEAAAACnRvdGFsUGx1dG8JAABkAAAAAgUAAAALcGx1dG9Cb3VnaHQFAAAAC3BsdXRvSXNzdWVkBAAAABJwcmVtaXVtUGx1dG9Jc3N1ZWQJAABrAAAAAwUAAAAKdG90YWxQbHV0bwUAAAAHcHJlbWl1bQAAAAAAAAAnEAQAAAAPdGVhbVBsdXRvSXNzdWVkCQAAawAAAAMFAAAACnRvdGFsUGx1dG8FAAAAC3RlYW1QcmVtaXVtAAAAAAAAACcQBAAAAARpbnYyCQAD/AAAAAQFAAAADWlzc3VlckFkZHJlc3MCAAAADHJlcXVlc3RJc3N1ZQkABEwAAAACCQAAZAAAAAIJAABkAAAAAgUAAAALcGx1dG9Jc3N1ZWQFAAAAEnByZW1pdW1QbHV0b0lzc3VlZAUAAAAPdGVhbVBsdXRvSXNzdWVkBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAEaW52MgUAAAAEaW52MgkABEwAAAACBQAAAAtwbHV0b0lzc3VlZAkABEwAAAACBQAAAAtwbHV0b0JvdWdodAkABEwAAAACBQAAABJwcmVtaXVtUGx1dG9Jc3N1ZWQJAARMAAAAAgUAAAAPdGVhbVBsdXRvSXNzdWVkCQAETAAAAAIFAAAADWFtb3VudFRvSXNzdWUJAARMAAAAAgUAAAAHcHJlbWl1bQkABEwAAAACBQAAAAZwZXJpb2QFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAIAAAABaQEAAAAKaXNzdWVQbHV0bwAAAAEAAAAFZGVidWcEAAAAB2Fzc2V0SWQJAQAAAAV2YWx1ZQAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAABnJlc3VsdAkBAAAAE2NhbGN1bGF0ZUlzc3VlUGx1dG8AAAADBQAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQHAwkAAAAAAAACBQAAAAZyZXN1bHQFAAAABnJlc3VsdAQAAAAGbG9ja3VwCQAD/AAAAAQFAAAADnN0YWtpbmdBZGRyZXNzAgAAAA9zdGFydE9uYm9hcmRpbmcJAARMAAAAAgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIJAARMAAAAAgkAAGQAAAACCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAAkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAUJAARMAAAAAgkAAlgAAAABCQEAAAAFdmFsdWUAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBQAAAANuaWwJAARMAAAAAgkBAAAAD0F0dGFjaGVkUGF5bWVudAAAAAIFAAAAB3BsdXRvSWQJAABkAAAAAgkAAGQAAAACCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAAkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAACBQAAAANuaWwDCQAAAAAAAAIFAAAABmxvY2t1cAUAAAAGbG9ja3VwAwUAAAAFZGVidWcJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhpc3N1ZWQ6IAkAAaQAAAABCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAAIAAAAKOyBib3VnaHQ6IAkAAaQAAAABCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAQIAAAALOyBwcmVtaXVtOiAJAAGkAAAAAQkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAICAAAACDsgdGVhbTogCQABpAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAADCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAD3RyZWFzdXJ5QWRkcmVzcwkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAQFAAAAB2Fzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAALdGVhbUFkZHJlc3MJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAADBQAAAAdwbHV0b0lkBQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAABJldmFsdWF0ZUlzc3VlUGx1dG8AAAADAAAABWRlYnVnAAAACmFzc2V0SWRTdHIAAAAGYW1vdW50BAAAAAdhc3NldElkCQACWQAAAAEFAAAACmFzc2V0SWRTdHIEAAAABnJlc3VsdAkBAAAAE2NhbGN1bGF0ZUlzc3VlUGx1dG8AAAADBQAAAAdhc3NldElkBQAAAAZhbW91bnQGAwkAAAAAAAACBQAAAAZyZXN1bHQFAAAABnJlc3VsdAMFAAAABWRlYnVnCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIaXNzdWVkOiAJAAGkAAAAAQkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAACAAAACjsgYm91Z2h0OiAJAAGkAAAAAQkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAECAAAACzsgcHJlbWl1bTogCQABpAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAACAgAAAAg7IHRlYW06IAkAAaQAAAABCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAwkABRQAAAACBQAAAANuaWwJAABkAAAAAgkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAAJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAABCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5gXfEIw==",
    "height": 3190854,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: jPbmbf5MsRPuEEZN3H8bQE6wtY4rhgBtCb5sPmef2dg
Next: H3MZLdS7JkKYpvWehVEGpnwU4fkJveadKj61x2DNH22G

Diff: 
Old New Differences
89 89              let amountToBuyback = fraction(amount, buybackRatio, 10000)
90 90              let amountToIssue = (amount - amountToBuyback)
91 91              let inv = if (evaluation)
92 -                 then invoke(poolAddress, "evalSwap", [amountToBuyback, assetIdStr, plutoIdStr], nil)
92 +                 then invoke(poolAddress, "calcSwap", [amountToBuyback, assetIdStr, plutoIdStr], nil)
93 93                  else invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
94 94              if ((inv == inv))
95 95                  then {
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let plutoId = base58'YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA'
5 5  
6 6  let plutoIdStr = "YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA"
7 7  
8 8  let parametersAddress = Address(base58'3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB')
9 9  
10 10  let stakingAddress = Address(base58'3PEdXcDCs3wzcWQsusvq92cLb7deRpgR4J7')
11 11  
12 12  let issuerAddress = Address(base58'3PF8pKC8CdmW9sEJUxQVSfezYRSJeThoNR3')
13 13  
14 14  let treasuryAddress = Address(base58'3PAeDQGNbYa3W2EacZkJG3dSiDnHsQarqzZ')
15 15  
16 16  let teamAddress = Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')
17 17  
18 18  let Scale8 = 100000000
19 19  
20 20  func tryGetInteger (key) = match getInteger(this, key) {
21 21      case x: Int => 
22 22          x
23 23      case _ => 
24 24          0
25 25  }
26 26  
27 27  
28 28  func tryGetIntParameter (key) = match getInteger(parametersAddress, key) {
29 29      case x: Int => 
30 30          x
31 31      case _ => 
32 32          0
33 33  }
34 34  
35 35  
36 36  func tryGetStrParameter (key) = match getString(parametersAddress, key) {
37 37      case x: String => 
38 38          x
39 39      case _ => 
40 40          ""
41 41  }
42 42  
43 43  
44 44  func calculatePoolPrice (poolAddress,assetStr) = {
45 45      let a0Weight = getIntegerValue(poolAddress, (("static_" + assetStr) + "_weight"))
46 46      let a1Weight = getIntegerValue(poolAddress, (("static_" + plutoIdStr) + "_weight"))
47 47      let a0Balance = getIntegerValue(poolAddress, (("global_" + assetStr) + "_balance"))
48 48      let a1Balance = getIntegerValue(poolAddress, (("global_" + plutoIdStr) + "_balance"))
49 49      fraction(Scale8, (a1Balance * a0Weight), (a0Balance * a1Weight))
50 50      }
51 51  
52 52  
53 53  func calculateIssuePluto (assetId,amount,evaluation) = {
54 54      let onboardingParameters =     match invoke(parametersAddress, "getOnboardingParameters", [false], nil) {
55 55          case in: List[Any] => 
56 56              in
57 57          case _ => 
58 58              throw("cannot load parameters")
59 59      }
60 60      if ((onboardingParameters == onboardingParameters))
61 61          then {
62 62              let buybackRatio =             match onboardingParameters[4] {
63 63                  case x: Int => 
64 64                      x
65 65                  case _ => 
66 66                      throw("cannot parse parameters")
67 67              }
68 68              let premium =             match onboardingParameters[1] {
69 69                  case x: Int => 
70 70                      x
71 71                  case _ => 
72 72                      throw("cannot parse parameters")
73 73              }
74 74              let teamPremium =             match onboardingParameters[3] {
75 75                  case x: Int => 
76 76                      x
77 77                  case _ => 
78 78                      throw("cannot parse parameters")
79 79              }
80 80              let period =             match onboardingParameters[2] {
81 81                  case x: Int => 
82 82                      x
83 83                  case _ => 
84 84                      throw("cannot parse parameters")
85 85              }
86 86              let assetIdStr = toBase58String(assetId)
87 87              let poolStr = tryGetStrParameter((("asset_" + assetIdStr) + "_pool"))
88 88              let poolAddress = addressFromStringValue(poolStr)
89 89              let amountToBuyback = fraction(amount, buybackRatio, 10000)
90 90              let amountToIssue = (amount - amountToBuyback)
91 91              let inv = if (evaluation)
92 -                 then invoke(poolAddress, "evalSwap", [amountToBuyback, assetIdStr, plutoIdStr], nil)
92 +                 then invoke(poolAddress, "calcSwap", [amountToBuyback, assetIdStr, plutoIdStr], nil)
93 93                  else invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
94 94              if ((inv == inv))
95 95                  then {
96 96                      let plutoBought =                     match inv {
97 97                          case x: Int => 
98 98                              x
99 99                          case _ => 
100 100                              0
101 101                      }
102 102                      let assetPriceToPluto = calculatePoolPrice(poolAddress, assetIdStr)
103 103                      let plutoIssued = fraction(amountToIssue, assetPriceToPluto, Scale8)
104 104                      let totalPluto = (plutoBought + plutoIssued)
105 105                      let premiumPlutoIssued = fraction(totalPluto, premium, 10000)
106 106                      let teamPlutoIssued = fraction(totalPluto, teamPremium, 10000)
107 107                      let inv2 = invoke(issuerAddress, "requestIssue", [((plutoIssued + premiumPlutoIssued) + teamPlutoIssued)], nil)
108 108                      if ((inv2 == inv2))
109 109                          then [plutoIssued, plutoBought, premiumPlutoIssued, teamPlutoIssued, amountToIssue, premium, period]
110 110                          else throw("Strict value is not equal to itself.")
111 111                      }
112 112                  else throw("Strict value is not equal to itself.")
113 113              }
114 114          else throw("Strict value is not equal to itself.")
115 115      }
116 116  
117 117  
118 118  @Callable(i)
119 119  func issuePluto (debug) = {
120 120      let assetId = value(i.payments[0].assetId)
121 121      let result = calculateIssuePluto(assetId, value(i.payments[0].amount), false)
122 122      if ((result == result))
123 123          then {
124 124              let lockup = invoke(stakingAddress, "startOnboarding", [toString(i.caller), (result[0] + result[1]), result[2], result[6], result[5], toBase58String(value(i.payments[0].assetId))], [AttachedPayment(plutoId, ((result[0] + result[1]) + result[2]))])
125 125              if ((lockup == lockup))
126 126                  then if (debug)
127 127                      then throw(((((((("issued: " + toString(result[0])) + "; bought: ") + toString(result[1])) + "; premium: ") + toString(result[2])) + "; team: ") + toString(result[3])))
128 128                      else [ScriptTransfer(treasuryAddress, result[4], assetId), ScriptTransfer(teamAddress, result[3], plutoId)]
129 129                  else throw("Strict value is not equal to itself.")
130 130              }
131 131          else throw("Strict value is not equal to itself.")
132 132      }
133 133  
134 134  
135 135  
136 136  @Callable(i)
137 137  func evaluateIssuePluto (debug,assetIdStr,amount) = {
138 138      let assetId = fromBase58String(assetIdStr)
139 139      let result = calculateIssuePluto(assetId, amount, true)
140 140      if ((result == result))
141 141          then if (debug)
142 142              then throw(((((((("issued: " + toString(result[0])) + "; bought: ") + toString(result[1])) + "; premium: ") + toString(result[2])) + "; team: ") + toString(result[3])))
143 143              else $Tuple2(nil, (result[0] + result[1]))
144 144          else throw("Strict value is not equal to itself.")
145 145      }
146 146  
147 147  
148 148  @Verifier(tx)
149 149  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
150 150

Old	New		Differences
89	89		let amountToBuyback = fraction(amount, buybackRatio, 10000)
90	90		let amountToIssue = (amount - amountToBuyback)
91	91		let inv = if (evaluation)
92		-	then invoke(poolAddress, "~~evalSwap~~", [amountToBuyback, assetIdStr, plutoIdStr], nil)
	92	+	then invoke(poolAddress, "calcSwap", [amountToBuyback, assetIdStr, plutoIdStr], nil)
93	93		else invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
94	94		if ((inv == inv))
95	95		then {

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let plutoId = base58'YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA'
5	5
6	6		let plutoIdStr = "YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA"
7	7
8	8		let parametersAddress = Address(base58'3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB')
9	9
10	10		let stakingAddress = Address(base58'3PEdXcDCs3wzcWQsusvq92cLb7deRpgR4J7')
11	11
12	12		let issuerAddress = Address(base58'3PF8pKC8CdmW9sEJUxQVSfezYRSJeThoNR3')
13	13
14	14		let treasuryAddress = Address(base58'3PAeDQGNbYa3W2EacZkJG3dSiDnHsQarqzZ')
15	15
16	16		let teamAddress = Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')
17	17
18	18		let Scale8 = 100000000
19	19
20	20		func tryGetInteger (key) = match getInteger(this, key) {
21	21		case x: Int =>
22	22		x
23	23		case _ =>
24	24		0
25	25		}
26	26
27	27
28	28		func tryGetIntParameter (key) = match getInteger(parametersAddress, key) {
29	29		case x: Int =>
30	30		x
31	31		case _ =>
32	32		0
33	33		}
34	34
35	35
36	36		func tryGetStrParameter (key) = match getString(parametersAddress, key) {
37	37		case x: String =>
38	38		x
39	39		case _ =>
40	40		""
41	41		}
42	42
43	43
44	44		func calculatePoolPrice (poolAddress,assetStr) = {
45	45		let a0Weight = getIntegerValue(poolAddress, (("static_" + assetStr) + "_weight"))
46	46		let a1Weight = getIntegerValue(poolAddress, (("static_" + plutoIdStr) + "_weight"))
47	47		let a0Balance = getIntegerValue(poolAddress, (("global_" + assetStr) + "_balance"))
48	48		let a1Balance = getIntegerValue(poolAddress, (("global_" + plutoIdStr) + "_balance"))
49	49		fraction(Scale8, (a1Balance * a0Weight), (a0Balance * a1Weight))
50	50		}
51	51
52	52
53	53		func calculateIssuePluto (assetId,amount,evaluation) = {
54	54		let onboardingParameters = match invoke(parametersAddress, "getOnboardingParameters", [false], nil) {
55	55		case in: List[Any] =>
56	56		in
57	57		case _ =>
58	58		throw("cannot load parameters")
59	59		}
60	60		if ((onboardingParameters == onboardingParameters))
61	61		then {
62	62		let buybackRatio = match onboardingParameters[4] {
63	63		case x: Int =>
64	64		x
65	65		case _ =>
66	66		throw("cannot parse parameters")
67	67		}
68	68		let premium = match onboardingParameters[1] {
69	69		case x: Int =>
70	70		x
71	71		case _ =>
72	72		throw("cannot parse parameters")
73	73		}
74	74		let teamPremium = match onboardingParameters[3] {
75	75		case x: Int =>
76	76		x
77	77		case _ =>
78	78		throw("cannot parse parameters")
79	79		}
80	80		let period = match onboardingParameters[2] {
81	81		case x: Int =>
82	82		x
83	83		case _ =>
84	84		throw("cannot parse parameters")
85	85		}
86	86		let assetIdStr = toBase58String(assetId)
87	87		let poolStr = tryGetStrParameter((("asset_" + assetIdStr) + "_pool"))
88	88		let poolAddress = addressFromStringValue(poolStr)
89	89		let amountToBuyback = fraction(amount, buybackRatio, 10000)
90	90		let amountToIssue = (amount - amountToBuyback)
91	91		let inv = if (evaluation)
92		-	then invoke(poolAddress, "~~evalSwap~~", [amountToBuyback, assetIdStr, plutoIdStr], nil)
	92	+	then invoke(poolAddress, "calcSwap", [amountToBuyback, assetIdStr, plutoIdStr], nil)
93	93		else invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
94	94		if ((inv == inv))
95	95		then {
96	96		let plutoBought = match inv {
97	97		case x: Int =>
98	98		x
99	99		case _ =>
100	100		0
101	101		}
102	102		let assetPriceToPluto = calculatePoolPrice(poolAddress, assetIdStr)
103	103		let plutoIssued = fraction(amountToIssue, assetPriceToPluto, Scale8)
104	104		let totalPluto = (plutoBought + plutoIssued)
105	105		let premiumPlutoIssued = fraction(totalPluto, premium, 10000)
106	106		let teamPlutoIssued = fraction(totalPluto, teamPremium, 10000)
107	107		let inv2 = invoke(issuerAddress, "requestIssue", [((plutoIssued + premiumPlutoIssued) + teamPlutoIssued)], nil)
108	108		if ((inv2 == inv2))
109	109		then [plutoIssued, plutoBought, premiumPlutoIssued, teamPlutoIssued, amountToIssue, premium, period]
110	110		else throw("Strict value is not equal to itself.")
111	111		}
112	112		else throw("Strict value is not equal to itself.")
113	113		}
114	114		else throw("Strict value is not equal to itself.")
115	115		}
116	116
117	117
118	118		@Callable(i)
119	119		func issuePluto (debug) = {
120	120		let assetId = value(i.payments[0].assetId)
121	121		let result = calculateIssuePluto(assetId, value(i.payments[0].amount), false)
122	122		if ((result == result))
123	123		then {
124	124		let lockup = invoke(stakingAddress, "startOnboarding", [toString(i.caller), (result[0] + result[1]), result[2], result[6], result[5], toBase58String(value(i.payments[0].assetId))], [AttachedPayment(plutoId, ((result[0] + result[1]) + result[2]))])
125	125		if ((lockup == lockup))
126	126		then if (debug)
127	127		then throw(((((((("issued: " + toString(result[0])) + "; bought: ") + toString(result[1])) + "; premium: ") + toString(result[2])) + "; team: ") + toString(result[3])))
128	128		else [ScriptTransfer(treasuryAddress, result[4], assetId), ScriptTransfer(teamAddress, result[3], plutoId)]
129	129		else throw("Strict value is not equal to itself.")
130	130		}
131	131		else throw("Strict value is not equal to itself.")
132	132		}
133	133
134	134
135	135
136	136		@Callable(i)
137	137		func evaluateIssuePluto (debug,assetIdStr,amount) = {
138	138		let assetId = fromBase58String(assetIdStr)
139	139		let result = calculateIssuePluto(assetId, amount, true)
140	140		if ((result == result))
141	141		then if (debug)
142	142		then throw(((((((("issued: " + toString(result[0])) + "; bought: ") + toString(result[1])) + "; premium: ") + toString(result[2])) + "; team: ") + toString(result[3])))
143	143		else $Tuple2(nil, (result[0] + result[1]))
144	144		else throw("Strict value is not equal to itself.")
145	145		}
146	146
147	147
148	148		@Verifier(tx)
149	149		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
150	150

github/deemru/w8io/786bc32 
36.82 ms ◑