w8 · tx · FXn···v5w

tx · FXncqdveFAyPTa6eHXYVBTQPx15pCRM3jdLK9aZ74v5w

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.21 11:34 [1755825] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FXncqdveFAyPTa6eHXYVBTQPx15pCRM3jdLK9aZ74v5w",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1634805293509,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "2fKNz4SzaxTfec8yivJYT8TMV9TRL8AZvHjkTyzfp2NLfZP337XwtT63NbymaNDrszmpn1oS52NSYaBycxaMmQ2K"
    ],
    "script": "base64:AAIDAAAAAAAAABcIARIECgIICBIHCgUICAgIARIECgIIAQAAAEQAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAAASqHQAAAAAMRmlyc3RGYXNlUXR5AAAAAAAAAHnZAAAAAA1TZWNvbmRGYXNlUXR5AAAAAAAABDBEAAAAABBUb2tUb1ZlbmRlZG9yUXR5AAAAAAAAACcQAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAAC093bmVyUHViS2V5AQAAACB2JYFH9ti5N+7uGrdzKwlrXhDeZ+vMkHOKuVJteEgPDwAAAAAEdEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLK1ppj4mummw+7gTK3Ad3Ub4h3efkn0JwAAAAAEYUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLGfyy1r0onBhV5KbTmujr+1cm+CidoWkwAAAAAEZUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVJl9LDPuC4uFUEENum3we4/11P1VuB5sVwAAAAAEcEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEOlrjWInpptJ9aV0memID9lDjKQsHSkagAAAAAFZXVyb3UAAAAAAAAAAHQAAAAABXVzZG53AAAAAAAAAAnrAAAAAAViY28yZQAAAAAAAAGGoAAAAAAIYml0ZHNjdG8AAAAAAAAAAAMAAAAAA3BJUAAAAAAAAAAACgAAAAADdUJQAAAAAAAAAAAHAAAAAANzQlAAAAAAAAAAAAIAAAAAA2VJUAAAAAAAAAAAAQAAAAADZUJQAAAAAAAAAAACAAAAAAlyZWxhY2RjdG8AAAAAAAAAAAsBAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAALZ2V0S2V5VG9rZW4AAAABAAAABXRva2VuAgAAAAVUb2tlbgEAAAANZ2V0VmFsdWVUb2tlbgAAAAEAAAAFdG9rZW4JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAAtnZXRLZXlUb2tlbgAAAAEFAAAABXRva2VuAQAAAAxnZXRLZXlUaWVuZGEAAAABAAAABnRpZW5kYQIAAAARVGllbmRhIC8gU2hvcC1HVFMBAAAADmdldFZhbHVlVGllbmRhAAAAAQAAAAZ0aWVuZGEJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAAxnZXRLZXlUaWVuZGEAAAABBQAAAAZ0aWVuZGEBAAAAEmdldEtleVRva2Vuc1RpZW5kYQAAAAIAAAAGdGllbmRhAAAABXRva2VuCQABLAAAAAIJAAEsAAAAAgIAAAANVG9rZW5zIEJDTzI6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAZ0aWVuZGEFAAAABXRva2VuAQAAABRnZXRWYWx1ZVRva2Vuc1RpZW5kYQAAAAIAAAAGdGllbmRhAAAABXRva2VuCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAASZ2V0S2V5VG9rZW5zVGllbmRhAAAAAgUAAAAGdGllbmRhBQAAAAV0b2tlbgEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAUVmVuZGVkb3IsIExpbWEtUGVyw7oBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACAgAAAA5Qcm9kdWN0by1HVFM6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQEAAAAOZ2V0S2V5QXNvY2lhZG8AAAABAAAACGFzb2NpYWRvAgAAABBBc29jaWFkbyBCaXQtQ08yAQAAABBnZXRWYWx1ZUFzb2NpYWRvAAAAAQAAAAhhc29jaWFkbwkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUFzb2NpYWRvAAAAAQUAAAAIYXNvY2lhZG8BAAAADWdldEtleVByb2plY3QAAAABAAAAB3Byb2plY3QCAAAAB1Byb2plY3QBAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAAHcHJvamVjdAkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADWdldEtleVByb2plY3QAAAABBQAAAAdwcm9qZWN0AQAAAApnZXRLZXlOb2RvAAAAAQAAAARub2RvAgAAAAtOb2RvLUFjdGl2bwEAAAAMZ2V0VmFsdWVOb2RvAAAAAQAAAARub2RvCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5Tm9kbwAAAAEFAAAABG5vZG8BAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABpnZXRWYWx1ZVVzZXJJdGVtR3RzQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABAAAABGl0ZW0CAAAAGENhdGVnb3LDrWEgZGVsIFByb2R1Y3RvOgEAAAAQZ2V0VmFsdWVJdGVtTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABAAAABGl0ZW0CAAAAE05vbWJyZSBkZWwgVXN1YXJpbzoBAAAAEGdldFZhbHVlVXNlck5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQIAAAAj4oSWIGRlIERvY3VtZW50byAvIEROSSBkZWwgVXN1YXJpbzoBAAAAFGdldFZhbHVlVXNlckRvY3VtZW50AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAAEFVJLCB4MTBlLTA0IGJpdDoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAlQSSwgd3ZsczoBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAABBTSSwgeDEwZS0wNCBiaXQ6AQAAAApnZXRWYWx1ZVNJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtAQAAAAlnZXRLZXlOSWIAAAABAAAABGl0ZW0CAAAAEU5JYiwgeDEwZS0wNCBiaXQ6AQAAAAtnZXRWYWx1ZU5JYgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JdwAAAAEAAAAEaXRlbQIAAAAKTkl3LCB3dmxzOgEAAAALZ2V0VmFsdWVOSXcAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlOSXcAAAABBQAAAARpdGVtAQAAABNnZXRLZXlCYWxhbmNlVG9rZW5zAAAAAQAAAAZ0aWVuZGECAAAAIVRva2VucyBPZmVydGFkb3MgLyBCYWxhbmNlLCB5dG9rOgEAAAAVZ2V0VmFsdWVCYWxhbmNlVG9rZW5zAAAAAQAAAAZ0aWVuZGEJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABNnZXRLZXlCYWxhbmNlVG9rZW5zAAAAAQUAAAAGdGllbmRhAQAAABlnZXRLZXlCYWxhbmNlVG9rZW5zVGllbmRhAAAAAQAAAAZ0aWVuZGECAAAAGVNhbGRvIGRlbCBWZW5kZWRvciwgd3ZsczoBAAAAG2dldFZhbHVlQmFsYW5jZVRva2Vuc1RpZW5kYQAAAAEAAAAGdGllbmRhCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAZZ2V0S2V5QmFsYW5jZVRva2Vuc1RpZW5kYQAAAAEFAAAABnRpZW5kYQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQAAAAhwcm95ZWN0bwIAAAAaQmFsYW5jZSBkZWwgUHJveWVjdG8sIHd2czoBAAAAF2dldFZhbHVlQmFsYW5jZVByb3llY3RvAAAAAQAAAAhwcm95ZWN0bwkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvAQAAABVnZXRLZXlCYWxhbmNlQXNvY2lhZG8AAAABAAAACGFzb2NpYWRvAgAAABVCYWxhbmNlIGRlbCBBc29jaWFkbzoBAAAAF2dldFZhbHVlQmFsYW5jZUFzb2NpYWRvAAAAAQAAAAhhc29jaWFkbwkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VBc29jaWFkbwAAAAEFAAAACGFzb2NpYWRvAQAAABFnZXRLZXlCYWxhbmNlTm9kbwAAAAEAAAAEbm9kbwIAAAARQmFsYW5jZSBkZWwgTm9kbzoBAAAAE2dldFZhbHVlQmFsYW5jZU5vZG8AAAABAAAABG5vZG8JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABFnZXRLZXlCYWxhbmNlTm9kbwAAAAEFAAAABG5vZG8BAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEAAAAEaXRlbQIAAAAXU2FsZG8geXRva2VucyBTdXBwbGllcjoBAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQAAAAMAAAABaQEAAAAHZGVwb3NpdAAAAAIAAAAFdGl0bGUAAAAMc3VwcGxpZXJEYXRhBAAAAAV0b2tlbgkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAAAiE9AAAAAggFAAAABXRva2VuAAAAB2Fzc2V0SWQFAAAAB3lCaXRDTzIJAAACAAAAAQIAAAApZGVwb3NpdG8gcGVybWl0aWRvIHNvbG8gZW4geUJpdENPMiB0b2tlbnMEAAAABnRpZW5kYQkAAlgAAAABCAUAAAAEdEFkZAAAAAVieXRlcwQAAAANY3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAZ0aWVuZGEDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAAFdG9rZW4AAAAGYW1vdW50AwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAcTm8gaGF5IHlCaXRDTzIgZW4gc3UgYmFsYW5jZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGWdldEtleUJhbGFuY2VUb2tlbnNUaWVuZGEAAAABBQAAAAZ0aWVuZGEFAAAACW5ld0Ftb3VudAUAAAADbmlsAAAAAWkBAAAAC3B1cmNoYXNlR1RTAAAABQAAAARpdGVtAAAACGl0ZW1OYW1lAAAACHVzZXJOYW1lAAAADHVzZXJEb2N1bWVudAAAAAt0b3RhbEFtb3VudAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAE0VsIFByZWNpbyBlbiB3YXZlcy4EAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAABnRpZW5kYQkAAlgAAAABCAUAAAAEdEFkZAAAAAVieXRlcwQAAAALc2FsZG9UaWVuZGEEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAE2dldEtleUJhbGFuY2VUb2tlbnMAAAABBQAAAAZ0aWVuZGEDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAKYW1vdW50QkNPMgkAAGUAAAACBQAAABBUb2tUb1ZlbmRlZG9yUXR5BQAAAAtzYWxkb1RpZW5kYQQAAAAIcHJveWVjdG8JAAJYAAAAAQgFAAAABHBBZGQAAAAFYnl0ZXMEAAAACXNhbGRvUHJvagQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAIYXNvY2lhZG8JAAJYAAAAAQgFAAAABGFBZGQAAAAFYnl0ZXMEAAAADXNhbGRvQXNvY2lhZG8EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VBc29jaWFkbwAAAAEFAAAACGFzb2NpYWRvAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAADEZpcnN0RmFzZVF0eQQAAAAEbm9kbwkAAlgAAAABCAUAAAAEZUFkZAAAAAVieXRlcwQAAAAJc2FsZG9Ob2RvBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABFnZXRLZXlCYWxhbmNlTm9kbwAAAAEFAAAABG5vZG8DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3ViVG90YWwFAAAAC3RvdGFsQW1vdW50BAAAAANwSXcJAABpAAAAAgkAAGgAAAACBQAAAANwSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAAA2VJdwkAAGkAAAACCQAAaAAAAAIFAAAAA2VJUAUAAAAIc3ViVG90YWwFAAAACXJlbGFjZGN0bwQAAAANYmNvMm1lbm9zZGN0bwkAAGkAAAACCQAAaAAAAAIJAABlAAAAAgAAAAAAAAAAZAUAAAAIYml0ZHNjdG8JAABoAAAAAgUAAAAFZXVyb3UFAAAABWJjbzJlAAAAAAAAACcQBAAAAAlzdWJUb3RhbGIJAABpAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAAC3RvdGFsQW1vdW50BQAAAAV1c2RudwAAAAAAAAAAZAUAAAANYmNvMm1lbm9zZGN0bwQAAAAGdG90YWxiCQAAaAAAAAIFAAAACXN1YlRvdGFsYgAAAAAAAAAnEAQAAAADdUliCQAAaQAAAAIJAABoAAAAAgUAAAADdUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADc0liCQAAaQAAAAIJAABoAAAAAgUAAAADc0JQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADZUliCQAAaQAAAAIJAABoAAAAAgUAAAADZUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQUAAAAIaXRlbU5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0FAAAACHVzZXJOYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQUAAAAMdXNlckRvY3VtZW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAxBc29jaWFkbyBCaXQFAAAACGFzb2NpYWRvCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAR1c2RuBQAAAAV1c2RudwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAFZXVyb3UFAAAABWV1cm91CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABZBcG95byBFY29sw7NnaWNvLCB3dmxzBQAAAAt0b3RhbEFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAADcEl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAJZ2V0S2V5Tkl3AAAAAQUAAAAEaXRlbQUAAAADZUl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACYxIEJpdC1DTzIgUHJlY2lvIE5vbWluYWwsIGV1cm9zIHgxMGUtNAUAAAAFYmNvMmUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAJzEgQml0LUNPMiBQcmVjaW8gY29uIERlc2N0bywgdXNkIHgxMGUtNAUAAAANYmNvMm1lbm9zZGN0bwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAiVG90YWwgYml0LWNvMiBhIGRpc3RyaWJ1aXIsIHgxMGUtNAUAAAAJc3ViVG90YWxiCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAN1SWIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAA3NJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0FAAAAA2VJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA5PcmRlcl9TdGF0dXM6XwUAAAALdXNlckFkZHJlc3MCAAAAGFRyYW5zYWNjacOzbiBDb25maXJtYWRhIQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvBQAAAANwSXcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAFVN1bWEgcGFyYSBlbCBQcm95ZWN0bwkAAGQAAAACCQEAAAAXZ2V0VmFsdWVCYWxhbmNlUHJveWVjdG8AAAABBQAAAAhwcm95ZWN0bwUAAAADcEl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5QmFsYW5jZVByb3llY3RvAAAAAQUAAAAIcHJveWVjdG8FAAAACXNhbGRvUHJvagkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VQcm95ZWN0bwAAAAEFAAAACHByb3llY3RvBQAAAANwSXcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABNnZXRLZXlCYWxhbmNlVG9rZW5zAAAAAQUAAAAGdGllbmRhBQAAAAphbW91bnRCQ08yCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAATZ2V0S2V5QmFsYW5jZVRva2VucwAAAAEFAAAABnRpZW5kYQkAAGUAAAACCQAAaAAAAAIJAQAAABVnZXRWYWx1ZUJhbGFuY2VUb2tlbnMAAAABBQAAAAZ0aWVuZGEAAAAAAAAAJxAFAAAACXN1YlRvdGFsYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAMU2FsZG8gVG9rZW5zCQAAZQAAAAIJAABoAAAAAgkBAAAAFWdldFZhbHVlQmFsYW5jZVRva2VucwAAAAEFAAAABnRpZW5kYQAAAAAAAAAnEAUAAAAJc3ViVG90YWxiCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAZZ2V0S2V5QmFsYW5jZVRva2Vuc1RpZW5kYQAAAAEFAAAABnRpZW5kYQkAAGUAAAACCQAAaAAAAAIFAAAAEFRva1RvVmVuZGVkb3JRdHkAAAAAAAAAJxAFAAAACXN1YlRvdGFsYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGWdldEtleUJhbGFuY2VUb2tlbnNUaWVuZGEAAAABBQAAAAZ0aWVuZGEJAABlAAAAAgkAAGgAAAACCQEAAAAVZ2V0VmFsdWVCYWxhbmNlVG9rZW5zAAAAAQUAAAAGdGllbmRhAAAAAAAAACcQBQAAAAlzdWJUb3RhbGIFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARwQWRkBQAAAANwSXcFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAN1SWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAEYUFkZAUAAAADc0liBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VJdwUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARlQWRkBQAAAANlSWIFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAIAAAAEaXRlbQAAAAZhbW91bnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAACXByZUljb1F0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAJbmV3QW1vdW50CQAAZQAAAAIFAAAACXByZUljb1F0eQUAAAAGYW1vdW50AwkAAGYAAAACAAAAAAAAAAAABQAAAAZhbW91bnQJAAACAAAAAQIAAAArRWwgYmFsYW5jZSBkZSByZXRpcm8gbm8gcHVlZGUgc2VyIG5lZ2F0aXZvIQMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHk9vcHBzcy4uIEluc3VmaWNpZW50ZSBiYWxhbmNlIQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABGl0ZW0FAAAACW5ld0Ftb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAGYW1vdW50BQAAAAd5Qml0Q08yBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAAXQFAAAAByRtYXRjaDAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAABQAAAAtPd25lclB1YktleQMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAElJlaXNzdWVUcmFuc2FjdGlvbgYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAAFkBQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAGByOtkmw=",
    "height": 1755825,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HEoZbbuQD9PSnyddNbL1Zz7JMLoTtar9ZcHCZBrHVogf
