w8 · tx · 21J···Xm1

tx · 21JwwzXi4Yw9WRbzBcDUJJRTVeYjGBjEjxeJHas51Xm1

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.21 13:33 [1755956] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "21JwwzXi4Yw9WRbzBcDUJJRTVeYjGBjEjxeJHas51Xm1",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1634812503470,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "4eL5JrHGqQCRsJpW2wmjniPb46snkffxzkTp5yzJGUt2Q9XT8GoSzXbjrPFCK1rF7iSeipn67JVewuvAhozejYhN"
    ],
    "script": "base64:AAIDAAAAAAAAAAsIARIHCgUICAgIAQAAAEIAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAAASqHQAAAAAMRmlyc3RGYXNlUXR5AAAAAAAAAHnZAAAAAA1TZWNvbmRGYXNlUXR5AAAAAAAABDBEAAAAABBUb2tUb1ZlbmRlZG9yUXR5AAAAAAAAACcQAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAAC093bmVyUHViS2V5AQAAACB2JYFH9ti5N+7uGrdzKwlrXhDeZ+vMkHOKuVJteEgPDwAAAAAEdEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLK1ppj4mummw+7gTK3Ad3Ub4h3efkn0JwAAAAAEYUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLGfyy1r0onBhV5KbTmujr+1cm+CidoWkwAAAAAEZUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVJl9LDPuC4uFUEENum3we4/11P1VuB5sVwAAAAAEcEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEOlrjWInpptJ9aV0memID9lDjKQsHSkagAAAAAFZXVyb3UAAAAAAAAAAHQAAAAABXVzZG53AAAAAAAAAAnrAAAAAAViY28yZQAAAAAAAAGGoAAAAAAIYml0ZHNjdG8AAAAAAAAAAAMAAAAAA3BJUAAAAAAAAAAACgAAAAADdUJQAAAAAAAAAAAHAAAAAANzQlAAAAAAAAAAAAIAAAAAA2VJUAAAAAAAAAAAAQAAAAADZUJQAAAAAAAAAAACAAAAAAlyZWxhY2RjdG8AAAAAAAAAAAsBAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAALZ2V0S2V5VG9rZW4AAAABAAAABXRva2VuAgAAAAVUb2tlbgEAAAANZ2V0VmFsdWVUb2tlbgAAAAEAAAAFdG9rZW4JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAAtnZXRLZXlUb2tlbgAAAAEFAAAABXRva2VuAQAAAAxnZXRLZXlUaWVuZGEAAAABAAAABnRpZW5kYQIAAAARVGllbmRhIC8gU2hvcC1HVFMBAAAADmdldFZhbHVlVGllbmRhAAAAAQAAAAZ0aWVuZGEJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAAxnZXRLZXlUaWVuZGEAAAABBQAAAAZ0aWVuZGEBAAAAEmdldEtleVRva2Vuc1RpZW5kYQAAAAIAAAAGdGllbmRhAAAABXRva2VuCQABLAAAAAIJAAEsAAAAAgIAAAANVG9rZW5zIEJDTzI6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAZ0aWVuZGEFAAAABXRva2VuAQAAABRnZXRWYWx1ZVRva2Vuc1RpZW5kYQAAAAIAAAAGdGllbmRhAAAABXRva2VuCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAASZ2V0S2V5VG9rZW5zVGllbmRhAAAAAgUAAAAGdGllbmRhBQAAAAV0b2tlbgEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAUVmVuZGVkb3IsIExpbWEtUGVyw7oBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACAgAAAA5Qcm9kdWN0by1HVFM6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQEAAAAOZ2V0S2V5QXNvY2lhZG8AAAABAAAACGFzb2NpYWRvAgAAABBBc29jaWFkbyBCaXQtQ08yAQAAABBnZXRWYWx1ZUFzb2NpYWRvAAAAAQAAAAhhc29jaWFkbwkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUFzb2NpYWRvAAAAAQUAAAAIYXNvY2lhZG8BAAAADWdldEtleVByb2plY3QAAAABAAAAB3Byb2plY3QCAAAAB1Byb2plY3QBAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAAHcHJvamVjdAkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADWdldEtleVByb2plY3QAAAABBQAAAAdwcm9qZWN0AQAAAApnZXRLZXlOb2RvAAAAAQAAAARub2RvAgAAAAtOb2RvLUFjdGl2bwEAAAAMZ2V0VmFsdWVOb2RvAAAAAQAAAARub2RvCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5Tm9kbwAAAAEFAAAABG5vZG8BAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABpnZXRWYWx1ZVVzZXJJdGVtR3RzQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABAAAABGl0ZW0CAAAAGENhdGVnb3LDrWEgZGVsIFByb2R1Y3RvOgEAAAAQZ2V0VmFsdWVJdGVtTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABAAAABGl0ZW0CAAAAE05vbWJyZSBkZWwgVXN1YXJpbzoBAAAAEGdldFZhbHVlVXNlck5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQIAAAAj4oSWIGRlIERvY3VtZW50byAvIEROSSBkZWwgVXN1YXJpbzoBAAAAFGdldFZhbHVlVXNlckRvY3VtZW50AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAAEFVJLCB4MTBlLTA0IGJpdDoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAlQSSwgd3ZsczoBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAABBTSSwgeDEwZS0wNCBiaXQ6AQAAAApnZXRWYWx1ZVNJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlOSWIAAAABAAAABGl0ZW0CAAAAEU5JYiwgeDEwZS0wNCBiaXQ6AQAAAAtnZXRWYWx1ZU5JYgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JdwAAAAEAAAAEaXRlbQIAAAAKTkl3LCB3dmxzOgEAAAALZ2V0VmFsdWVOSXcAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlOSXcAAAABBQAAAARpdGVtAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQAAAAZ0aWVuZGECAAAAIVRva2VucyBPZmVydGFkb3MgLyBCYWxhbmNlLCB5dG9rOgEAAAASZ2V0VmFsdWVCYWxhblRva2VuAAAAAQAAAAZ0aWVuZGEJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABBnZXRLZXlCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhAQAAABVnZXRLZXlCYWxhbmNlUHJveWVjdG8AAAABAAAACHByb3llY3RvAgAAABpCYWxhbmNlIGRlbCBQcm95ZWN0bywgd3ZzOgEAAAAXZ2V0VmFsdWVCYWxhbmNlUHJveWVjdG8AAAABAAAACHByb3llY3RvCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8BAAAAFWdldEtleUJhbGFuY2VBc29jaWFkbwAAAAEAAAAIYXNvY2lhZG8CAAAAFUJhbGFuY2UgZGVsIEFzb2NpYWRvOgEAAAAXZ2V0VmFsdWVCYWxhbmNlQXNvY2lhZG8AAAABAAAACGFzb2NpYWRvCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZUFzb2NpYWRvAAAAAQUAAAAIYXNvY2lhZG8BAAAAEWdldEtleUJhbGFuY2VOb2RvAAAAAQAAAARub2RvAgAAABFCYWxhbmNlIGRlbCBOb2RvOgEAAAATZ2V0VmFsdWVCYWxhbmNlTm9kbwAAAAEAAAAEbm9kbwkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAEWdldEtleUJhbGFuY2VOb2RvAAAAAQUAAAAEbm9kbwEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAABdTYWxkbyB5dG9rZW5zIFN1cHBsaWVyOgEAAAAaZ2V0VmFsdWVCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAAAAAQAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAUAAAAEaXRlbQAAAAhpdGVtTmFtZQAAAAh1c2VyTmFtZQAAAAx1c2VyRG9jdW1lbnQAAAALdG90YWxBbW91bnQEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABNFbCBQcmVjaW8gZW4gd2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAZ0aWVuZGEJAAJYAAAAAQgFAAAABHRBZGQAAAAFYnl0ZXMEAAAADHNhbGRvVGllbmRhMQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAQZ2V0S2V5QmFsYW5Ub2tlbgAAAAEFAAAABnRpZW5kYQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAphbW91bnRCQ08yCQAAZQAAAAIFAAAAEFRva1RvVmVuZGVkb3JRdHkFAAAADHNhbGRvVGllbmRhMQQAAAAIcHJveWVjdG8JAAJYAAAAAQgFAAAABHBBZGQAAAAFYnl0ZXMEAAAACXNhbGRvUHJvagQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAIYXNvY2lhZG8JAAJYAAAAAQgFAAAABGFBZGQAAAAFYnl0ZXMEAAAADXNhbGRvQXNvY2lhZG8EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VBc29jaWFkbwAAAAEFAAAACGFzb2NpYWRvAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAADEZpcnN0RmFzZVF0eQQAAAAEbm9kbwkAAlgAAAABCAUAAAAEZUFkZAAAAAVieXRlcwQAAAAJc2FsZG9Ob2RvBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABFnZXRLZXlCYWxhbmNlTm9kbwAAAAEFAAAABG5vZG8DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3ViVG90YWwFAAAAC3RvdGFsQW1vdW50BAAAAANwSXcJAABpAAAAAgkAAGgAAAACBQAAAANwSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAAA2VJdwkAAGkAAAACCQAAaAAAAAIFAAAAA2VJUAUAAAAIc3ViVG90YWwFAAAACXJlbGFjZGN0bwQAAAANYmNvMm1lbm9zZGN0bwkAAGkAAAACCQAAaAAAAAIJAABlAAAAAgAAAAAAAAAAZAUAAAAIYml0ZHNjdG8JAABoAAAAAgUAAAAFZXVyb3UFAAAABWJjbzJlAAAAAAAAACcQBAAAAAlzdWJUb3RhbGIJAABpAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAAC3RvdGFsQW1vdW50BQAAAAV1c2RudwAAAAAAAAAAZAUAAAANYmNvMm1lbm9zZGN0bwQAAAAGdG90YWxiCQAAaAAAAAIFAAAACXN1YlRvdGFsYgAAAAAAAAAnEAQAAAADdUliCQAAaQAAAAIJAABoAAAAAgUAAAADdUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADc0liCQAAaQAAAAIJAABoAAAAAgUAAAADc0JQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADZUliCQAAaQAAAAIJAABoAAAAAgUAAAADZUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQUAAAAIaXRlbU5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0FAAAACHVzZXJOYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQUAAAAMdXNlckRvY3VtZW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAxBc29jaWFkbyBCaXQFAAAACGFzb2NpYWRvCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAR1c2RuBQAAAAV1c2RudwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAFZXVyb3UFAAAABWV1cm91CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABZBcG95byBFY29sw7NnaWNvLCB3dmxzBQAAAAt0b3RhbEFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAADcEl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAJZ2V0S2V5Tkl3AAAAAQUAAAAEaXRlbQUAAAADZUl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACYxIEJpdC1DTzIgUHJlY2lvIE5vbWluYWwsIGV1cm9zIHgxMGUtNAUAAAAFYmNvMmUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAJzEgQml0LUNPMiBQcmVjaW8gY29uIERlc2N0bywgdXNkIHgxMGUtNAUAAAANYmNvMm1lbm9zZGN0bwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAiVG90YWwgYml0LWNvMiBhIGRpc3RyaWJ1aXIsIHgxMGUtNAUAAAAJc3ViVG90YWxiCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAN1SWIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAA3NJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0FAAAAA2VJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA5PcmRlcl9TdGF0dXM6XwUAAAALdXNlckFkZHJlc3MCAAAAGFRyYW5zYWNjacOzbiBDb25maXJtYWRhIQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAOU2FsZG8gUHJveWVjdG8FAAAACXNhbGRvUHJvagkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvCQAAZAAAAAIJAQAAABdnZXRWYWx1ZUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvBQAAAANwSXcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAADFNhbGRvIFRva2VucwUAAAAMc2FsZG9UaWVuZGExCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAQZ2V0S2V5QmFsYW5Ub2tlbgAAAAEFAAAABnRpZW5kYQkAAGQAAAACCQEAAAASZ2V0VmFsdWVCYWxhblRva2VuAAAAAQUAAAAGdGllbmRhBQAAAAlzdWJUb3RhbGIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAClNhbGRvIEJDTzIFAAAACmFtb3VudEJDTzIFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARwQWRkBQAAAANwSXcFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAN1SWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAEYUFkZAUAAAADc0liBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VJdwUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARlQWRkBQAAAANlSWIFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYHxAdk2w==",
    "height": 1755956,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BvrGyyfTcECnqTe7XewmtPtoJB9hFmCYGj9nuoYUFVr7
