w8 · tx · EZP···5PB

tx · EZPMQfo2fEjuQHFRvVhRRFt1xxoMGZr5T8bJ69pCV5PB

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.18 11:37 [1751486] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EZPMQfo2fEjuQHFRvVhRRFt1xxoMGZr5T8bJ69pCV5PB",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1634546286625,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "3N1pGsAGWNuBheyMXSzYDJ9V7s3ApNUaAohbMTkkq43MKGgT7trPknGuAYUJDE2uBwJ9YnuTqwHjm2LAUXrHomVu"
    ],
    "script": "base64:AAIDAAAAAAAAABcIARIECgIICBIHCgUICAgIARIECgIIAQAAADoAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAtjUM0AAAAAAMRmlyc3RGYXNlUXR5AAAAAAASl6yQAAAAAA1TZWNvbmRGYXNlUXR5AAAAAACjnWBAAAAAAARiaXRzAAAAAAAAACcQAAAAAAN3dnMAAAAAAAAAJxAAAAAABE5PTkUCAAAABG5vbmUAAAAAC093bmVyUHViS2V5AQAAACB2JYFH9ti5N+7uGrdzKwlrXhDeZ+vMkHOKuVJteEgPDwAAAAAGaXNzdWVyCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUsZ/LLWvSicGFXkptOa6Ov7Vyb4KJ2haTAAAAAARlQWRkCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUmX0sM+4Li4VQQQ26bfB7j/XU/VW4HmxXAAAAAARwQWRkCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUQ6WuNYiemm0n1pXSZ6YgP2UOMpCwdKRqAAAAAANpZ3YAAAAAAAAAAAAAAAAABWV1cm91CQAAaQAAAAIAAAAAAAAAAHQAAAAAAAAAAGQAAAAABXVzZG53CQAAaQAAAAIAAAAAAAAACesAAAAAAAAAAGQAAAAABWJjbzJlAAAAAAAAAAAKAAAAAAdiaXRjbzJ1CQAAaAAAAAIFAAAABWV1cm91BQAAAAViY28yZQAAAAAIYml0ZHNjdG8AAAAAAAAAAAMAAAAADWJjbzJtZW5vc2RjdG8JAABpAAAAAgkAAGgAAAACCQAAZQAAAAIAAAAAAAAAAGQFAAAACGJpdGRzY3RvBQAAAAdiaXRjbzJ1AAAAAAAAAABkAAAAAANwSVAAAAAAAAAAAAoAAAAAA3VCUAAAAAAAAAAABwAAAAADc0JQAAAAAAAAAAACAAAAAANlSVAAAAAAAAAAAAEAAAAAA2VCUAAAAAAAAAAAAgAAAAAJcmVsYWNkY3RvAAAAAAAAAAALAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAAEsAAAAAgUAAAAIc3VwcGxpZXICAAAAFFZlbmRlZG9yLCBMaW1hLVBlcsO6AQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAARpdGVtCQABLAAAAAIJAAEsAAAAAgIAAAAOUHJvZHVjdG8tR1RTOiACAAAAASAJAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAAIc3VwcGxpZXIFAAAABGl0ZW0BAAAADGdldEtleUlzc3VlcgAAAAEAAAAEaXRlbQIAAAANSXNzdWVyL1RpZW5kYQEAAAAOZ2V0VmFsdWVJc3N1ZXIAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAAxnZXRLZXlJc3N1ZXIAAAABBQAAAARpdGVtAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQAAAARpdGVtAgAAAAdQcm9qZWN0AQAAAA9nZXRWYWx1ZVByb2plY3QAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQEAAAAKZ2V0S2V5Tm9kbwAAAAEAAAAEaXRlbQIAAAAETm9kbwEAAAAMZ2V0VmFsdWVOb2RvAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5Tm9kbwAAAAEFAAAABGl0ZW0BAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABpnZXRWYWx1ZVVzZXJJdGVtR3RzQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABAAAABGl0ZW0CAAAAGENhdGVnb3LDrWEgZGVsIFByb2R1Y3RvOgEAAAAQZ2V0VmFsdWVJdGVtTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABAAAABGl0ZW0CAAAAE05vbWJyZSBkZWwgVXN1YXJpbzoBAAAAEGdldFZhbHVlVXNlck5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEAAAAEaXRlbQIAAAAj4oSWIGRlIERvY3VtZW50byAvIEROSSBkZWwgVXN1YXJpbzoBAAAAFGdldFZhbHVlVXNlckRvY3VtZW50AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAACFVJLCBiaXQ6AQAAAApnZXRWYWx1ZVVJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlQSQAAAAEAAAAEaXRlbQIAAAAJUEksIHd2bHM6AQAAAApnZXRWYWx1ZVBJAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5UEkAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlTSQAAAAEAAAAEaXRlbQIAAAAIU0ksIGJpdDoBAAAACmdldFZhbHVlU0kAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JYgAAAAEAAAAEaXRlbQIAAAAJTkliLCBiaXQ6AQAAAAtnZXRWYWx1ZU5JYgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JdwAAAAEAAAAEaXRlbQIAAAAKTkl3LCB3dmxzOgEAAAALZ2V0VmFsdWVOSXcAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAlnZXRLZXlOSXcAAAABBQAAAARpdGVtAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEAAAAEaXRlbQIAAAA0VG9rZW5zIE9mZXJ0YWRvcyBlbiBsYSBwcmVzZW50ZSBldGFwYSAvIFNhbGRvLCB5dG9rOgEAAAAfZ2V0VmFsdWVTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAABtCYWxhbmNlL1NhbGRvIEdUUywgeXRva2VuczoBAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAcSW5ncmVzb3MgcG9yIFZlbnRhR1RTLCB3dmxzOgEAAAAXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIAAAADAAAAAWkBAAAAB2RlcG9zaXQAAAACAAAABXRpdGxlAAAADHN1cHBsaWVyRGF0YQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB3lCaXRDTzIJAAACAAAAAQIAAAApZGVwb3NpdG8gcGVybWl0aWRvIHNvbG8gZW4geUJpdENPMiB0b2tlbnMEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHE5vIGhheSB5Qml0Q08yIGVuIHN1IGJhbGFuY2UJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAUAAAAEaXRlbQAAAAhpdGVtTmFtZQAAAAh1c2VyTmFtZQAAAAx1c2VyRG9jdW1lbnQAAAALdG90YWxBbW91bnQEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABNFbCBQcmVjaW8gZW4gd2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlpc3N1ZXJBZGQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAADGdldEtleUlzc3VlcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAGaXNzdWVyBAAAAAdwcm9qQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAARwQWRkBAAAAAdub2RvQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAARlQWRkBAAAAAtwcmVUb2tlblF0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAA1TZWNvbmRGYXNlUXR5BAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsCQAAZQAAAAIFAAAAC3RvdGFsQW1vdW50CQAAaQAAAAIJAABoAAAAAgUAAAADaWd2BQAAAAt0b3RhbEFtb3VudAAAAAAAAAAAZAQAAAADcEl3CQAAaQAAAAIJAABoAAAAAgUAAAADcElQBQAAAAhzdWJUb3RhbAUAAAAJcmVsYWNkY3RvBAAAAANlSXcJAABpAAAAAgkAAGgAAAACBQAAAANlSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAACXN1YlRvdGFsYgkAAGkAAAACCQAAaAAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAABGJpdHMFAAAABXVzZG53CQAAaAAAAAIFAAAADWJjbzJtZW5vc2RjdG8FAAAAA3d2cwQAAAADdUliCQAAaQAAAAIJAABoAAAAAgUAAAADdUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADc0liCQAAaQAAAAIJAABoAAAAAgUAAAADc0JQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADZUliCQAAaQAAAAIJAABoAAAAAgUAAAADZUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAANQmFsYW5jZVRpZW5kYQkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50AwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA1UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgbGVzcyB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIDCQAAZgAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAt0b3RhbEFtb3VudAkAAAIAAAABAgAAADdQYXltZW50IEFtb3VudCBjYW4ndCBiZSBoaWdoZXIgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtCQAAZAAAAAIJAQAAABpnZXRWYWx1ZVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIFAAAACHN1cHBsaWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAKZ2V0S2V5SXRlbQAAAAIFAAAACHN1cHBsaWVyBQAAAARpdGVtBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtBQAAAAhpdGVtTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleVVzZXJOYW1lAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtBQAAAAx1c2VyRG9jdW1lbnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAxnZXRLZXlJc3N1ZXIAAAABBQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAANZ2V0S2V5UHJvamVjdAAAAAEFAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAACmdldEtleU5vZG8AAAABBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZUaWVuZGEFAAAACHN1cHBsaWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABZBcG95byBFY29sw7NnaWNvLCB3dmxzBQAAAAt0b3RhbEFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAfMSBCaXQtQ08yIFByZWNpbyBOb21pbmFsLCBldXJvcwUAAAAFYmNvMmUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAIjEgQml0LUNPMiBQcmVjaW8gY29uIERlc2N0bywgZXVyb3MFAAAADWJjbzJtZW5vc2RjdG8JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAHVN1VG90YWwgYSBkaXN0cmlidWlyLCBiaXQtY28yBQAAAAlzdWJUb3RhbGIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0FAAAAA3BJdwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACWdldEtleU5JdwAAAAEFAAAABGl0ZW0FAAAAA2VJdwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQUAAAADdUliCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5U0kAAAABBQAAAARpdGVtBQAAAANzSWIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAlnZXRLZXlOSWIAAAABBQAAAARpdGVtBQAAAANlSWIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOT3JkZXJfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAABhUcmFuc2FjY2nDs24gQ29uZmlybWFkYSEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAC1ByZVRva2VuUXR5BQAAAAtwcmVUb2tlblF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAPYmFsYW5jZVN1cHBsaWVyBQAAAA9iYWxhbmNlU3VwcGxpZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtCQAAZQAAAAIFAAAAC3ByZVRva2VuUXR5CQAAaQAAAAIFAAAADUJhbGFuY2VUaWVuZGEAAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAEcEFkZAUAAAADcEl3BQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAADdUliBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABmlzc3VlcgUAAAADc0liBQAAAAd5Qml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VJdwUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARlQWRkBQAAAANlSWIFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAIAAAAEaXRlbQAAAAZhbW91bnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAACXByZUljb1F0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAJbmV3QW1vdW50CQAAZQAAAAIFAAAACXByZUljb1F0eQUAAAAGYW1vdW50AwkAAGYAAAACAAAAAAAAAAAABQAAAAZhbW91bnQJAAACAAAAAQIAAAArRWwgYmFsYW5jZSBkZSByZXRpcm8gbm8gcHVlZGUgc2VyIG5lZ2F0aXZvIQMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHk9vcHBzcy4uIEluc3VmaWNpZW50ZSBiYWxhbmNlIQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABGl0ZW0FAAAACW5ld0Ftb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAGYW1vdW50BQAAAAd5Qml0Q08yBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAAXQFAAAAByRtYXRjaDAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAABQAAAAtPd25lclB1YktleQMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAElJlaXNzdWVUcmFuc2FjdGlvbgYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBAAAAAFkBQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAGB41SRxo=",
    "height": 1751486,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Bch2fpde518K2zf5qpssW9sBT1Rs3Nho3wYebrYs4abH
