w8 · tx · EZ9···Qrm

tx · EZ962yv6GraDDujtH6mp26KeVw3fG9VDDjHyQM5nJQrm

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.26 12:35 [1763098] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EZ962yv6GraDDujtH6mp26KeVw3fG9VDDjHyQM5nJQrm",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1635240983776,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "2TSX8Swbi4JLsatmvY88rFSawhDdE3RPMvbTRpNLsRrPZ1oNhhtFs3aZm33jFct68uq1t7nRLzYgDrArwaZBYU9x"
    ],
    "script": "base64:AAIDAAAAAAAAAAwIARIICgYBCAgICAgAAAAtAAAAAAd5Qml0Q08yAQAAACBpjNT/200BfejLeLffs4/BXDw5W+kMeWgNIY5n6ZtLrQAAAAAQVG9rVG9WZW5kZWRvclF0eQAAAAAAAAAnEAAAAAAETk9ORQIAAAAEbm9uZQAAAAALT3duZXJQdWJLZXkBAAAAIHYlgUf22Lk37u4at3MrCWteEN5n68yQc4q5Um14SA8PAAAAABZlY3hhY2h4a2FwYXdpeDAxcHJlaWNvCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFU3xPba43MIrTdBzkj1KIh5RJhI+0VJu6nAAAAABxlTTN4TjA4eE4wOHBleHByb2R4YWNBcHB4d3ZzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUZXtlAwFojd9til2zY8ueY3NTvHmic+ofAAAAAAp0eGFjeE4wOHBlCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFU2H+zv6hoVfC6umL2/Iw6/XNeoYjeAvgKAAAAAApOMDhwZXhwcm9kCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUoSOcBtKbP7i/nEoP0XqHwB6tn5KM3xRVAAAAAAVldXJvdQAAAAAAAAAAdAAAAAAFdXNkbncAAAAAAAAACesAAAAABWJjbzJlAAAAAAAAAYagAAAAAAhiaXRkc2N0bwAAAAAAAAAAAwAAAAADcElQAAAAAAAAAAAKAAAAAANlSVAAAAAAAAAAAAEAAAAAA3VCUAAAAAAAAAAABwAAAAADc0JQAAAAAAAAAAACAAAAAANlQlAAAAAAAAAAAAIAAAAACXJlbGFjZGN0bwAAAAAAAAAACwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQIAAAAKT3JkZXJf4oSWOgEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAAEWdldEtleXByb2plY3ROYW1lAAAAAQAAAARpdGVtAgAAAB5Qcm95ZWN0byBkZSBBcG95byB8IEludmVyc2nDs24BAAAAE2dldFZhbHVlcHJvamVjdE5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABFnZXRLZXlwcm9qZWN0TmFtZQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQIAAAAl4oSWIGRlIERvY3VtZW50byB8IEROSSBkZWwgQ29tcHJhZG9yOgEAAAAUZ2V0VmFsdWVVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEAAAAEaXRlbQIAAAAkUHJvZHVjdG8tR1RTIGFkcXVpcmlkbyB8IENhdGVnb3LDrWE6AQAAABBnZXRWYWx1ZUl0ZW1OYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtAQAAAAtnZXRLZXlUTmFtZQAAAAEAAAAEaXRlbQIAAAAWVGllbmRhIHwgVmVuZGVkb3ItR1RTOgEAAAANZ2V0VmFsdWVUTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAC2dldEtleVROYW1lAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAGE5vZG8tQWN0aXZvIFBhcnRpY2lwYW50ZQEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAAEFVJLCB4MTBlLTA0IGJpdDoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAlQSSwgd3ZsczoBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAABBTSSwgeDEwZS0wNCBiaXQ6AQAAAApnZXRWYWx1ZVNJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlOSWIAAAABAAAABGl0ZW0CAAAAEU5JYiwgeDEwZS0wNCBiaXQ6AQAAAAtnZXRWYWx1ZU5JYgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JdwAAAAEAAAAEaXRlbQIAAAAKTkl3LCB3dmxzOgEAAAALZ2V0VmFsdWVOSXcAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlOSXcAAAABBQAAAARpdGVtAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQAAAAZ0aWVuZGECAAAAIVRva2VucyBPZmVydGFkb3MgLyBCYWxhbmNlLCB5dG9rOgEAAAASZ2V0VmFsdWVCYWxhblRva2VuAAAAAQAAAAZ0aWVuZGEJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhAQAAABVnZXRLZXlCYWxhbmNlUHJveWVjdG8AAAABAAAACHByb3llY3RvAgAAABtCYWxhbmNlIGRlbCBQcm95ZWN0bywgd3ZsczoBAAAAF2dldFZhbHVlQmFsYW5jZVByb3llY3RvAAAAAQAAAAhwcm95ZWN0bwkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvAAAAAQAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAYAAAALdG90YWxBbW91bnQAAAAMdXNlckRvY3VtZW50AAAAC3Byb2plY3ROYW1lAAAACGl0ZW1OYW1lAAAABXROYW1lAAAABGl0ZW0EAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABNFbCBQcmVjaW8gZW4gd2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAAOZ2V0S2V5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAABnRpZW5kYQkAAlgAAAABCAUAAAAKdHhhY3hOMDhwZQAAAAVieXRlcwQAAAAMc2FsZG9UaWVuZGExBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAACmFtb3VudEJDTzIJAABoAAAAAgUAAAAQVG9rVG9WZW5kZWRvclF0eQAAAAAAAAAnEAQAAAAIcHJveWVjdG8JAAJYAAAAAQgFAAAAFmVjeGFjaHhrYXBhd2l4MDFwcmVpY28AAAAFYnl0ZXMEAAAACXNhbGRvUHJvagQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3ViVG90YWwFAAAAC3RvdGFsQW1vdW50BAAAAANwSXcJAABpAAAAAgkAAGgAAAACBQAAAANwSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAAA2VJdwkAAGkAAAACCQAAaAAAAAIFAAAAA2VJUAUAAAAIc3ViVG90YWwFAAAACXJlbGFjZGN0bwQAAAANYmNvMm1lbm9zZGN0bwkAAGkAAAACCQAAaAAAAAIJAABlAAAAAgAAAAAAAAAAZAUAAAAIYml0ZHNjdG8JAABoAAAAAgUAAAAFZXVyb3UFAAAABWJjbzJlAAAAAAAAACcQBAAAAAlzdWJUb3RhbGIJAABpAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAAC3RvdGFsQW1vdW50BQAAAAV1c2RudwAAAAAAAAAAZAUAAAANYmNvMm1lbm9zZGN0bwQAAAAGdG90YWxiCQAAaAAAAAIFAAAACXN1YlRvdGFsYgAAAAAAAAAnEAQAAAADdUliCQAAaQAAAAIJAABoAAAAAgUAAAADdUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADc0liCQAAaQAAAAIJAABoAAAAAgUAAAADc0JQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADZUliCQAAaQAAAAIJAABoAAAAAgUAAAADZUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwMJAABnAAAAAgUAAAAMc2FsZG9UaWVuZGExCQAAaAAAAAIFAAAAEFRva1RvVmVuZGVkb3JRdHkAAAAAAAAAJxAJAAACAAAAAQIAAABDTG8gc2VudGltb3MsIHBvciBhaG9yYSBubyBoYXkgb2ZlcnRhIGRlIHRva2VucyBwYXJhIHN1IHRyYW5zYWNjacOzbgMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAWQXBveW8gRWNvbMOzZ2ljbywgd3ZscwUAAAALdG90YWxBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtBQAAAAx1c2VyRG9jdW1lbnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlwcm9qZWN0TmFtZQAAAAEFAAAABGl0ZW0FAAAAC3Byb2plY3ROYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtBQAAAAhpdGVtTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAC2dldEtleVROYW1lAAAAAQUAAAAEaXRlbQUAAAAFdE5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABHVzZG4FAAAABXVzZG53CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAVldXJvdQUAAAAFZXVyb3UJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAHzEgQml0LUNPMiBjb24gZHNjdG8sIHVzZCB4MTBlLTQFAAAADWJjbzJtZW5vc2RjdG8JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAIlRvdGFsIGJpdC1jbzIgYSBkaXN0cmlidWlyLCB4MTBlLTQFAAAACXN1YlRvdGFsYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA5PcmRlcl9TdGF0dXM6XwUAAAALdXNlckFkZHJlc3MCAAAAGFRyYW5zYWNjacOzbiBDb25maXJtYWRhIQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAUU2FsZG8gUHJveWVjdG8sIHd2bHMFAAAACXNhbGRvUHJvagkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvCQAAZAAAAAIJAQAAABdnZXRWYWx1ZUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvAAAAAAAAAAAACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABJTYWxkbyBUb2tlbnMsIGJjbzIAAAAAAAAAAAAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhCQAAZAAAAAIJAQAAABJnZXRWYWx1ZUJhbGFuVG9rZW4AAAABBQAAAAZ0aWVuZGEAAAAAAAAAAAAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAE1NhbGRvIEJDTzIsIHgxMGUtMDQFAAAACmFtb3VudEJDTzIFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABZlY3hhY2h4a2FwYXdpeDAxcHJlaWNvBQAAAANwSXcFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAcZU0zeE4wOHhOMDhwZXhwcm9keGFjQXBweHd2cwUAAAADZUl3BQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAADdUliBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACnR4YWN4TjA4cGUFAAAAA3NJYgUAAAAHeUJpdENPMgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAApOMDhwZXhwcm9kBQAAAANlSWIFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYH7q342A==",
    "height": 1763098,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2NpKpN81gxfpVBCjVuW6NEQT89mmo22jDaTHJufXJykC