Next: 7hJTpvoxhr6rFe1NaJVrwTGjUqkyu1gkjKNLiqTJKM3Y

Diff: 
Old New Differences
212 212                  case _ => 
213 213                      0
214 214              }
215 +             let amountBCO2 = (TokToVendedorQty - saldoTienda1)
215 216              let proyecto = toBase58String(pAdd.bytes)
216 217              let saldoProj =             match getInteger(this, getKeyBalanceProyecto(proyecto)) {
217 218                  case a: Int => 
247 248                  then throw("Payment Amount can't be less than item Purchase Order")
248 249                  else if ((pmt.amount > totalAmount))
249 250                      then throw("Payment Amount can't be higher than item Purchase Order")
250 -                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
251 +                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb)), DataEntry("Saldo BCO2", amountBCO2)]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
251 252              }
252 253      }
253 254  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5 5  
6 6  let startQty = 305693
7 7  
8 8  let FirstFaseQty = 31193
9 9  
10 10  let SecondFaseQty = 274500
11 11  
12 12  let TokToVendedorQty = 10000
13 13  
14 14  let wvs = 100000000
15 15  
16 16  let NONE = "none"
17 17  
18 18  let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
19 19  
20 20  let tAdd = Address(base58'3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8')
21 21  
22 22  let aAdd = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
23 23  
24 24  let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
25 25  
26 26  let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
27 27  
28 28  let eurou = 116
29 29  
30 30  let usdnw = 2539
31 31  
32 32  let bco2e = 100000
33 33  
34 34  let bitdscto = 3
35 35  
36 36  let pIP = 10
37 37  
38 38  let uBP = 7
39 39  
40 40  let sBP = 2
41 41  
42 42  let eIP = 1
43 43  
44 44  let eBP = 2
45 45  
46 46  let relacdcto = 11
47 47  
48 48  func getNumberByKey (key) = {
49 49      let num =     match getInteger(this, key) {
50 50          case a: Int => 
51 51              a
52 52          case _ => 
53 53              0
54 54      }
55 55      num
56 56      }
57 57  
58 58  
59 59  func getStrByKey (key) = {
60 60      let str =     match getString(this, key) {
61 61          case a: String => 
62 62              a
63 63          case _ => 
64 64              NONE
65 65      }
66 66      str
67 67      }
68 68  
69 69  
70 70  func getKeyToken (token) = "Token"
71 71  
72 72  
73 73  func getValueToken (token) = getStrByKey(getKeyToken(token))
74 74  
75 75  
76 76  func getKeyTienda (tienda) = "Tienda / Shop-GTS"
77 77  
78 78  
79 79  func getValueTienda (tienda) = getStrByKey(getKeyTienda(tienda))
80 80  
81 81  
82 82  func getKeyTokensTienda (tienda,token) = (("Tokens BCO2: " + " ") + toBase58String(sha256(toBytes((tienda + token)))))
83 83  
84 84  
85 85  func getValueTokensTienda (tienda,token) = getNumberByKey(getKeyTokensTienda(tienda, token))
86 86  
87 87  
88 88  func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
89 89  
90 90  
91 91  func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
92 92  
93 93  
94 94  func getKeyAsociado (asociado) = "Asociado Bit-CO2"
95 95  
96 96  
97 97  func getValueAsociado (asociado) = getStrByKey(getKeyAsociado(asociado))
98 98  
99 99  
100 100  func getKeyProject (project) = "Project"
101 101  
102 102  
103 103  func getValueProject (project) = getStrByKey(getKeyProject(project))
104 104  
105 105  
106 106  func getKeyNodo (nodo) = "Nodo-Activo"
107 107  
108 108  
109 109  func getValueNodo (nodo) = getStrByKey(getKeyNodo(nodo))
110 110  
111 111  
112 112  func getKeyUserItemGtsCounter (user,item) = "Order_№:"
113 113  
114 114  
115 115  func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
116 116  
117 117  
118 118  func getKeyItemName (item) = "Categoría del Producto:"
119 119  
120 120  
121 121  func getValueItemName (item) = getStrByKey(getKeyItemName(item))
122 122  
123 123  
124 124  func getKeyUserName (item) = "Nombre del Usuario:"
125 125  
126 126  
127 127  func getValueUserName (item) = getStrByKey(getKeyUserName(item))
128 128  
129 129  
130 130  func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
131 131  
132 132  
133 133  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
134 134  
135 135  
136 136  func getKeyUI (item) = "UI, x10e-04 bit:"
137 137  
138 138  
139 139  func getValueUI (item) = getNumberByKey(getKeyUI(item))
140 140  
141 141  
142 142  func getKeyPI (item) = "PI, wvls:"
143 143  
144 144  
145 145  func getValuePI (item) = getNumberByKey(getKeyPI(item))
146 146  
147 147  
148 148  func getKeySI (item) = "SI, x10e-04 bit:"
149 149  
150 150  
151 151  func getValueSI (item) = getNumberByKey(getKeySI(item))
152 152  
153 153  
154 154  func getKeyNIb (item) = "NIb, x10e-04 bit:"
155 155  
156 156  
157 157  func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
158 158  
159 159  
160 160  func getKeyNIw (item) = "NIw, wvls:"
161 161  
162 162  
163 163  func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
164 164  
165 165  
166 166  func getKeyBalanToken (tienda) = "Tokens Ofertados / Balance, ytok:"
167 167  
168 168  
169 169  func getValueBalanToken (tienda) = getNumberByKey(getKeyBalanToken(tienda))
170 170  
171 171  
172 172  func getKeyBalanceProyecto (proyecto) = "Balance del Proyecto, wvs:"
173 173  
174 174  
175 175  func getValueBalanceProyecto (proyecto) = getNumberByKey(getKeyBalanceProyecto(proyecto))
176 176  
177 177  
178 178  func getKeyBalanceAsociado (asociado) = "Balance del Asociado:"
179 179  
180 180  
181 181  func getValueBalanceAsociado (asociado) = getNumberByKey(getKeyBalanceAsociado(asociado))
182 182  
183 183  
184 184  func getKeyBalanceNodo (nodo) = "Balance del Nodo:"
185 185  
186 186  
187 187  func getValueBalanceNodo (nodo) = getNumberByKey(getKeyBalanceNodo(nodo))
188 188  
189 189  
190 190  func getKeyBalanceQtySupplier (item) = "Saldo ytokens Supplier:"
191 191  
192 192  
193 193  func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
194 194  
195 195  
196 196  @Callable(i)
197 197  func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
198 198      let pmt = extract(i.payment)
199 199      if (isDefined(pmt.assetId))
200 200          then throw("El Precio en waves.")
201 201          else {
202 202              let supplier =             match getString(this, getKeyItemSupplier(item)) {
203 203                  case a: String => 
204 204                      a
205 205                  case _ => 
206 206                      NONE
207 207              }
208 208              let tienda = toBase58String(tAdd.bytes)
209 209              let saldoTienda1 =             match getInteger(this, getKeyBalanToken(tienda)) {
210 210                  case a: Int => 
211 211                      a
212 212                  case _ => 
213 213                      0
214 214              }
215 +             let amountBCO2 = (TokToVendedorQty - saldoTienda1)
215 216              let proyecto = toBase58String(pAdd.bytes)
216 217              let saldoProj =             match getInteger(this, getKeyBalanceProyecto(proyecto)) {
217 218                  case a: Int => 
218 219                      a
219 220                  case _ => 
220 221                      0
221 222              }
222 223              let asociado = toBase58String(aAdd.bytes)
223 224              let saldoAsociado =             match getInteger(this, getKeyBalanceAsociado(asociado)) {
224 225                  case a: Int => 
225 226                      a
226 227                  case _ => 
227 228                      FirstFaseQty
228 229              }
229 230              let nodo = toBase58String(eAdd.bytes)
230 231              let saldoNodo =             match getInteger(this, getKeyBalanceNodo(nodo)) {
231 232                  case a: Int => 
232 233                      a
233 234                  case _ => 
234 235                      0
235 236              }
236 237              let userAddress = toBase58String(i.caller.bytes)
237 238              let subTotal = totalAmount
238 239              let pIw = ((pIP * subTotal) / relacdcto)
239 240              let eIw = ((eIP * subTotal) / relacdcto)
240 241              let bco2menosdcto = (((100 - bitdscto) * (eurou * bco2e)) / 10000)
241 242              let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
242 243              let totalb = (subTotalb * 10000)
243 244              let uIb = ((uBP * subTotalb) / relacdcto)
244 245              let sIb = ((sBP * subTotalb) / relacdcto)
245 246              let eIb = ((eBP * subTotalb) / relacdcto)
246 247              if ((totalAmount > pmt.amount))
247 248                  then throw("Payment Amount can't be less than item Purchase Order")
248 249                  else if ((pmt.amount > totalAmount))
249 250                      then throw("Payment Amount can't be higher than item Purchase Order")
250 -                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
251 +                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb)), DataEntry("Saldo BCO2", amountBCO2)]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
251 252              }
252 253      }
253 254  
254 255  
255 256  @Verifier(tx)
256 257  func verify () = match tx {
257 258      case t: SetScriptTransaction => 
258 259          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
259 260      case d: ReissueTransaction|DataTransaction => 
260 261          true
261 262      case tx: TransferTransaction => 
262 263          true
263 264      case _ => 
264 265          false
265 266  }
266 267