Next: Bp6ULWWwGLAmTYBxhhWCr7H7r6834ApbVQqP3pprhiRn

Diff: 
Old New Differences
10 10  let SecondFaseQty = 2745000000
11 11  
12 12  let bits = 10000
13 + 
14 + let wvs = 10000
13 15  
14 16  let NONE = "none"
15 17  
233 235              let subTotal = (totalAmount - ((igv * totalAmount) / 100))
234 236              let pIw = ((pIP * subTotal) / relacdcto)
235 237              let eIw = ((eIP * subTotal) / relacdcto)
236 -             let subTotalb = ((subTotal * usdnw) / (bco2menosdcto * bits))
238 +             let subTotalb = (((subTotal * bits) * usdnw) / (bco2menosdcto * wvs))
237 239              let uIb = ((uBP * subTotalb) / relacdcto)
238 240              let sIb = ((sBP * subTotalb) / relacdcto)
239 241              let eIb = ((eBP * subTotalb) / relacdcto)
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 = 3056930000
7 7  
8 8  let FirstFaseQty = 311930000
9 9  
10 10  let SecondFaseQty = 2745000000
11 11  
12 12  let bits = 10000
13 + 
14 + let wvs = 10000
13 15  
14 16  let NONE = "none"
15 17  
16 18  let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
17 19  
18 20  let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
19 21  
20 22  let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
21 23  
22 24  let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
23 25  
24 26  let igv = 0
25 27  
26 28  let eurou = (116 / 100)
27 29  
28 30  let usdnw = (2539 / 100)
29 31  
30 32  let bco2e = 10
31 33  
32 34  let bitco2u = (eurou * bco2e)
33 35  
34 36  let bitdscto = 3
35 37  
36 38  let bco2menosdcto = (((100 - bitdscto) * bitco2u) / 100)
37 39  
38 40  let pIP = 10
39 41  
40 42  let uBP = 7
41 43  
42 44  let sBP = 2
43 45  
44 46  let eIP = 1
45 47  
46 48  let eBP = 2
47 49  
48 50  let relacdcto = 11
49 51  
50 52  func getNumberByKey (key) = {
51 53      let num =     match getInteger(this, key) {
52 54          case a: Int => 
53 55              a
54 56          case _ => 
55 57              0
56 58      }
57 59      num
58 60      }
59 61  
60 62  
61 63  func getStrByKey (key) = {
62 64      let str =     match getString(this, key) {
63 65          case a: String => 
64 66              a
65 67          case _ => 
66 68              NONE
67 69      }
68 70      str
69 71      }
70 72  
71 73  
72 74  func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
73 75  
74 76  
75 77  func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
76 78  
77 79  
78 80  func getKeyIssuer (item) = "Issuer/Tienda"
79 81  
80 82  
81 83  func getValueIssuer (item) = getStrByKey(getKeyIssuer(item))
82 84  
83 85  
84 86  func getKeyProject (item) = "Project"
85 87  
86 88  
87 89  func getValueProject (item) = getStrByKey(getKeyProject(item))
88 90  
89 91  
90 92  func getKeyNodo (item) = "Nodo"
91 93  
92 94  
93 95  func getValueNodo (item) = getStrByKey(getKeyNodo(item))
94 96  
95 97  
96 98  func getKeyUserItemGtsCounter (user,item) = "Order_№:"
97 99  
98 100  
99 101  func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
100 102  
101 103  
102 104  func getKeyItemName (item) = "Categoría del Producto:"
103 105  
104 106  
105 107  func getValueItemName (item) = getStrByKey(getKeyItemName(item))
106 108  
107 109  
108 110  func getKeyUserName (item) = "Nombre del Usuario:"
109 111  
110 112  
111 113  func getValueUserName (item) = getStrByKey(getKeyUserName(item))
112 114  
113 115  
114 116  func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
115 117  
116 118  
117 119  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
118 120  
119 121  
120 122  func getKeyUI (item) = "UI, bit:"
121 123  
122 124  
123 125  func getValueUI (item) = getNumberByKey(getKeyUI(item))
124 126  
125 127  
126 128  func getKeyPI (item) = "PI, wvls:"
127 129  
128 130  
129 131  func getValuePI (item) = getNumberByKey(getKeyPI(item))
130 132  
131 133  
132 134  func getKeySI (item) = "SI, bit:"
133 135  
134 136  
135 137  func getValueSI (item) = getNumberByKey(getKeySI(item))
136 138  
137 139  
138 140  func getKeyNIb (item) = "NIb, bit:"
139 141  
140 142  
141 143  func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
142 144  
143 145  
144 146  func getKeyNIw (item) = "NIw, wvls:"
145 147  
146 148  
147 149  func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
148 150  
149 151  
150 152  func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
151 153  
152 154  
153 155  func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
154 156  
155 157  
156 158  func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
157 159  
158 160  
159 161  func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
160 162  
161 163  
162 164  func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
163 165  
164 166  
165 167  func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
166 168  
167 169  
168 170  @Callable(i)
169 171  func deposit (title,supplierData) = {
170 172      let pmt = extract(i.payment)
171 173      if ((pmt.assetId != yBitCO2))
172 174          then throw("deposito permitido solo en yBitCO2 tokens")
173 175          else {
174 176              let supplier = toBase58String(i.caller.bytes)
175 177              let currentAmount =             match getInteger(this, supplier) {
176 178                  case a: Int => 
177 179                      a
178 180                  case _ => 
179 181                      startQty
180 182              }
181 183              let newAmount = (currentAmount + pmt.amount)
182 184              if ((0 >= newAmount))
183 185                  then throw("No hay yBitCO2 en su balance")
184 186                  else WriteSet([DataEntry(supplier, newAmount)])
185 187              }
186 188      }
187 189  
188 190  
189 191  
190 192  @Callable(i)
191 193  func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
192 194      let pmt = extract(i.payment)
193 195      if (isDefined(pmt.assetId))
194 196          then throw("El Precio en waves.")
195 197          else {
196 198              let supplier =             match getString(this, getKeyItemSupplier(item)) {
197 199                  case a: String => 
198 200                      a
199 201                  case _ => 
200 202                      NONE
201 203              }
202 204              let issuerAdd =             match getString(this, getKeyIssuer(item)) {
203 205                  case a: String => 
204 206                      a
205 207                  case _ => 
206 208                      issuer
207 209              }
208 210              let projAdd =             match getString(this, getKeyProject(item)) {
209 211                  case a: String => 
210 212                      a
211 213                  case _ => 
212 214                      pAdd
213 215              }
214 216              let nodoAdd =             match getString(this, getKeyNodo(item)) {
215 217                  case a: String => 
216 218                      a
217 219                  case _ => 
218 220                      eAdd
219 221              }
220 222              let preTokenQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
221 223                  case a: Int => 
222 224                      a
223 225                  case _ => 
224 226                      SecondFaseQty
225 227              }
226 228              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
227 229                  case a: Int => 
228 230                      a
229 231                  case _ => 
230 232                      0
231 233              }
232 234              let userAddress = toBase58String(i.caller.bytes)
233 235              let subTotal = (totalAmount - ((igv * totalAmount) / 100))
234 236              let pIw = ((pIP * subTotal) / relacdcto)
235 237              let eIw = ((eIP * subTotal) / relacdcto)
236 -             let subTotalb = ((subTotal * usdnw) / (bco2menosdcto * bits))
238 +             let subTotalb = (((subTotal * bits) * usdnw) / (bco2menosdcto * wvs))
237 239              let uIb = ((uBP * subTotalb) / relacdcto)
238 240              let sIb = ((sBP * subTotalb) / relacdcto)
239 241              let eIb = ((eBP * subTotalb) / relacdcto)
240 242              let BalanceTienda = (balanceSupplier + pmt.amount)
241 243              if ((totalAmount > pmt.amount))
242 244                  then throw("Payment Amount can't be less than item Purchase Order")
243 245                  else if ((pmt.amount > totalAmount))
244 246                      then throw("Payment Amount can't be higher than item Purchase Order")
245 247                      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(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, euros", bco2menosdcto), DataEntry("SuTotal a distribuir, bit-co2", subTotalb), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
246 248              }
247 249      }
248 250  
249 251  
250 252  
251 253  @Callable(i)
252 254  func withdraw (item,amount) = {
253 255      let userAddress = toBase58String(i.caller.bytes)
254 256      let supplier =     match getString(this, getKeyItemSupplier(item)) {
255 257          case a: String => 
256 258              a
257 259          case _ => 
258 260              NONE
259 261      }
260 262      let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
261 263          case a: Int => 
262 264              a
263 265          case _ => 
264 266              startQty
265 267      }
266 268      let newAmount = (preIcoQty - amount)
267 269      if ((0 > amount))
268 270          then throw("El balance de retiro no puede ser negativo!")
269 271          else if ((0 >= newAmount))
270 272              then throw("Ooppss.. Insuficiente balance!")
271 273              else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
272 274      }
273 275  
274 276  
275 277  @Verifier(tx)
276 278  func verify () = match tx {
277 279      case t: SetScriptTransaction => 
278 280          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
279 281      case d: ReissueTransaction|DataTransaction => 
280 282          true
281 283      case tx: TransferTransaction => 
282 284          true
283 285      case _ => 
284 286          false
285 287  }
286 288

