w8 · tx · 5kk···VGH

tx · 5kknR3Zvzxg6eoRVQQRxs6S1hcrXqRPLXzfeRhCyGVGH

3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4:  -0.01400000 Waves

2020.03.18 09:33 [914372] smart account 3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5kknR3Zvzxg6eoRVQQRxs6S1hcrXqRPLXzfeRhCyGVGH",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1584513192702,
    "version": 1,
    "sender": "3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4",
    "senderPublicKey": "4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L",
    "proofs": [
        "5MGMMbChb5qtsfjHgBbAqah3CMHSeRdpzEJD7FUZywKQYGp84Fewoc7VPtdDKZsdQzmxMWhCTwHzvVtVedpsmEbc"
    ],
    "script": "base64:AAIDAAAAAAAAAB4IARIDCgEBEgYKBAgBAQgSBwoFCAgIAQESBAoCCAEAAAAdAAAAAAdhQml0Q08yAQAAACDH+HoAnTdQnyoybLskiHPdWM4Tg4veh8IaLSgbZ8EolgAAAAAIc3RhcnRRdHkAAAAAAAAFFAAAAAAACG5vbVByaWNlAAAAAAAF9eEAAAAAABBzdXBwbGllckRpc2NvdW50AAAAAAAAAAAMAAAAAA5Pd25lckVjb1B1YktleQEAAAAgLvRbo0AJGg7wNzBbRHjrN75s0YuvS2DdwCQ0/xY2QB8AAAAAA3d2cwAAAAAABfXhAAAAAAAETk9ORQIAAAAEbm9uZQAAAAAGaXNzdWVyCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUyvc7Pucv0VXiD634RbMs3vuN0A1Fa31vAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABXRpdGxlCQABLAAAAAICAAAAEHRva2Vuc19CaXQtQ08yOl8JAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAAIc3VwcGxpZXIFAAAABXRpdGxlAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAaX3RvX0FtYXpvbmlhbl9Db25zZXJ2YXRpb24BAAAAFGdldFZhbHVlSXRlbVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAABdUb2tlbnNfb2ZlcnRhZG9zLF9TYWxkbwEAAAAaZ2V0VmFsdWVCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtRGF0YQAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAAxfZGVzY3JpcHRpb24BAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARpdGVtAgAAAAFfBQAAAAR1c2VyAgAAAARfY250AQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAASZ2V0S2V5SXRlbVVzZXJEYXRhAAAAAQAAAARpdGVtAgAAAAlfdXNlcmRhdGEBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0CAAAAB190b2tlbnMBAAAAGGdldFZhbHVlSXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyAgAAABVTZWxsZXJfQmFsYW5jZTpfd2F2ZXMBAAAAF2dldFZhbHVlQmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAQAAAA5nZXRLZXlJdGVtVXNlcgAAAAEAAAAEaXRlbQIAAAANUHJvamVjdF9uYW1lOgEAAAAQZ2V0VmFsdWVJdGVtVXNlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQEAAAAaZ2V0S2V5SXRlbURpc2NvdW50U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAAl8lAQAAABxnZXRWYWx1ZUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAaZ2V0S2V5SXRlbURpc2NvdW50U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAGX3dhdmVzAQAAABlnZXRWYWx1ZUl0ZW1QcmljZVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABBQAAAARpdGVtAAAABAAAAAFpAQAAAAdkZXBvc2l0AAAAAQAAAAZhbW91bnQEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAdhQml0Q08yCQAAAgAAAAECAAAALlVzZSBjQml0Q08yIHRva2VucyBvbmx5IGZvciB0aGUgd2FsbGV0IGRlcG9zaXQEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAIc3VwcGxpZXIFAAAACW5ld0Ftb3VudAUAAAADbmlsAAAAAWkBAAAAEEFkZFN1cHBsaWVyVG9rZW4AAAAEAAAABXRpdGxlAAAACXByZUljb1F0eQAAABBzdXBwbGllckRpc2NvdW50AAAADHN1cHBsaWVyRGF0YQQAAAAIc3VwcGxpZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAEaXRlbQkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUDCQAAZwAAAAIAAAAAAAAAAAAFAAAACXByZUljb1F0eQkAAAIAAAABAgAAAB9Tb3JyeSwgaW5zdWZmaWNpZW50IHRva2VuIG9mZmVyCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAC09mZXJ0YW50ZTpfCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAIc3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAlwcmVJY29RdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAPUHJlY2lvX05vbWluYWw6CQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAhub21QcmljZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABdNYXhfRGVzY3VlbnRvX29mcmVjaWRvOgkBAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAQc3VwcGxpZXJEaXNjb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1EYXRhAAAAAQUAAAAEaXRlbQUAAAAMc3VwcGxpZXJEYXRhBQAAAANuaWwAAAABaQEAAAAIcHVyY2hhc2UAAAAFAAAABGl0ZW0AAAALcHJvamVjdE5hbWUAAAAIdXNlckRhdGEAAAAMdXNlckRpc2NvdW50AAAACG9yZGVyUXR5BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAseW91IGNhbiBhZHF1aXJlIGNCaXRDTzIgb25seSBieSBXYXZlcyB0b2tlbnMEAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAACXByZUljb1F0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAPYmFsYW5jZVN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA9idXllclRva2VuUHJpY2UJAABpAAAAAgkAAGgAAAACBQAAAAhub21QcmljZQkAAGUAAAACAAAAAAAAAABkBQAAAAx1c2VyRGlzY291bnQAAAAAAAAAAGQEAAAAC3RvdGFsQW1vdW50CQAAaAAAAAIFAAAACG9yZGVyUXR5BQAAAA9idXllclRva2VuUHJpY2UDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADZQYXltZW50IEFtb3VudCBjYW5ub3QgYmUgbGVzcyB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIDCQAAZgAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAt0b3RhbEFtb3VudAkAAAIAAAABAgAAADdQYXltZW50IEFtb3VudCBjYW4ndCBiZSBoaWdoZXIgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtCQAAZAAAAAIJAQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABBQAAAARpdGVtBQAAAAtwcm9qZWN0TmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0JAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1Vc2VyRGF0YQAAAAEFAAAABGl0ZW0FAAAACHVzZXJEYXRhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAWRGVzY3VlbnRvIHNvbGljaXRhZG86XwUAAAALdXNlckFkZHJlc3MCAAAAAl8lBQAAAAx1c2VyRGlzY291bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAUQ2FudGlkYWRfc29saWNpdGFkYToJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQUAAAAIb3JkZXJRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAB1QcmVjaW9fZGVfMV9Ub2tlbl9jb25fZHNjdG86XwUAAAALdXNlckFkZHJlc3MCAAAABl93YXZlcwUAAAAPYnV5ZXJUb2tlblByaWNlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEFJlcXVlc3RfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAAAljb25maXJtZWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAAIb3JkZXJRdHkFAAAAB2FCaXRDTzIFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAIAAAAFdGl0bGUAAAAGYW1vdW50BAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAARpdGVtCQEAAAAKZ2V0S2V5SXRlbQAAAAIFAAAACHN1cHBsaWVyBQAAAAV0aXRsZQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAAB5DYW4ndCB3aXRoZHJhdyBuZWdhdGl2ZSBhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAAB9Ob3QgZW5vdWdodCAvc3VmaWNpZW50ZSBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEaXRlbQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB2FCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAADk93bmVyRWNvUHViS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAQAAAAJcmVjaXBpZW50CQACWAAAAAEICQAEJAAAAAEIBQAAAAJ0eAAAAAlyZWNpcGllbnQAAAAFYnl0ZXMDCQAAAAAAAAIIBQAAAAJ0eAAAAAZzZW5kZXIFAAAABmlzc3VlcgYJAAACAAAAAQIAAAAgWW91IGNhbid0IHRyYW5zZmVycmVkIHRoaXMgdG9rZW4DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAJwawkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBAAAAAdhZGRyZXNzCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABBQAAAAJwawQAAAADZmVlAAAAAAAAFVzABAAAAAhoYXNNb25leQkAAGcAAAACCQAAZQAAAAIJAQAAAAx3YXZlc0JhbGFuY2UAAAABBQAAAAdhZGRyZXNzBQAAAANmZWUICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAFcHJpY2UEAAAABHNlbGwJAAH0AAAAAwgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYm9keUJ5dGVzCQABkQAAAAIICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAABnByb29mcwAAAAAAAAAAAAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAPc2VuZGVyUHVibGljS2V5BAAAAANidXkJAAH0AAAAAwgIBQAAAAJ0eAAAAAhidXlPcmRlcgAAAAlib2R5Qnl0ZXMJAAGRAAAAAggIBQAAAAJ0eAAAAAhidXlPcmRlcgAAAAZwcm9vZnMAAAAAAAAAAAAICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAPc2VuZGVyUHVibGljS2V5BAAAAA9zZWxsT3JkZXJTZW5kZXIJAAJYAAAAAQgICAUAAAACdHgAAAAJc2VsbE9yZGVyAAAABnNlbmRlcgAAAAVieXRlcwQAAAAJbWluQW1vdW50AAAAAAAAAAABBAAAAAltYXhBbW91bnQAAAAAAAAAAAQEAAAACG1heFByaWNlCQAAaAAAAAIFAAAACW1heEFtb3VudAUAAAAIbm9tUHJpY2UDAwUAAAADYnV5AwkBAAAACWlzRGVmaW5lZAAAAAEJAABnAAAAAgUAAAAIbWF4UHJpY2UICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAFcHJpY2UGCQAAAgAAAAECAAAAOkVsIG1vbnRvIGEgcGFnYXIgbm8gcHVlZGUgc2VyIG1lbm9yIHF1ZSBlbCBwcmVjaW8gZGUgdmVudGEHBgMFAAAABHNlbGwDAwMJAAAAAAAAAggIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAGc2VuZGVyBQAAAAZpc3N1ZXIJAABnAAAAAggFAAAAAnR4AAAABmFtb3VudAUAAAAJbWluQW1vdW50BwkAAGcAAAACBQAAAAltYXhBbW91bnQIBQAAAAJ0eAAAAAZhbW91bnQHBgkAAAIAAAABAgAAAFNFcnJvcjogTWluaW11bSBhbW91bnQ6IDEgYUJpdENPMjsgTWF4aW11bSBhbW91bnQgb2ZmZXJlZDogNCBhQml0Q08yIGJ5IFVzZXIgQWNjb3VudAcDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBAAAAAFjBQAAAAckbWF0Y2gwBgexSsvB",
    "chainId": 84,
    "height": 914372,
    "spentComplexity": 0
}

