w8 · tx · CDp···wF5

tx · CDpe9iYA1RieGbCTrzT3Nwa9XzhDMvdyJqRDb7sLnwF5

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01400000 Waves

2020.08.25 12:42 [1148386] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CDpe9iYA1RieGbCTrzT3Nwa9XzhDMvdyJqRDb7sLnwF5",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1598348532245,
    "version": 1,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "3zzbbUWUZrr16HnvCQCBj84SWsN7jRScBmE7757ZW6Qv4rPZqGv3WryvqqD9JLKFAFYLpGZR4hpUvCMaiSwopS2D"
    ],
    "script": "base64:AAIDAAAAAAAAACAIARIECgIICBIHCgUICAgIARIHCgUICAgIARIECgIIAQAAADAAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAARndHMxAQAAACDDxYMO3SsdGFMCSZ4E3p59+bOpZEBHwTUZ+0J8yxIGZwAAAAAIc3RhcnRRdHkAAAAAALY1DNAAAAAADEZpcnN0RmFzZVF0eQAAAAAAEpeskAAAAAANU2Vjb25kRmFzZVF0eQAAAAAAo51gQAAAAAAIbm9tUHJpY2UAAAAAAAAAAAEAAAAAA3d2cwAAAAAABfXhAAAAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAAAAAAADAAAAAAETk9ORQIAAAAEbm9uZQAAAAALT3duZXJQdWJLZXkBAAAAIHYlgUf22Lk37u4at3MrCWteEN5n68yQc4q5Um14SA8PAAAAAAZpc3N1ZXIJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVSxn8sta9KJwYVeSm05ro6/tXJvgonaFpMAAAAABGVBZGQJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVSZfSwz7guLhVBBDbpt8HuP9dT9VbgebFcAAAAABHBBZGQJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVRDpa41iJ6abSfWldJnpiA/ZQ4ykLB0pGoAAAAAA2lndgAAAAAAAAAAEgAAAAAFRXVyb1cAAAAAAAHoSAAAAAAAB3liaXRjbzIJAABpAAAAAgkAAGgAAAACAAAAAAAAAAABBQAAAAVFdXJvVwAAAAAAAAAnEAAAAAADdUlQAAAAAAAAAAAHAAAAAANwSVAAAAAAAAAAAAoAAAAAA2VJUAAAAAAAAAAAAQAAAAADc0JQAAAAAAAAAAACAAAAAANlQlAAAAAAAAAAAAIBAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAYQml0LUNPMiBTaG9wLCBMaW1hLVBlcsO6AQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAARpdGVtCQABLAAAAAIJAAEsAAAAAgIAAAAOUHJvZHVjdG8tR1RTOiACAAAAASAJAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAAIc3VwcGxpZXIFAAAABGl0ZW0BAAAADWdldEtleVByb2plY3QAAAABAAAABGl0ZW0CAAAAB1Byb2plY3QBAAAAEWdldEtleUVjb3N5c3ROb2RlAAAAAQAAAARpdGVtAgAAABNOb2RvIGRlbCBFY29zaXN0ZW1hAQAAAA9nZXRLZXlUb2tlbkdUUzEAAAABAAAABGl0ZW0CAAAACEdUU3RhYmxlAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQIAAAAKT3JkZXJf4oSWOgEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAADmdldEtleUl0ZW1OYW1lAAAAAQAAAARpdGVtAgAAABhDYXRlZ29yw61hIGRlbCBQcm9kdWN0bzoBAAAAEGdldFZhbHVlSXRlbU5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEFAAAABGl0ZW0BAAAADmdldEtleVVzZXJOYW1lAAAAAQAAAARpdGVtAgAAABNOb21icmUgZGVsIFVzdWFyaW86AQAAABBnZXRWYWx1ZVVzZXJOYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABBQAAAARpdGVtAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0CAAAAI+KEliBkZSBEb2N1bWVudG8gLyBETkkgZGVsIFVzdWFyaW86AQAAABRnZXRWYWx1ZVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0BAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtAgAAADRUb2tlbnMgT2ZlcnRhZG9zIGVuIGxhIHByZXNlbnRlIGV0YXBhIC8gU2FsZG8sIHl0b2s6AQAAAB9nZXRWYWx1ZVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAG0JhbGFuY2UvU2FsZG8gR1RTLCB5dG9rZW5zOgEAAAAaZ2V0VmFsdWVCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyAgAAAB9Nb250byBCcnV0byBwb3IgVmVudGFHVFMsIHd2bHM6AQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAACVVJLF93dmxzOgEAAAAKZ2V0VmFsdWVVSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5UEkAAAABAAAABGl0ZW0CAAAACVBJLF93dmxzOgEAAAAKZ2V0VmFsdWVQSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5U0kAAAABAAAABGl0ZW0CAAAACVNJLF93dmxzOgEAAAAKZ2V0VmFsdWVTSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQAAAAQAAAABaQEAAAAHZGVwb3NpdAAAAAIAAAAFdGl0bGUAAAAMc3VwcGxpZXJEYXRhBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHeUJpdENPMgkAAAIAAAABAgAAAClkZXBvc2l0byBwZXJtaXRpZG8gc29sbyBlbiB5Qml0Q08yIHRva2VucwQAAAAIc3VwcGxpZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANY3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAJbmV3QW1vdW50CQAAZAAAAAIFAAAADWN1cnJlbnRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50AwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAcTm8gaGF5IHlCaXRDTzIgZW4gc3UgYmFsYW5jZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAIc3VwcGxpZXIFAAAACW5ld0Ftb3VudAUAAAADbmlsAAAAAWkBAAAAC3B1cmNoYXNlR1RTAAAABQAAAARpdGVtAAAACGl0ZW1OYW1lAAAACHVzZXJOYW1lAAAADHVzZXJEb2N1bWVudAAAAAt0b3RhbEFtb3VudAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB3lCaXRDTzIJAAACAAAAAQIAAAAtVXNlIHlCaXRDTzIgdG9rZW5zIHBhcmEgYWRxdWlyaXIgUHJvZHVjdG9zR1RTBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAdwcm9qQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAROT05FBQAAAARwQWRkBAAAAAdub2RvQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABFnZXRLZXlFY29zeXN0Tm9kZQAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAAETk9ORQUAAAAEZUFkZAQAAAALcHJlVG9rZW5RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAANU2Vjb25kRmFzZVF0eQQAAAAPYmFsYW5jZVN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAhzdWJUb3RhbAkAAGUAAAACBQAAAAt0b3RhbEFtb3VudAkAAGkAAAACCQAAaAAAAAIFAAAAA2lndgUAAAALdG90YWxBbW91bnQAAAAAAAAAAGQEAAAAA2NQQgkAAGkAAAACCQAAaAAAAAIAAAAAAAAAAFgFAAAAB3liaXRjbzIAAAAAAAAAAGQEAAAAAnVJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA3VJUAAAAAAAAAAAZAQAAAADdUJJCQAAaAAAAAIJAABpAAAAAgUAAAACdUkFAAAAA2NQQgAAAAAAAAAAAQQAAAACcEkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADcElQAAAAAAAAAABkBAAAAAJlSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAA2VCSQkAAGgAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA2VCUAkAAGgAAAACAAAAAAAAAABkBQAAAANjUEIAAAAAAAAAAAEEAAAAAnNJCQAAZQAAAAIJAABlAAAAAgUAAAALdG90YWxBbW91bnQFAAAAAnBJBQAAAAJlSQQAAAADc0JJCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADc0JQCQAAaAAAAAIAAAAAAAAAAGQFAAAAA2NQQgAAAAAAAAAAAQQAAAAKUVZlbnRhc2d0cwkAAGgAAAACCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwAAAAAAAAAAAsJAABoAAAAAgUAAAADY1BCAAAAAAAAAABkAAAAAAAAAAABAwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA1UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgbGVzcyB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIDCQAAZgAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAt0b3RhbEFtb3VudAkAAAIAAAABAgAAADdQYXltZW50IEFtb3VudCBjYW4ndCBiZSBoaWdoZXIgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtCQAAZAAAAAIJAQAAABpnZXRWYWx1ZVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAKZ2V0S2V5SXRlbQAAAAIFAAAACHN1cHBsaWVyBQAAAARpdGVtBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtBQAAAAhpdGVtTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleVVzZXJOYW1lAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtBQAAAAx1c2VyRG9jdW1lbnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAHFBheW1lbnRfYW1vdW50LF95Qml0Q08yY2VudHMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZJbXAsICUFAAAAA2lndgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAASU1R0bCwgeUJpdENPMmNlbnRzBQAAAAhzdWJUb3RhbAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAUQ1AgMSBCLCB5Qml0Q08yY2VudHMJAABoAAAAAgUAAAADY1BCAAAAAAAAACcQCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAJ1SQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAPVUJJLCAxMGUtNCBndHMxBQAAAAN1QkkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0FAAAAAnBJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABNFY1N5cywgeUJpdENPMmNlbnRzBQAAAAJlSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAARRWNTeXMsIDEwZS00IGd0czEFAAAAA2VCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQUAAAACc0kJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAD1NCSSwgMTBlLTQgZ3RzMQUAAAADc0JJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADk9yZGVyX1N0YXR1czpfBQAAAAt1c2VyQWRkcmVzcwIAAAAYQWRxdWlzaWNpw7NuIENvbmZpcm1hZGEhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABlRcG9yVmVudGFzR1RTLCAxMGUtNCBndHMxBQAAAApRVmVudGFzZ3RzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQkAAGUAAAACBQAAAAtwcmVUb2tlblF0eQkAAGkAAAACBQAAAApRVmVudGFzZ3RzAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIJAABkAAAAAgUAAAAPYmFsYW5jZVN1cHBsaWVyCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAADdUJJBQAAAARndHMxCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABHBBZGQFAAAAAnBJBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAAmVJBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VCSQUAAAAEZ3RzMQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAZpc3N1ZXIFAAAAAnNJBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABmlzc3VlcgUAAAADc0JJBQAAAARndHMxBQAAAANuaWwAAAABaQEAAAAMcHVyY2hhc2VHVFMyAAAABQAAAARpdGVtAAAACGl0ZW1OYW1lAAAACHVzZXJOYW1lAAAADHVzZXJEb2N1bWVudAAAAAt0b3RhbEFtb3VudAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAE0VsIFByZWNpbyBlbiB3YXZlcy4EAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAAB3Byb2pBZGQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAABE5PTkUFAAAABHBBZGQEAAAAB25vZG9BZGQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEWdldEtleUVjb3N5c3ROb2RlAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAROT05FBQAAAARlQWRkBAAAAAtwcmVUb2tlblF0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAA1TZWNvbmRGYXNlUXR5BAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsCQAAZQAAAAIFAAAAC3RvdGFsQW1vdW50CQAAaQAAAAIJAABoAAAAAgUAAAADaWd2BQAAAAt0b3RhbEFtb3VudAAAAAAAAAAAZAQAAAADY1BCCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAAWAUAAAAHeWJpdGNvMgAAAAAAAAAAZAQAAAACdUkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADdUlQAAAAAAAAAABkBAAAAAN1QkkJAABoAAAAAgkAAGkAAAACBQAAAAJ1SQUAAAADY1BCAAAAAAAAAAABBAAAAAJwSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANwSVAAAAAAAAAAAGQEAAAAAmVJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA2VJUAAAAAAAAAAAZAQAAAADZUJJCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADZUJQCQAAaAAAAAIAAAAAAAAAAGQFAAAAA2NQQgAAAAAAAAAAAQQAAAACc0kJAABlAAAAAgkAAGUAAAACBQAAAAt0b3RhbEFtb3VudAUAAAACcEkFAAAAAmVJBAAAAANzQkkJAABoAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANzQlAJAABoAAAAAgAAAAAAAAAAZAUAAAADY1BCAAAAAAAAAAABBAAAAApRVmVudGFzZ3RzCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAAAAAAAAAAACwkAAGgAAAACBQAAAANjUEIAAAAAAAAAAGQAAAAAAAAAAAEDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQYXltZW50IEFtb3VudCBjYW4ndCBiZSBsZXNzIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RvdGFsQW1vdW50CQAAAgAAAAECAAAAN1BheW1lbnQgQW1vdW50IGNhbid0IGJlIGhpZ2hlciB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0JAABkAAAAAgkBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlJdGVtAAAAAgUAAAAIc3VwcGxpZXIFAAAABGl0ZW0FAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEFAAAABGl0ZW0FAAAACGl0ZW1OYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABBQAAAARpdGVtBQAAAAh1c2VyTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0FAAAADHVzZXJEb2N1bWVudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAUUGF5bWVudF9hbW91bnQsX3d2bHMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZJbXAsICUFAAAAA2lndgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAKU1R0bCwgd3ZscwUAAAAIc3ViVG90YWwJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAADENQIDEgQiwgd3ZscwkAAGgAAAACBQAAAANjUEIAAAAAAAAAJxAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0FAAAAAnVJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABJVQkksIDEwZS00IHliaXRjbzIFAAAAA3VCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAACcEkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAC0VjU3lzLCB3dmxzBQAAAAJlSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAURWNTeXMsIDEwZS00IHliaXRjbzIFAAAAA2VCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQUAAAACc0kJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAElNCSSwgMTBlLTQgeWJpdGNvMgUAAAADc0JJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADk9yZGVyX1N0YXR1czpfBQAAAAt1c2VyQWRkcmVzcwIAAAAYQWRxdWlzaWNpw7NuIENvbmZpcm1hZGEhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABxRcG9yVmVudGFzR1RTLCAxMGUtNCB5Yml0Y28yBQAAAApRVmVudGFzZ3RzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQkAAGUAAAACBQAAAAtwcmVUb2tlblF0eQkAAGkAAAACBQAAAApRVmVudGFzZ3RzAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIJAABkAAAAAgUAAAAPYmFsYW5jZVN1cHBsaWVyCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAADdUJJBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABHBBZGQFAAAAAnBJBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAAmVJBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VCSQUAAAAHeUJpdENPMgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAZpc3N1ZXIFAAAAAnNJBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABmlzc3VlcgUAAAADc0JJBQAAAAd5Qml0Q08yBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAACAAAABGl0ZW0AAAAGYW1vdW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGUAAAACBQAAAAlwcmVJY29RdHkFAAAABmFtb3VudAMJAABmAAAAAgAAAAAAAAAAAAUAAAAGYW1vdW50CQAAAgAAAAECAAAAK0VsIGJhbGFuY2UgZGUgcmV0aXJvIG5vIHB1ZWRlIHNlciBuZWdhdGl2byEDCQAAZwAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAAB5Pb3Bwc3MuLiBJbnN1ZmljaWVudGUgYmFsYW5jZSEJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAARpdGVtBQAAAAluZXdBbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAHeUJpdENPMgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAF0BQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAALT3duZXJQdWJLZXkDAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24GCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAElJlaXNzdWVUcmFuc2FjdGlvbgQAAAABZAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATRXhjaGFuZ2VUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAEAAAAC3dpdGh5Qml0Q08yAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQgICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAACWFzc2V0UGFpcgAAAApwcmljZUFzc2V0BgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQgICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAACWFzc2V0UGFpcgAAAAthbW91bnRBc3NldAUAAAALd2l0aHlCaXRDTzIHlLR0mg==",
    "chainId": 84,
    "height": 1148386,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6yftKeS81cqcBmKHUBzWksVh34QB1A4Kn7GotbEsHEaq
