w8 · tx · 83q···dyv

tx · 83qcqP9SJRLBK2xwJS1GE7oebzU15jvR9jipDMwiPdyv

3N5v9ndbkGSWy1SfeJSz94tYU8qVNTUJV2q:  -0.01400000 Waves

2020.08.01 10:26 [1112946] smart account 3N5v9ndbkGSWy1SfeJSz94tYU8qVNTUJV2q > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "83qcqP9SJRLBK2xwJS1GE7oebzU15jvR9jipDMwiPdyv",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1596266785777,
    "version": 1,
    "sender": "3N5v9ndbkGSWy1SfeJSz94tYU8qVNTUJV2q",
    "senderPublicKey": "6tctCnkRasXYuZWRpzZz9ogLri6aifJ19LTtx9uFQv67",
    "proofs": [
        "3bAXJGtp6NaX5GvGMC8Jprgt9yrYucPedWcXVVThJpzupouRxUPfXDU68vEVhyuaJqcYie5hoN3SvSKnGCBRwyD4"
    ],
    "script": "base64:AAIDAAAAAAAAABAIARIDCgEBEgcKBQgICAEBAAAAJwAAAAAHeEJpdENPMgEAAAAgIARkpqoDew1vpqr6lyVYs5aJelMM/++6xmiHbINU3I0AAAAACHN0YXJ0UXR5AAAAAAAAADqYAAAAAAhub21QcmljZQAAAAAAAAAAAQAAAAAETk9ORQIAAAAEbm9uZQAAAAALT3duZXJQdWJLZXkBAAAAIFeDoPP2LDG5bo5k3c5sKTo0JzDTjtxRuDTL9ibJxOUUAAAAAAZpc3N1ZXIJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVSvhVyfjAEHvwKgtoZrZYO4od8/0d33wzIAAAAADnByb2plY3RBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUuDlBPckm+RCPrTJrg9abdfqbLEagJ56jAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABXRpdGxlCQABLAAAAAICAAAAG1Jlc2VydmEgRm9yZXN0YWwgQW1hesOzbmljYQkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAFdGl0bGUBAAAAEWdldEtleVByb3BpZXRhcmlvAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAjQ29tdW5pZGFkIEFjaHVhciBLYXBhd2kgZGVsIEVjdWFkb3IBAAAAE2dldFZhbHVlUHJvcGlldGFyaW8AAAABAAAACHN1cHBsaWVyCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAARZ2V0S2V5UHJvcGlldGFyaW8AAAABBQAAAAhzdXBwbGllcgEAAAARZ2V0S2V5UHJvamVjdENvZGUAAAABAAAAC3Byb2plY3RDb2RlAgAAABswMS1FQy9TR1QgLSBBQ0hVQVJLQVBBV0ktMDEBAAAAEWdldEtleVByb2plY3ROYW1lAAAAAQAAAAtwcm9qZWN0TmFtZQIAAAAgUmVzZXJ2YSBBbWF6w7NuaWNhIEFjaHVhci1LYXBhd2kBAAAAE2dldFZhbHVlUHJvamVjdE5hbWUAAAABAAAAC3Byb2plY3ROYW1lCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAARZ2V0S2V5UHJvamVjdE5hbWUAAAABBQAAAAtwcm9qZWN0TmFtZQEAAAASZ2V0S2V5UHJvamVjdEV0YXBhAAAAAQAAAA5wcm9qZWN0QWRkcmVzcwIAAAAdQWNodWFyS2FwYXdpLCBJIEV0YXBhOiBQcmVJQ08BAAAAFGdldFZhbHVlUHJvamVjdEV0YXBhAAAAAQAAAA5wcm9qZWN0QWRkcmVzcwkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleVByb2plY3RFdGFwYQAAAAEFAAAADnByb2plY3RBZGRyZXNzAQAAABRnZXRLZXlQcm9qZWN0Q291bnRyeQAAAAEAAAAEaXRlbQIAAAAWUmVww7pibGljYSBkZWwgRWN1YWRvcgEAAAAQZ2V0S2V5UHJvamVjdERldgAAAAEAAAAEaXRlbQIAAAAcRnVuZGFjacOzbiBFY29sw7NnaWNhICdOQVNFJwEAAAATZ2V0S2V5VG9rZW5TdGFydFF0eQAAAAEAAAAEaXRlbQIAAAAUMTUwMDAgdG9rZW5zIEJpdC1DTzIBAAAAE2dldEtleU5vbVRva2VuUHJpY2UAAAABAAAABGl0ZW0CAAAACzEwLjAwIEV1cm9zAQAAABJnZXRLZXlNYXhEZXNjdWVudG8AAAABAAAABGl0ZW0CAAAALDEyLjAwJSBkZWwgUHJlY2lvIE5vbWluYWwgZGUgMSB0b2tlbiBCaXQtQ08yAQAAABNnZXRLZXlNaW5Ub2tlblByaWNlAAAAAQAAAARpdGVtAgAAAB44LjgwIEV1cm9zIHBvciAxIHRva2VuIEJpdC1DTzIBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABAAAABGl0ZW0CAAAAE05vbWJyZSBkZWwgVXN1YXJpbzoBAAAAEGdldFZhbHVlVXNlck5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQIAAAA54oSWIGRlIERvY3VtZW50byBOYWNpb25hbCBkZSBJZGVudGlkYWQgLyBETkkgZGVsIFVzdWFyaW86AQAAABRnZXRWYWx1ZVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0BAAAAEWdldEtleVVzZXJDb3VudHJ5AAAAAQAAAARpdGVtAgAAACBQYcOtcyBkZSBSZXNpZGVuY2lhIGRlbCBVc3VhcmlvOgEAAAATZ2V0VmFsdWVVc2VyQ291bnRyeQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEWdldEtleVVzZXJDb3VudHJ5AAAAAQUAAAAEaXRlbQEAAAAWZ2V0S2V5SXRlbURpc2NvdW50VXNlcgAAAAEAAAAEaXRlbQIAAAAkRGVzY3VlbnRvIGVsZWppZG8gcG9yIGVsIFVzdWFyaW8sICU6AQAAABhnZXRWYWx1ZUl0ZW1EaXNjb3VudFVzZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtRGlzY291bnRVc2VyAAAAAQUAAAAEaXRlbQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQIAAAAlT3JkZW4gZGUgQ29tcHJhLCBjYW50aWRhZCBzb2xpY2l0YWRhOgEAAAAYZ2V0VmFsdWVJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAWZ2V0S2V5SXRlbVVzZXJPcmRlclF0eQAAAAEFAAAABGl0ZW0BAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtAgAAAC5Ub2tlbnMgT2ZlcnRhZG9zIGVuIGxhIHByZXNlbnRlIGV0YXBhIC8gU2FsZG86AQAAAB9nZXRWYWx1ZVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtAQAAAB9nZXRLZXlCYWxhbmNlU3VwcGxpZXJTZWxsSW5jb21lAAAAAQAAAAhzdXBwbGllcgIAAAAoSW5ncmVzb3MgcG9yIFZlbnRhIERpcmVjdGEgLyBCbG9ja0NoYWluOgEAAAAhZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXJTZWxsSW5jb21lAAAAAQAAAAhzdXBwbGllcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAH2dldEtleUJhbGFuY2VTdXBwbGllclNlbGxJbmNvbWUAAAABBQAAAAhzdXBwbGllcgAAAAIAAAABaQEAAAAHZGVwb3NpdAAAAAEAAAAGYW1vdW50BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHeEJpdENPMgkAAAIAAAABAgAAAC5Vc2UgeEJpdENPMiB0b2tlbnMgb25seSBmb3IgdGhlIHdhbGxldCBkZXBvc2l0BAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABkAAAAAgUAAAANY3VycmVudEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAhwdXJjaGFzZQAAAAUAAAAEaXRlbQAAAAh1c2VyTmFtZQAAAAt1c2VyQ291bnRyeQAAAAx1c2VyRGlzY291bnQAAAAIb3JkZXJRdHkEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACx5b3UgY2FuIGFkcXVpcmUgeEJpdENPMiBvbmx5IGJ5IFdhdmVzIHRva2VucwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEWdldEtleVByb3BpZXRhcmlvAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAPYmFsYW5jZVN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAAB9nZXRLZXlCYWxhbmNlU3VwcGxpZXJTZWxsSW5jb21lAAAAAQUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAPYnV5ZXJUb2tlblByaWNlCQAAaQAAAAIJAABoAAAAAgkAAGUAAAACAAAAAAAAAABkBQAAAAx1c2VyRGlzY291bnQFAAAACG5vbVByaWNlAAAAAAAAAABkBAAAAAt0b3RhbEFtb3VudAkAAGgAAAACBQAAAAhvcmRlclF0eQUAAAAPYnV5ZXJUb2tlblByaWNlAwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA1UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgbGVzcyB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIDCQAAZgAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAt0b3RhbEFtb3VudAkAAAIAAAABAgAAADdQYXltZW50IEFtb3VudCBjYW4ndCBiZSBoaWdoZXIgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAARVGlwbyBkZSBQcm95ZWN0bzoCAAAAG1Jlc2VydmEgRm9yZXN0YWwgQW1hesOzbmljYQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAALQ2F0ZWdvcsOtYToCAAAAF0VtaXNpw7NuIGRlIENPMiBFdml0YWRhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABFQYcOtcy9VYmljYWNpw7NuOgIAAAAWUmVww7pibGljYSBkZWwgRWN1YWRvcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAUTm9tYnJlIGRlbCBQcm95ZWN0bzoCAAAAIFJlc2VydmEgQW1hesOzbmljYSBBY2h1YXItS2FwYXdpCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAhDw7NkaWdvOgIAAAAbMDEtRUMvU0dUIC0gQUNIVUFSS0FQQVdJLTAxCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAdFbWlzb3I6AgAAABdDb211bmlkYWQgQWNodWFyIEthcGF3aQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAaRGVzYXJyb2xsYWRvci9SZXNwb25zYWJsZToCAAAAHEZ1bmRhY2nDs24gRWNvbMOzZ2ljYSAnTkFTRScJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAHUV0YXBhcyBkZWwgUHJveWVjdG8sIFByZS1JQ086AgAAAAgyIEV0YXBhcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAjRXRhcGFzIGRlbCBQcm95ZWN0bywgZW4gRWplY3VjacOzbjoCAAAAGkEgRGVmaW5pciwgRnVuZGFjacOzbiBSRURECQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAADhDYW50aWRhZCBUb3RhbCBkZSBUb2tlbnMgYSBFbWl0aXIsIEkgeSBJSSBFdGFwYSBQcmUtSUNPOgIAAAAVMzA1NjkzIHRva2VucyBCaXQtQ08yCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACBQcmVjaW8gTm9taW5hbCwgMSB0b2tlbiBCaXQtQ08yOgIAAAALMTAuMDAgRXVyb3MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAJE3DoXhpbW8gRGVzY3VlbnRvIG9mcmVjaWRvLCBJIEV0YXBhOgIAAAAHMTIuMDAgJQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtCQAAZAAAAAIJAQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACZUb3RhbCBUb2tlbnMgRW1pdGlkb3MsIEkgRXRhcGEgUHJlLUlDTwUAAAAIc3RhcnRRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0FAAAACHVzZXJOYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABBQAAAARpdGVtBQAAAAt1c2VyQ291bnRyeQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFmdldEtleUl0ZW1EaXNjb3VudFVzZXIAAAABBQAAAARpdGVtBQAAAAx1c2VyRGlzY291bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQUAAAAIb3JkZXJRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAGnRva2VuUHJpY2UvU3VwcGxpZXIsIHdhdmVzBQAAAAhub21QcmljZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAWdG9rZW5QcmljZS9Vc2VyLCB3YXZlcwUAAAAPYnV5ZXJUb2tlblByaWNlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABppbnZlc3RlZEFtb3VudC9Vc2VyLCB3YXZlcwUAAAALdG90YWxBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAFXB1cmNoYXNlT3JkZXIvU3RhdHVzOgIAAAAawqFBZHF1aXNpY2nDs24gQ29uZmlybWFkYSEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEFAAAABGl0ZW0JAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAH2dldEtleUJhbGFuY2VTdXBwbGllclNlbGxJbmNvbWUAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACJDdWVudGEgZGVsIFByb3llY3RvIGVuIEJsb2NrQ2hhaW46BQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAiQ3VlbnRhIGRlbCBQcm95ZWN0byBlbiBCbG9ja0NoYWluOgEAAAAaAVS4OUE9ySb5EI+tMmuD1pt1+pssRqAnnqMFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAAC3VzZXJBZGRyZXNzBQAAAAhvcmRlclF0eQUAAAAHeEJpdENPMgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAF0BQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAALT3duZXJQdWJLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAD0RhdGFUcmFuc2FjdGlvbgQAAAABZAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAlyZWNpcGllbnQJAAJYAAAAAQgJAAQkAAAAAQgFAAAAAnR4AAAACXJlY2lwaWVudAAAAAVieXRlcwMJAAAAAAAAAggFAAAAAnR4AAAABnNlbmRlcgUAAAAGaXNzdWVyBgkAAAIAAAABAgAAACBZb3UgY2FuJ3QgdHJhbnNmZXJyZWQgdGhpcyB0b2tlbgehgf6q",
    "chainId": 84,
    "height": 1112946,
    "spentComplexity": 0
}