Old	New		Differences
10	10		let SecondFaseQty = 2745000000
11	11
12	12		let bits = 10000
	13	+
	14	+	let wvs = 10000
13	15
14	16		let NONE = "none"
15	17

233	235		let subTotal = (totalAmount - ((igv * totalAmount) / 100))
234	236		let pIw = ((pIP * subTotal) / relacdcto)
235	237		let eIw = ((eIP * subTotal) / relacdcto)
236		-	let subTotalb = ((subTotal * usdnw) / (bco2menosdcto * ~~bits~~))
	238	+	let subTotalb = (((subTotal * bits) * usdnw) / (bco2menosdcto * wvs))
237	239		let uIb = ((uBP * subTotalb) / relacdcto)
238	240		let sIb = ((sBP * subTotalb) / relacdcto)
239	241		let eIb = ((eBP * subTotalb) / relacdcto)

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 = 3056930000
7	7
8	8		let FirstFaseQty = 311930000
9	9
10	10		let SecondFaseQty = 2745000000
11	11
12	12		let bits = 10000
	13	+
	14	+	let wvs = 10000
13	15
14	16		let NONE = "none"
15	17
16	18		let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
17	19
18	20		let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
19	21
20	22		let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
21	23
22	24		let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
23	25
24	26		let igv = 0
25	27
26	28		let eurou = (116 / 100)
27	29
28	30		let usdnw = (2539 / 100)
29	31
30	32		let bco2e = 10
31	33
32	34		let bitco2u = (eurou * bco2e)
33	35
34	36		let bitdscto = 3
35	37
36	38		let bco2menosdcto = (((100 - bitdscto) * bitco2u) / 100)
37	39
38	40		let pIP = 10
39	41
40	42		let uBP = 7
41	43
42	44		let sBP = 2
43	45
44	46		let eIP = 1
45	47
46	48		let eBP = 2
47	49
48	50		let relacdcto = 11
49	51
50	52		func getNumberByKey (key) = {
51	53		let num = match getInteger(this, key) {
52	54		case a: Int =>
53	55		a
54	56		case _ =>
55	57		0
56	58		}
57	59		num
58	60		}
59	61
60	62
61	63		func getStrByKey (key) = {
62	64		let str = match getString(this, key) {
63	65		case a: String =>
64	66		a
65	67		case _ =>
66	68		NONE
67	69		}
68	70		str
69	71		}
70	72
71	73
72	74		func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
73	75
74	76
75	77		func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
76	78
77	79
78	80		func getKeyIssuer (item) = "Issuer/Tienda"
79	81
80	82
81	83		func getValueIssuer (item) = getStrByKey(getKeyIssuer(item))
82	84
83	85
84	86		func getKeyProject (item) = "Project"
85	87
86	88
87	89		func getValueProject (item) = getStrByKey(getKeyProject(item))
88	90
89	91
90	92		func getKeyNodo (item) = "Nodo"
91	93
92	94
93	95		func getValueNodo (item) = getStrByKey(getKeyNodo(item))
94	96
95	97
96	98		func getKeyUserItemGtsCounter (user,item) = "Order_№:"
97	99
98	100
99	101		func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
100	102
101	103
102	104		func getKeyItemName (item) = "Categoría del Producto:"
103	105
104	106
105	107		func getValueItemName (item) = getStrByKey(getKeyItemName(item))
106	108
107	109
108	110		func getKeyUserName (item) = "Nombre del Usuario:"
109	111
110	112
111	113		func getValueUserName (item) = getStrByKey(getKeyUserName(item))
112	114
113	115
114	116		func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
115	117
116	118
117	119		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
118	120
119	121
120	122		func getKeyUI (item) = "UI, bit:"
121	123
122	124
123	125		func getValueUI (item) = getNumberByKey(getKeyUI(item))
124	126
125	127
126	128		func getKeyPI (item) = "PI, wvls:"
127	129
128	130
129	131		func getValuePI (item) = getNumberByKey(getKeyPI(item))
130	132
131	133
132	134		func getKeySI (item) = "SI, bit:"
133	135
134	136
135	137		func getValueSI (item) = getNumberByKey(getKeySI(item))
136	138
137	139
138	140		func getKeyNIb (item) = "NIb, bit:"
139	141
140	142
141	143		func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
142	144
143	145
144	146		func getKeyNIw (item) = "NIw, wvls:"
145	147
146	148
147	149		func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
148	150
149	151
150	152		func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
151	153
152	154
153	155		func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
154	156
155	157
156	158		func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
157	159
158	160
159	161		func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
160	162
161	163
162	164		func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
163	165
164	166
165	167		func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
166	168
167	169
168	170		@Callable(i)
169	171		func deposit (title,supplierData) = {
170	172		let pmt = extract(i.payment)
171	173		if ((pmt.assetId != yBitCO2))
172	174		then throw("deposito permitido solo en yBitCO2 tokens")
173	175		else {
174	176		let supplier = toBase58String(i.caller.bytes)
175	177		let currentAmount = match getInteger(this, supplier) {
176	178		case a: Int =>
177	179		a
178	180		case _ =>
179	181		startQty
180	182		}
181	183		let newAmount = (currentAmount + pmt.amount)
182	184		if ((0 >= newAmount))
183	185		then throw("No hay yBitCO2 en su balance")
184	186		else WriteSet([DataEntry(supplier, newAmount)])
185	187		}
186	188		}
187	189
188	190
189	191
190	192		@Callable(i)
191	193		func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
192	194		let pmt = extract(i.payment)
193	195		if (isDefined(pmt.assetId))
194	196		then throw("El Precio en waves.")
195	197		else {
196	198		let supplier = match getString(this, getKeyItemSupplier(item)) {
197	199		case a: String =>
198	200		a
199	201		case _ =>
200	202		NONE
201	203		}
202	204		let issuerAdd = match getString(this, getKeyIssuer(item)) {
203	205		case a: String =>
204	206		a
205	207		case _ =>
206	208		issuer
207	209		}
208	210		let projAdd = match getString(this, getKeyProject(item)) {
209	211		case a: String =>
210	212		a
211	213		case _ =>
212	214		pAdd
213	215		}
214	216		let nodoAdd = match getString(this, getKeyNodo(item)) {
215	217		case a: String =>
216	218		a
217	219		case _ =>
218	220		eAdd
219	221		}
220	222		let preTokenQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
221	223		case a: Int =>
222	224		a
223	225		case _ =>
224	226		SecondFaseQty
225	227		}
226	228		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
227	229		case a: Int =>
228	230		a
229	231		case _ =>
230	232		0
231	233		}
232	234		let userAddress = toBase58String(i.caller.bytes)
233	235		let subTotal = (totalAmount - ((igv * totalAmount) / 100))
234	236		let pIw = ((pIP * subTotal) / relacdcto)
235	237		let eIw = ((eIP * subTotal) / relacdcto)
236		-	let subTotalb = ((subTotal * usdnw) / (bco2menosdcto * ~~bits~~))
	238	+	let subTotalb = (((subTotal * bits) * usdnw) / (bco2menosdcto * wvs))