Next: 89arqJb1Xqinv8EHiBEkfZZdFY7TtTPmV7TBDhmzb4YV

Diff: 
Old New Differences
75 75  
76 76  
77 77  func getKeyEcosystNode (item) = "Nodo del Ecosistema"
78 + 
79 + 
80 + func getKeyTokenGTS1 (item) = "GTStable"
78 81  
79 82  
80 83  func getKeyUserItemGtsCounter (user,item) = "Order_№:"
306 309      case tx: TransferTransaction => 
307 310          true
308 311      case tx: ExchangeTransaction => 
309 -         let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
312 +         let withyBitCO2 = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
310 313              then true
311 314              else !(isDefined(tx.sellOrder.assetPair.amountAsset))
312 -         withWaves
315 +         withyBitCO2
313 316      case _ => 
314 317          false
315 318  }
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 gts1 = base58'EBDBY14t3xuduZ2GCNqEUpoLoy9eAAYfyQZA5ryVJxzS'
7 7  
8 8  let startQty = 3056930000
9 9  
10 10  let FirstFaseQty = 311930000
11 11  
12 12  let SecondFaseQty = 2745000000
13 13  
14 14  let nomPrice = 1
15 15  
16 16  let wvs = 100000000
17 17  
18 18  let supplierDiscount = 12
19 19  
20 20  let NONE = "none"
21 21  
22 22  let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
23 23  
24 24  let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
25 25  
26 26  let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
27 27  
28 28  let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
29 29  
30 30  let igv = 18
31 31  
32 32  let EuroW = 32000000
33 33  
34 34  let ybitco2 = ((1 * EuroW) / 10000)
35 35  
36 36  let uIP = 7
37 37  
38 38  let pIP = 10
39 39  
40 40  let eIP = 1
41 41  
42 42  let sBP = 2
43 43  
44 44  let eBP = 2
45 45  
46 46  func getNumberByKey (key) = {
47 47      let num =     match getInteger(this, key) {
48 48          case a: Int => 
49 49              a
50 50          case _ => 
51 51              0
52 52      }
53 53      num
54 54      }
55 55  
56 56  
57 57  func getStrByKey (key) = {
58 58      let str =     match getString(this, key) {
59 59          case a: String => 
60 60              a
61 61          case _ => 
62 62              NONE
63 63      }
64 64      str
65 65      }
66 66  
67 67  
68 68  func getKeyItemSupplier (supplier) = (supplier + "Bit-CO2 Shop, Lima-Perú")
69 69  
70 70  
71 71  func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
72 72  
73 73  
74 74  func getKeyProject (item) = "Project"
75 75  
76 76  
77 77  func getKeyEcosystNode (item) = "Nodo del Ecosistema"
78 + 
79 + 
80 + func getKeyTokenGTS1 (item) = "GTStable"
78 81  
79 82  
80 83  func getKeyUserItemGtsCounter (user,item) = "Order_№:"
81 84  
82 85  
83 86  func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
84 87  
85 88  
86 89  func getKeyItemName (item) = "Categoría del Producto:"
87 90  
88 91  
89 92  func getValueItemName (item) = getStrByKey(getKeyItemName(item))
90 93  
91 94  
92 95  func getKeyUserName (item) = "Nombre del Usuario:"
93 96  
94 97  
95 98  func getValueUserName (item) = getStrByKey(getKeyUserName(item))
96 99  
97 100  
98 101  func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
99 102  
100 103  
101 104  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
102 105  
103 106  
104 107  func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
105 108  
106 109  
107 110  func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
108 111  
109 112  
110 113  func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
111 114  
112 115  
113 116  func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
114 117  
115 118  
116 119  func getKeyBalanceSupplier (supplier) = "Monto Bruto por VentaGTS, wvls:"
117 120  
118 121  
119 122  func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
120 123  
121 124  
122 125  func getKeyUI (item) = "UI,_wvls:"
123 126  
124 127  
125 128  func getValueUI (item) = getNumberByKey(getKeyUI(item))
126 129  
127 130  
128 131  func getKeyPI (item) = "PI,_wvls:"
129 132  
130 133  
131 134  func getValuePI (item) = getNumberByKey(getKeyPI(item))
132 135  
133 136  
134 137  func getKeySI (item) = "SI,_wvls:"
135 138  
136 139  
137 140  func getValueSI (item) = getNumberByKey(getKeySI(item))
138 141  
139 142  
140 143  @Callable(i)
141 144  func deposit (title,supplierData) = {
142 145      let pmt = extract(i.payment)
143 146      if ((pmt.assetId != yBitCO2))
144 147          then throw("deposito permitido solo en yBitCO2 tokens")
145 148          else {
146 149              let supplier = toBase58String(i.caller.bytes)
147 150              let currentAmount =             match getInteger(this, supplier) {
148 151                  case a: Int => 
149 152                      a
150 153                  case _ => 
151 154                      startQty
152 155              }
153 156              let newAmount = (currentAmount + pmt.amount)
154 157              if ((0 >= newAmount))
155 158                  then throw("No hay yBitCO2 en su balance")
156 159                  else WriteSet([DataEntry(supplier, newAmount)])
157 160              }
158 161      }
159 162  
160 163  
161 164  
162 165  @Callable(i)
163 166  func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
164 167      let pmt = extract(i.payment)
165 168      if ((pmt.assetId != yBitCO2))
166 169          then throw("Use yBitCO2 tokens para adquirir ProductosGTS")
167 170          else {
168 171              let supplier =             match getString(this, getKeyItemSupplier(item)) {
169 172                  case a: String => 
170 173                      a
171 174                  case _ => 
172 175                      NONE
173 176              }
174 177              let projAdd =             match getString(this, getKeyProject(item)) {
175 178                  case a: String => 
176 179                      NONE
177 180                  case _ => 
178 181                      pAdd
179 182              }
180 183              let nodoAdd =             match getString(this, getKeyEcosystNode(item)) {
181 184                  case a: String => 
182 185                      NONE
183 186                  case _ => 
184 187                      eAdd
185 188              }
186 189              let preTokenQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
187 190                  case a: Int => 
188 191                      a
189 192                  case _ => 
190 193                      SecondFaseQty
191 194              }
192 195              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
193 196                  case a: Int => 
194 197                      a
195 198                  case _ => 
196 199                      0
197 200              }
198 201              let userAddress = toBase58String(i.caller.bytes)
199 202              let subTotal = (totalAmount - ((igv * totalAmount) / 100))
200 203              let cPB = ((88 * ybitco2) / 100)
201 204              let uI = ((subTotal * uIP) / 100)
202 205              let uBI = ((uI / cPB) * 1)
203 206              let pI = ((subTotal * pIP) / 100)
204 207              let eI = ((subTotal * eIP) / 100)
205 208              let eBI = (((subTotal * eBP) / (100 * cPB)) * 1)
206 209              let sI = ((totalAmount - pI) - eI)
207 210              let sBI = (((subTotal * sBP) / (100 * cPB)) * 1)
208 211              let QVentasgts = (((subTotal * 11) / (cPB * 100)) * 1)
209 212              if ((totalAmount > pmt.amount))
210 213                  then throw("Payment Amount can't be less than item Purchase Order")
211 214                  else if ((pmt.amount > totalAmount))
212 215                      then throw("Payment Amount can't be higher than item Purchase Order")
213 216                      else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_yBitCO2cents", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, yBitCO2cents", subTotal), DataEntry("CP 1 B, yBitCO2cents", (cPB * 10000)), DataEntry(getKeyUI(item), uI), DataEntry("UBI, 10e-4 gts1", uBI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, yBitCO2cents", eI), DataEntry("EcSys, 10e-4 gts1", eBI), DataEntry(getKeySI(item), sI), DataEntry("SBI, 10e-4 gts1", sBI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 gts1", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (QVentasgts / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uBI, gts1), ScriptTransfer(pAdd, pI, yBitCO2), ScriptTransfer(eAdd, eI, yBitCO2), ScriptTransfer(eAdd, eBI, gts1), ScriptTransfer(issuer, sI, yBitCO2), ScriptTransfer(issuer, sBI, gts1)]))
214 217              }
215 218      }
216 219  
217 220  
218 221  
219 222  @Callable(i)
220 223  func purchaseGTS2 (item,itemName,userName,userDocument,totalAmount) = {
221 224      let pmt = extract(i.payment)
222 225      if (isDefined(pmt.assetId))
223 226          then throw("El Precio en waves.")
224 227          else {
225 228              let supplier =             match getString(this, getKeyItemSupplier(item)) {
226 229                  case a: String => 
227 230                      a
228 231                  case _ => 
229 232                      NONE
230 233              }
231 234              let projAdd =             match getString(this, getKeyProject(item)) {
232 235                  case a: String => 
233 236                      NONE
234 237                  case _ => 
235 238                      pAdd
236 239              }
237 240              let nodoAdd =             match getString(this, getKeyEcosystNode(item)) {
238 241                  case a: String => 
239 242                      NONE
240 243                  case _ => 
241 244                      eAdd
242 245              }
243 246              let preTokenQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
244 247                  case a: Int => 
245 248                      a
246 249                  case _ => 
247 250                      SecondFaseQty
248 251              }
249 252              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
250 253                  case a: Int => 
251 254                      a
252 255                  case _ => 
253 256                      0
254 257              }
255 258              let userAddress = toBase58String(i.caller.bytes)
256 259              let subTotal = (totalAmount - ((igv * totalAmount) / 100))
257 260              let cPB = ((88 * ybitco2) / 100)
258 261              let uI = ((subTotal * uIP) / 100)
259 262              let uBI = ((uI / cPB) * 1)
260 263              let pI = ((subTotal * pIP) / 100)
261 264              let eI = ((subTotal * eIP) / 100)
262 265              let eBI = (((subTotal * eBP) / (100 * cPB)) * 1)
263 266              let sI = ((totalAmount - pI) - eI)
264 267              let sBI = (((subTotal * sBP) / (100 * cPB)) * 1)
265 268              let QVentasgts = (((subTotal * 11) / (cPB * 100)) * 1)
266 269              if ((totalAmount > pmt.amount))
267 270                  then throw("Payment Amount can't be less than item Purchase Order")
268 271                  else if ((pmt.amount > totalAmount))
269 272                      then throw("Payment Amount can't be higher than item Purchase Order")
270 273                      else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_wvls", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, wvls", subTotal), DataEntry("CP 1 B, wvls", (cPB * 10000)), DataEntry(getKeyUI(item), uI), DataEntry("UBI, 10e-4 ybitco2", uBI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, wvls", eI), DataEntry("EcSys, 10e-4 ybitco2", eBI), DataEntry(getKeySI(item), sI), DataEntry("SBI, 10e-4 ybitco2", sBI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 ybitco2", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (QVentasgts / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uBI, yBitCO2), ScriptTransfer(pAdd, pI, unit), ScriptTransfer(eAdd, eI, unit), ScriptTransfer(eAdd, eBI, yBitCO2), ScriptTransfer(issuer, sI, unit), ScriptTransfer(issuer, sBI, yBitCO2)]))
271 274              }
272 275      }
273 276  
274 277  
275 278  
276 279  @Callable(i)
277 280  func withdraw (item,amount) = {
278 281      let userAddress = toBase58String(i.caller.bytes)
279 282      let supplier =     match getString(this, getKeyItemSupplier(item)) {
280 283          case a: String => 
281 284              a
282 285          case _ => 
283 286              NONE
284 287      }
285 288      let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
286 289          case a: Int => 
287 290              a
288 291          case _ => 
289 292              startQty
290 293      }
291 294      let newAmount = (preIcoQty - amount)
292 295      if ((0 > amount))
293 296          then throw("El balance de retiro no puede ser negativo!")
294 297          else if ((0 >= newAmount))
295 298              then throw("Ooppss.. Insuficiente balance!")
296 299              else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
297 300      }
298 301  
299 302  
300 303  @Verifier(tx)
301 304  func verify () = match tx {
302 305      case t: SetScriptTransaction => 
303 306          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
304 307      case d: DataTransaction|ReissueTransaction => 
305 308          true
306 309      case tx: TransferTransaction => 
307 310          true
308 311      case tx: ExchangeTransaction => 
309 -         let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
312 +         let withyBitCO2 = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
310 313              then true
311 314              else !(isDefined(tx.sellOrder.assetPair.amountAsset))
312 -         withWaves
315 +         withyBitCO2
313 316      case _ => 
314 317          false
315 318  }
316 319

