w8 · tx · 4Tv···uMu

tx · 4TvDnoQNsDs2E2Pn2h6Ua77Sv5X4CjEXvZu1m5KufuMu

3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2:  -0.01400000 Waves

2020.04.06 11:54 [942151] smart account 3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4TvDnoQNsDs2E2Pn2h6Ua77Sv5X4CjEXvZu1m5KufuMu",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1586163250136,
    "version": 1,
    "sender": "3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2",
    "senderPublicKey": "GQpgNnxYTNNWmyiXVfx9rpMV1hgft2HPhJ3CkWeLuxAt",
    "proofs": [
        "96euVVxt72GRPWh731NpNRi19BFzRFvkPZL3vmZEcJ1HAyYnqQ2hEJEGpkgKoyZwZm9XVHzcFmMJxqxHyv1MZdR"
    ],
    "script": "base64:AAIDAAAAAAAAACMIARIECgIICBIICgYICAgBAQgSCQoHCAgICAEICBIECgIIAQAAADgAAAAAB2JCaXRDTzIBAAAAIB/+20Whi2vRcLDiyL6zBUKemnAWGkbChWDkhQemNVeLAAAAAAhzdGFydFF0eQAAAAAAAB6EgAAAAAAIbm9tUHJpY2UAAAAAAAAAAAEAAAAAA3d2cwAAAAAABfXhAAAAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAAAAAAADAAAAAAETk9ORQIAAAAEbm9uZQAAAAALT3duZXJQdWJLZXkBAAAAIOT5kr0qxAUdVllbsg32nwnU0gQ806lA/C0Ix5M0fVkpAAAAAAZpc3N1ZXIJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVQmXeqpNBOU0gXTRoLnFygaPj7BjtrRIP0AAAAAAmVBCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUyvc7Pucv0VXiD634RbMs3vuN0A1Fa31vAAAAAANpZ3YAAAAAAAAAABIAAAAAA2NQQgAAAAAAAAAAWAAAAAADdUlQAAAAAAAAAAAFAAAAAANwSVAAAAAAAAAAAAoAAAAAA3NJUAAAAAAAAAAAAQAAAAADZUlQAAAAAAAAAAABAAAAAAJwQQkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMr3Oz7nL9FV4g+t+EWzLN77jdANRWt9bwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAAV0aXRsZQkAASwAAAACAgAAAAZBIHkgRzoJAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAAIc3VwcGxpZXIFAAAABXRpdGxlAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAGX1AgU0FDAQAAABRnZXRWYWx1ZUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAADmdldEtleVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAGX1AgU0FDAQAAABBnZXRWYWx1ZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIBAAAADWdldEtleVByb2plY3QAAAABAAAAAnBBCQABLAAAAAIFAAAAAnBBAgAAAAlfQS1QcmVJQ08BAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAACcEEJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAACcEEBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABAAAABGl0ZW0CAAAACVVzZXJOYW1lOgEAAAAQZ2V0VmFsdWVJdGVtVXNlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABAAAABGl0ZW0CAAAACVVzZXJQYWlzOgEAAAATZ2V0VmFsdWVVc2VyQ291bnRyeQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEWdldEtleVVzZXJDb3VudHJ5AAAAAQUAAAAEaXRlbQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQAAAARpdGVtAgAAAANVRDoBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXICAAAAF1NlbGxlcl9CYWxhbmNlLF9hQml0Q08yAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAACFVJLF93dnM6AQAAAApnZXRWYWx1ZVVJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlVQkkAAAABAAAABGl0ZW0CAAAADFVCSSxfQml0Q08yOgEAAAALZ2V0VmFsdWVVQkkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlVQkkAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlQSQAAAAEAAAAEaXRlbQIAAAAGUEksXyU6AQAAAApnZXRWYWx1ZVBJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5UEkAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlTSQAAAAEAAAAEaXRlbQIAAAAGU0ksXyU6AQAAAApnZXRWYWx1ZVNJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlFSQAAAAEAAAACZUECAAAABkVJLF8lOgEAAAAKZ2V0VmFsdWVFSQAAAAEAAAACZUEJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlFSQAAAAEFAAAAAmVBAQAAABJnZXRLZXlJdGVtVXNlckRhdGEAAAABAAAABGl0ZW0CAAAADFVzZXJDb3VudHJ5OgEAAAAWZ2V0S2V5SXRlbURpc2NvdW50VXNlcgAAAAEAAAAEaXRlbQIAAAAQVXNlckRpc2NvdW50LCAlOgEAAAAYZ2V0VmFsdWVJdGVtRGlzY291bnRVc2VyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAWZ2V0S2V5SXRlbURpc2NvdW50VXNlcgAAAAEFAAAABGl0ZW0BAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0CAAAAEk9yZGVyX3F0eSxfdG9rZW5zOgEAAAAYZ2V0VmFsdWVJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEFAAAABGl0ZW0BAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAWQmFsYW5jZS9TYWxkbywgdG9rZW5zOgEAAAAaZ2V0VmFsdWVCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAGX3dhdmVzAQAAABlnZXRWYWx1ZUl0ZW1QcmljZVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAXZ2V0S2V5SXRlbVByaWNlU3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABpnZXRLZXlJdGVtRGlzY291bnRTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAYU3VwcGxpZXJEaXNjb3VudCwgbWF4XyU6AQAAABxnZXRWYWx1ZUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAaZ2V0S2V5SXRlbURpc2NvdW50U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtRGF0YQAAAAEAAAAEaXRlbQIAAAANZGVzY3JpcHRpb246IAAAAAQAAAABaQEAAAAHZGVwb3NpdAAAAAIAAAAFdGl0bGUAAAAMc3VwcGxpZXJEYXRhBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHYkJpdENPMgkAAAIAAAABAgAAAC5Vc2UgYkJpdENPMiB0b2tlbnMgb25seSBmb3IgdGhlIHdhbGxldCBkZXBvc2l0BAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABkAAAAAgUAAAANY3VycmVudEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAAB1ObyBoYXkgQml0Q08yIGluIHlvdXIgYmFsYW5jZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAIc3VwcGxpZXIFAAAACW5ld0Ftb3VudAUAAAADbmlsAAAAAWkBAAAAEEFkZFN1cHBsaWVyVG9rZW4AAAAGAAAABXRpdGxlAAAABG5hbWUAAAAHY291bnRyeQAAAAlwcmVJY29RdHkAAAAQc3VwcGxpZXJEaXNjb3VudAAAAAxzdXBwbGllckRhdGEEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAABGl0ZW0JAQAAAApnZXRLZXlJdGVtAAAAAgUAAAAIc3VwcGxpZXIFAAAABXRpdGxlAwkAAGcAAAACAAAAAAAAAAAABQAAAAlwcmVJY29RdHkJAAACAAAAAQIAAAAfU29ycnksIGluc3VmZmljaWVudCB0b2tlbiBvZmZlcgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAApTdXBwbGllcjpfCQEAAAAOZ2V0S2V5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAdUaXRsZTpfBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAANUHJvamVjdE5hbWU6XwUAAAAIc3VwcGxpZXIFAAAABG5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJQ291bnRyeTpfBQAAAAhzdXBwbGllcgUAAAAHY291bnRyeQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAACXByZUljb1F0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA9Ob21Ub2tlblByaWNlOl8JAQAAABdnZXRLZXlJdGVtUHJpY2VTdXBwbGllcgAAAAEFAAAABGl0ZW0JAABoAAAAAgUAAAAIbm9tUHJpY2UFAAAAA3d2cwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABdNYXhfRGVzY3VlbnRvX29mcmVjaWRvOgkBAAAAGmdldEtleUl0ZW1EaXNjb3VudFN1cHBsaWVyAAAAAQUAAAAEaXRlbQUAAAAQc3VwcGxpZXJEaXNjb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA1EZXZlbG9wbWVudDpfCQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABBQAAAARpdGVtBQAAAAxzdXBwbGllckRhdGEFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAcAAAAEaXRlbQAAAAh1c2VyTmFtZQAAAAt1c2VyQ291bnRyeQAAAAJ1RAAAAAt0b3RhbEFtb3VudAAAAAJwQQAAAAJlQQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAALXlvdSBjYW4gYWRxdWlyZSBQcm9kdWN0cyBvbmx5IGJ5IFdhdmVzIHRva2VucwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsCQAAZQAAAAIFAAAAC3RvdGFsQW1vdW50CQAAaQAAAAIJAABoAAAAAgUAAAADaWd2BQAAAAt0b3RhbEFtb3VudAAAAAAAAAAAZAQAAAACdUkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADdUlQAAAAAAAAAABkBAAAAAN1QkkJAABpAAAAAgUAAAACdUkFAAAAA2NQQgQAAAACcEkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADcElQAAAAAAAAAABkBAAAAAJlSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAA2VCSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAAnNJCQAAZQAAAAIJAABlAAAAAgUAAAALdG90YWxBbW91bnQFAAAAAnBJBQAAAAJlSQQAAAADc0JJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA3NJUAAAAAAAAAAAZAMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlVc2VyQ291bnRyeQAAAAEFAAAABGl0ZW0FAAAAC3VzZXJDb3VudHJ5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQUAAAAEaXRlbQUAAAACdUQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAE1BheW1lbnRfYW1vdW50LF93dnMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZJbXAsICUFAAAAA2lndgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAJU1R0bCwgd3ZzBQAAAAhzdWJUb3RhbAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAALQ1AgMSBCLCB3dnMJAABoAAAAAgUAAAADY1BCAAAAAAAAD0JACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAJ1SQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAADVUJJBQAAAAN1QkkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0FAAAAAnBJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5RUkAAAABBQAAAAJlQQUAAAACZUkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABUVjU3lzBQAAAANlQkkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOT3JkZXJfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAAAljb25maXJtZWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAAnNJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZTQkk6IGIFAAAAA3NCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAnVJBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABmlzc3VlcgUAAAACc0kFAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAIAAAAEaXRlbQAAAAZhbW91bnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAACXByZUljb1F0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAJbmV3QW1vdW50CQAAZQAAAAIFAAAACXByZUljb1F0eQUAAAAGYW1vdW50AwkAAGYAAAACAAAAAAAAAAAABQAAAAZhbW91bnQJAAACAAAAAQIAAAAeQ2FuJ3Qgd2l0aGRyYXcgbmVnYXRpdmUgYW1vdW50AwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAhTm90IGVub3VnaHQgL2luc3VmaWNpZW50ZSBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEaXRlbQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB2JCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBgdE/931",
    "chainId": 84,
    "height": 942151,
    "spentComplexity": 0
}