View: original | compacted
Prev: HtNpgtqArVp9oiLLczciht6cB8kzutYkDp5Lqumd1xc1
Next: BvHGxmEntyJqk2S3kAZZ6GnJDLaXoBe7QYQKhY6PMCkq

Diff: 
Old New Differences
128 128  
129 129  
130 130  @Callable(i)
131 - func purchase (item,projectName,userData,userDiscount,orderQty,amount) = {
131 + func purchase (item,projectName,userData,userDiscount,orderQty) = {
132 132      let pmt = extract(i.payment)
133 133      if (isDefined(pmt.assetId))
134 134          then throw("you can adquire cBitCO2 only by Waves tokens")
158 158                  then throw("Payment Amount cannot be less than item Purchase Order")
159 159                  else if ((pmt.amount > totalAmount))
160 160                      then throw("Payment Amount can't be higher than item Purchase Order")
161 -                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("Monto pagado:_" + userAddress) + "_waves"), amount), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet(nil))
161 +                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("Precio_de_1_Token_con_dscto:_" + userAddress) + "_waves"), buyerTokenPrice), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, aBitCO2)]))
162 162              }
163 163      }
164 164  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let aBitCO2 = base58'ETbtNp6MBuSM9EfjmLDwctrYEBBiq8CZ7ti7zbwTktry'
5 5  
6 6  let startQty = 332800
7 7  
8 8  let nomPrice = 100000000
9 9  
10 10  let supplierDiscount = 12
11 11  
12 12  let OwnerEcoPubKey = base58'4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L'
13 13  
14 14  let wvs = 100000000
15 15  
16 16  let NONE = "none"
17 17  
18 18  let issuer = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
19 19  
20 20  func getNumberByKey (key) = {
21 21      let num =     match getInteger(this, key) {
22 22          case a: Int => 
23 23              a
24 24          case _ => 
25 25              0
26 26      }
27 27      num
28 28      }
29 29  
30 30  
31 31  func getStrByKey (key) = {
32 32      let str =     match getString(this, key) {
33 33          case a: String => 
34 34              a
35 35          case _ => 
36 36              NONE
37 37      }
38 38      str
39 39      }
40 40  
41 41  
42 42  func getKeyItem (supplier,title) = ("tokens_Bit-CO2:_" + toBase58String(sha256(toBytes((supplier + title)))))
43 43  
44 44  
45 45  func getKeyItemSupplier (item) = (item + "_to_Amazonian_Conservation")
46 46  
47 47  
48 48  func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
49 49  
50 50  
51 51  func getKeyBalanceQtySupplier (item) = "Tokens_ofertados,_Saldo"
52 52  
53 53  
54 54  func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
55 55  
56 56  
57 57  func getKeyItemData (item) = (item + "_description")
58 58  
59 59  
60 60  func getKeyUserItemCounter (user,item) = (((item + "_") + user) + "_cnt")
61 61  
62 62  
63 63  func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
64 64  
65 65  
66 66  func getKeyItemUserData (item) = "_userdata"
67 67  
68 68  
69 69  func getKeyItemUserOrderQty (item) = "_tokens"
70 70  
71 71  
72 72  func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
73 73  
74 74  
75 75  func getKeyBalanceSupplier (supplier) = "Seller_Balance:_waves"
76 76  
77 77  
78 78  func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
79 79  
80 80  
81 81  func getKeyItemUser (item) = "Project_name:"
82 82  
83 83  
84 84  func getValueItemUser (item) = getStrByKey(getKeyItemUser(item))
85 85  
86 86  
87 87  func getKeyItemDiscountSupplier (item) = "_%"
88 88  
89 89  
90 90  func getValueItemDiscountSupplier (item) = getNumberByKey(getKeyItemDiscountSupplier(item))
91 91  
92 92  
93 93  func getKeyItemPriceSupplier (item) = "_waves"
94 94  
95 95  
96 96  func getValueItemPriceSupplier (item) = getNumberByKey(getKeyItemPriceSupplier(item))
97 97  
98 98  
99 99  @Callable(i)
100 100  func deposit (amount) = {
101 101      let pmt = extract(i.payment)
102 102      if ((pmt.assetId != aBitCO2))
103 103          then throw("Use cBitCO2 tokens only for the wallet deposit")
104 104          else {
105 105              let supplier = toBase58String(i.caller.bytes)
106 106              let currentAmount =             match getInteger(this, supplier) {
107 107                  case a: Int => 
108 108                      a
109 109                  case _ => 
110 110                      startQty
111 111              }
112 112              let newAmount = (currentAmount + pmt.amount)
113 113              WriteSet([DataEntry(supplier, newAmount)])
114 114              }
115 115      }
116 116  
117 117  
118 118  
119 119  @Callable(i)
120 120  func AddSupplierToken (title,preIcoQty,supplierDiscount,supplierData) = {
121 121      let supplier = toBase58String(i.caller.bytes)
122 122      let item = getKeyItem(supplier, title)
123 123      if ((0 >= preIcoQty))
124 124          then throw("Sorry, insufficient token offer")
125 125          else WriteSet([DataEntry(("Ofertante:_" + getKeyItemSupplier(item)), supplier), DataEntry(getKeyBalanceQtySupplier(item), preIcoQty), DataEntry(("Precio_Nominal:" + getKeyItemPriceSupplier(item)), nomPrice), DataEntry(("Max_Descuento_ofrecido:" + getKeyItemDiscountSupplier(item)), supplierDiscount), DataEntry(getKeyItemData(item), supplierData)])
126 126      }
127 127  
128 128  
129 129  
130 130  @Callable(i)
131 - func purchase (item,projectName,userData,userDiscount,orderQty,amount) = {
131 + func purchase (item,projectName,userData,userDiscount,orderQty) = {
132 132      let pmt = extract(i.payment)
133 133      if (isDefined(pmt.assetId))
134 134          then throw("you can adquire cBitCO2 only by Waves tokens")
135 135          else {
136 136              let supplier =             match getString(this, getKeyItemSupplier(item)) {
137 137                  case a: String => 
138 138                      a
139 139                  case _ => 
140 140                      NONE
141 141              }
142 142              let preIcoQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
143 143                  case a: Int => 
144 144                      a
145 145                  case _ => 
146 146                      startQty
147 147              }
148 148              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
149 149                  case a: Int => 
150 150                      a
151 151                  case _ => 
152 152                      0
153 153              }
154 154              let userAddress = toBase58String(i.caller.bytes)
155 155              let buyerTokenPrice = ((nomPrice * (100 - userDiscount)) / 100)
156 156              let totalAmount = (orderQty * buyerTokenPrice)
157 157              if ((totalAmount > pmt.amount))
158 158                  then throw("Payment Amount cannot be less than item Purchase Order")
159 159                  else if ((pmt.amount > totalAmount))
160 160                      then throw("Payment Amount can't be higher than item Purchase Order")
161 -                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("Monto pagado:_" + userAddress) + "_waves"), amount), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet(nil))
161 +                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("Precio_de_1_Token_con_dscto:_" + userAddress) + "_waves"), buyerTokenPrice), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, aBitCO2)]))
162 162              }
163 163      }
164 164  
165 165  
166 166  
167 167  @Callable(i)
168 168  func withdraw (title,amount) = {
169 169      let supplier = toBase58String(i.caller.bytes)
170 170      let item = getKeyItem(supplier, title)
171 171      let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
172 172          case a: Int => 
173 173              a
174 174          case _ => 
175 175              startQty
176 176      }
177 177      let newAmount = (preIcoQty - amount)
178 178      if ((0 > amount))
179 179          then throw("Can't withdraw negative amount")
180 180          else if ((0 > newAmount))
181 181              then throw("Not enought /suficiente balance")
182 182              else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, aBitCO2)]))
183 183      }
184 184  
185 185  
186 186  @Verifier(tx)
187 187  func verify () = match tx {
188 188      case t: SetScriptTransaction => 
189 189          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerEcoPubKey)
190 190      case d: DataTransaction => 
191 191          true
192 192      case tx: TransferTransaction => 
193 193          let recipient = toBase58String(addressFromRecipient(tx.recipient).bytes)
194 194          if ((tx.sender == issuer))
195 195              then true
196 196              else throw("You can't transferred this token")
197 197      case tx: ExchangeTransaction => 
198 198          let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
199 199              then true
200 200              else !(isDefined(tx.sellOrder.assetPair.amountAsset))
201 201          withWaves
202 202      case tx: ExchangeTransaction => 
203 203          let pk = tx.proofs[1]
204 204          let address = addressFromPublicKey(pk)
205 205          let fee = 1400000
206 206          let hasMoney = ((wavesBalance(address) - fee) >= tx.buyOrder.price)
207 207          let sell = sigVerify(tx.sellOrder.bodyBytes, tx.sellOrder.proofs[0], tx.sellOrder.senderPublicKey)
208 208          let buy = sigVerify(tx.buyOrder.bodyBytes, tx.buyOrder.proofs[0], tx.buyOrder.senderPublicKey)
209 209          let sellOrderSender = toBase58String(tx.sellOrder.sender.bytes)
210 210          let minAmount = 1
211 211          let maxAmount = 4
212 212          let maxPrice = (maxAmount * nomPrice)
213 213          if (if (buy)
214 214              then if (isDefined((maxPrice >= tx.buyOrder.price)))
215 215                  then true
216 216                  else throw("El monto a pagar no puede ser menor que el precio de venta")
217 217              else false)
218 218              then true
219 219              else if (sell)
220 220                  then if (if (if ((tx.sellOrder.sender == issuer))
221 221                      then (tx.amount >= minAmount)
222 222                      else false)
223 223                      then (maxAmount >= tx.amount)
224 224                      else false)
225 225                      then true
226 226                      else throw("Error: Minimum amount: 1 aBitCO2; Maximum amount offered: 4 aBitCO2 by User Account")
227 227                  else false
228 228      case c: InvokeScriptTransaction => 
229 229          true
230 230      case _ => 
231 231          false
232 232  }
233 233