Old	New		Differences
75	75
76	76
77	77		func getKeyEcosystNode (item) = "Nodo del Ecosistema"
	78	+
	79	+
	80	+	func getKeyTokenGTS1 (item) = "GTStable"
78	81
79	82
80	83		func getKeyUserItemGtsCounter (user,item) = "Order_№:"

306	309		case tx: TransferTransaction =>
307	310		true
308	311		case tx: ExchangeTransaction =>
309		-	let ~~withWaves~~ = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
	312	+	let withyBitCO2 = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
310	313		then true
311	314		else !(isDefined(tx.sellOrder.assetPair.amountAsset))
312		-	~~withWaves~~
	315	+	withyBitCO2
313	316		case _ =>
314	317		false
315	318		}

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 gts1 = base58'EBDBY14t3xuduZ2GCNqEUpoLoy9eAAYfyQZA5ryVJxzS'
7	7
8	8		let startQty = 3056930000
9	9
10	10		let FirstFaseQty = 311930000
11	11
12	12		let SecondFaseQty = 2745000000
13	13
14	14		let nomPrice = 1
15	15
16	16		let wvs = 100000000
17	17
18	18		let supplierDiscount = 12
19	19
20	20		let NONE = "none"
21	21
22	22		let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
23	23
24	24		let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
25	25
26	26		let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
27	27
28	28		let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
29	29
30	30		let igv = 18
31	31
32	32		let EuroW = 32000000
33	33
34	34		let ybitco2 = ((1 * EuroW) / 10000)
35	35
36	36		let uIP = 7
37	37
38	38		let pIP = 10
39	39
40	40		let eIP = 1
41	41
42	42		let sBP = 2
43	43
44	44		let eBP = 2
45	45
46	46		func getNumberByKey (key) = {
47	47		let num = match getInteger(this, key) {
48	48		case a: Int =>
49	49		a
50	50		case _ =>
51	51		0
52	52		}
53	53		num
54	54		}
55	55
56	56
57	57		func getStrByKey (key) = {
58	58		let str = match getString(this, key) {
59	59		case a: String =>
60	60		a
61	61		case _ =>
62	62		NONE
63	63		}
64	64		str
65	65		}
66	66
67	67
68	68		func getKeyItemSupplier (supplier) = (supplier + "Bit-CO2 Shop, Lima-Perú")
69	69
70	70
71	71		func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
72	72
73	73
74	74		func getKeyProject (item) = "Project"
75	75
76	76
77	77		func getKeyEcosystNode (item) = "Nodo del Ecosistema"
	78	+
	79	+
	80	+	func getKeyTokenGTS1 (item) = "GTStable"