View: original | compacted
Prev: FHzUKfWjEXyLAx7D2uDjiyWXK89mJEYofWSZ3rmbeHDh
Next: 8obVQbbXuC7GwtZdgVsxysqvtDdCBSRm1YZ25BtgRoFA

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

Old	New		Differences
257	257		then throw("Payment Amount can't be less than item Purchase Order")
258	258		else if ((ap.amount > ay))
259	259		then throw("Payment Amount can't be higher than item Purchase Order")
260		-	else ScriptResult(WriteSet([DataEntry(H(aA, B), (J(aA, B) + 1)), DataEntry(K(B), av), DataEntry(M(B), aw), DataEntry(O(B), ax), DataEntry("Payment_amount,_wvs", ay), DataEntry("Imp, %", j), DataEntry("STtl, wvs", aB), DataEntry("CP 1 B, wvs", (k * 1000000)), DataEntry(R(B), aC), DataEntry("UBI", aD), DataEntry(V(B), aE), DataEntry(Z(i), aF), DataEntry("EcSys", aG), DataEntry(("Order_Status:_" + aA), "confirmed"), DataEntry(X(B), aH), DataEntry("SBI: b", aI), DataEntry(P(y), (az + ap.amount))]), TransferSet([ScriptTransfer(an.caller, aC, unit), ScriptTransfer(~~addressFromStringValue(p), aE, unit), ScriptTransfer(~~h, aH, unit)~~, ScriptTransfer(addressFromStringValue(i), aF, unit)~~]))
	260	+	else ScriptResult(WriteSet([DataEntry(H(aA, B), (J(aA, B) + 1)), DataEntry(K(B), av), DataEntry(M(B), aw), DataEntry(O(B), ax), DataEntry("Payment_amount,_wvs", ay), DataEntry("Imp, %", j), DataEntry("STtl, wvs", aB), DataEntry("CP 1 B, wvs", (k * 1000000)), DataEntry(R(B), aC), DataEntry("UBI", aD), DataEntry(V(B), aE), DataEntry(Z(i), aF), DataEntry("EcSys", aG), DataEntry(("Order_Status:_" + aA), "confirmed"), DataEntry(X(B), aH), DataEntry("SBI: b", aI), DataEntry(P(y), (az + ap.amount))]), TransferSet([ScriptTransfer(an.caller, aC, unit), ScriptTransfer(h, aH, unit)]))
261	261		}
262	262		}
263	263

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

github/deemru/w8io/873ac7e 
60.84 ms ◑