w8 · tx · CPp···zcy

tx · CPp2y8Xz3pV9S9hvU4JavjXNkxKDjQC2bKn13oKY3zcy

3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2:  -0.01400000 Waves

2020.04.04 23:20 [939931] smart account 3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CPp2y8Xz3pV9S9hvU4JavjXNkxKDjQC2bKn13oKY3zcy",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1586028014985,
    "version": 1,
    "sender": "3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2",
    "senderPublicKey": "GQpgNnxYTNNWmyiXVfx9rpMV1hgft2HPhJ3CkWeLuxAt",
    "proofs": [
        "4S6Q7zwGQiP4Vp8sxprgt7R7fHpukh6yhknZK9e51Z4R9NK8k6bK5oQk9U2VpSzv36T6j8Fsvt8A1fpxKvhcAMiU"
    ],
    "script": "base64:AAIDAAAAAAAAACMIARIECgIICBIICgYICAgBAQgSCQoHCAgICAEICBIECgIIAQAAADUAAAAAB2JCaXRDTzIBAAAAIB/+20Whi2vRcLDiyL6zBUKemnAWGkbChWDkhQemNVeLAAAAAAhzdGFydFF0eQAAAAAAAB6EgAAAAAAIbm9tUHJpY2UAAAAAAAAAAAEAAAAAA3d2cwAAAAAABfXhAAAAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAAAAAAADAAAAAAETk9ORQIAAAAEbm9uZQAAAAALT3duZXJQdWJLZXkBAAAAIOT5kr0qxAUdVllbsg32nwnU0gQ806lA/C0Ix5M0fVkpAAAAAAZpc3N1ZXIJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVQmXeqpNBOU0gXTRoLnFygaPj7BjtrRIP0AAAAAA2lndgAAAAAAAAAAEgAAAAADY1BCAAAAAAAAAABYAAAAAAN1SVAAAAAAAAAAAAUAAAAAA3BJUAAAAAAAAAAACgAAAAADc0lQAAAAAAAAAAABAAAAAANlSVAAAAAAAAAAAAEAAAAAAnBBCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUyvc7Pucv0VXiD634RbMs3vuN0A1Fa31vAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABXRpdGxlCQABLAAAAAICAAAABkEgeSBHOgkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAAZfUCBTQUMBAAAAFGdldFZhbHVlSXRlbVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAANZ2V0S2V5UHJvamVjdAAAAAEAAAACcEEJAAEsAAAAAgUAAAACcEECAAAACV9BLVByZUlDTwEAAAAPZ2V0VmFsdWVQcm9qZWN0AAAAAQAAAAJwQQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADWdldEtleVByb2plY3QAAAABBQAAAAJwQQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0CAAAACk9yZGVyX+KEljoBAAAAF2dldFZhbHVlVXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtVXNlcgAAAAEAAAAEaXRlbQIAAAAJVXNlck5hbWU6AQAAABBnZXRWYWx1ZUl0ZW1Vc2VyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABBQAAAARpdGVtAQAAABFnZXRLZXlVc2VyQ291bnRyeQAAAAEAAAAEaXRlbQIAAAAJVXNlclBhaXM6AQAAABNnZXRWYWx1ZVVzZXJDb3VudHJ5AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABBQAAAARpdGVtAQAAAAxnZXRLZXlJdGVtVUQAAAABAAAABGl0ZW0CAAAAA1VEOgEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAXU2VsbGVyX0JhbGFuY2UsX2FCaXRDTzIBAAAAF2dldFZhbHVlQmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAQAAAAhnZXRLZXlVSQAAAAEAAAAEaXRlbQIAAAAIVUksX3d2czoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACWdldEtleVVCSQAAAAEAAAAEaXRlbQIAAAAMVUJJLF9CaXRDTzI6AQAAAAtnZXRWYWx1ZVVCSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleVVCSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAZQSSxfJToBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAAAZTSSxfJToBAAAACmdldFZhbHVlU0kAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleUVJAAAAAQAAAAJlQQIAAAAGRUksXyU6AQAAAApnZXRWYWx1ZUVJAAAAAQAAAAJlQQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleUVJAAAAAQUAAAACZUEBAAAAEmdldEtleUl0ZW1Vc2VyRGF0YQAAAAEAAAAEaXRlbQIAAAAMVXNlckNvdW50cnk6AQAAABZnZXRLZXlJdGVtRGlzY291bnRVc2VyAAAAAQAAAARpdGVtAgAAABBVc2VyRGlzY291bnQsICU6AQAAABhnZXRWYWx1ZUl0ZW1EaXNjb3VudFVzZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtRGlzY291bnRVc2VyAAAAAQUAAAAEaXRlbQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQIAAAAST3JkZXJfcXR5LF90b2tlbnM6AQAAABhnZXRWYWx1ZUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAABZCYWxhbmNlL1NhbGRvLCB0b2tlbnM6AQAAABpnZXRWYWx1ZUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAAF2dldEtleUl0ZW1QcmljZVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAAAZfd2F2ZXMBAAAAGWdldFZhbHVlSXRlbVByaWNlU3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQAAAARpdGVtAgAAABhTdXBwbGllckRpc2NvdW50LCBtYXhfJToBAAAAHGdldFZhbHVlSXRlbURpc2NvdW50U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAADmdldEtleUl0ZW1EYXRhAAAAAQAAAARpdGVtAgAAAA1kZXNjcmlwdGlvbjogAAAABAAAAAFpAQAAAAdkZXBvc2l0AAAAAgAAAAV0aXRsZQAAAAxzdXBwbGllckRhdGEEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAdiQml0Q08yCQAAAgAAAAECAAAALlVzZSBiQml0Q08yIHRva2VucyBvbmx5IGZvciB0aGUgd2FsbGV0IGRlcG9zaXQEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHU5vIGhheSBCaXRDTzIgaW4geW91ciBiYWxhbmNlCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAhzdXBwbGllcgUAAAAJbmV3QW1vdW50BQAAAANuaWwAAAABaQEAAAAQQWRkU3VwcGxpZXJUb2tlbgAAAAYAAAAFdGl0bGUAAAAEbmFtZQAAAAdjb3VudHJ5AAAACXByZUljb1F0eQAAABBzdXBwbGllckRpc2NvdW50AAAADHN1cHBsaWVyRGF0YQQAAAAIc3VwcGxpZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAEaXRlbQkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUDCQAAZwAAAAIAAAAAAAAAAAAFAAAACXByZUljb1F0eQkAAAIAAAABAgAAAB9Tb3JyeSwgaW5zdWZmaWNpZW50IHRva2VuIG9mZmVyCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAClN1cHBsaWVyOl8JAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAdUaXRsZTpfBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAANUHJvamVjdE5hbWU6XwUAAAAIc3VwcGxpZXIFAAAABG5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJQ291bnRyeTpfBQAAAAhzdXBwbGllcgUAAAAHY291bnRyeQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAACXByZUljb1F0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA9Ob21Ub2tlblByaWNlOl8JAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEFAAAABGl0ZW0JAABoAAAAAgUAAAAIbm9tUHJpY2UFAAAAA3d2cwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABdNYXhfRGVzY3VlbnRvX29mcmVjaWRvOgkBAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAQc3VwcGxpZXJEaXNjb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA1EZXZlbG9wbWVudDpfCQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABBQAAAARpdGVtBQAAAAxzdXBwbGllckRhdGEFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAcAAAAEaXRlbQAAAAh1c2VyTmFtZQAAAAt1c2VyQ291bnRyeQAAAAJ1RAAAAAt0b3RhbEFtb3VudAAAAAJwQQAAAAJlQQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAALXlvdSBjYW4gYWRxdWlyZSBQcm9kdWN0cyBvbmx5IGJ5IFdhdmVzIHRva2VucwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsCQAAZQAAAAIFAAAAC3RvdGFsQW1vdW50CQAAaQAAAAIJAABoAAAAAgUAAAADaWd2BQAAAAt0b3RhbEFtb3VudAAAAAAAAAAAZAQAAAACdUkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADdUlQAAAAAAAAAABkBAAAAAN1QkkJAABpAAAAAgUAAAACdUkFAAAAA2NQQgQAAAACcEkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADcElQAAAAAAAAAABkBAAAAAJlSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAA2VCSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAAnNJCQAAZQAAAAIJAABlAAAAAgUAAAALdG90YWxBbW91bnQFAAAAAnBJBQAAAAJlSQQAAAADc0JJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA3NJUAAAAAAAAAAAZAMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlVc2VyQ291bnRyeQAAAAEFAAAABGl0ZW0FAAAAC3VzZXJDb3VudHJ5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQUAAAAEaXRlbQUAAAACdUQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAE1BheW1lbnRfYW1vdW50LF93dnMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZJbXAsICUFAAAAA2lndgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAJU1R0bCwgd3ZzBQAAAAhzdWJUb3RhbAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAALQ1AgMSBCLCB3dnMJAABoAAAAAgUAAAADY1BCAAAAAAAAD0JACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAJ1SQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAADVUJJBQAAAAN1QkkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0FAAAAAnBJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5RUkAAAABBQAAAAJlQQUAAAACZUkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABUVjU3lzBQAAAANlQkkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOT3JkZXJfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAAAljb25maXJtZWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAAnNJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZTQkk6IGIFAAAAA3NCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAnVJBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAACZUEFAAAAA2VCSQUAAAAHYkJpdENPMgUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAgAAAARpdGVtAAAABmFtb3VudAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAAB5DYW4ndCB3aXRoZHJhdyBuZWdhdGl2ZSBhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAACFOb3QgZW5vdWdodCAvaW5zdWZpY2llbnRlIGJhbGFuY2UJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAARpdGVtBQAAAAluZXdBbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAHYkJpdENPMgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAF0BQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAALT3duZXJQdWJLZXkDAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABJSZWlzc3VlVHJhbnNhY3Rpb24GCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAD0RhdGFUcmFuc2FjdGlvbgQAAAABZAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATRXhjaGFuZ2VUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAGB7JIxdg=",
    "chainId": 84,
    "height": 939931,
    "spentComplexity": 0
}