78	81
79	82
80	83		func getKeyUserItemGtsCounter (user,item) = "Order_№:"
81	84
82	85
83	86		func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
84	87
85	88
86	89		func getKeyItemName (item) = "Categoría del Producto:"
87	90
88	91
89	92		func getValueItemName (item) = getStrByKey(getKeyItemName(item))
90	93
91	94
92	95		func getKeyUserName (item) = "Nombre del Usuario:"
93	96
94	97
95	98		func getValueUserName (item) = getStrByKey(getKeyUserName(item))
96	99
97	100
98	101		func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
99	102
100	103
101	104		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
102	105
103	106
104	107		func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
105	108
106	109
107	110		func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
108	111
109	112
110	113		func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
111	114
112	115
113	116		func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
114	117
115	118
116	119		func getKeyBalanceSupplier (supplier) = "Monto Bruto por VentaGTS, wvls:"
117	120
118	121
119	122		func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
120	123
121	124
122	125		func getKeyUI (item) = "UI,_wvls:"
123	126
124	127
125	128		func getValueUI (item) = getNumberByKey(getKeyUI(item))
126	129
127	130
128	131		func getKeyPI (item) = "PI,_wvls:"
129	132
130	133
131	134		func getValuePI (item) = getNumberByKey(getKeyPI(item))
132	135
133	136
134	137		func getKeySI (item) = "SI,_wvls:"
135	138
136	139
137	140		func getValueSI (item) = getNumberByKey(getKeySI(item))
138	141
139	142
140	143		@Callable(i)
141	144		func deposit (title,supplierData) = {
142	145		let pmt = extract(i.payment)
143	146		if ((pmt.assetId != yBitCO2))
144	147		then throw("deposito permitido solo en yBitCO2 tokens")
145	148		else {
146	149		let supplier = toBase58String(i.caller.bytes)
147	150		let currentAmount = match getInteger(this, supplier) {
148	151		case a: Int =>
149	152		a
150	153		case _ =>
151	154		startQty
152	155		}
153	156		let newAmount = (currentAmount + pmt.amount)
154	157		if ((0 >= newAmount))
155	158		then throw("No hay yBitCO2 en su balance")
156	159		else WriteSet([DataEntry(supplier, newAmount)])
157	160		}
158	161		}
159	162
160	163
161	164
162	165		@Callable(i)
163	166		func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
164	167		let pmt = extract(i.payment)
165	168		if ((pmt.assetId != yBitCO2))
166	169		then throw("Use yBitCO2 tokens para adquirir ProductosGTS")
167	170		else {
168	171		let supplier = match getString(this, getKeyItemSupplier(item)) {
169	172		case a: String =>
170	173		a
171	174		case _ =>
172	175		NONE
173	176		}
174	177		let projAdd = match getString(this, getKeyProject(item)) {
175	178		case a: String =>
176	179		NONE
177	180		case _ =>
178	181		pAdd
179	182		}
180	183		let nodoAdd = match getString(this, getKeyEcosystNode(item)) {
181	184		case a: String =>
182	185		NONE
183	186		case _ =>
184	187		eAdd
185	188		}
186	189		let preTokenQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
187	190		case a: Int =>
188	191		a
189	192		case _ =>
190	193		SecondFaseQty
191	194		}
192	195		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
193	196		case a: Int =>
194	197		a
195	198		case _ =>
196	199		0
197	200		}
198	201		let userAddress = toBase58String(i.caller.bytes)
199	202		let subTotal = (totalAmount - ((igv * totalAmount) / 100))
200	203		let cPB = ((88 * ybitco2) / 100)
201	204		let uI = ((subTotal * uIP) / 100)
202	205		let uBI = ((uI / cPB) * 1)
203	206		let pI = ((subTotal * pIP) / 100)
204	207		let eI = ((subTotal * eIP) / 100)
205	208		let eBI = (((subTotal * eBP) / (100 * cPB)) * 1)
206	209		let sI = ((totalAmount - pI) - eI)
207	210		let sBI = (((subTotal * sBP) / (100 * cPB)) * 1)
208	211		let QVentasgts = (((subTotal * 11) / (cPB * 100)) * 1)
209	212		if ((totalAmount > pmt.amount))
210	213		then throw("Payment Amount can't be less than item Purchase Order")
211	214		else if ((pmt.amount > totalAmount))
212	215		then throw("Payment Amount can't be higher than item Purchase Order")
213	216		else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_yBitCO2cents", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, yBitCO2cents", subTotal), DataEntry("CP 1 B, yBitCO2cents", (cPB * 10000)), DataEntry(getKeyUI(item), uI), DataEntry("UBI, 10e-4 gts1", uBI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, yBitCO2cents", eI), DataEntry("EcSys, 10e-4 gts1", eBI), DataEntry(getKeySI(item), sI), DataEntry("SBI, 10e-4 gts1", sBI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 gts1", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (QVentasgts / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uBI, gts1), ScriptTransfer(pAdd, pI, yBitCO2), ScriptTransfer(eAdd, eI, yBitCO2), ScriptTransfer(eAdd, eBI, gts1), ScriptTransfer(issuer, sI, yBitCO2), ScriptTransfer(issuer, sBI, gts1)]))
214	217		}
215	218		}
216	219
217	220
218	221
219	222		@Callable(i)
220	223		func purchaseGTS2 (item,itemName,userName,userDocument,totalAmount) = {
221	224		let pmt = extract(i.payment)
222	225		if (isDefined(pmt.assetId))
223	226		then throw("El Precio en waves.")
224	227		else {
225	228		let supplier = match getString(this, getKeyItemSupplier(item)) {
226	229		case a: String =>
227	230		a
228	231		case _ =>
229	232		NONE
230	233		}
231	234		let projAdd = match getString(this, getKeyProject(item)) {
232	235		case a: String =>
233	236		NONE
234	237		case _ =>
235	238		pAdd
236	239		}
237	240		let nodoAdd = match getString(this, getKeyEcosystNode(item)) {
238	241		case a: String =>
239	242		NONE
240	243		case _ =>
241	244		eAdd
242	245		}
243	246		let preTokenQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
244	247		case a: Int =>
245	248		a
246	249		case _ =>
247	250		SecondFaseQty
248	251		}
249	252		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
250	253		case a: Int =>
251	254		a
252	255		case _ =>
253	256		0
254	257		}
255	258		let userAddress = toBase58String(i.caller.bytes)
256	259		let subTotal = (totalAmount - ((igv * totalAmount) / 100))
257	260		let cPB = ((88 * ybitco2) / 100)
258	261		let uI = ((subTotal * uIP) / 100)
259	262		let uBI = ((uI / cPB) * 1)
260	263		let pI = ((subTotal * pIP) / 100)
261	264		let eI = ((subTotal * eIP) / 100)
262	265		let eBI = (((subTotal * eBP) / (100 * cPB)) * 1)
263	266		let sI = ((totalAmount - pI) - eI)
264	267		let sBI = (((subTotal * sBP) / (100 * cPB)) * 1)
265	268		let QVentasgts = (((subTotal * 11) / (cPB * 100)) * 1)
266	269		if ((totalAmount > pmt.amount))
267	270		then throw("Payment Amount can't be less than item Purchase Order")
268	271		else if ((pmt.amount > totalAmount))
269	272		then throw("Payment Amount can't be higher than item Purchase Order")
270	273		else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_wvls", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, wvls", subTotal), DataEntry("CP 1 B, wvls", (cPB * 10000)), DataEntry(getKeyUI(item), uI), DataEntry("UBI, 10e-4 ybitco2", uBI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, wvls", eI), DataEntry("EcSys, 10e-4 ybitco2", eBI), DataEntry(getKeySI(item), sI), DataEntry("SBI, 10e-4 ybitco2", sBI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 ybitco2", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (QVentasgts / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uBI, yBitCO2), ScriptTransfer(pAdd, pI, unit), ScriptTransfer(eAdd, eI, unit), ScriptTransfer(eAdd, eBI, yBitCO2), ScriptTransfer(issuer, sI, unit), ScriptTransfer(issuer, sBI, yBitCO2)]))
271	274		}
272	275		}
273	276
274	277
275	278
276	279		@Callable(i)
277	280		func withdraw (item,amount) = {
278	281		let userAddress = toBase58String(i.caller.bytes)
279	282		let supplier = match getString(this, getKeyItemSupplier(item)) {
280	283		case a: String =>
281	284		a
282	285		case _ =>
283	286		NONE
284	287		}
285	288		let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
286	289		case a: Int =>
287	290		a
288	291		case _ =>
289	292		startQty
290	293		}
291	294		let newAmount = (preIcoQty - amount)
292	295		if ((0 > amount))
293	296		then throw("El balance de retiro no puede ser negativo!")
294	297		else if ((0 >= newAmount))
295	298		then throw("Ooppss.. Insuficiente balance!")
296	299		else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
297	300		}
298	301
299	302
300	303		@Verifier(tx)
301	304		func verify () = match tx {
302	305		case t: SetScriptTransaction =>
303	306		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
304	307		case d: DataTransaction\|ReissueTransaction =>
305	308		true
306	309		case tx: TransferTransaction =>
307	310		true
308	311		case tx: ExchangeTransaction =>
309		-	let ~~withWaves~~ = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
	312	+	let withyBitCO2 = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
310	313		then true
311	314		else !(isDefined(tx.sellOrder.assetPair.amountAsset))
312		-	~~withWaves~~
	315	+	withyBitCO2
313	316		case _ =>
314	317		false
315	318		}
316	319

github/deemru/w8io/169f3d6 
65.94 ms ◑