Next: BHhi6XoDSPAXYKmcUgHxtpAjkHScHNt6jFEKpG3p1SwV

Diff: 
Old New Differences
192 192                      then throw("Payment Amount can't be less than item Purchase Order")
193 193                      else if ((ai.amount > ad))
194 194                          then throw("Payment Amount can't be higher than item Purchase Order")
195 -                         else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + 269527264)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + 146335)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
195 +                         else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + 0)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + 0)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
196 196              }
197 197      }
198 198  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5 5  
6 6  let b = 10000
7 7  
8 8  let c = "none"
9 9  
10 10  let d = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
11 11  
12 12  let e = Address(base58'3NAFcFPrj1wWrVMcsJMLvWBzmBt93oLh6w8')
13 13  
14 14  let f = Address(base58'3MyAfquD1K4mvWJNDLVPRG4BWiAW3RQUpXG')
15 15  
16 16  let g = Address(base58'3N9epiFphbL3Sf25xMASL1jAPxDH5D8vX85')
17 17  
18 18  let h = Address(base58'3N4c7DzgBcyVWTEv9N11vNpg4B1bfg5ryfJ')
19 19  
20 20  let i = 116
21 21  
22 22  let j = 2539
23 23  
24 24  let k = 100000
25 25  
26 26  let l = 3
27 27  
28 28  let m = 10
29 29  
30 30  let n = 1
31 31  
32 32  let o = 7
33 33  
34 34  let p = 2
35 35  
36 36  let q = 2
37 37  
38 38  let r = 11
39 39  
40 40  func s (t) = {
41 41      let u = {
42 42          let v = getInteger(this, t)
43 43          if ($isInstanceOf(v, "Int"))
44 44              then {
45 45                  let w = v
46 46                  w
47 47                  }
48 48              else 0
49 49          }
50 50      u
51 51      }
52 52  
53 53  
54 54  func x (t) = {
55 55      let y = {
56 56          let v = getString(this, t)
57 57          if ($isInstanceOf(v, "String"))
58 58              then {
59 59                  let w = v
60 60                  w
61 61                  }
62 62              else c
63 63          }
64 64      y
65 65      }
66 66  
67 67  
68 68  func z (A,B) = "Order_№:"
69 69  
70 70  
71 71  func C (A,B) = s(z(A, B))
72 72  
73 73  
74 74  func D (B) = "Proyecto de Apoyo | Inversión"
75 75  
76 76  
77 77  func E (B) = x(D(B))
78 78  
79 79  
80 80  func F (B) = "№ de Documento | DNI del Comprador:"
81 81  
82 82  
83 83  func G (B) = x(F(B))
84 84  
85 85  
86 86  func H (B) = "Producto-GTS adquirido | Categoría:"
87 87  
88 88  
89 89  func I (B) = x(H(B))
90 90  
91 91  
92 92  func J (B) = "Tienda | Vendedor-GTS:"
93 93  
94 94  
95 95  func K (B) = x(J(B))
96 96  
97 97  
98 98  func L (B) = "Nodo-Activo Participante"
99 99  
100 100  
101 101  func M (B) = "UI, x10e-04 bit:"
102 102  
103 103  
104 104  func N (B) = s(M(B))
105 105  
106 106  
107 107  func O (B) = "PI, wvls:"
108 108  
109 109  
110 110  func P (B) = s(O(B))
111 111  
112 112  
113 113  func Q (B) = "SI, x10e-04 bit:"
114 114  
115 115  
116 116  func R (B) = s(Q(B))
117 117  
118 118  
119 119  func S (B) = "NIb, x10e-04 bit:"
120 120  
121 121  
122 122  func T (B) = s(S(B))
123 123  
124 124  
125 125  func U (B) = "NIw, wvls:"
126 126  
127 127  
128 128  func V (B) = s(U(B))
129 129  
130 130  
131 131  func W (X) = "Tokens Ofertados / Balance, ytok:"
132 132  
133 133  
134 134  func Y (X) = s(W(X))
135 135  
136 136  
137 137  func Z (aa) = "Balance del Proyecto, wvls:"
138 138  
139 139  
140 140  func ab (aa) = s(Z(aa))
141 141  
142 142  
143 143  @Callable(ac)
144 144  func purchaseGTS (ad,ae,af,ag,ah,B) = {
145 145      let ai = extract(ac.payment)
146 146      if (isDefined(ai.assetId))
147 147          then throw("El Precio en waves.")
148 148          else {
149 149              let aj = {
150 150                  let v = getString(this, L(B))
151 151                  if ($isInstanceOf(v, "String"))
152 152                      then {
153 153                          let w = v
154 154                          w
155 155                          }
156 156                      else c
157 157                  }
158 158              let X = toBase58String(g.bytes)
159 159              let ak = {
160 160                  let v = getInteger(this, W(X))
161 161                  if ($isInstanceOf(v, "Int"))
162 162                      then {
163 163                          let w = v
164 164                          w
165 165                          }
166 166                      else 0
167 167                  }
168 168              let al = (b * 10000)
169 169              let aa = toBase58String(e.bytes)
170 170              let am = {
171 171                  let v = getInteger(this, Z(aa))
172 172                  if ($isInstanceOf(v, "Int"))
173 173                      then {
174 174                          let w = v
175 175                          w
176 176                          }
177 177                      else 0
178 178                  }
179 179              let an = toBase58String(ac.caller.bytes)
180 180              let ao = ad
181 181              let ap = ((m * ao) / r)
182 182              let aq = ((n * ao) / r)
183 183              let ar = (((100 - l) * (i * k)) / 10000)
184 184              let as = (((ad * j) / 100) / ar)
185 185              let at = (as * 10000)
186 186              let au = ((o * as) / r)
187 187              let av = ((p * as) / r)
188 188              let aw = ((q * as) / r)
189 189              if ((ak >= (b * 10000)))
190 190                  then throw("Lo sentimos, por ahora no hay oferta de tokens para su transacción")
191 191                  else if ((ad > ai.amount))
192 192                      then throw("Payment Amount can't be less than item Purchase Order")
193 193                      else if ((ai.amount > ad))
194 194                          then throw("Payment Amount can't be higher than item Purchase Order")
195 -                         else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + 269527264)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + 146335)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
195 +                         else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + 0)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + 0)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
196 196              }
197 197      }
198 198  
199 199  
200 200  @Verifier(ax)
201 201  func ay () = {
202 202      let v = ax
203 203      if ($isInstanceOf(v, "SetScriptTransaction"))
204 204          then {
205 205              let az = v
206 206              sigVerify(ax.bodyBytes, ax.proofs[0], d)
207 207              }
208 208          else if (if ($isInstanceOf(v, "ReissueTransaction"))
209 209              then true
210 210              else $isInstanceOf(v, "DataTransaction"))
211 211              then {
212 212                  let aA = v
213 213                  true
214 214                  }
215 215              else if ($isInstanceOf(v, "TransferTransaction"))
216 216                  then {
217 217                      let ax = v
218 218                      true
219 219                      }
220 220                  else false
221 221      }
222 222

