w8 · tx · 2oT···kXs

tx · 2oThLmqUWQfUDEMEnx5nQCuUiD6cnW4dBB7qCwsDEkXs

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.18 12:30 [1751538] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2oThLmqUWQfUDEMEnx5nQCuUiD6cnW4dBB7qCwsDEkXs",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1634549409223,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "5ut1EXeqwWFcB6R2R6ptGaKnADaZZRwYKuxwUmoVYSiKZifLYg5y1VYsmwRuuSSARQSmBhZsPZ8aF58kMkeQantu"
    ],
    "script": "base64:AAIDAAAAAAAAABcIARIECgIICBIHCgUICAgIARIECgIIAQAAADcAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAtjUM0AAAAAAMRmlyc3RGYXNlUXR5AAAAAAASl6yQAAAAAA1TZWNvbmRGYXNlUXR5AAAAAACjnWBAAAAAAARiaXRzAAAAAAAAACcQAAAAAAN3dnMAAAAAAAAAJxAAAAAABE5PTkUCAAAABG5vbmUAAAAAC093bmVyUHViS2V5AQAAACB2JYFH9ti5N+7uGrdzKwlrXhDeZ+vMkHOKuVJteEgPDwAAAAAGaXNzdWVyCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUsZ/LLWvSicGFXkptOa6Ov7Vyb4KJ2haTAAAAAARlQWRkCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUmX0sM+4Li4VQQQ26bfB7j/XU/VW4HmxXAAAAAARwQWRkCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUQ6WuNYiemm0n1pXSZ6YgP2UOMpCwdKRqAAAAAAVldXJvdQAAAAAAAAAAdAAAAAAFdXNkbncAAAAAAAAACesAAAAABWJjbzJlAAAAAAAAAAAKAAAAAAhiaXRkc2N0bwAAAAAAAAAAAwAAAAADcElQAAAAAAAAAAAKAAAAAAN1QlAAAAAAAAAAAAcAAAAAA3NCUAAAAAAAAAAAAgAAAAADZUlQAAAAAAAAAAABAAAAAANlQlAAAAAAAAAAAAIAAAAACXJlbGFjZGN0bwAAAAAAAAAACwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQABLAAAAAIFAAAACHN1cHBsaWVyAgAAABRWZW5kZWRvciwgTGltYS1QZXLDugEAAAAKZ2V0S2V5SXRlbQAAAAIAAAAIc3VwcGxpZXIAAAAEaXRlbQkAASwAAAACCQABLAAAAAICAAAADlByb2R1Y3RvLUdUUzogAgAAAAEgCQACWAAAAAEJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAACHN1cHBsaWVyBQAAAARpdGVtAQAAAAxnZXRLZXlJc3N1ZXIAAAABAAAABGl0ZW0CAAAADUlzc3Vlci9UaWVuZGEBAAAADmdldFZhbHVlSXNzdWVyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQUAAAAEaXRlbQEAAAANZ2V0S2V5UHJvamVjdAAAAAEAAAAEaXRlbQIAAAAHUHJvamVjdAEAAAAPZ2V0VmFsdWVQcm9qZWN0AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAANZ2V0S2V5UHJvamVjdAAAAAEFAAAABGl0ZW0BAAAACmdldEtleU5vZG8AAAABAAAABGl0ZW0CAAAABE5vZG8BAAAADGdldFZhbHVlTm9kbwAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAACmdldEtleU5vZG8AAAABBQAAAARpdGVtAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQIAAAAKT3JkZXJf4oSWOgEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAADmdldEtleUl0ZW1OYW1lAAAAAQAAAARpdGVtAgAAABhDYXRlZ29yw61hIGRlbCBQcm9kdWN0bzoBAAAAEGdldFZhbHVlSXRlbU5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEFAAAABGl0ZW0BAAAADmdldEtleVVzZXJOYW1lAAAAAQAAAARpdGVtAgAAABNOb21icmUgZGVsIFVzdWFyaW86AQAAABBnZXRWYWx1ZVVzZXJOYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABBQAAAARpdGVtAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0CAAAAI+KEliBkZSBEb2N1bWVudG8gLyBETkkgZGVsIFVzdWFyaW86AQAAABRnZXRWYWx1ZVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0BAAAACGdldEtleVVJAAAAAQAAAARpdGVtAgAAAAhVSSwgYml0OgEAAAAKZ2V0VmFsdWVVSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5UEkAAAABAAAABGl0ZW0CAAAACVBJLCB3dmxzOgEAAAAKZ2V0VmFsdWVQSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5U0kAAAABAAAABGl0ZW0CAAAACFNJLCBiaXQ6AQAAAApnZXRWYWx1ZVNJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlOSWIAAAABAAAABGl0ZW0CAAAACU5JYiwgYml0OgEAAAALZ2V0VmFsdWVOSWIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlOSWIAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlOSXcAAAABAAAABGl0ZW0CAAAACk5Jdywgd3ZsczoBAAAAC2dldFZhbHVlTkl3AAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAJZ2V0S2V5Tkl3AAAAAQUAAAAEaXRlbQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABAAAABGl0ZW0CAAAANFRva2VucyBPZmVydGFkb3MgZW4gbGEgcHJlc2VudGUgZXRhcGEgLyBTYWxkbywgeXRvazoBAAAAH2dldFZhbHVlU2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEFAAAABGl0ZW0BAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAbQmFsYW5jZS9TYWxkbyBHVFMsIHl0b2tlbnM6AQAAABpnZXRWYWx1ZUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXICAAAAHEluZ3Jlc29zIHBvciBWZW50YUdUUywgd3ZsczoBAAAAF2dldFZhbHVlQmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAAAAAwAAAAFpAQAAAAdkZXBvc2l0AAAAAgAAAAV0aXRsZQAAAAxzdXBwbGllckRhdGEEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAd5Qml0Q08yCQAAAgAAAAECAAAAKWRlcG9zaXRvIHBlcm1pdGlkbyBzb2xvIGVuIHlCaXRDTzIgdG9rZW5zBAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABkAAAAAgUAAAANY3VycmVudEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAABxObyBoYXkgeUJpdENPMiBlbiBzdSBiYWxhbmNlCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAhzdXBwbGllcgUAAAAJbmV3QW1vdW50BQAAAANuaWwAAAABaQEAAAALcHVyY2hhc2VHVFMAAAAFAAAABGl0ZW0AAAAIaXRlbU5hbWUAAAAIdXNlck5hbWUAAAAMdXNlckRvY3VtZW50AAAAC3RvdGFsQW1vdW50BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAATRWwgUHJlY2lvIGVuIHdhdmVzLgQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJaXNzdWVyQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAAxnZXRLZXlJc3N1ZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABmlzc3VlcgQAAAAHcHJvakFkZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAANZ2V0S2V5UHJvamVjdAAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAEcEFkZAQAAAAHbm9kb0FkZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAAKZ2V0S2V5Tm9kbwAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAEZUFkZAQAAAALcHJlVG9rZW5RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAANU2Vjb25kRmFzZVF0eQQAAAAPYmFsYW5jZVN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAhzdWJUb3RhbAUAAAALdG90YWxBbW91bnQEAAAAA3BJdwkAAGkAAAACCQAAaAAAAAIFAAAAA3BJUAUAAAAIc3ViVG90YWwFAAAACXJlbGFjZGN0bwQAAAADZUl3CQAAaQAAAAIJAABoAAAAAgUAAAADZUlQBQAAAAhzdWJUb3RhbAUAAAAJcmVsYWNkY3RvBAAAAA1iY28ybWVub3NkY3RvCQAAaQAAAAIJAABoAAAAAgkAAGgAAAACCQAAZQAAAAIAAAAAAAAAAGQFAAAACGJpdGRzY3RvBQAAAAVldXJvdQUAAAAFYmNvMmUAAAAAAAAAJxAEAAAACXN1YlRvdGFsYgkAAGkAAAACCQAAaQAAAAIJAABoAAAAAgUAAAALdG90YWxBbW91bnQFAAAABXVzZG53AAAAAAAAAABkBQAAAA1iY28ybWVub3NkY3RvBAAAAAN1SWIJAABpAAAAAgkAAGgAAAACBQAAAAN1QlAFAAAACXN1YlRvdGFsYgUAAAAJcmVsYWNkY3RvBAAAAANzSWIJAABpAAAAAgkAAGgAAAACBQAAAANzQlAFAAAACXN1YlRvdGFsYgUAAAAJcmVsYWNkY3RvBAAAAANlSWIJAABpAAAAAgkAAGgAAAACBQAAAANlQlAFAAAACXN1YlRvdGFsYgUAAAAJcmVsYWNkY3RvBAAAAA1CYWxhbmNlVGllbmRhCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQYXltZW50IEFtb3VudCBjYW4ndCBiZSBsZXNzIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RvdGFsQW1vdW50CQAAAgAAAAECAAAAN1BheW1lbnQgQW1vdW50IGNhbid0IGJlIGhpZ2hlciB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0JAABkAAAAAgkBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgUAAAAIc3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlJdGVtAAAAAgUAAAAIc3VwcGxpZXIFAAAABGl0ZW0FAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEFAAAABGl0ZW0FAAAACGl0ZW1OYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABBQAAAARpdGVtBQAAAAh1c2VyTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0FAAAADHVzZXJEb2N1bWVudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADGdldEtleUlzc3VlcgAAAAEFAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAAxnZXRLZXlJc3N1ZXIAAAABBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAANZ2V0S2V5UHJvamVjdAAAAAEFAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACmdldEtleU5vZG8AAAABBQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5Tm9kbwAAAAEFAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABlRpZW5kYQUAAAAIc3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABHVzZG4FAAAABXVzZG53CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAVldXJvdQUAAAAFZXVyb3UJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAFkFwb3lvIEVjb2zDs2dpY28sIHd2bHMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAB8xIEJpdC1DTzIgUHJlY2lvIE5vbWluYWwsIGV1cm9zBQAAAAViY28yZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAiMSBCaXQtQ08yIFByZWNpbyBjb24gRGVzY3RvLCBldXJvcwUAAAANYmNvMm1lbm9zZGN0bwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAdU3VUb3RhbCBhIGRpc3RyaWJ1aXIsIGJpdC1jbzIFAAAACXN1YlRvdGFsYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAADcEl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAJZ2V0S2V5Tkl3AAAAAQUAAAAEaXRlbQUAAAADZUl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAN1SWIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAA3NJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0FAAAAA2VJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA5PcmRlcl9TdGF0dXM6XwUAAAALdXNlckFkZHJlc3MCAAAAGFRyYW5zYWNjacOzbiBDb25maXJtYWRhIQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAALUHJlVG9rZW5RdHkFAAAAC3ByZVRva2VuUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAA9iYWxhbmNlU3VwcGxpZXIFAAAAD2JhbGFuY2VTdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0JAABlAAAAAgUAAAALcHJlVG9rZW5RdHkJAABpAAAAAgUAAAANQmFsYW5jZVRpZW5kYQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARwQWRkBQAAAANwSXcFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAN1SWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAGaXNzdWVyBQAAAANzSWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAEZUFkZAUAAAADZUl3BQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VJYgUAAAAHeUJpdENPMgUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAgAAAARpdGVtAAAABmFtb3VudAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAACtFbCBiYWxhbmNlIGRlIHJldGlybyBubyBwdWVkZSBzZXIgbmVnYXRpdm8hAwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAeT29wcHNzLi4gSW5zdWZpY2llbnRlIGJhbGFuY2UhCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEaXRlbQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYHx6UGfA==",
    "height": 1751538,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Bp6ULWWwGLAmTYBxhhWCr7H7r6834ApbVQqP3pprhiRn