Old	New		Differences
128	128
129	129
130	130		@Callable(i)
131		-	func purchase (item,projectName,userData,userDiscount,orderQty~~,amount~~) = {
	131	+	func purchase (item,projectName,userData,userDiscount,orderQty) = {
132	132		let pmt = extract(i.payment)
133	133		if (isDefined(pmt.assetId))
134	134		then throw("you can adquire cBitCO2 only by Waves tokens")

158	158		then throw("Payment Amount cannot be less than item Purchase Order")
159	159		else if ((pmt.amount > totalAmount))
160	160		then throw("Payment Amount can't be higher than item Purchase Order")
161		-	else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("~~Monto pagado~~:_" + userAddress) + "_waves"), ~~amount~~), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet(~~nil~~))
	161	+	else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("Precio_de_1_Token_con_dscto:_" + userAddress) + "_waves"), buyerTokenPrice), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, aBitCO2)]))
162	162		}
163	163		}
164	164

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let aBitCO2 = base58'ETbtNp6MBuSM9EfjmLDwctrYEBBiq8CZ7ti7zbwTktry'
5	5
6	6		let startQty = 332800
7	7
8	8		let nomPrice = 100000000
9	9
10	10		let supplierDiscount = 12
11	11
12	12		let OwnerEcoPubKey = base58'4AHsCbS9QYVdKNvxrPWwsMwwy3KqXaCMXeAscExJZk9L'
13	13
14	14		let wvs = 100000000
15	15
16	16		let NONE = "none"
17	17
18	18		let issuer = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
19	19
20	20		func getNumberByKey (key) = {
21	21		let num = match getInteger(this, key) {
22	22		case a: Int =>
23	23		a
24	24		case _ =>
25	25		0
26	26		}
27	27		num
28	28		}
29	29
30	30
31	31		func getStrByKey (key) = {
32	32		let str = match getString(this, key) {
33	33		case a: String =>
34	34		a
35	35		case _ =>
36	36		NONE
37	37		}
38	38		str
39	39		}
40	40
41	41
42	42		func getKeyItem (supplier,title) = ("tokens_Bit-CO2:_" + toBase58String(sha256(toBytes((supplier + title)))))
43	43
44	44
45	45		func getKeyItemSupplier (item) = (item + "_to_Amazonian_Conservation")
46	46
47	47
48	48		func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
49	49
50	50
51	51		func getKeyBalanceQtySupplier (item) = "Tokens_ofertados,_Saldo"
52	52
53	53
54	54		func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
55	55
56	56
57	57		func getKeyItemData (item) = (item + "_description")
58	58
59	59
60	60		func getKeyUserItemCounter (user,item) = (((item + "_") + user) + "_cnt")
61	61
62	62
63	63		func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
64	64
65	65
66	66		func getKeyItemUserData (item) = "_userdata"
67	67
68	68
69	69		func getKeyItemUserOrderQty (item) = "_tokens"
70	70
71	71
72	72		func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
73	73
74	74
75	75		func getKeyBalanceSupplier (supplier) = "Seller_Balance:_waves"
76	76
77	77
78	78		func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
79	79
80	80
81	81		func getKeyItemUser (item) = "Project_name:"
82	82
83	83
84	84		func getValueItemUser (item) = getStrByKey(getKeyItemUser(item))
85	85
86	86
87	87		func getKeyItemDiscountSupplier (item) = "_%"
88	88
89	89
90	90		func getValueItemDiscountSupplier (item) = getNumberByKey(getKeyItemDiscountSupplier(item))
91	91
92	92
93	93		func getKeyItemPriceSupplier (item) = "_waves"
94	94
95	95
96	96		func getValueItemPriceSupplier (item) = getNumberByKey(getKeyItemPriceSupplier(item))
97	97
98	98
99	99		@Callable(i)
100	100		func deposit (amount) = {
101	101		let pmt = extract(i.payment)
102	102		if ((pmt.assetId != aBitCO2))
103	103		then throw("Use cBitCO2 tokens only for the wallet deposit")
104	104		else {
105	105		let supplier = toBase58String(i.caller.bytes)
106	106		let currentAmount = match getInteger(this, supplier) {
107	107		case a: Int =>
108	108		a
109	109		case _ =>
110	110		startQty
111	111		}
112	112		let newAmount = (currentAmount + pmt.amount)
113	113		WriteSet([DataEntry(supplier, newAmount)])
114	114		}
115	115		}
116	116
117	117
118	118
119	119		@Callable(i)
120	120		func AddSupplierToken (title,preIcoQty,supplierDiscount,supplierData) = {
121	121		let supplier = toBase58String(i.caller.bytes)
122	122		let item = getKeyItem(supplier, title)
123	123		if ((0 >= preIcoQty))
124	124		then throw("Sorry, insufficient token offer")
125	125		else WriteSet([DataEntry(("Ofertante:_" + getKeyItemSupplier(item)), supplier), DataEntry(getKeyBalanceQtySupplier(item), preIcoQty), DataEntry(("Precio_Nominal:" + getKeyItemPriceSupplier(item)), nomPrice), DataEntry(("Max_Descuento_ofrecido:" + getKeyItemDiscountSupplier(item)), supplierDiscount), DataEntry(getKeyItemData(item), supplierData)])
126	126		}
127	127
128	128
129	129
130	130		@Callable(i)
131		-	func purchase (item,projectName,userData,userDiscount,orderQty~~,amount~~) = {
	131	+	func purchase (item,projectName,userData,userDiscount,orderQty) = {
132	132		let pmt = extract(i.payment)
133	133		if (isDefined(pmt.assetId))
134	134		then throw("you can adquire cBitCO2 only by Waves tokens")
135	135		else {
136	136		let supplier = match getString(this, getKeyItemSupplier(item)) {
137	137		case a: String =>
138	138		a
139	139		case _ =>
140	140		NONE
141	141		}
142	142		let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
143	143		case a: Int =>
144	144		a
145	145		case _ =>
146	146		startQty
147	147		}
148	148		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
149	149		case a: Int =>
150	150		a
151	151		case _ =>
152	152		0
153	153		}
154	154		let userAddress = toBase58String(i.caller.bytes)
155	155		let buyerTokenPrice = ((nomPrice * (100 - userDiscount)) / 100)
156	156		let totalAmount = (orderQty * buyerTokenPrice)
157	157		if ((totalAmount > pmt.amount))
158	158		then throw("Payment Amount cannot be less than item Purchase Order")
159	159		else if ((pmt.amount > totalAmount))
160	160		then throw("Payment Amount can't be higher than item Purchase Order")
161		-	else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("~~Monto pagado~~:_" + userAddress) + "_waves"), ~~amount~~), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet(~~nil~~))
	161	+	else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), projectName), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUserData(item), userData), DataEntry((("Descuento solicitado:_" + userAddress) + "_%"), userDiscount), DataEntry(("Cantidad_solicitada:" + getKeyItemUserOrderQty(item)), orderQty), DataEntry((("Precio_de_1_Token_con_dscto:_" + userAddress) + "_waves"), buyerTokenPrice), DataEntry(("Request_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, aBitCO2)]))
162	162		}
163	163		}
164	164
165	165
166	166
167	167		@Callable(i)
168	168		func withdraw (title,amount) = {
169	169		let supplier = toBase58String(i.caller.bytes)
170	170		let item = getKeyItem(supplier, title)
171	171		let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
172	172		case a: Int =>
173	173		a
174	174		case _ =>
175	175		startQty
176	176		}
177	177		let newAmount = (preIcoQty - amount)
178	178		if ((0 > amount))
179	179		then throw("Can't withdraw negative amount")
180	180		else if ((0 > newAmount))
181	181		then throw("Not enought /suficiente balance")
182	182		else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, aBitCO2)]))
183	183		}
184	184
185	185
186	186		@Verifier(tx)
187	187		func verify () = match tx {
188	188		case t: SetScriptTransaction =>
189	189		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerEcoPubKey)
190	190		case d: DataTransaction =>
191	191		true
192	192		case tx: TransferTransaction =>
193	193		let recipient = toBase58String(addressFromRecipient(tx.recipient).bytes)
194	194		if ((tx.sender == issuer))
195	195		then true
196	196		else throw("You can't transferred this token")
197	197		case tx: ExchangeTransaction =>
198	198		let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
199	199		then true
200	200		else !(isDefined(tx.sellOrder.assetPair.amountAsset))
201	201		withWaves
202	202		case tx: ExchangeTransaction =>
203	203		let pk = tx.proofs[1]
204	204		let address = addressFromPublicKey(pk)
205	205		let fee = 1400000
206	206		let hasMoney = ((wavesBalance(address) - fee) >= tx.buyOrder.price)
207	207		let sell = sigVerify(tx.sellOrder.bodyBytes, tx.sellOrder.proofs[0], tx.sellOrder.senderPublicKey)
208	208		let buy = sigVerify(tx.buyOrder.bodyBytes, tx.buyOrder.proofs[0], tx.buyOrder.senderPublicKey)
209	209		let sellOrderSender = toBase58String(tx.sellOrder.sender.bytes)
210	210		let minAmount = 1
211	211		let maxAmount = 4
212	212		let maxPrice = (maxAmount * nomPrice)
213	213		if (if (buy)
214	214		then if (isDefined((maxPrice >= tx.buyOrder.price)))
215	215		then true
216	216		else throw("El monto a pagar no puede ser menor que el precio de venta")
217	217		else false)
218	218		then true
219	219		else if (sell)
220	220		then if (if (if ((tx.sellOrder.sender == issuer))
221	221		then (tx.amount >= minAmount)
222	222		else false)
223	223		then (maxAmount >= tx.amount)
224	224		else false)
225	225		then true
226	226		else throw("Error: Minimum amount: 1 aBitCO2; Maximum amount offered: 4 aBitCO2 by User Account")
227	227		else false
228	228		case c: InvokeScriptTransaction =>
229	229		true
230	230		case _ =>
231	231		false
232	232		}
233	233

github/deemru/w8io/3ef1775 
72.51 ms ◑