Old	New		Differences
192	192		then throw("Payment Amount can't be less than item Purchase Order")
193	193		else if ((ai.amount > ad))
194	194		then throw("Payment Amount can't be higher than item Purchase Order")
195		-	else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + ~~269527264~~)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + ~~146335~~)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
	195	+	else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + 0)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + 0)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
196	196		}
197	197		}
198	198

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5	5
6	6		let b = 10000
7	7
8	8		let c = "none"
9	9
10	10		let d = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
11	11
12	12		let e = Address(base58'3NAFcFPrj1wWrVMcsJMLvWBzmBt93oLh6w8')
13	13
14	14		let f = Address(base58'3MyAfquD1K4mvWJNDLVPRG4BWiAW3RQUpXG')
15	15
16	16		let g = Address(base58'3N9epiFphbL3Sf25xMASL1jAPxDH5D8vX85')
17	17
18	18		let h = Address(base58'3N4c7DzgBcyVWTEv9N11vNpg4B1bfg5ryfJ')
19	19
20	20		let i = 116
21	21
22	22		let j = 2539
23	23
24	24		let k = 100000
25	25
26	26		let l = 3
27	27
28	28		let m = 10
29	29
30	30		let n = 1
31	31
32	32		let o = 7
33	33
34	34		let p = 2
35	35
36	36		let q = 2
37	37
38	38		let r = 11
39	39
40	40		func s (t) = {
41	41		let u = {
42	42		let v = getInteger(this, t)
43	43		if ($isInstanceOf(v, "Int"))
44	44		then {
45	45		let w = v
46	46		w
47	47		}
48	48		else 0
49	49		}
50	50		u
51	51		}
52	52
53	53
54	54		func x (t) = {
55	55		let y = {
56	56		let v = getString(this, t)
57	57		if ($isInstanceOf(v, "String"))
58	58		then {
59	59		let w = v
60	60		w
61	61		}
62	62		else c
63	63		}
64	64		y
65	65		}
66	66
67	67
68	68		func z (A,B) = "Order_№:"
69	69
70	70
71	71		func C (A,B) = s(z(A, B))
72	72
73	73
74	74		func D (B) = "Proyecto de Apoyo \| Inversión"
75	75
76	76
77	77		func E (B) = x(D(B))
78	78
79	79
80	80		func F (B) = "№ de Documento \| DNI del Comprador:"
81	81
82	82
83	83		func G (B) = x(F(B))
84	84
85	85
86	86		func H (B) = "Producto-GTS adquirido \| Categoría:"
87	87
88	88
89	89		func I (B) = x(H(B))
90	90
91	91
92	92		func J (B) = "Tienda \| Vendedor-GTS:"
93	93
94	94
95	95		func K (B) = x(J(B))
96	96
97	97
98	98		func L (B) = "Nodo-Activo Participante"
99	99
100	100
101	101		func M (B) = "UI, x10e-04 bit:"
102	102
103	103
104	104		func N (B) = s(M(B))
105	105
106	106
107	107		func O (B) = "PI, wvls:"
108	108
109	109
110	110		func P (B) = s(O(B))
111	111
112	112
113	113		func Q (B) = "SI, x10e-04 bit:"
114	114
115	115
116	116		func R (B) = s(Q(B))
117	117
118	118
119	119		func S (B) = "NIb, x10e-04 bit:"
120	120
121	121
122	122		func T (B) = s(S(B))
123	123
124	124
125	125		func U (B) = "NIw, wvls:"
126	126
127	127
128	128		func V (B) = s(U(B))
129	129
130	130
131	131		func W (X) = "Tokens Ofertados / Balance, ytok:"
132	132
133	133
134	134		func Y (X) = s(W(X))
135	135
136	136
137	137		func Z (aa) = "Balance del Proyecto, wvls:"
138	138
139	139
140	140		func ab (aa) = s(Z(aa))
141	141
142	142
143	143		@Callable(ac)
144	144		func purchaseGTS (ad,ae,af,ag,ah,B) = {
145	145		let ai = extract(ac.payment)
146	146		if (isDefined(ai.assetId))
147	147		then throw("El Precio en waves.")
148	148		else {
149	149		let aj = {
150	150		let v = getString(this, L(B))
151	151		if ($isInstanceOf(v, "String"))
152	152		then {
153	153		let w = v
154	154		w
155	155		}
156	156		else c
157	157		}
158	158		let X = toBase58String(g.bytes)
159	159		let ak = {
160	160		let v = getInteger(this, W(X))
161	161		if ($isInstanceOf(v, "Int"))
162	162		then {
163	163		let w = v
164	164		w
165	165		}
166	166		else 0
167	167		}
168	168		let al = (b * 10000)
169	169		let aa = toBase58String(e.bytes)
170	170		let am = {
171	171		let v = getInteger(this, Z(aa))
172	172		if ($isInstanceOf(v, "Int"))
173	173		then {
174	174		let w = v
175	175		w
176	176		}
177	177		else 0
178	178		}
179	179		let an = toBase58String(ac.caller.bytes)
180	180		let ao = ad
181	181		let ap = ((m * ao) / r)
182	182		let aq = ((n * ao) / r)
183	183		let ar = (((100 - l) * (i * k)) / 10000)
184	184		let as = (((ad * j) / 100) / ar)
185	185		let at = (as * 10000)
186	186		let au = ((o * as) / r)
187	187		let av = ((p * as) / r)
188	188		let aw = ((q * as) / r)
189	189		if ((ak >= (b * 10000)))
190	190		then throw("Lo sentimos, por ahora no hay oferta de tokens para su transacción")
191	191		else if ((ad > ai.amount))
192	192		then throw("Payment Amount can't be less than item Purchase Order")
193	193		else if ((ai.amount > ad))
194	194		then throw("Payment Amount can't be higher than item Purchase Order")
195		-	else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + ~~269527264~~)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + ~~146335~~)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
	195	+	else ScriptResult(WriteSet([DataEntry(z(an, B), (C(an, B) + 1)), DataEntry("Apoyo Ecológico, wvls", ad), DataEntry(F(B), ae), DataEntry(D(B), af), DataEntry(H(B), ag), DataEntry(J(B), ah), DataEntry(L(B), B), DataEntry("usdn", j), DataEntry("eurou", i), DataEntry("1 Bit-CO2 con dscto, usd x10e-4", ar), DataEntry("Total bit-co2 a distribuir, x10e-4", as), DataEntry(("Order_Status:_" + an), "Transacción Confirmada!"), DataEntry("Saldo Proyecto, wvls", am), DataEntry(Z(aa), (ab(aa) + 0)), DataEntry("Saldo Tokens, bco2", 0), DataEntry(W(X), (Y(X) + 0)), DataEntry("Saldo BCO2, x10e-04", al)]), TransferSet([ScriptTransfer(e, ap, unit), ScriptTransfer(f, aq, unit), ScriptTransfer(ac.caller, au, a), ScriptTransfer(g, av, a), ScriptTransfer(h, aw, a)]))
196	196		}
197	197		}
198	198
199	199
200	200		@Verifier(ax)
201	201		func ay () = {
202	202		let v = ax
203	203		if ($isInstanceOf(v, "SetScriptTransaction"))
204	204		then {
205	205		let az = v
206	206		sigVerify(ax.bodyBytes, ax.proofs[0], d)
207	207		}
208	208		else if (if ($isInstanceOf(v, "ReissueTransaction"))
209	209		then true
210	210		else $isInstanceOf(v, "DataTransaction"))
211	211		then {
212	212		let aA = v
213	213		true
214	214		}
215	215		else if ($isInstanceOf(v, "TransferTransaction"))
216	216		then {
217	217		let ax = v
218	218		true
219	219		}
220	220		else false
221	221		}
222	222

github/deemru/w8io/169f3d6 
50.68 ms ◑