View: original | compacted
Prev: 5rKvEDcTQFXin9hZoLrexok6syP4XpTfcV8XHpngutzz
Next: 5JVjnq7HYPBhwiE9pYncuKsAaJY4csinJQCf2H8s5t8k

Diff: 
Old New Differences
6 6  let startQty = 15000
7 7  
8 8  let nomPrice = 1
9 - 
10 - let wvs = 10000000
11 9  
12 10  let NONE = "none"
13 11  
180 178                  then throw("Payment Amount can't be less than item Purchase Order")
181 179                  else if ((pmt.amount > totalAmount))
182 180                      then throw("Payment Amount can't be higher than item Purchase Order")
183 -                     else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, wvs", (nomPrice * wvs)), DataEntry("tokenPrice/User, wvs", buyerTokenPrice), DataEntry("investedAmount/User, wvs", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
181 +                     else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, waves", nomPrice), DataEntry("tokenPrice/User, waves", buyerTokenPrice), DataEntry("investedAmount/User, waves", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
184 182              }
185 183      }
186 184  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let xBitCO2 = base58'39yw38hm342hiK43SqELTaZRkTWJoBc22XpxmsSiBrsN'
5 5  
6 6  let startQty = 15000
7 7  
8 8  let nomPrice = 1
9 - 
10 - let wvs = 10000000
11 9  
12 10  let NONE = "none"
13 11  
14 12  let OwnerPubKey = base58'6tctCnkRasXYuZWRpzZz9ogLri6aifJ19LTtx9uFQv67'
15 13  
16 14  let issuer = Address(base58'3N5v9ndbkGSWy1SfeJSz94tYU8qVNTUJV2q')
17 15  
18 16  let projectAddress = Address(base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')
19 17  
20 18  func getNumberByKey (key) = {
21 19      let num =     match getInteger(this, key) {
22 20          case a: Int => 
23 21              a
24 22          case _ => 
25 23              0
26 24      }
27 25      num
28 26      }
29 27  
30 28  
31 29  func getStrByKey (key) = {
32 30      let str =     match getString(this, key) {
33 31          case a: String => 
34 32              a
35 33          case _ => 
36 34              NONE
37 35      }
38 36      str
39 37      }
40 38  
41 39  
42 40  func getKeyItem (supplier,title) = ("Reserva Forestal Amazónica" + toBase58String(sha256(toBytes((supplier + title)))))
43 41  
44 42  
45 43  func getKeyPropietario (supplier) = (supplier + "Comunidad Achuar Kapawi del Ecuador")
46 44  
47 45  
48 46  func getValuePropietario (supplier) = getStrByKey(getKeyPropietario(supplier))
49 47  
50 48  
51 49  func getKeyProjectCode (projectCode) = "01-EC/SGT - ACHUARKAPAWI-01"
52 50  
53 51  
54 52  func getKeyProjectName (projectName) = "Reserva Amazónica Achuar-Kapawi"
55 53  
56 54  
57 55  func getValueProjectName (projectName) = getStrByKey(getKeyProjectName(projectName))
58 56  
59 57  
60 58  func getKeyProjectEtapa (projectAddress) = "AchuarKapawi, I Etapa: PreICO"
61 59  
62 60  
63 61  func getValueProjectEtapa (projectAddress) = getStrByKey(getKeyProjectEtapa(projectAddress))
64 62  
65 63  
66 64  func getKeyProjectCountry (item) = "República del Ecuador"
67 65  
68 66  
69 67  func getKeyProjectDev (item) = "Fundación Ecológica 'NASE'"
70 68  
71 69  
72 70  func getKeyTokenStartQty (item) = "15000 tokens Bit-CO2"
73 71  
74 72  
75 73  func getKeyNomTokenPrice (item) = "10.00 Euros"
76 74  
77 75  
78 76  func getKeyMaxDescuento (item) = "12.00% del Precio Nominal de 1 token Bit-CO2"
79 77  
80 78  
81 79  func getKeyMinTokenPrice (item) = "8.80 Euros por 1 token Bit-CO2"
82 80  
83 81  
84 82  func getKeyUserItemCounter (user,item) = "Order_№:"
85 83  
86 84  
87 85  func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
88 86  
89 87  
90 88  func getKeyUserName (item) = "Nombre del Usuario:"
91 89  
92 90  
93 91  func getValueUserName (item) = getStrByKey(getKeyUserName(item))
94 92  
95 93  
96 94  func getKeyUserDocument (item) = "№ de Documento Nacional de Identidad / DNI del Usuario:"
97 95  
98 96  
99 97  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
100 98  
101 99  
102 100  func getKeyUserCountry (item) = "País de Residencia del Usuario:"
103 101  
104 102  
105 103  func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
106 104  
107 105  
108 106  func getKeyItemDiscountUser (item) = "Descuento elejido por el Usuario, %:"
109 107  
110 108  
111 109  func getValueItemDiscountUser (item) = getNumberByKey(getKeyItemDiscountUser(item))
112 110  
113 111  
114 112  func getKeyItemUserOrderQty (item) = "Orden de Compra, cantidad solicitada:"
115 113  
116 114  
117 115  func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
118 116  
119 117  
120 118  func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo:"
121 119  
122 120  
123 121  func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
124 122  
125 123  
126 124  func getKeyBalanceSupplierSellIncome (supplier) = "Ingresos por Venta Directa / BlockChain:"
127 125  
128 126  
129 127  func getValueBalanceSupplierSellIncome (supplier) = getNumberByKey(getKeyBalanceSupplierSellIncome(supplier))
130 128  
131 129  
132 130  @Callable(i)
133 131  func deposit (amount) = {
134 132      let pmt = extract(i.payment)
135 133      if ((pmt.assetId != xBitCO2))
136 134          then throw("Use xBitCO2 tokens only for the wallet deposit")
137 135          else {
138 136              let supplier = toBase58String(i.caller.bytes)
139 137              let currentAmount =             match getInteger(this, supplier) {
140 138                  case a: Int => 
141 139                      a
142 140                  case _ => 
143 141                      startQty
144 142              }
145 143              let newAmount = (currentAmount + pmt.amount)
146 144              WriteSet([DataEntry(supplier, newAmount)])
147 145              }
148 146      }
149 147  
150 148  
151 149  
152 150  @Callable(i)
153 151  func purchase (item,userName,userCountry,userDiscount,orderQty) = {
154 152      let pmt = extract(i.payment)
155 153      if (isDefined(pmt.assetId))
156 154          then throw("you can adquire xBitCO2 only by Waves tokens")
157 155          else {
158 156              let supplier =             match getString(this, getKeyPropietario(item)) {
159 157                  case a: String => 
160 158                      a
161 159                  case _ => 
162 160                      NONE
163 161              }
164 162              let preIcoQty =             match getInteger(this, getKeySaldoTokenQtyStartEtapa(item)) {
165 163                  case a: Int => 
166 164                      a
167 165                  case _ => 
168 166                      startQty
169 167              }
170 168              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplierSellIncome(supplier)) {
171 169                  case a: Int => 
172 170                      a
173 171                  case _ => 
174 172                      0
175 173              }
176 174              let userAddress = toBase58String(i.caller.bytes)
177 175              let buyerTokenPrice = (((100 - userDiscount) * nomPrice) / 100)
178 176              let totalAmount = (orderQty * buyerTokenPrice)
179 177              if ((totalAmount > pmt.amount))
180 178                  then throw("Payment Amount can't be less than item Purchase Order")
181 179                  else if ((pmt.amount > totalAmount))
182 180                      then throw("Payment Amount can't be higher than item Purchase Order")
183 -                     else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, wvs", (nomPrice * wvs)), DataEntry("tokenPrice/User, wvs", buyerTokenPrice), DataEntry("investedAmount/User, wvs", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
181 +                     else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, waves", nomPrice), DataEntry("tokenPrice/User, waves", buyerTokenPrice), DataEntry("investedAmount/User, waves", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
184 182              }
185 183      }
186 184  
187 185  
188 186  @Verifier(tx)
189 187  func verify () = match tx {
190 188      case t: SetScriptTransaction => 
191 189          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
192 190      case d: DataTransaction => 
193 191          true
194 192      case tx: TransferTransaction => 
195 193          let recipient = toBase58String(addressFromRecipient(tx.recipient).bytes)
196 194          if ((tx.sender == issuer))
197 195              then true
198 196              else throw("You can't transferred this token")
199 197      case _ => 
200 198          false
201 199  }
202 200