Next: 7GrrNFK6jn2GLyArjpwyNKuWnfGAe8tn1QiXqnBTuHc8

Diff: 
Old New Differences
23 23  
24 24  let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
25 25  
26 - let eurou = (116 / 100)
26 + let eurou = 116
27 27  
28 - let usdnw = (2539 / 100)
28 + let usdnw = 2539
29 29  
30 30  let bco2e = 10
31 31  
32 32  let bitdscto = 3
33 - 
34 - let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 100)
35 33  
36 34  let pIP = 10
37 35  
231 229              let subTotal = totalAmount
232 230              let pIw = ((pIP * subTotal) / relacdcto)
233 231              let eIw = ((eIP * subTotal) / relacdcto)
234 -             let subTotalb = ((totalAmount * usdnw) / ((((100 - bitdscto) * eurou) * bco2e) / 100))
232 +             let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 10000)
233 +             let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
235 234              let uIb = ((uBP * subTotalb) / relacdcto)
236 235              let sIb = ((sBP * subTotalb) / relacdcto)
237 236              let eIb = ((eBP * subTotalb) / relacdcto)
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 = 3056930000
7 7  
8 8  let FirstFaseQty = 311930000
9 9  
10 10  let SecondFaseQty = 2745000000
11 11  
12 12  let bits = 10000
13 13  
14 14  let wvs = 10000
15 15  
16 16  let NONE = "none"
17 17  
18 18  let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
19 19  
20 20  let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
21 21  
22 22  let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
23 23  
24 24  let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
25 25  
26 - let eurou = (116 / 100)
26 + let eurou = 116
27 27  
28 - let usdnw = (2539 / 100)
28 + let usdnw = 2539
29 29  
30 30  let bco2e = 10
31 31  
32 32  let bitdscto = 3
33 - 
34 - let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 100)
35 33  
36 34  let pIP = 10
37 35  
38 36  let uBP = 7
39 37  
40 38  let sBP = 2
41 39  
42 40  let eIP = 1
43 41  
44 42  let eBP = 2
45 43  
46 44  let relacdcto = 11
47 45  
48 46  func getNumberByKey (key) = {
49 47      let num =     match getInteger(this, key) {
50 48          case a: Int => 
51 49              a
52 50          case _ => 
53 51              0
54 52      }
55 53      num
56 54      }
57 55  
58 56  
59 57  func getStrByKey (key) = {
60 58      let str =     match getString(this, key) {
61 59          case a: String => 
62 60              a
63 61          case _ => 
64 62              NONE
65 63      }
66 64      str
67 65      }
68 66  
69 67  
70 68  func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
71 69  
72 70  
73 71  func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
74 72  
75 73  
76 74  func getKeyIssuer (item) = "Issuer/Tienda"
77 75  
78 76  
79 77  func getValueIssuer (item) = getStrByKey(getKeyIssuer(item))
80 78  
81 79  
82 80  func getKeyProject (item) = "Project"
83 81  
84 82  
85 83  func getValueProject (item) = getStrByKey(getKeyProject(item))
86 84  
87 85  
88 86  func getKeyNodo (item) = "Nodo"
89 87  
90 88  
91 89  func getValueNodo (item) = getStrByKey(getKeyNodo(item))
92 90  
93 91  
94 92  func getKeyUserItemGtsCounter (user,item) = "Order_№:"
95 93  
96 94  
97 95  func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
98 96  
99 97  
100 98  func getKeyItemName (item) = "Categoría del Producto:"
101 99  
102 100  
103 101  func getValueItemName (item) = getStrByKey(getKeyItemName(item))
104 102  
105 103  
106 104  func getKeyUserName (item) = "Nombre del Usuario:"
107 105  
108 106  
109 107  func getValueUserName (item) = getStrByKey(getKeyUserName(item))
110 108  
111 109  
112 110  func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
113 111  
114 112  
115 113  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
116 114  
117 115  
118 116  func getKeyUI (item) = "UI, bit:"
119 117  
120 118  
121 119  func getValueUI (item) = getNumberByKey(getKeyUI(item))
122 120  
123 121  
124 122  func getKeyPI (item) = "PI, wvls:"
125 123  
126 124  
127 125  func getValuePI (item) = getNumberByKey(getKeyPI(item))
128 126  
129 127  
130 128  func getKeySI (item) = "SI, bit:"
131 129  
132 130  
133 131  func getValueSI (item) = getNumberByKey(getKeySI(item))
134 132  
135 133  
136 134  func getKeyNIb (item) = "NIb, bit:"
137 135  
138 136  
139 137  func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
140 138  
141 139  
142 140  func getKeyNIw (item) = "NIw, wvls:"
143 141  
144 142  
145 143  func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
146 144  
147 145  
148 146  func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
149 147  
150 148  
151 149  func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
152 150  
153 151  
154 152  func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
155 153  
156 154  
157 155  func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
158 156  
159 157  
160 158  func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
161 159  
162 160  
163 161  func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
164 162  
165 163  
166 164  @Callable(i)
167 165  func deposit (title,supplierData) = {
168 166      let pmt = extract(i.payment)
169 167      if ((pmt.assetId != yBitCO2))
170 168          then throw("deposito permitido solo en yBitCO2 tokens")
171 169          else {
172 170              let supplier = toBase58String(i.caller.bytes)
173 171              let currentAmount =             match getInteger(this, supplier) {
174 172                  case a: Int => 
175 173                      a
176 174                  case _ => 
177 175                      startQty
178 176              }
179 177              let newAmount = (currentAmount + pmt.amount)
180 178              if ((0 >= newAmount))
181 179                  then throw("No hay yBitCO2 en su balance")
182 180                  else WriteSet([DataEntry(supplier, newAmount)])
183 181              }
184 182      }
185 183  
186 184  
187 185  
188 186  @Callable(i)
189 187  func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
190 188      let pmt = extract(i.payment)
191 189      if (isDefined(pmt.assetId))
192 190          then throw("El Precio en waves.")
193 191          else {
194 192              let supplier =             match getString(this, getKeyItemSupplier(item)) {
195 193                  case a: String => 
196 194                      a
197 195                  case _ => 
198 196                      NONE
199 197              }
200 198              let issuerAdd =             match getString(this, getKeyIssuer(item)) {
201 199                  case a: String => 
202 200                      a
203 201                  case _ => 
204 202                      issuer
205 203              }
206 204              let projAdd =             match getString(this, getKeyProject(item)) {
207 205                  case a: String => 
208 206                      a
209 207                  case _ => 
210 208                      pAdd
211 209              }
212 210              let nodoAdd =             match getString(this, getKeyNodo(item)) {
213 211                  case a: String => 
214 212                      a
215 213                  case _ => 
216 214                      eAdd
217 215              }
218 216              let preTokenQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
219 217                  case a: Int => 
220 218                      a
221 219                  case _ => 
222 220                      SecondFaseQty
223 221              }
224 222              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
225 223                  case a: Int => 
226 224                      a
227 225                  case _ => 
228 226                      0
229 227              }
230 228              let userAddress = toBase58String(i.caller.bytes)
231 229              let subTotal = totalAmount
232 230              let pIw = ((pIP * subTotal) / relacdcto)
233 231              let eIw = ((eIP * subTotal) / relacdcto)
234 -             let subTotalb = ((totalAmount * usdnw) / ((((100 - bitdscto) * eurou) * bco2e) / 100))
232 +             let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 10000)
233 +             let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
235 234              let uIb = ((uBP * subTotalb) / relacdcto)
236 235              let sIb = ((sBP * subTotalb) / relacdcto)
237 236              let eIb = ((eBP * subTotalb) / relacdcto)
238 237              let BalanceTienda = (balanceSupplier + pmt.amount)
239 238              if ((totalAmount > pmt.amount))
240 239                  then throw("Payment Amount can't be less than item Purchase Order")
241 240                  else if ((pmt.amount > totalAmount))
242 241                      then throw("Payment Amount can't be higher than item Purchase Order")
243 242                      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(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, euros", bco2menosdcto), DataEntry("SuTotal a distribuir, bit-co2", subTotalb), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
244 243              }
245 244      }
246 245  
247 246  
248 247  
249 248  @Callable(i)
250 249  func withdraw (item,amount) = {
251 250      let userAddress = toBase58String(i.caller.bytes)
252 251      let supplier =     match getString(this, getKeyItemSupplier(item)) {
253 252          case a: String => 
254 253              a
255 254          case _ => 
256 255              NONE
257 256      }
258 257      let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
259 258          case a: Int => 
260 259              a
261 260          case _ => 
262 261              startQty
263 262      }
264 263      let newAmount = (preIcoQty - amount)
265 264      if ((0 > amount))
266 265          then throw("El balance de retiro no puede ser negativo!")
267 266          else if ((0 >= newAmount))
268 267              then throw("Ooppss.. Insuficiente balance!")
269 268              else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
270 269      }
271 270  
272 271  
273 272  @Verifier(tx)
274 273  func verify () = match tx {
275 274      case t: SetScriptTransaction => 
276 275          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
277 276      case d: ReissueTransaction|DataTransaction => 
278 277          true
279 278      case tx: TransferTransaction => 
280 279          true
281 280      case _ => 
282 281          false
283 282  }
284 283