Old	New		Differences
212	212		case _ =>
213	213		0
214	214		}
	215	+	let amountBCO2 = (TokToVendedorQty - saldoTienda1)
215	216		let proyecto = toBase58String(pAdd.bytes)
216	217		let saldoProj = match getInteger(this, getKeyBalanceProyecto(proyecto)) {
217	218		case a: Int =>

247	248		then throw("Payment Amount can't be less than item Purchase Order")
248	249		else if ((pmt.amount > totalAmount))
249	250		then throw("Payment Amount can't be higher than item Purchase Order")
250		-	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
	251	+	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb)), DataEntry("Saldo BCO2", amountBCO2)]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
251	252		}
252	253		}
253	254

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5	5
6	6		let startQty = 305693
7	7
8	8		let FirstFaseQty = 31193
9	9
10	10		let SecondFaseQty = 274500
11	11
12	12		let TokToVendedorQty = 10000
13	13
14	14		let wvs = 100000000
15	15
16	16		let NONE = "none"
17	17
18	18		let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
19	19
20	20		let tAdd = Address(base58'3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8')
21	21
22	22		let aAdd = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
23	23
24	24		let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
25	25
26	26		let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
27	27
28	28		let eurou = 116
29	29
30	30		let usdnw = 2539
31	31
32	32		let bco2e = 100000
33	33
34	34		let bitdscto = 3
35	35
36	36		let pIP = 10
37	37
38	38		let uBP = 7
39	39
40	40		let sBP = 2
41	41
42	42		let eIP = 1
43	43
44	44		let eBP = 2
45	45
46	46		let relacdcto = 11
47	47
48	48		func getNumberByKey (key) = {
49	49		let num = match getInteger(this, key) {
50	50		case a: Int =>
51	51		a
52	52		case _ =>
53	53		0
54	54		}
55	55		num
56	56		}
57	57
58	58
59	59		func getStrByKey (key) = {
60	60		let str = match getString(this, key) {
61	61		case a: String =>
62	62		a
63	63		case _ =>
64	64		NONE
65	65		}
66	66		str
67	67		}
68	68
69	69
70	70		func getKeyToken (token) = "Token"
71	71
72	72
73	73		func getValueToken (token) = getStrByKey(getKeyToken(token))
74	74
75	75
76	76		func getKeyTienda (tienda) = "Tienda / Shop-GTS"
77	77
78	78
79	79		func getValueTienda (tienda) = getStrByKey(getKeyTienda(tienda))
80	80
81	81
82	82		func getKeyTokensTienda (tienda,token) = (("Tokens BCO2: " + " ") + toBase58String(sha256(toBytes((tienda + token)))))
83	83
84	84
85	85		func getValueTokensTienda (tienda,token) = getNumberByKey(getKeyTokensTienda(tienda, token))
86	86
87	87
88	88		func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
89	89
90	90
91	91		func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
92	92
93	93
94	94		func getKeyAsociado (asociado) = "Asociado Bit-CO2"
95	95
96	96
97	97		func getValueAsociado (asociado) = getStrByKey(getKeyAsociado(asociado))
98	98
99	99
100	100		func getKeyProject (project) = "Project"
101	101
102	102
103	103		func getValueProject (project) = getStrByKey(getKeyProject(project))
104	104
105	105
106	106		func getKeyNodo (nodo) = "Nodo-Activo"
107	107
108	108
109	109		func getValueNodo (nodo) = getStrByKey(getKeyNodo(nodo))
110	110
111	111
112	112		func getKeyUserItemGtsCounter (user,item) = "Order_№:"
113	113
114	114
115	115		func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
116	116
117	117
118	118		func getKeyItemName (item) = "Categoría del Producto:"
119	119
120	120
121	121		func getValueItemName (item) = getStrByKey(getKeyItemName(item))
122	122
123	123
124	124		func getKeyUserName (item) = "Nombre del Usuario:"
125	125
126	126
127	127		func getValueUserName (item) = getStrByKey(getKeyUserName(item))
128	128
129	129
130	130		func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
131	131
132	132
133	133		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
134	134
135	135
136	136		func getKeyUI (item) = "UI, x10e-04 bit:"
137	137
138	138
139	139		func getValueUI (item) = getNumberByKey(getKeyUI(item))
140	140
141	141
142	142		func getKeyPI (item) = "PI, wvls:"
143	143
144	144
145	145		func getValuePI (item) = getNumberByKey(getKeyPI(item))
146	146
147	147
148	148		func getKeySI (item) = "SI, x10e-04 bit:"
149	149
150	150
151	151		func getValueSI (item) = getNumberByKey(getKeySI(item))
152	152
153	153
154	154		func getKeyNIb (item) = "NIb, x10e-04 bit:"
155	155
156	156
157	157		func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
158	158
159	159
160	160		func getKeyNIw (item) = "NIw, wvls:"
161	161
162	162
163	163		func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
164	164
165	165
166	166		func getKeyBalanToken (tienda) = "Tokens Ofertados / Balance, ytok:"
167	167
168	168
169	169		func getValueBalanToken (tienda) = getNumberByKey(getKeyBalanToken(tienda))
170	170
171	171
172	172		func getKeyBalanceProyecto (proyecto) = "Balance del Proyecto, wvs:"
173	173
174	174
175	175		func getValueBalanceProyecto (proyecto) = getNumberByKey(getKeyBalanceProyecto(proyecto))
176	176
177	177
178	178		func getKeyBalanceAsociado (asociado) = "Balance del Asociado:"
179	179
180	180
181	181		func getValueBalanceAsociado (asociado) = getNumberByKey(getKeyBalanceAsociado(asociado))
182	182
183	183
184	184		func getKeyBalanceNodo (nodo) = "Balance del Nodo:"
185	185
186	186
187	187		func getValueBalanceNodo (nodo) = getNumberByKey(getKeyBalanceNodo(nodo))
188	188
189	189
190	190		func getKeyBalanceQtySupplier (item) = "Saldo ytokens Supplier:"
191	191
192	192
193	193		func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
194	194
195	195
196	196		@Callable(i)
197	197		func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
198	198		let pmt = extract(i.payment)
199	199		if (isDefined(pmt.assetId))
200	200		then throw("El Precio en waves.")
201	201		else {
202	202		let supplier = match getString(this, getKeyItemSupplier(item)) {
203	203		case a: String =>
204	204		a
205	205		case _ =>
206	206		NONE
207	207		}
208	208		let tienda = toBase58String(tAdd.bytes)
209	209		let saldoTienda1 = match getInteger(this, getKeyBalanToken(tienda)) {
210	210		case a: Int =>
211	211		a
212	212		case _ =>
213	213		0
214	214		}
	215	+	let amountBCO2 = (TokToVendedorQty - saldoTienda1)
215	216		let proyecto = toBase58String(pAdd.bytes)
216	217		let saldoProj = match getInteger(this, getKeyBalanceProyecto(proyecto)) {
217	218		case a: Int =>
218	219		a
219	220		case _ =>
220	221		0
221	222		}
222	223		let asociado = toBase58String(aAdd.bytes)
223	224		let saldoAsociado = match getInteger(this, getKeyBalanceAsociado(asociado)) {
224	225		case a: Int =>
225	226		a
226	227		case _ =>
227	228		FirstFaseQty
228	229		}
229	230		let nodo = toBase58String(eAdd.bytes)
230	231		let saldoNodo = match getInteger(this, getKeyBalanceNodo(nodo)) {
231	232		case a: Int =>
232	233		a
233	234		case _ =>
234	235		0
235	236		}
236	237		let userAddress = toBase58String(i.caller.bytes)
237	238		let subTotal = totalAmount
238	239		let pIw = ((pIP * subTotal) / relacdcto)
239	240		let eIw = ((eIP * subTotal) / relacdcto)
240	241		let bco2menosdcto = (((100 - bitdscto) * (eurou * bco2e)) / 10000)
241	242		let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
242	243		let totalb = (subTotalb * 10000)
243	244		let uIb = ((uBP * subTotalb) / relacdcto)
244	245		let sIb = ((sBP * subTotalb) / relacdcto)
245	246		let eIb = ((eBP * subTotalb) / relacdcto)
246	247		if ((totalAmount > pmt.amount))
247	248		then throw("Payment Amount can't be less than item Purchase Order")
248	249		else if ((pmt.amount > totalAmount))
249	250		then throw("Payment Amount can't be higher than item Purchase Order")
250		-	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
	251	+	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("Saldo Proyecto", saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), (getValueBalanceProyecto(proyecto) + pIw)), DataEntry("Saldo Tokens", saldoTienda1), DataEntry(getKeyBalanToken(tienda), (getValueBalanToken(tienda) + subTotalb)), DataEntry("Saldo BCO2", amountBCO2)]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
251	252		}
252	253		}
253	254
254	255
255	256		@Verifier(tx)
256	257		func verify () = match tx {
257	258		case t: SetScriptTransaction =>
258	259		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
259	260		case d: ReissueTransaction\|DataTransaction =>
260	261		true
261	262		case tx: TransferTransaction =>
262	263		true
263	264		case _ =>
264	265		false
265	266		}
266	267

github/deemru/w8io/873ac7e 
49.75 ms ◑