Old	New		Differences
6	6		let startQty = 15000
7	7
8	8		let nomPrice = 1
9		-
10		-	let wvs = 10000000
11	9
12	10		let NONE = "none"
13	11

180	178		then throw("Payment Amount can't be less than item Purchase Order")
181	179		else if ((pmt.amount > totalAmount))
182	180		then throw("Payment Amount can't be higher than item Purchase Order")
183		-	else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, ~~wvs~~", (nomPrice * wvs)), DataEntry("tokenPrice/User, ~~wvs~~", buyerTokenPrice), DataEntry("investedAmount/User, ~~wvs~~", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
	181	+	else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, waves", nomPrice), DataEntry("tokenPrice/User, waves", buyerTokenPrice), DataEntry("investedAmount/User, waves", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
184	182		}
185	183		}
186	184

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let xBitCO2 = base58'39yw38hm342hiK43SqELTaZRkTWJoBc22XpxmsSiBrsN'
5	5
6	6		let startQty = 15000
7	7
8	8		let nomPrice = 1
9		-
10		-	let wvs = 10000000
11	9
12	10		let NONE = "none"
13	11
14	12		let OwnerPubKey = base58'6tctCnkRasXYuZWRpzZz9ogLri6aifJ19LTtx9uFQv67'
15	13
16	14		let issuer = Address(base58'3N5v9ndbkGSWy1SfeJSz94tYU8qVNTUJV2q')
17	15
18	16		let projectAddress = Address(base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')
19	17
20	18		func getNumberByKey (key) = {
21	19		let num = match getInteger(this, key) {
22	20		case a: Int =>
23	21		a
24	22		case _ =>
25	23		0
26	24		}
27	25		num
28	26		}
29	27
30	28
31	29		func getStrByKey (key) = {
32	30		let str = match getString(this, key) {
33	31		case a: String =>
34	32		a
35	33		case _ =>
36	34		NONE
37	35		}
38	36		str
39	37		}
40	38
41	39
42	40		func getKeyItem (supplier,title) = ("Reserva Forestal Amazónica" + toBase58String(sha256(toBytes((supplier + title)))))
43	41
44	42
45	43		func getKeyPropietario (supplier) = (supplier + "Comunidad Achuar Kapawi del Ecuador")
46	44
47	45
48	46		func getValuePropietario (supplier) = getStrByKey(getKeyPropietario(supplier))
49	47
50	48
51	49		func getKeyProjectCode (projectCode) = "01-EC/SGT - ACHUARKAPAWI-01"
52	50
53	51
54	52		func getKeyProjectName (projectName) = "Reserva Amazónica Achuar-Kapawi"
55	53
56	54
57	55		func getValueProjectName (projectName) = getStrByKey(getKeyProjectName(projectName))
58	56
59	57
60	58		func getKeyProjectEtapa (projectAddress) = "AchuarKapawi, I Etapa: PreICO"
61	59
62	60
63	61		func getValueProjectEtapa (projectAddress) = getStrByKey(getKeyProjectEtapa(projectAddress))
64	62
65	63
66	64		func getKeyProjectCountry (item) = "República del Ecuador"
67	65
68	66
69	67		func getKeyProjectDev (item) = "Fundación Ecológica 'NASE'"
70	68
71	69
72	70		func getKeyTokenStartQty (item) = "15000 tokens Bit-CO2"
73	71
74	72
75	73		func getKeyNomTokenPrice (item) = "10.00 Euros"
76	74
77	75
78	76		func getKeyMaxDescuento (item) = "12.00% del Precio Nominal de 1 token Bit-CO2"
79	77
80	78
81	79		func getKeyMinTokenPrice (item) = "8.80 Euros por 1 token Bit-CO2"
82	80
83	81
84	82		func getKeyUserItemCounter (user,item) = "Order_№:"
85	83
86	84
87	85		func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
88	86
89	87
90	88		func getKeyUserName (item) = "Nombre del Usuario:"
91	89
92	90
93	91		func getValueUserName (item) = getStrByKey(getKeyUserName(item))
94	92
95	93
96	94		func getKeyUserDocument (item) = "№ de Documento Nacional de Identidad / DNI del Usuario:"
97	95
98	96
99	97		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
100	98
101	99
102	100		func getKeyUserCountry (item) = "País de Residencia del Usuario:"
103	101
104	102
105	103		func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
106	104
107	105
108	106		func getKeyItemDiscountUser (item) = "Descuento elejido por el Usuario, %:"
109	107
110	108
111	109		func getValueItemDiscountUser (item) = getNumberByKey(getKeyItemDiscountUser(item))
112	110
113	111
114	112		func getKeyItemUserOrderQty (item) = "Orden de Compra, cantidad solicitada:"
115	113
116	114
117	115		func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
118	116
119	117
120	118		func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo:"
121	119
122	120
123	121		func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
124	122
125	123
126	124		func getKeyBalanceSupplierSellIncome (supplier) = "Ingresos por Venta Directa / BlockChain:"
127	125
128	126
129	127		func getValueBalanceSupplierSellIncome (supplier) = getNumberByKey(getKeyBalanceSupplierSellIncome(supplier))
130	128
131	129
132	130		@Callable(i)
133	131		func deposit (amount) = {
134	132		let pmt = extract(i.payment)
135	133		if ((pmt.assetId != xBitCO2))
136	134		then throw("Use xBitCO2 tokens only for the wallet deposit")
137	135		else {
138	136		let supplier = toBase58String(i.caller.bytes)
139	137		let currentAmount = match getInteger(this, supplier) {
140	138		case a: Int =>
141	139		a
142	140		case _ =>
143	141		startQty
144	142		}
145	143		let newAmount = (currentAmount + pmt.amount)
146	144		WriteSet([DataEntry(supplier, newAmount)])
147	145		}
148	146		}
149	147
150	148
151	149
152	150		@Callable(i)
153	151		func purchase (item,userName,userCountry,userDiscount,orderQty) = {
154	152		let pmt = extract(i.payment)
155	153		if (isDefined(pmt.assetId))
156	154		then throw("you can adquire xBitCO2 only by Waves tokens")
157	155		else {
158	156		let supplier = match getString(this, getKeyPropietario(item)) {
159	157		case a: String =>
160	158		a
161	159		case _ =>
162	160		NONE
163	161		}
164	162		let preIcoQty = match getInteger(this, getKeySaldoTokenQtyStartEtapa(item)) {
165	163		case a: Int =>
166	164		a
167	165		case _ =>
168	166		startQty
169	167		}
170	168		let balanceSupplier = match getInteger(this, getKeyBalanceSupplierSellIncome(supplier)) {
171	169		case a: Int =>
172	170		a
173	171		case _ =>
174	172		0
175	173		}
176	174		let userAddress = toBase58String(i.caller.bytes)
177	175		let buyerTokenPrice = (((100 - userDiscount) * nomPrice) / 100)
178	176		let totalAmount = (orderQty * buyerTokenPrice)
179	177		if ((totalAmount > pmt.amount))
180	178		then throw("Payment Amount can't be less than item Purchase Order")
181	179		else if ((pmt.amount > totalAmount))
182	180		then throw("Payment Amount can't be higher than item Purchase Order")
183		-	else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, ~~wvs~~", (nomPrice * wvs)), DataEntry("tokenPrice/User, ~~wvs~~", buyerTokenPrice), DataEntry("investedAmount/User, ~~wvs~~", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
	181	+	else ScriptResult(WriteSet([DataEntry("Tipo de Proyecto:", "Reserva Forestal Amazónica"), DataEntry("Categoría:", "Emisión de CO2 Evitada"), DataEntry("País/Ubicación:", "República del Ecuador"), DataEntry("Nombre del Proyecto:", "Reserva Amazónica Achuar-Kapawi"), DataEntry("Código:", "01-EC/SGT - ACHUARKAPAWI-01"), DataEntry("Emisor:", "Comunidad Achuar Kapawi"), DataEntry("Desarrollador/Responsable:", "Fundación Ecológica 'NASE'"), DataEntry("Etapas del Proyecto, Pre-ICO:", "2 Etapas"), DataEntry("Etapas del Proyecto, en Ejecución:", "A Definir, Fundación REDD"), DataEntry("Cantidad Total de Tokens a Emitir, I y II Etapa Pre-ICO:", "305693 tokens Bit-CO2"), DataEntry("Precio Nominal, 1 token Bit-CO2:", "10.00 Euros"), DataEntry("Máximo Descuento ofrecido, I Etapa:", "12.00 %"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry("Total Tokens Emitidos, I Etapa Pre-ICO", startQty), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, waves", nomPrice), DataEntry("tokenPrice/User, waves", buyerTokenPrice), DataEntry("investedAmount/User, waves", totalAmount), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (preIcoQty - orderQty)), DataEntry(getKeyBalanceSupplierSellIncome(supplier), (balanceSupplier + pmt.amount)), DataEntry("Cuenta del Proyecto en BlockChain:", supplier), DataEntry("Cuenta del Proyecto en BlockChain:", base58'3N6iAhMV5VZ31hJSJT4e3DoaBoiHCPxbZNa')]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
184	182		}
185	183		}
186	184
187	185
188	186		@Verifier(tx)
189	187		func verify () = match tx {
190	188		case t: SetScriptTransaction =>
191	189		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
192	190		case d: DataTransaction =>
193	191		true
194	192		case tx: TransferTransaction =>
195	193		let recipient = toBase58String(addressFromRecipient(tx.recipient).bytes)
196	194		if ((tx.sender == issuer))
197	195		then true
198	196		else throw("You can't transferred this token")
199	197		case _ =>
200	198		false
201	199		}
202	200

github/deemru/w8io/873ac7e 
60.53 ms ◑