Old	New		Differences
23	23
24	24		let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
25	25
26		-	let eurou = (116 ~~/ 100)~~
	26	+	let eurou = 116
27	27
28		-	let usdnw = (2539 ~~/ 100)~~
	28	+	let usdnw = 2539
29	29
30	30		let bco2e = 10
31	31
32	32		let bitdscto = 3
33		-
34		-	let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 100)
35	33
36	34		let pIP = 10
37	35

231	229		let subTotal = totalAmount
232	230		let pIw = ((pIP * subTotal) / relacdcto)
233	231		let eIw = ((eIP * subTotal) / relacdcto)
234		-	let subTotalb = ((totalAmount * usdnw) / ((((100 - bitdscto) * eurou) * bco2e) / 100))
	232	+	let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 10000)
	233	+	let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
235	234		let uIb = ((uBP * subTotalb) / relacdcto)
236	235		let sIb = ((sBP * subTotalb) / relacdcto)
237	236		let eIb = ((eBP * subTotalb) / relacdcto)

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 = 3056930000
7	7
8	8		let FirstFaseQty = 311930000
9	9
10	10		let SecondFaseQty = 2745000000
11	11
12	12		let bits = 10000
13	13
14	14		let wvs = 10000
15	15
16	16		let NONE = "none"
17	17
18	18		let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
19	19
20	20		let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
21	21
22	22		let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
23	23
24	24		let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
25	25
26		-	let eurou = (116 ~~/ 100)~~
	26	+	let eurou = 116