237	239		let uIb = ((uBP * subTotalb) / relacdcto)
238	240		let sIb = ((sBP * subTotalb) / relacdcto)
239	241		let eIb = ((eBP * subTotalb) / relacdcto)
240	242		let BalanceTienda = (balanceSupplier + pmt.amount)
241	243		if ((totalAmount > pmt.amount))
242	244		then throw("Payment Amount can't be less than item Purchase Order")
243	245		else if ((pmt.amount > totalAmount))
244	246		then throw("Payment Amount can't be higher than item Purchase Order")
245	247		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(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, euros", bco2menosdcto), DataEntry("SuTotal a distribuir, bit-co2", subTotalb), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
246	248		}
247	249		}
248	250
249	251
250	252
251	253		@Callable(i)
252	254		func withdraw (item,amount) = {
253	255		let userAddress = toBase58String(i.caller.bytes)
254	256		let supplier = match getString(this, getKeyItemSupplier(item)) {
255	257		case a: String =>
256	258		a
257	259		case _ =>
258	260		NONE
259	261		}
260	262		let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
261	263		case a: Int =>
262	264		a
263	265		case _ =>
264	266		startQty
265	267		}
266	268		let newAmount = (preIcoQty - amount)
267	269		if ((0 > amount))
268	270		then throw("El balance de retiro no puede ser negativo!")
269	271		else if ((0 >= newAmount))
270	272		then throw("Ooppss.. Insuficiente balance!")
271	273		else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
272	274		}
273	275
274	276
275	277		@Verifier(tx)
276	278		func verify () = match tx {
277	279		case t: SetScriptTransaction =>
278	280		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
279	281		case d: ReissueTransaction\|DataTransaction =>
280	282		true
281	283		case tx: TransferTransaction =>
282	284		true
283	285		case _ =>
284	286		false
285	287		}
286	288

github/deemru/w8io/169f3d6 
53.52 ms ◑