View: original | compacted
Prev: LZJ3x8hMercA4NnKvcEZx512e4oym8znwVEcArwDbeF
Next: GapuUoNh6ybv4Pcn5BSGtprbz735BL48U8VJPeu1N9BS

Diff: 
Old New Differences
249 249                  then throw("Payment Amount can't be less than item Purchase Order")
250 250                  else if ((an.amount > aw))
251 251                      then throw("Payment Amount can't be higher than item Purchase Order")
252 -                     else if ((x == f))
253 -                         then throw("supplier does not exist")
254 -                         else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
252 +                     else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
255 253              }
256 254      }
257 255  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = base58'39u32sVJU2K5UJoPRQasrNKRHbDZhtRzuHYc9tdFozn6'
5 5  
6 6  let b = 2000000
7 7  
8 8  let c = 1
9 9  
10 10  let d = 100000000
11 11  
12 12  let e = 12
13 13  
14 14  let f = "none"
15 15  
16 16  let g = base58'GQpgNnxYTNNWmyiXVfx9rpMV1hgft2HPhJ3CkWeLuxAt'
17 17  
18 18  let h = Address(base58'3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2')
19 19  
20 20  let i = 18
21 21  
22 22  let j = 88
23 23  
24 24  let k = 5
25 25  
26 26  let l = 10
27 27  
28 28  let m = 1
29 29  
30 30  let n = 1
31 31  
32 32  let o = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
33 33  
34 34  func p (q) = {
35 35      let r = {
36 36          let s = getInteger(this, q)
37 37          if ($isInstanceOf(s, "Int"))
38 38              then {
39 39                  let t = s
40 40                  t
41 41                  }
42 42              else 0
43 43          }
44 44      r
45 45      }
46 46  
47 47  
48 48  func u (q) = {
49 49      let v = {
50 50          let s = getString(this, q)
51 51          if ($isInstanceOf(s, "String"))
52 52              then {
53 53                  let t = s
54 54                  t
55 55                  }
56 56              else f
57 57          }
58 58      v
59 59      }
60 60  
61 61  
62 62  func w (x,y) = ("A y G:" + toBase58String(sha256(toBytes((x + y)))))
63 63  
64 64  
65 65  func z (A) = (A + "_P SAC")
66 66  
67 67  
68 68  func B (A) = u(z(A))
69 69  
70 70  
71 71  func C (o) = (o + "_A-PreICO")
72 72  
73 73  
74 74  func D (o) = u(C(o))
75 75  
76 76  
77 77  func E (F,A) = "Order_№:"
78 78  
79 79  
80 80  func G (F,A) = p(E(F, A))
81 81  
82 82  
83 83  func H (A) = "UserName:"
84 84  
85 85  
86 86  func I (A) = u(H(A))
87 87  
88 88  
89 89  func J (A) = "UserPais:"
90 90  
91 91  
92 92  func K (A) = u(J(A))
93 93  
94 94  
95 95  func L (A) = "UD:"
96 96  
97 97  
98 98  func M (x) = "Seller_Balance,_aBitCO2"
99 99  
100 100  
101 101  func N (x) = p(M(x))
102 102  
103 103  
104 104  func O (A) = "UI,_wvs:"
105 105  
106 106  
107 107  func P (A) = p(O(A))
108 108  
109 109  
110 110  func Q (A) = "UBI,_BitCO2:"
111 111  
112 112  
113 113  func R (A) = p(Q(A))
114 114  
115 115  
116 116  func S (A) = "PI,_%:"
117 117  
118 118  
119 119  func T (A) = p(S(A))
120 120  
121 121  
122 122  func U (A) = "SI,_%:"
123 123  
124 124  
125 125  func V (A) = p(U(A))
126 126  
127 127  
128 128  func W (X) = "EI,_%:"
129 129  
130 130  
131 131  func Y (X) = p(W(X))
132 132  
133 133  
134 134  func Z (A) = "UserCountry:"
135 135  
136 136  
137 137  func aa (A) = "UserDiscount, %:"
138 138  
139 139  
140 140  func ab (A) = p(aa(A))
141 141  
142 142  
143 143  func ac (A) = "Order_qty,_tokens:"
144 144  
145 145  
146 146  func ad (A) = p(ac(A))
147 147  
148 148  
149 149  func ae (A) = "Balance/Saldo, tokens:"
150 150  
151 151  
152 152  func af (A) = p(ae(A))
153 153  
154 154  
155 155  func ag (A) = "_waves"
156 156  
157 157  
158 158  func ah (A) = p(ag(A))
159 159  
160 160  
161 161  func ai (A) = "SupplierDiscount, max_%:"
162 162  
163 163  
164 164  func aj (A) = p(ai(A))
165 165  
166 166  
167 167  func ak (A) = "description: "
168 168  
169 169  
170 170  @Callable(al)
171 171  func deposit (y,am) = {
172 172      let an = extract(al.payment)
173 173      if ((an.assetId != a))
174 174          then throw("Use bBitCO2 tokens only for the wallet deposit")
175 175          else {
176 176              let x = toBase58String(al.caller.bytes)
177 177              let ao = {
178 178                  let s = getInteger(this, x)
179 179                  if ($isInstanceOf(s, "Int"))
180 180                      then {
181 181                          let t = s
182 182                          t
183 183                          }
184 184                      else b
185 185                  }
186 186              let ap = (ao + an.amount)
187 187              if ((0 >= ap))
188 188                  then throw("No hay BitCO2 in your balance")
189 189                  else WriteSet([DataEntry(x, ap)])
190 190              }
191 191      }
192 192  
193 193  
194 194  
195 195  @Callable(al)
196 196  func AddSupplierToken (y,aq,ar,as,e,am) = {
197 197      let x = toBase58String(al.caller.bytes)
198 198      let A = w(x, y)
199 199      if ((0 >= as))
200 200          then throw("Sorry, insufficient token offer")
201 201          else WriteSet([DataEntry(("Supplier:_" + z(A)), x), DataEntry(("Title:_" + x), y), DataEntry(("ProjectName:_" + x), aq), DataEntry(("Country:_" + x), ar), DataEntry(ae(A), as), DataEntry(("NomTokenPrice:_" + ag(A)), (c * d)), DataEntry(("Max_Descuento_ofrecido:" + ai(A)), e), DataEntry(("Development:_" + ak(A)), am)])
202 202      }
203 203  
204 204  
205 205  
206 206  @Callable(al)
207 207  func purchaseGTS (A,at,au,av,aw,o,X) = {
208 208      let an = extract(al.payment)
209 209      if (isDefined(an.assetId))
210 210          then throw("you can adquire Products only by Waves tokens")
211 211          else {
212 212              let x = {
213 213                  let s = getString(this, z(A))
214 214                  if ($isInstanceOf(s, "String"))
215 215                      then {
216 216                          let t = s
217 217                          t
218 218                          }
219 219                      else f
220 220                  }
221 221              let as = {
222 222                  let s = getInteger(this, ae(A))
223 223                  if ($isInstanceOf(s, "Int"))
224 224                      then {
225 225                          let t = s
226 226                          t
227 227                          }
228 228                      else b
229 229                  }
230 230              let ax = {
231 231                  let s = getInteger(this, M(x))
232 232                  if ($isInstanceOf(s, "Int"))
233 233                      then {
234 234                          let t = s
235 235                          t
236 236                          }
237 237                      else 0
238 238                  }
239 239              let ay = toBase58String(al.caller.bytes)
240 240              let az = (aw - ((i * aw) / 100))
241 241              let aA = ((az * k) / 100)
242 242              let aB = (aA / j)
243 243              let aC = ((az * l) / 100)
244 244              let aD = ((az * n) / 100)
245 245              let aE = ((az * n) / 100)
246 246              let aF = ((aw - aC) - aD)
247 247              let aG = ((az * m) / 100)
248 248              if ((aw > an.amount))
249 249                  then throw("Payment Amount can't be less than item Purchase Order")
250 250                  else if ((an.amount > aw))
251 251                      then throw("Payment Amount can't be higher than item Purchase Order")
252 -                     else if ((x == f))
253 -                         then throw("supplier does not exist")
254 -                         else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
252 +                     else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
255 253              }
256 254      }
257 255  
258 256  
259 257  
260 258  @Callable(al)
261 259  func withdraw (A,aH) = {
262 260      let ay = toBase58String(al.caller.bytes)
263 261      let x = {
264 262          let s = getString(this, z(A))
265 263          if ($isInstanceOf(s, "String"))
266 264              then {
267 265                  let t = s
268 266                  t
269 267                  }
270 268              else f
271 269          }
272 270      let as = {
273 271          let s = getInteger(this, ae(A))
274 272          if ($isInstanceOf(s, "Int"))
275 273              then {
276 274                  let t = s
277 275                  t
278 276                  }
279 277              else b
280 278          }
281 279      let ap = (as - aH)
282 280      if ((0 > aH))
283 281          then throw("Can't withdraw negative amount")
284 282          else if ((0 >= ap))
285 283              then throw("Not enought /insuficiente balance")
286 284              else ScriptResult(WriteSet([DataEntry(A, ap)]), TransferSet([ScriptTransfer(al.caller, aH, a)]))
287 285      }
288 286  
289 287  
290 288  @Verifier(aI)
291 289  func aJ () = {
292 290      let s = aI
293 291      if ($isInstanceOf(s, "SetScriptTransaction"))
294 292          then {
295 293              let aK = s
296 294              sigVerify(aI.bodyBytes, aI.proofs[0], g)
297 295              }
298 296          else if (if ($isInstanceOf(s, "ReissueTransaction"))
299 297              then true
300 298              else $isInstanceOf(s, "DataTransaction"))
301 299              then {
302 300                  let aL = s
303 301                  true
304 302                  }
305 303              else if ($isInstanceOf(s, "TransferTransaction"))
306 304                  then {
307 305                      let aI = s
308 306                      true
309 307                      }
310 308                  else if ($isInstanceOf(s, "ExchangeTransaction"))
311 309                      then {
312 310                          let aI = s
313 311                          true
314 312                          }
315 313                      else false
316 314      }
317 315