27	27
28		-	let usdnw = (2539 ~~/ 100)~~
	28	+	let usdnw = 2539
29	29
30	30		let bco2e = 10
31	31
32	32		let bitdscto = 3
33		-
34		-	let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 100)
35	33
36	34		let pIP = 10
37	35
38	36		let uBP = 7
39	37
40	38		let sBP = 2
41	39
42	40		let eIP = 1
43	41
44	42		let eBP = 2
45	43
46	44		let relacdcto = 11
47	45
48	46		func getNumberByKey (key) = {
49	47		let num = match getInteger(this, key) {
50	48		case a: Int =>
51	49		a
52	50		case _ =>
53	51		0
54	52		}
55	53		num
56	54		}
57	55
58	56
59	57		func getStrByKey (key) = {
60	58		let str = match getString(this, key) {
61	59		case a: String =>
62	60		a
63	61		case _ =>
64	62		NONE
65	63		}
66	64		str
67	65		}
68	66
69	67
70	68		func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
71	69
72	70
73	71		func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
74	72
75	73
76	74		func getKeyIssuer (item) = "Issuer/Tienda"
77	75
78	76
79	77		func getValueIssuer (item) = getStrByKey(getKeyIssuer(item))
80	78
81	79
82	80		func getKeyProject (item) = "Project"
83	81
84	82
85	83		func getValueProject (item) = getStrByKey(getKeyProject(item))
86	84
87	85
88	86		func getKeyNodo (item) = "Nodo"
89	87
90	88
91	89		func getValueNodo (item) = getStrByKey(getKeyNodo(item))
92	90
93	91
94	92		func getKeyUserItemGtsCounter (user,item) = "Order_№:"
95	93
96	94
97	95		func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
98	96
99	97
100	98		func getKeyItemName (item) = "Categoría del Producto:"
101	99
102	100
103	101		func getValueItemName (item) = getStrByKey(getKeyItemName(item))
104	102
105	103
106	104		func getKeyUserName (item) = "Nombre del Usuario:"
107	105
108	106
109	107		func getValueUserName (item) = getStrByKey(getKeyUserName(item))
110	108
111	109
112	110		func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
113	111
114	112
115	113		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
116	114
117	115
118	116		func getKeyUI (item) = "UI, bit:"
119	117
120	118
121	119		func getValueUI (item) = getNumberByKey(getKeyUI(item))
122	120
123	121
124	122		func getKeyPI (item) = "PI, wvls:"
125	123
126	124
127	125		func getValuePI (item) = getNumberByKey(getKeyPI(item))
128	126
129	127
130	128		func getKeySI (item) = "SI, bit:"
131	129
132	130
133	131		func getValueSI (item) = getNumberByKey(getKeySI(item))
134	132
135	133
136	134		func getKeyNIb (item) = "NIb, bit:"
137	135
138	136
139	137		func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
140	138
141	139
142	140		func getKeyNIw (item) = "NIw, wvls:"
143	141
144	142
145	143		func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
146	144
147	145
148	146		func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
149	147
150	148
151	149		func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
152	150
153	151
154	152		func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
155	153
156	154
157	155		func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
158	156
159	157
160	158		func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
161	159
162	160
163	161		func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
164	162
165	163
166	164		@Callable(i)
167	165		func deposit (title,supplierData) = {
168	166		let pmt = extract(i.payment)
169	167		if ((pmt.assetId != yBitCO2))
170	168		then throw("deposito permitido solo en yBitCO2 tokens")
171	169		else {
172	170		let supplier = toBase58String(i.caller.bytes)
173	171		let currentAmount = match getInteger(this, supplier) {
174	172		case a: Int =>
175	173		a
176	174		case _ =>
177	175		startQty
178	176		}
179	177		let newAmount = (currentAmount + pmt.amount)
180	178		if ((0 >= newAmount))
181	179		then throw("No hay yBitCO2 en su balance")
182	180		else WriteSet([DataEntry(supplier, newAmount)])
183	181		}
184	182		}
185	183
186	184
187	185
188	186		@Callable(i)
189	187		func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
190	188		let pmt = extract(i.payment)
191	189		if (isDefined(pmt.assetId))
192	190		then throw("El Precio en waves.")
193	191		else {
194	192		let supplier = match getString(this, getKeyItemSupplier(item)) {
195	193		case a: String =>
196	194		a
197	195		case _ =>
198	196		NONE
199	197		}
200	198		let issuerAdd = match getString(this, getKeyIssuer(item)) {
201	199		case a: String =>
202	200		a
203	201		case _ =>
204	202		issuer
205	203		}
206	204		let projAdd = match getString(this, getKeyProject(item)) {
207	205		case a: String =>
208	206		a
209	207		case _ =>
210	208		pAdd
211	209		}
212	210		let nodoAdd = match getString(this, getKeyNodo(item)) {
213	211		case a: String =>
214	212		a
215	213		case _ =>
216	214		eAdd
217	215		}
218	216		let preTokenQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
219	217		case a: Int =>
220	218		a
221	219		case _ =>
222	220		SecondFaseQty
223	221		}
224	222		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
225	223		case a: Int =>
226	224		a
227	225		case _ =>
228	226		0
229	227		}
230	228		let userAddress = toBase58String(i.caller.bytes)
231	229		let subTotal = totalAmount
232	230		let pIw = ((pIP * subTotal) / relacdcto)
233	231		let eIw = ((eIP * subTotal) / relacdcto)
234		-	let subTotalb = ((totalAmount * usdnw) / ((((100 - bitdscto) * eurou) * bco2e) / 100))
	232	+	let bco2menosdcto = ((((100 - bitdscto) * eurou) * bco2e) / 10000)
	233	+	let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