Next: 5aiAa8dzZ4bJ8ZVsYwrxrJhahEq7qcuLYRAKjUDqcfSC

Diff: 
Old New Differences
276 276                  then throw("Payment Amount can't be less than item Purchase Order")
277 277                  else if ((pmt.amount > totalAmount))
278 278                      then throw("Payment Amount can't be higher than item Purchase Order")
279 -                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(getKeyBalanceTokensTienda(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), (getValueBalanceTokens(tienda) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((amountBCO2 * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
279 +                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(getKeyBalanceTokens(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry("Saldo Tokens", ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((TokToVendedorQty * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
280 280              }
281 281      }
282 282  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5 5  
6 6  let startQty = 305693
7 7  
8 8  let FirstFaseQty = 31193
9 9  
10 10  let SecondFaseQty = 274500
11 11  
12 12  let TokToVendedorQty = 10000
13 13  
14 14  let wvs = 100000000
15 15  
16 16  let NONE = "none"
17 17  
18 18  let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
19 19  
20 20  let tAdd = Address(base58'3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8')
21 21  
22 22  let aAdd = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
23 23  
24 24  let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
25 25  
26 26  let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
27 27  
28 28  let eurou = 116
29 29  
30 30  let usdnw = 2539
31 31  
32 32  let bco2e = 100000
33 33  
34 34  let bitdscto = 3
35 35  
36 36  let pIP = 10
37 37  
38 38  let uBP = 7
39 39  
40 40  let sBP = 2
41 41  
42 42  let eIP = 1
43 43  
44 44  let eBP = 2
45 45  
46 46  let relacdcto = 11
47 47  
48 48  func getNumberByKey (key) = {
49 49      let num =     match getInteger(this, key) {
50 50          case a: Int => 
51 51              a
52 52          case _ => 
53 53              0
54 54      }
55 55      num
56 56      }
57 57  
58 58  
59 59  func getStrByKey (key) = {
60 60      let str =     match getString(this, key) {
61 61          case a: String => 
62 62              a
63 63          case _ => 
64 64              NONE
65 65      }
66 66      str
67 67      }
68 68  
69 69  
70 70  func getKeyToken (token) = "Token"
71 71  
72 72  
73 73  func getValueToken (token) = getStrByKey(getKeyToken(token))
74 74  
75 75  
76 76  func getKeyTienda (tienda) = "Tienda / Shop-GTS"
77 77  
78 78  
79 79  func getValueTienda (tienda) = getStrByKey(getKeyTienda(tienda))
80 80  
81 81  
82 82  func getKeyTokensTienda (tienda,token) = (("Tokens BCO2: " + " ") + toBase58String(sha256(toBytes((tienda + token)))))
83 83  
84 84  
85 85  func getValueTokensTienda (tienda,token) = getNumberByKey(getKeyTokensTienda(tienda, token))
86 86  
87 87  
88 88  func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
89 89  
90 90  
91 91  func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
92 92  
93 93  
94 94  func getKeyAsociado (asociado) = "Asociado Bit-CO2"
95 95  
96 96  
97 97  func getValueAsociado (asociado) = getStrByKey(getKeyAsociado(asociado))
98 98  
99 99  
100 100  func getKeyProject (project) = "Project"
101 101  
102 102  
103 103  func getValueProject (project) = getStrByKey(getKeyProject(project))
104 104  
105 105  
106 106  func getKeyNodo (nodo) = "Nodo-Activo"
107 107  
108 108  
109 109  func getValueNodo (nodo) = getStrByKey(getKeyNodo(nodo))
110 110  
111 111  
112 112  func getKeyUserItemGtsCounter (user,item) = "Order_№:"
113 113  
114 114  
115 115  func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
116 116  
117 117  
118 118  func getKeyItemName (item) = "Categoría del Producto:"
119 119  
120 120  
121 121  func getValueItemName (item) = getStrByKey(getKeyItemName(item))
122 122  
123 123  
124 124  func getKeyUserName (item) = "Nombre del Usuario:"
125 125  
126 126  
127 127  func getValueUserName (item) = getStrByKey(getKeyUserName(item))
128 128  
129 129  
130 130  func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
131 131  
132 132  
133 133  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
134 134  
135 135  
136 136  func getKeyUI (item) = "UI, x10e-04 bit:"
137 137  
138 138  
139 139  func getValueUI (item) = getNumberByKey(getKeyUI(item))
140 140  
141 141  
142 142  func getKeyPI (item) = "PI, wvls:"
143 143  
144 144  
145 145  func getValuePI (item) = getNumberByKey(getKeyPI(item))
146 146  
147 147  
148 148  func getKeySI (item) = "SI, x10e-04 bit:"
149 149  
150 150  
151 151  func getValueSI (item) = getNumberByKey(getKeySI(item))
152 152  
153 153  
154 154  func getKeyNIb (item) = "NIb, x10e-04 bit:"
155 155  
156 156  
157 157  func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
158 158  
159 159  
160 160  func getKeyNIw (item) = "NIw, wvls:"
161 161  
162 162  
163 163  func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
164 164  
165 165  
166 166  func getKeyBalanceTokens (tienda) = "Tokens Ofertados / Balance, ytok:"
167 167  
168 168  
169 169  func getValueBalanceTokens (tienda) = getNumberByKey(getKeyBalanceTokens(tienda))
170 170  
171 171  
172 172  func getKeyBalanceTokensTienda (tienda) = "Saldo del Vendedor, wvls:"
173 173  
174 174  
175 175  func getValueBalanceTokensTienda (tienda) = getNumberByKey(getKeyBalanceTokensTienda(tienda))
176 176  
177 177  
178 178  func getKeyBalanceProyecto (proyecto) = "Balance del Proyecto, wvs:"
179 179  
180 180  
181 181  func getValueBalanceProyecto (proyecto) = getNumberByKey(getKeyBalanceProyecto(proyecto))
182 182  
183 183  
184 184  func getKeyBalanceAsociado (asociado) = "Balance del Asociado:"
185 185  
186 186  
187 187  func getValueBalanceAsociado (asociado) = getNumberByKey(getKeyBalanceAsociado(asociado))
188 188  
189 189  
190 190  func getKeyBalanceNodo (nodo) = "Balance del Nodo:"
191 191  
192 192  
193 193  func getValueBalanceNodo (nodo) = getNumberByKey(getKeyBalanceNodo(nodo))
194 194  
195 195  
196 196  func getKeyBalanceQtySupplier (item) = "Saldo ytokens Supplier:"
197 197  
198 198  
199 199  func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
200 200  
201 201  
202 202  @Callable(i)
203 203  func deposit (title,supplierData) = {
204 204      let token = extract(i.payment)
205 205      if ((token.assetId != yBitCO2))
206 206          then throw("deposito permitido solo en yBitCO2 tokens")
207 207          else {
208 208              let tienda = toBase58String(tAdd.bytes)
209 209              let currentAmount =             match getInteger(this, tienda) {
210 210                  case a: Int => 
211 211                      a
212 212                  case _ => 
213 213                      startQty
214 214              }
215 215              let newAmount = (currentAmount + token.amount)
216 216              if ((0 >= newAmount))
217 217                  then throw("No hay yBitCO2 en su balance")
218 218                  else WriteSet([DataEntry(getKeyBalanceTokensTienda(tienda), newAmount)])
219 219              }
220 220      }
221 221  
222 222  
223 223  
224 224  @Callable(i)
225 225  func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
226 226      let pmt = extract(i.payment)
227 227      if (isDefined(pmt.assetId))
228 228          then throw("El Precio en waves.")
229 229          else {
230 230              let supplier =             match getString(this, getKeyItemSupplier(item)) {
231 231                  case a: String => 
232 232                      a
233 233                  case _ => 
234 234                      NONE
235 235              }
236 236              let tienda = toBase58String(tAdd.bytes)
237 237              let saldoTienda =             match getInteger(this, getKeyBalanceTokens(tienda)) {
238 238                  case a: Int => 
239 239                      a
240 240                  case _ => 
241 241                      0
242 242              }
243 243              let amountBCO2 = (TokToVendedorQty - saldoTienda)
244 244              let proyecto = toBase58String(pAdd.bytes)
245 245              let saldoProj =             match getInteger(this, getKeyBalanceProyecto(proyecto)) {
246 246                  case a: Int => 
247 247                      a
248 248                  case _ => 
249 249                      0
250 250              }
251 251              let asociado = toBase58String(aAdd.bytes)
252 252              let saldoAsociado =             match getInteger(this, getKeyBalanceAsociado(asociado)) {
253 253                  case a: Int => 
254 254                      a
255 255                  case _ => 
256 256                      FirstFaseQty
257 257              }
258 258              let nodo = toBase58String(eAdd.bytes)
259 259              let saldoNodo =             match getInteger(this, getKeyBalanceNodo(nodo)) {
260 260                  case a: Int => 
261 261                      a
262 262                  case _ => 
263 263                      0
264 264              }
265 265              let userAddress = toBase58String(i.caller.bytes)
266 266              let subTotal = totalAmount
267 267              let pIw = ((pIP * subTotal) / relacdcto)
268 268              let eIw = ((eIP * subTotal) / relacdcto)
269 269              let bco2menosdcto = (((100 - bitdscto) * (eurou * bco2e)) / 10000)
270 270              let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
271 271              let totalb = (subTotalb * 10000)
272 272              let uIb = ((uBP * subTotalb) / relacdcto)
273 273              let sIb = ((sBP * subTotalb) / relacdcto)
274 274              let eIb = ((eBP * subTotalb) / relacdcto)
275 275              if ((totalAmount > pmt.amount))
276 276                  then throw("Payment Amount can't be less than item Purchase Order")
277 277                  else if ((pmt.amount > totalAmount))
278 278                      then throw("Payment Amount can't be higher than item Purchase Order")
279 -                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(getKeyBalanceTokensTienda(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), (getValueBalanceTokens(tienda) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((amountBCO2 * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
279 +                     else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(getKeyBalanceTokens(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry("Saldo Tokens", ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((TokToVendedorQty * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
280 280              }
281 281      }
282 282  
283 283  
284 284  
285 285  @Callable(i)
286 286  func withdraw (item,amount) = {
287 287      let userAddress = toBase58String(i.caller.bytes)
288 288      let supplier =     match getString(this, getKeyItemSupplier(item)) {
289 289          case a: String => 
290 290              a
291 291          case _ => 
292 292              NONE
293 293      }
294 294      let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
295 295          case a: Int => 
296 296              a
297 297          case _ => 
298 298              startQty
299 299      }
300 300      let newAmount = (preIcoQty - amount)
301 301      if ((0 > amount))
302 302          then throw("El balance de retiro no puede ser negativo!")
303 303          else if ((0 >= newAmount))
304 304              then throw("Ooppss.. Insuficiente balance!")
305 305              else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
306 306      }
307 307  
308 308  
309 309  @Verifier(tx)
310 310  func verify () = match tx {
311 311      case t: SetScriptTransaction => 
312 312          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
313 313      case d: ReissueTransaction|DataTransaction => 
314 314          true
315 315      case tx: TransferTransaction => 
316 316          true
317 317      case _ => 
318 318          false
319 319  }
320 320

Old	New		Differences
276	276		then throw("Payment Amount can't be less than item Purchase Order")
277	277		else if ((pmt.amount > totalAmount))
278	278		then throw("Payment Amount can't be higher than item Purchase Order")
279		-	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(~~getKeyBalanceTokensTienda~~(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), (getValueBalanceTokens(tienda) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((~~amountBCO2~~ * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
	279	+	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(getKeyBalanceTokens(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry("Saldo Tokens", ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((TokToVendedorQty * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
280	280		}
281	281		}
282	282

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5	5
6	6		let startQty = 305693
7	7
8	8		let FirstFaseQty = 31193
9	9
10	10		let SecondFaseQty = 274500
11	11
12	12		let TokToVendedorQty = 10000
13	13
14	14		let wvs = 100000000
15	15
16	16		let NONE = "none"
17	17
18	18		let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
19	19
20	20		let tAdd = Address(base58'3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8')
21	21
22	22		let aAdd = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
23	23
24	24		let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
25	25
26	26		let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
27	27
28	28		let eurou = 116
29	29
30	30		let usdnw = 2539
31	31
32	32		let bco2e = 100000
33	33
34	34		let bitdscto = 3
35	35
36	36		let pIP = 10
37	37
38	38		let uBP = 7
39	39
40	40		let sBP = 2
41	41
42	42		let eIP = 1
43	43
44	44		let eBP = 2
45	45
46	46		let relacdcto = 11
47	47
48	48		func getNumberByKey (key) = {
49	49		let num = match getInteger(this, key) {
50	50		case a: Int =>
51	51		a
52	52		case _ =>
53	53		0
54	54		}
55	55		num
56	56		}
57	57
58	58
59	59		func getStrByKey (key) = {
60	60		let str = match getString(this, key) {
61	61		case a: String =>
62	62		a
63	63		case _ =>
64	64		NONE
65	65		}
66	66		str
67	67		}
68	68
69	69
70	70		func getKeyToken (token) = "Token"
71	71
72	72
73	73		func getValueToken (token) = getStrByKey(getKeyToken(token))
74	74
75	75
76	76		func getKeyTienda (tienda) = "Tienda / Shop-GTS"
77	77
78	78
79	79		func getValueTienda (tienda) = getStrByKey(getKeyTienda(tienda))
80	80
81	81
82	82		func getKeyTokensTienda (tienda,token) = (("Tokens BCO2: " + " ") + toBase58String(sha256(toBytes((tienda + token)))))
83	83
84	84
85	85		func getValueTokensTienda (tienda,token) = getNumberByKey(getKeyTokensTienda(tienda, token))
86	86
87	87
88	88		func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
89	89
90	90
91	91		func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
92	92
93	93
94	94		func getKeyAsociado (asociado) = "Asociado Bit-CO2"
95	95
96	96
97	97		func getValueAsociado (asociado) = getStrByKey(getKeyAsociado(asociado))
98	98
99	99
100	100		func getKeyProject (project) = "Project"
101	101
102	102
103	103		func getValueProject (project) = getStrByKey(getKeyProject(project))
104	104
105	105
106	106		func getKeyNodo (nodo) = "Nodo-Activo"
107	107
108	108
109	109		func getValueNodo (nodo) = getStrByKey(getKeyNodo(nodo))
110	110
111	111
112	112		func getKeyUserItemGtsCounter (user,item) = "Order_№:"
113	113
114	114
115	115		func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
116	116
117	117
118	118		func getKeyItemName (item) = "Categoría del Producto:"
119	119
120	120
121	121		func getValueItemName (item) = getStrByKey(getKeyItemName(item))
122	122
123	123
124	124		func getKeyUserName (item) = "Nombre del Usuario:"
125	125
126	126
127	127		func getValueUserName (item) = getStrByKey(getKeyUserName(item))
128	128
129	129
130	130		func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
131	131
132	132
133	133		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
134	134
135	135
136	136		func getKeyUI (item) = "UI, x10e-04 bit:"
137	137
138	138
139	139		func getValueUI (item) = getNumberByKey(getKeyUI(item))
140	140
141	141
142	142		func getKeyPI (item) = "PI, wvls:"
143	143
144	144
145	145		func getValuePI (item) = getNumberByKey(getKeyPI(item))
146	146
147	147
148	148		func getKeySI (item) = "SI, x10e-04 bit:"
149	149
150	150
151	151		func getValueSI (item) = getNumberByKey(getKeySI(item))
152	152
153	153
154	154		func getKeyNIb (item) = "NIb, x10e-04 bit:"
155	155
156	156
157	157		func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
158	158
159	159
160	160		func getKeyNIw (item) = "NIw, wvls:"
161	161
162	162
163	163		func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
164	164
165	165
166	166		func getKeyBalanceTokens (tienda) = "Tokens Ofertados / Balance, ytok:"
167	167
168	168
169	169		func getValueBalanceTokens (tienda) = getNumberByKey(getKeyBalanceTokens(tienda))
170	170
171	171
172	172		func getKeyBalanceTokensTienda (tienda) = "Saldo del Vendedor, wvls:"
173	173
174	174
175	175		func getValueBalanceTokensTienda (tienda) = getNumberByKey(getKeyBalanceTokensTienda(tienda))
176	176
177	177
178	178		func getKeyBalanceProyecto (proyecto) = "Balance del Proyecto, wvs:"
179	179
180	180
181	181		func getValueBalanceProyecto (proyecto) = getNumberByKey(getKeyBalanceProyecto(proyecto))
182	182
183	183
184	184		func getKeyBalanceAsociado (asociado) = "Balance del Asociado:"
185	185
186	186
187	187		func getValueBalanceAsociado (asociado) = getNumberByKey(getKeyBalanceAsociado(asociado))
188	188
189	189
190	190		func getKeyBalanceNodo (nodo) = "Balance del Nodo:"
191	191
192	192
193	193		func getValueBalanceNodo (nodo) = getNumberByKey(getKeyBalanceNodo(nodo))
194	194
195	195
196	196		func getKeyBalanceQtySupplier (item) = "Saldo ytokens Supplier:"
197	197
198	198
199	199		func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
200	200
201	201
202	202		@Callable(i)
203	203		func deposit (title,supplierData) = {
204	204		let token = extract(i.payment)
205	205		if ((token.assetId != yBitCO2))
206	206		then throw("deposito permitido solo en yBitCO2 tokens")
207	207		else {
208	208		let tienda = toBase58String(tAdd.bytes)
209	209		let currentAmount = match getInteger(this, tienda) {
210	210		case a: Int =>
211	211		a
212	212		case _ =>
213	213		startQty
214	214		}
215	215		let newAmount = (currentAmount + token.amount)
216	216		if ((0 >= newAmount))
217	217		then throw("No hay yBitCO2 en su balance")
218	218		else WriteSet([DataEntry(getKeyBalanceTokensTienda(tienda), newAmount)])
219	219		}
220	220		}
221	221
222	222
223	223
224	224		@Callable(i)
225	225		func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
226	226		let pmt = extract(i.payment)
227	227		if (isDefined(pmt.assetId))
228	228		then throw("El Precio en waves.")
229	229		else {
230	230		let supplier = match getString(this, getKeyItemSupplier(item)) {
231	231		case a: String =>
232	232		a
233	233		case _ =>
234	234		NONE
235	235		}
236	236		let tienda = toBase58String(tAdd.bytes)
237	237		let saldoTienda = match getInteger(this, getKeyBalanceTokens(tienda)) {
238	238		case a: Int =>
239	239		a
240	240		case _ =>
241	241		0
242	242		}
243	243		let amountBCO2 = (TokToVendedorQty - saldoTienda)
244	244		let proyecto = toBase58String(pAdd.bytes)
245	245		let saldoProj = match getInteger(this, getKeyBalanceProyecto(proyecto)) {
246	246		case a: Int =>
247	247		a
248	248		case _ =>
249	249		0
250	250		}
251	251		let asociado = toBase58String(aAdd.bytes)
252	252		let saldoAsociado = match getInteger(this, getKeyBalanceAsociado(asociado)) {
253	253		case a: Int =>
254	254		a
255	255		case _ =>
256	256		FirstFaseQty
257	257		}
258	258		let nodo = toBase58String(eAdd.bytes)
259	259		let saldoNodo = match getInteger(this, getKeyBalanceNodo(nodo)) {
260	260		case a: Int =>
261	261		a
262	262		case _ =>
263	263		0
264	264		}
265	265		let userAddress = toBase58String(i.caller.bytes)
266	266		let subTotal = totalAmount
267	267		let pIw = ((pIP * subTotal) / relacdcto)
268	268		let eIw = ((eIP * subTotal) / relacdcto)
269	269		let bco2menosdcto = (((100 - bitdscto) * (eurou * bco2e)) / 10000)
270	270		let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
271	271		let totalb = (subTotalb * 10000)
272	272		let uIb = ((uBP * subTotalb) / relacdcto)
273	273		let sIb = ((sBP * subTotalb) / relacdcto)
274	274		let eIb = ((eBP * subTotalb) / relacdcto)
275	275		if ((totalAmount > pmt.amount))
276	276		then throw("Payment Amount can't be less than item Purchase Order")
277	277		else if ((pmt.amount > totalAmount))
278	278		then throw("Payment Amount can't be higher than item Purchase Order")
279		-	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(~~getKeyBalanceTokensTienda~~(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), (getValueBalanceTokens(tienda) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((~~amountBCO2~~ * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
	279	+	else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Asociado Bit", asociado), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("Total bit-co2 a distribuir, x10e-4", subTotalb), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry("Suma para el Proyecto", (getValueBalanceProyecto(proyecto) + pIw)), DataEntry(getKeyBalanceProyecto(proyecto), saldoProj), DataEntry(getKeyBalanceProyecto(proyecto), pIw), DataEntry(getKeyBalanceTokens(tienda), amountBCO2), DataEntry(getKeyBalanceTokens(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry("Saldo Tokens", ((getValueBalanceTokens(tienda) * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((TokToVendedorQty * 10000) - subTotalb)), DataEntry(getKeyBalanceTokensTienda(tienda), ((getValueBalanceTokens(tienda) * 10000) - subTotalb))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(aAdd, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
280	280		}
281	281		}
282	282
283	283
284	284
285	285		@Callable(i)
286	286		func withdraw (item,amount) = {
287	287		let userAddress = toBase58String(i.caller.bytes)
288	288		let supplier = match getString(this, getKeyItemSupplier(item)) {
289	289		case a: String =>
290	290		a
291	291		case _ =>
292	292		NONE
293	293		}
294	294		let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
295	295		case a: Int =>
296	296		a
297	297		case _ =>
298	298		startQty
299	299		}
300	300		let newAmount = (preIcoQty - amount)
301	301		if ((0 > amount))
302	302		then throw("El balance de retiro no puede ser negativo!")
303	303		else if ((0 >= newAmount))
304	304		then throw("Ooppss.. Insuficiente balance!")
305	305		else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
306	306		}
307	307
308	308
309	309		@Verifier(tx)
310	310		func verify () = match tx {
311	311		case t: SetScriptTransaction =>
312	312		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
313	313		case d: ReissueTransaction\|DataTransaction =>
314	314		true
315	315		case tx: TransferTransaction =>
316	316		true
317	317		case _ =>
318	318		false
319	319		}
320	320

github/deemru/w8io/873ac7e 
60.50 ms ◑