Old	New		Differences
249	249		then throw("Payment Amount can't be less than item Purchase Order")
250	250		else if ((an.amount > aw))
251	251		then throw("Payment Amount can't be higher than item Purchase Order")
252		-	else if ((x == f))
253		-	then throw("supplier does not exist")
254		-	else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
	252	+	else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
255	253		}
256	254		}
257	255

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = base58'39u32sVJU2K5UJoPRQasrNKRHbDZhtRzuHYc9tdFozn6'
5	5
6	6		let b = 2000000
7	7
8	8		let c = 1
9	9
10	10		let d = 100000000
11	11
12	12		let e = 12
13	13
14	14		let f = "none"
15	15
16	16		let g = base58'GQpgNnxYTNNWmyiXVfx9rpMV1hgft2HPhJ3CkWeLuxAt'
17	17
18	18		let h = Address(base58'3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2')
19	19
20	20		let i = 18
21	21
22	22		let j = 88
23	23
24	24		let k = 5
25	25
26	26		let l = 10
27	27
28	28		let m = 1
29	29
30	30		let n = 1
31	31
32	32		let o = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
33	33
34	34		func p (q) = {
35	35		let r = {
36	36		let s = getInteger(this, q)
37	37		if ($isInstanceOf(s, "Int"))
38	38		then {
39	39		let t = s
40	40		t
41	41		}
42	42		else 0
43	43		}
44	44		r
45	45		}
46	46
47	47
48	48		func u (q) = {
49	49		let v = {
50	50		let s = getString(this, q)
51	51		if ($isInstanceOf(s, "String"))
52	52		then {
53	53		let t = s
54	54		t
55	55		}
56	56		else f
57	57		}
58	58		v
59	59		}
60	60
61	61
62	62		func w (x,y) = ("A y G:" + toBase58String(sha256(toBytes((x + y)))))
63	63
64	64
65	65		func z (A) = (A + "_P SAC")
66	66
67	67
68	68		func B (A) = u(z(A))
69	69
70	70
71	71		func C (o) = (o + "_A-PreICO")
72	72
73	73
74	74		func D (o) = u(C(o))
75	75
76	76
77	77		func E (F,A) = "Order_№:"
78	78
79	79
80	80		func G (F,A) = p(E(F, A))
81	81
82	82
83	83		func H (A) = "UserName:"
84	84
85	85
86	86		func I (A) = u(H(A))
87	87
88	88
89	89		func J (A) = "UserPais:"
90	90
91	91
92	92		func K (A) = u(J(A))
93	93
94	94
95	95		func L (A) = "UD:"
96	96
97	97
98	98		func M (x) = "Seller_Balance,_aBitCO2"
99	99
100	100
101	101		func N (x) = p(M(x))
102	102
103	103
104	104		func O (A) = "UI,_wvs:"
105	105
106	106
107	107		func P (A) = p(O(A))
108	108
109	109
110	110		func Q (A) = "UBI,_BitCO2:"
111	111
112	112
113	113		func R (A) = p(Q(A))
114	114
115	115
116	116		func S (A) = "PI,_%:"
117	117
118	118
119	119		func T (A) = p(S(A))
120	120
121	121
122	122		func U (A) = "SI,_%:"
123	123
124	124
125	125		func V (A) = p(U(A))
126	126
127	127
128	128		func W (X) = "EI,_%:"
129	129
130	130
131	131		func Y (X) = p(W(X))
132	132
133	133
134	134		func Z (A) = "UserCountry:"
135	135
136	136
137	137		func aa (A) = "UserDiscount, %:"
138	138
139	139
140	140		func ab (A) = p(aa(A))
141	141
142	142
143	143		func ac (A) = "Order_qty,_tokens:"
144	144
145	145
146	146		func ad (A) = p(ac(A))
147	147
148	148
149	149		func ae (A) = "Balance/Saldo, tokens:"
150	150
151	151
152	152		func af (A) = p(ae(A))
153	153
154	154
155	155		func ag (A) = "_waves"
156	156
157	157
158	158		func ah (A) = p(ag(A))
159	159
160	160
161	161		func ai (A) = "SupplierDiscount, max_%:"
162	162
163	163
164	164		func aj (A) = p(ai(A))
165	165
166	166
167	167		func ak (A) = "description: "
168	168
169	169
170	170		@Callable(al)
171	171		func deposit (y,am) = {
172	172		let an = extract(al.payment)
173	173		if ((an.assetId != a))
174	174		then throw("Use bBitCO2 tokens only for the wallet deposit")
175	175		else {
176	176		let x = toBase58String(al.caller.bytes)
177	177		let ao = {
178	178		let s = getInteger(this, x)
179	179		if ($isInstanceOf(s, "Int"))
180	180		then {
181	181		let t = s
182	182		t
183	183		}
184	184		else b
185	185		}
186	186		let ap = (ao + an.amount)
187	187		if ((0 >= ap))
188	188		then throw("No hay BitCO2 in your balance")
189	189		else WriteSet([DataEntry(x, ap)])
190	190		}
191	191		}
192	192
193	193
194	194
195	195		@Callable(al)
196	196		func AddSupplierToken (y,aq,ar,as,e,am) = {
197	197		let x = toBase58String(al.caller.bytes)
198	198		let A = w(x, y)
199	199		if ((0 >= as))
200	200		then throw("Sorry, insufficient token offer")
201	201		else WriteSet([DataEntry(("Supplier:_" + z(A)), x), DataEntry(("Title:_" + x), y), DataEntry(("ProjectName:_" + x), aq), DataEntry(("Country:_" + x), ar), DataEntry(ae(A), as), DataEntry(("NomTokenPrice:_" + ag(A)), (c * d)), DataEntry(("Max_Descuento_ofrecido:" + ai(A)), e), DataEntry(("Development:_" + ak(A)), am)])
202	202		}
203	203
204	204
205	205
206	206		@Callable(al)
207	207		func purchaseGTS (A,at,au,av,aw,o,X) = {
208	208		let an = extract(al.payment)
209	209		if (isDefined(an.assetId))
210	210		then throw("you can adquire Products only by Waves tokens")
211	211		else {
212	212		let x = {
213	213		let s = getString(this, z(A))
214	214		if ($isInstanceOf(s, "String"))
215	215		then {
216	216		let t = s
217	217		t
218	218		}
219	219		else f
220	220		}
221	221		let as = {
222	222		let s = getInteger(this, ae(A))
223	223		if ($isInstanceOf(s, "Int"))
224	224		then {
225	225		let t = s
226	226		t
227	227		}
228	228		else b
229	229		}
230	230		let ax = {
231	231		let s = getInteger(this, M(x))
232	232		if ($isInstanceOf(s, "Int"))
233	233		then {
234	234		let t = s
235	235		t
236	236		}
237	237		else 0
238	238		}
239	239		let ay = toBase58String(al.caller.bytes)
240	240		let az = (aw - ((i * aw) / 100))
241	241		let aA = ((az * k) / 100)
242	242		let aB = (aA / j)
243	243		let aC = ((az * l) / 100)
244	244		let aD = ((az * n) / 100)
245	245		let aE = ((az * n) / 100)
246	246		let aF = ((aw - aC) - aD)
247	247		let aG = ((az * m) / 100)
248	248		if ((aw > an.amount))
249	249		then throw("Payment Amount can't be less than item Purchase Order")
250	250		else if ((an.amount > aw))
251	251		then throw("Payment Amount can't be higher than item Purchase Order")
252		-	else if ((x == f))
253		-	then throw("supplier does not exist")
254		-	else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
	252	+	else ScriptResult(WriteSet([DataEntry(E(ay, A), (G(ay, A) + 1)), DataEntry(H(A), at), DataEntry(J(A), au), DataEntry(L(A), av), DataEntry("Payment_amount,_wvs", aw), DataEntry("Imp, %", i), DataEntry("STtl, wvs", az), DataEntry("CP 1 B, wvs", (j * 1000000)), DataEntry(O(A), aA), DataEntry("UBI", aB), DataEntry(S(A), aC), DataEntry(W(X), aD), DataEntry("EcSys", aE), DataEntry(("Order_Status:_" + ay), "confirmed"), DataEntry(U(A), aF), DataEntry("SBI: b", aG), DataEntry(M(x), (ax + an.amount))]), TransferSet([ScriptTransfer(al.caller, aA, unit), ScriptTransfer(addressFromStringValue(X), aE, a)]))
255	253		}
256	254		}
257	255
258	256
259	257
260	258		@Callable(al)
261	259		func withdraw (A,aH) = {
262	260		let ay = toBase58String(al.caller.bytes)
263	261		let x = {
264	262		let s = getString(this, z(A))
265	263		if ($isInstanceOf(s, "String"))
266	264		then {
267	265		let t = s
268	266		t
269	267		}
270	268		else f
271	269		}
272	270		let as = {
273	271		let s = getInteger(this, ae(A))
274	272		if ($isInstanceOf(s, "Int"))
275	273		then {
276	274		let t = s
277	275		t
278	276		}
279	277		else b
280	278		}
281	279		let ap = (as - aH)
282	280		if ((0 > aH))
283	281		then throw("Can't withdraw negative amount")
284	282		else if ((0 >= ap))
285	283		then throw("Not enought /insuficiente balance")
286	284		else ScriptResult(WriteSet([DataEntry(A, ap)]), TransferSet([ScriptTransfer(al.caller, aH, a)]))
287	285		}
288	286
289	287
290	288		@Verifier(aI)
291	289		func aJ () = {
292	290		let s = aI
293	291		if ($isInstanceOf(s, "SetScriptTransaction"))
294	292		then {
295	293		let aK = s
296	294		sigVerify(aI.bodyBytes, aI.proofs[0], g)
297	295		}
298	296		else if (if ($isInstanceOf(s, "ReissueTransaction"))
299	297		then true
300	298		else $isInstanceOf(s, "DataTransaction"))
301	299		then {
302	300		let aL = s
303	301		true
304	302		}
305	303		else if ($isInstanceOf(s, "TransferTransaction"))
306	304		then {
307	305		let aI = s
308	306		true
309	307		}
310	308		else if ($isInstanceOf(s, "ExchangeTransaction"))
311	309		then {
312	310		let aI = s
313	311		true
314	312		}
315	313		else false
316	314		}
317	315

github/deemru/w8io/3ef1775 
147.75 ms ◑