235	234		let uIb = ((uBP * subTotalb) / relacdcto)
236	235		let sIb = ((sBP * subTotalb) / relacdcto)
237	236		let eIb = ((eBP * subTotalb) / relacdcto)
238	237		let BalanceTienda = (balanceSupplier + pmt.amount)
239	238		if ((totalAmount > pmt.amount))
240	239		then throw("Payment Amount can't be less than item Purchase Order")
241	240		else if ((pmt.amount > totalAmount))
242	241		then throw("Payment Amount can't be higher than item Purchase Order")
243	242		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(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, euros", bco2menosdcto), DataEntry("SuTotal a distribuir, bit-co2", subTotalb), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
244	243		}
245	244		}
246	245
247	246
248	247
249	248		@Callable(i)
250	249		func withdraw (item,amount) = {
251	250		let userAddress = toBase58String(i.caller.bytes)
252	251		let supplier = match getString(this, getKeyItemSupplier(item)) {
253	252		case a: String =>
254	253		a
255	254		case _ =>
256	255		NONE
257	256		}
258	257		let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
259	258		case a: Int =>
260	259		a
261	260		case _ =>
262	261		startQty
263	262		}
264	263		let newAmount = (preIcoQty - amount)
265	264		if ((0 > amount))
266	265		then throw("El balance de retiro no puede ser negativo!")
267	266		else if ((0 >= newAmount))
268	267		then throw("Ooppss.. Insuficiente balance!")
269	268		else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
270	269		}
271	270
272	271
273	272		@Verifier(tx)
274	273		func verify () = match tx {
275	274		case t: SetScriptTransaction =>
276	275		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
277	276		case d: ReissueTransaction\|DataTransaction =>
278	277		true
279	278		case tx: TransferTransaction =>
280	279		true
281	280		case _ =>
282	281		false
283	282		}
284	283

github/deemru/w8io/169f3d6 
52.82 ms ◑