tx · 9EGeZfG5yuHZ1tJbQ7cgGUB5htx2CbQPFJT1HnxJo323

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01400000 Waves

2020.08.27 23:50 [1151624] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9EGeZfG5yuHZ1tJbQ7cgGUB5htx2CbQPFJT1HnxJo323",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1598561431039,
    "version": 1,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "4vdMeYhxf9fugigZDSU14Q4miDEvENMQJz66aJPNUiSSDTTDBPKrVwH7MQ7ccarwpGEF4CBRDAeMhLyyh4eUpDqC"
    ],
    "script": "base64:AAIDAAAAAAAAABcIARIECgIICBIHCgUICAgIARIECgIIAQAAAC0AAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAtjUM0AAAAAAMRmlyc3RGYXNlUXR5AAAAAAASl6yQAAAAAA1TZWNvbmRGYXNlUXR5AAAAAACjnWBAAAAAAAhub21QcmljZQAAAAAAAAAAAQAAAAADd3ZzAAAAAAAF9eEAAAAAABBzdXBwbGllckRpc2NvdW50AAAAAAAAAAAMAAAAAAROT05FAgAAAARub25lAAAAAAtPd25lclB1YktleQEAAAAgdiWBR/bYuTfu7hq3cysJa14Q3mfrzJBzirlSbXhIDw8AAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLGfyy1r0onBhV5KbTmujr+1cm+CidoWkwAAAAAEZUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVJl9LDPuC4uFUEENum3we4/11P1VuB5sVwAAAAAEcEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEOlrjWInpptJ9aV0memID9lDjKQsHSkagAAAAADaWd2AAAAAAAAAAASAAAAAAVFdXJvVwAAAAAAAehIAAAAAAAHeWJpdGNvMgkAAGkAAAACCQAAaAAAAAIAAAAAAAAAAAEFAAAABUV1cm9XAAAAAAAAACcQAAAAAAN1SVAAAAAAAAAAAAcAAAAAA3BJUAAAAAAAAAAACgAAAAADZUlQAAAAAAAAAAABAAAAAANzQlAAAAAAAAAAAAIAAAAAA2VCUAAAAAAAAAAAAgEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQABLAAAAAIFAAAACHN1cHBsaWVyAgAAABhCaXQtQ08yIFNob3AsIExpbWEtUGVyw7oBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACAgAAAA5Qcm9kdWN0by1HVFM6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQEAAAANZ2V0S2V5UHJvamVjdAAAAAEAAAAEaXRlbQIAAAAHUHJvamVjdAEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0CAAAACk9yZGVyX+KEljoBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEAAAAEaXRlbQIAAAAYQ2F0ZWdvcsOtYSBkZWwgUHJvZHVjdG86AQAAABBnZXRWYWx1ZUl0ZW1OYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEAAAAEaXRlbQIAAAATTm9tYnJlIGRlbCBVc3VhcmlvOgEAAAAQZ2V0VmFsdWVVc2VyTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleVVzZXJOYW1lAAAAAQUAAAAEaXRlbQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQAAAARpdGVtAgAAACPihJYgZGUgRG9jdW1lbnRvIC8gRE5JIGRlbCBVc3VhcmlvOgEAAAAUZ2V0VmFsdWVVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEAAAAEaXRlbQIAAAA0VG9rZW5zIE9mZXJ0YWRvcyBlbiBsYSBwcmVzZW50ZSBldGFwYSAvIFNhbGRvLCB5dG9rOgEAAAAfZ2V0VmFsdWVTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtAgAAABtCYWxhbmNlL1NhbGRvIEdUUywgeXRva2VuczoBAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAcSW5ncmVzb3MgcG9yIFZlbnRhR1RTLCB3dmxzOgEAAAAXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIBAAAACGdldEtleVVJAAAAAQAAAARpdGVtAgAAAAlVSSxfd3ZsczoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAlQSSxfd3ZsczoBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAAAlTSSxfd3ZsczoBAAAACmdldFZhbHVlU0kAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0AAAADAAAAAWkBAAAAB2RlcG9zaXQAAAACAAAABXRpdGxlAAAADHN1cHBsaWVyRGF0YQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB3lCaXRDTzIJAAACAAAAAQIAAAApZGVwb3NpdG8gcGVybWl0aWRvIHNvbG8gZW4geUJpdENPMiB0b2tlbnMEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHE5vIGhheSB5Qml0Q08yIGVuIHN1IGJhbGFuY2UJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAUAAAAEaXRlbQAAAAhpdGVtTmFtZQAAAAh1c2VyTmFtZQAAAAx1c2VyRG9jdW1lbnQAAAALdG90YWxBbW91bnQEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABNFbCBQcmVjaW8gZW4gd2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAdwcm9qQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAARwQWRkBAAAAAdub2RvQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAARlQWRkBAAAAAtwcmVUb2tlblF0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAA1TZWNvbmRGYXNlUXR5BAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsCQAAZQAAAAIFAAAAC3RvdGFsQW1vdW50CQAAaQAAAAIJAABoAAAAAgUAAAADaWd2BQAAAAt0b3RhbEFtb3VudAAAAAAAAAAAZAQAAAADY1BCCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAAWAUAAAAHeWJpdGNvMgAAAAAAAAAAZAQAAAACdUkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADdUlQAAAAAAAAAABkBAAAAAN1QkkJAABoAAAAAgkAAGkAAAACBQAAAAJ1SQUAAAADY1BCAAAAAAAAAAABBAAAAAJwSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANwSVAAAAAAAAAAAGQEAAAAAmVJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA2VJUAAAAAAAAAAAZAQAAAADZUJJCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADZUJQCQAAaAAAAAIAAAAAAAAAAGQFAAAAA2NQQgAAAAAAAAAAAQQAAAACc0kJAABlAAAAAgkAAGUAAAACBQAAAAt0b3RhbEFtb3VudAUAAAACcEkFAAAAAmVJBAAAAANzQkkJAABoAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANzQlAJAABoAAAAAgAAAAAAAAAAZAUAAAADY1BCAAAAAAAAAAABBAAAAApRVmVudGFzZ3RzCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAAAAAAAAAAACwkAAGgAAAACBQAAAANjUEIAAAAAAAAAAGQAAAAAAAAAAAEDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQYXltZW50IEFtb3VudCBjYW4ndCBiZSBsZXNzIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RvdGFsQW1vdW50CQAAAgAAAAECAAAAN1BheW1lbnQgQW1vdW50IGNhbid0IGJlIGhpZ2hlciB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0JAABkAAAAAgkBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlJdGVtAAAAAgUAAAAIc3VwcGxpZXIFAAAABGl0ZW0FAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEFAAAABGl0ZW0FAAAACGl0ZW1OYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5VXNlck5hbWUAAAABBQAAAARpdGVtBQAAAAh1c2VyTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0FAAAADHVzZXJEb2N1bWVudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAUUGF5bWVudF9hbW91bnQsX3d2bHMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZJbXAsICUFAAAAA2lndgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAKU1R0bCwgd3ZscwUAAAAIc3ViVG90YWwJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAADENQIDEgQiwgd3ZscwkAAGgAAAACBQAAAANjUEIAAAAAAAAAJxAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0FAAAAAnVJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABJVQkksIDEwZS00IHliaXRjbzIFAAAAA3VCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAACcEkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAC0VjU3lzLCB3dmxzBQAAAAJlSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAURWNTeXMsIDEwZS00IHliaXRjbzIFAAAAA2VCSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQUAAAACc0kJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAElNCSSwgMTBlLTQgeWJpdGNvMgUAAAADc0JJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADk9yZGVyX1N0YXR1czpfBQAAAAt1c2VyQWRkcmVzcwIAAAAYQWRxdWlzaWNpw7NuIENvbmZpcm1hZGEhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABxRcG9yVmVudGFzR1RTLCAxMGUtNCB5Yml0Y28yBQAAAApRVmVudGFzZ3RzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQkAAGUAAAACBQAAAA1TZWNvbmRGYXNlUXR5CQAAaQAAAAIFAAAAClFWZW50YXNndHMAAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAtwcmVUb2tlblF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0JAABlAAAAAgUAAAALcHJlVG9rZW5RdHkJAABpAAAAAgUAAAAKUVZlbnRhc2d0cwAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAA3VCSQUAAAAHeUJpdENPMgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARwQWRkBQAAAAJwSQUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARlQWRkBQAAAAJlSQUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARlQWRkBQAAAANlQkkFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAGaXNzdWVyBQAAAAJzSQUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAZpc3N1ZXIFAAAAA3NCSQUAAAAHeUJpdENPMgUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAgAAAARpdGVtAAAABmFtb3VudAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAACtFbCBiYWxhbmNlIGRlIHJldGlybyBubyBwdWVkZSBzZXIgbmVnYXRpdm8hAwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAeT29wcHNzLi4gSW5zdWZpY2llbnRlIGJhbGFuY2UhCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEaXRlbQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPRGF0YVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABJSZWlzc3VlVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMHiI4mlw==",
    "chainId": 84,
    "height": 1151624,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2BB3hMbB82JcoMGWzPmr88huzyCAyMPofH7z89aGHJmW
Next: 4uvcpw36vpFqy7H5yvkm3YWLB4hmz9NMXEUJA2siGntc

Diff: 
Old
New
Differences
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5
-
6
-
let gts01 = base58'Ef4H3AHkfucmc4AY9au2DhgXAorKyWx3aMsfYLMYZGAw'
7
5
 
8
6
 
let startQty = 3056930000
9
7
 
10
8
 
let FirstFaseQty = 311930000
11
9
 
12
10
 
let SecondFaseQty = 2745000000
13
-
14
-
let startQtyGTS = 3056930000
15
-
16
-
let FirstFaseQtyGTS = 311930000
17
-
18
-
let SecondFaseQtyGTS = 2745000000
19
11
 
20
12
 
let nomPrice = 1
21
13
 
35
27
 
36
28
 
let igv = 18
37
29
 
38
-
let ybitco2 = 10000
30
+
let EuroW = 32000000
39
31
 
40
-
let gts = 100000
32
+
let ybitco2 = ((1 * EuroW) / 10000)
41
33
 
42
34
 
let uIP = 7
43
35
 
48
40
 
let sBP = 2
49
41
 
50
42
 
let eBP = 2
51
-
52
-
let eGP = 2
53
-
54
-
let sGP = 2
55
43
 
56
44
 
func getNumberByKey (key) = {
57
45
 
    let num =     match getInteger(this, key) {
84
72
 
func getKeyProject (item) = "Project"
85
73
 
86
74
 
87
-
func getKeyEcosystNode (item) = "Nodo del Ecosistema"
88
-
89
-
90
75
 
func getKeyUserItemGtsCounter (user,item) = "Order_№:"
91
76
 
92
77
 
111
96
 
func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
112
97
 
113
98
 
114
-
func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, gts-tokens:"
99
+
func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
100
+
101
+
102
+
func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
103
+
104
+
105
+
func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
115
106
 
116
107
 
117
108
 
func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
118
109
 
119
110
 
120
-
func getKeyBalanceSupplier (supplier) = "Monto Bruto por VentaGTS, yBitCO2cents:"
111
+
func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
121
112
 
122
113
 
123
114
 
func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
124
115
 
125
116
 
126
-
func getKeyUI (item) = "UI,_yBitCO2cents:"
117
+
func getKeyUI (item) = "UI,_wvls:"
127
118
 
128
119
 
129
120
 
func getValueUI (item) = getNumberByKey(getKeyUI(item))
130
121
 
131
122
 
132
-
func getKeyPI (item) = "PI,_yBitCO2cents:"
123
+
func getKeyPI (item) = "PI,_wvls:"
133
124
 
134
125
 
135
126
 
func getValuePI (item) = getNumberByKey(getKeyPI(item))
136
127
 
137
128
 
138
-
func getKeySI (item) = "SI,_yBitCO2cents:"
129
+
func getKeySI (item) = "SI,_wvls:"
139
130
 
140
131
 
141
132
 
func getValueSI (item) = getNumberByKey(getKeySI(item))
142
133
 
143
134
 
144
135
 
@Callable(i)
145
-
func depositGTS (title,supplierData) = {
136
+
func deposit (title,supplierData) = {
146
137
 
    let pmt = extract(i.payment)
147
-
    if ((pmt.assetId != gts01))
148
-
        then throw("deposito permitido solo en gts01 tokens")
138
+
    if ((pmt.assetId != yBitCO2))
139
+
        then throw("deposito permitido solo en yBitCO2 tokens")
149
140
 
        else {
150
141
 
            let supplier = toBase58String(i.caller.bytes)
151
142
 
            let currentAmount =             match getInteger(this, supplier) {
152
143
 
                case a: Int => 
153
144
 
                    a
154
145
 
                case _ => 
155
-
                    startQtyGTS
146
+
                    startQty
156
147
 
            }
157
148
 
            let newAmount = (currentAmount + pmt.amount)
158
149
 
            if ((0 >= newAmount))
159
-
                then throw("No hay gts01 en su balance")
150
+
                then throw("No hay yBitCO2 en su balance")
160
151
 
                else WriteSet([DataEntry(supplier, newAmount)])
161
152
 
            }
162
153
 
    }
166
157
 
@Callable(i)
167
158
 
func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
168
159
 
    let pmt = extract(i.payment)
169
-
    if ((pmt.assetId != yBitCO2))
170
-
        then throw("Use yBitCO2 tokens para adquirir ProductosGTS")
160
+
    if (isDefined(pmt.assetId))
161
+
        then throw("El Precio en waves.")
171
162
 
        else {
172
163
 
            let supplier =             match getString(this, getKeyItemSupplier(item)) {
173
164
 
                case a: String => 
177
168
 
            }
178
169
 
            let projAdd =             match getString(this, getKeyProject(item)) {
179
170
 
                case a: String => 
180
-
                    NONE
171
+
                    a
181
172
 
                case _ => 
182
173
 
                    pAdd
183
174
 
            }
184
-
            let nodoAdd =             match getString(this, getKeyEcosystNode(item)) {
175
+
            let nodoAdd =             match getString(this, getKeyProject(item)) {
185
176
 
                case a: String => 
186
-
                    NONE
177
+
                    a
187
178
 
                case _ => 
188
179
 
                    eAdd
189
180
 
            }
191
182
 
                case a: Int => 
192
183
 
                    a
193
184
 
                case _ => 
194
-
                    SecondFaseQtyGTS
185
+
                    SecondFaseQty
195
186
 
            }
196
187
 
            let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
197
188
 
                case a: Int => 
201
192
 
            }
202
193
 
            let userAddress = toBase58String(i.caller.bytes)
203
194
 
            let subTotal = (totalAmount - ((igv * totalAmount) / 100))
204
-
            let cPG = ((88 * gts) / 100)
195
+
            let cPB = ((88 * ybitco2) / 100)
205
196
 
            let uI = ((subTotal * uIP) / 100)
206
-
            let uGI = ((uI * 10000) / cPG)
197
+
            let uBI = ((uI / cPB) * 1)
207
198
 
            let pI = ((subTotal * pIP) / 100)
208
199
 
            let eI = ((subTotal * eIP) / 100)
209
-
            let eGI = (((subTotal * eGP) * 10000) / (100 * cPG))
200
+
            let eBI = (((subTotal * eBP) / (100 * cPB)) * 1)
210
201
 
            let sI = ((totalAmount - pI) - eI)
211
-
            let sGI = (((subTotal * sGP) * 10000) / (100 * cPG))
212
-
            let QVentasgts = (((subTotal * 11) * 10000) / (cPG * 100))
202
+
            let sBI = (((subTotal * sBP) / (100 * cPB)) * 1)
203
+
            let QVentasgts = (((subTotal * 11) / (cPB * 100)) * 1)
213
204
 
            if ((totalAmount > pmt.amount))
214
205
 
                then throw("Payment Amount can't be less than item Purchase Order")
215
206
 
                else if ((pmt.amount > totalAmount))
216
207
 
                    then throw("Payment Amount can't be higher than item Purchase Order")
217
-
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_yBitCO2cents", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, yBitCO2cents", subTotal), DataEntry("CP 1GTS, yBitCO2cents", (cPG * 1)), DataEntry(getKeyUI(item), uI), DataEntry("UGI, 10e-4 gts01", uGI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, yBitCO2cents", eI), DataEntry("EcSys, 10e-4 gts01", eGI), DataEntry(getKeySI(item), sI), DataEntry("SGI, 10e-4 gts01", sGI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 gts01", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - QVentasgts)), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uGI, gts01), ScriptTransfer(pAdd, pI, yBitCO2), ScriptTransfer(eAdd, eI, yBitCO2), ScriptTransfer(eAdd, eGI, gts01), ScriptTransfer(issuer, sI, yBitCO2), ScriptTransfer(issuer, sGI, gts01)]))
208
+
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_wvls", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, wvls", subTotal), DataEntry("CP 1 B, wvls", (cPB * 10000)), DataEntry(getKeyUI(item), uI), DataEntry("UBI, 10e-4 ybitco2", uBI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, wvls", eI), DataEntry("EcSys, 10e-4 ybitco2", eBI), DataEntry(getKeySI(item), sI), DataEntry("SBI, 10e-4 ybitco2", sBI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 ybitco2", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (SecondFaseQty - (QVentasgts / 1))), DataEntry(getKeyBalanceQtySupplier(item), preTokenQty), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (QVentasgts / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uBI, yBitCO2), ScriptTransfer(pAdd, pI, unit), ScriptTransfer(eAdd, eI, unit), ScriptTransfer(eAdd, eBI, yBitCO2), ScriptTransfer(issuer, sI, unit), ScriptTransfer(issuer, sBI, yBitCO2)]))
218
209
 
            }
219
210
 
    }
220
211
 
221
212
 
222
213
 
223
214
 
@Callable(i)
224
-
func withdrawGTS (item,amount) = {
215
+
func withdraw (item,amount) = {
225
216
 
    let userAddress = toBase58String(i.caller.bytes)
226
217
 
    let supplier =     match getString(this, getKeyItemSupplier(item)) {
227
218
 
        case a: String => 
233
224
 
        case a: Int => 
234
225
 
            a
235
226
 
        case _ => 
236
-
            startQtyGTS
227
+
            startQty
237
228
 
    }
238
229
 
    let newAmount = (preIcoQty - amount)
239
230
 
    if ((0 > amount))
240
231
 
        then throw("El balance de retiro no puede ser negativo!")
241
232
 
        else if ((0 >= newAmount))
242
233
 
            then throw("Ooppss.. Insuficiente balance!")
243
-
            else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, gts01)]))
234
+
            else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
244
235
 
    }
245
236
 
246
237
 
253
244
 
    case tx: TransferTransaction => 
254
245
 
        true
255
246
 
    case tx: ExchangeTransaction => 
256
-
        let withyBitCO2 = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
247
+
        let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
257
248
 
            then true
258
249
 
            else !(isDefined(tx.sellOrder.assetPair.amountAsset))
259
-
        withyBitCO2
250
+
        withWaves
260
251
 
    case _ => 
261
252
 
        false
262
253
 
}
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
-
6
-
let gts01 = base58'Ef4H3AHkfucmc4AY9au2DhgXAorKyWx3aMsfYLMYZGAw'
7
5
 
8
6
 
let startQty = 3056930000
9
7
 
10
8
 
let FirstFaseQty = 311930000
11
9
 
12
10
 
let SecondFaseQty = 2745000000
13
-
14
-
let startQtyGTS = 3056930000
15
-
16
-
let FirstFaseQtyGTS = 311930000
17
-
18
-
let SecondFaseQtyGTS = 2745000000
19
11
 
20
12
 
let nomPrice = 1
21
13
 
22
14
 
let wvs = 100000000
23
15
 
24
16
 
let supplierDiscount = 12
25
17
 
26
18
 
let NONE = "none"
27
19
 
28
20
 
let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
29
21
 
30
22
 
let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
31
23
 
32
24
 
let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
33
25
 
34
26
 
let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
35
27
 
36
28
 
let igv = 18
37
29
 
38
-
let ybitco2 = 10000
30
+
let EuroW = 32000000
39
31
 
40
-
let gts = 100000
32
+
let ybitco2 = ((1 * EuroW) / 10000)
41
33
 
42
34
 
let uIP = 7
43
35
 
44
36
 
let pIP = 10
45
37
 
46
38
 
let eIP = 1
47
39
 
48
40
 
let sBP = 2
49
41
 
50
42
 
let eBP = 2
51
-
52
-
let eGP = 2
53
-
54
-
let sGP = 2
55
43
 
56
44
 
func getNumberByKey (key) = {
57
45
 
    let num =     match getInteger(this, key) {
58
46
 
        case a: Int => 
59
47
 
            a
60
48
 
        case _ => 
61
49
 
            0
62
50
 
    }
63
51
 
    num
64
52
 
    }
65
53
 
66
54
 
67
55
 
func getStrByKey (key) = {
68
56
 
    let str =     match getString(this, key) {
69
57
 
        case a: String => 
70
58
 
            a
71
59
 
        case _ => 
72
60
 
            NONE
73
61
 
    }
74
62
 
    str
75
63
 
    }
76
64
 
77
65
 
78
66
 
func getKeyItemSupplier (supplier) = (supplier + "Bit-CO2 Shop, Lima-Perú")
79
67
 
80
68
 
81
69
 
func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
82
70
 
83
71
 
84
72
 
func getKeyProject (item) = "Project"
85
73
 
86
74
 
87
-
func getKeyEcosystNode (item) = "Nodo del Ecosistema"
88
-
89
-
90
75
 
func getKeyUserItemGtsCounter (user,item) = "Order_№:"
91
76
 
92
77
 
93
78
 
func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
94
79
 
95
80
 
96
81
 
func getKeyItemName (item) = "Categoría del Producto:"
97
82
 
98
83
 
99
84
 
func getValueItemName (item) = getStrByKey(getKeyItemName(item))
100
85
 
101
86
 
102
87
 
func getKeyUserName (item) = "Nombre del Usuario:"
103
88
 
104
89
 
105
90
 
func getValueUserName (item) = getStrByKey(getKeyUserName(item))
106
91
 
107
92
 
108
93
 
func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
109
94
 
110
95
 
111
96
 
func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
112
97
 
113
98
 
114
-
func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, gts-tokens:"
99
+
func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
100
+
101
+
102
+
func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
103
+
104
+
105
+
func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
115
106
 
116
107
 
117
108
 
func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
118
109
 
119
110
 
120
-
func getKeyBalanceSupplier (supplier) = "Monto Bruto por VentaGTS, yBitCO2cents:"
111
+
func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
121
112
 
122
113
 
123
114
 
func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
124
115
 
125
116
 
126
-
func getKeyUI (item) = "UI,_yBitCO2cents:"
117
+
func getKeyUI (item) = "UI,_wvls:"
127
118
 
128
119
 
129
120
 
func getValueUI (item) = getNumberByKey(getKeyUI(item))
130
121
 
131
122
 
132
-
func getKeyPI (item) = "PI,_yBitCO2cents:"
123
+
func getKeyPI (item) = "PI,_wvls:"
133
124
 
134
125
 
135
126
 
func getValuePI (item) = getNumberByKey(getKeyPI(item))
136
127
 
137
128
 
138
-
func getKeySI (item) = "SI,_yBitCO2cents:"
129
+
func getKeySI (item) = "SI,_wvls:"
139
130
 
140
131
 
141
132
 
func getValueSI (item) = getNumberByKey(getKeySI(item))
142
133
 
143
134
 
144
135
 
@Callable(i)
145
-
func depositGTS (title,supplierData) = {
136
+
func deposit (title,supplierData) = {
146
137
 
    let pmt = extract(i.payment)
147
-
    if ((pmt.assetId != gts01))
148
-
        then throw("deposito permitido solo en gts01 tokens")
138
+
    if ((pmt.assetId != yBitCO2))
139
+
        then throw("deposito permitido solo en yBitCO2 tokens")
149
140
 
        else {
150
141
 
            let supplier = toBase58String(i.caller.bytes)
151
142
 
            let currentAmount =             match getInteger(this, supplier) {
152
143
 
                case a: Int => 
153
144
 
                    a
154
145
 
                case _ => 
155
-
                    startQtyGTS
146
+
                    startQty
156
147
 
            }
157
148
 
            let newAmount = (currentAmount + pmt.amount)
158
149
 
            if ((0 >= newAmount))
159
-
                then throw("No hay gts01 en su balance")
150
+
                then throw("No hay yBitCO2 en su balance")
160
151
 
                else WriteSet([DataEntry(supplier, newAmount)])
161
152
 
            }
162
153
 
    }
163
154
 
164
155
 
165
156
 
166
157
 
@Callable(i)
167
158
 
func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
168
159
 
    let pmt = extract(i.payment)
169
-
    if ((pmt.assetId != yBitCO2))
170
-
        then throw("Use yBitCO2 tokens para adquirir ProductosGTS")
160
+
    if (isDefined(pmt.assetId))
161
+
        then throw("El Precio en waves.")
171
162
 
        else {
172
163
 
            let supplier =             match getString(this, getKeyItemSupplier(item)) {
173
164
 
                case a: String => 
174
165
 
                    a
175
166
 
                case _ => 
176
167
 
                    NONE
177
168
 
            }
178
169
 
            let projAdd =             match getString(this, getKeyProject(item)) {
179
170
 
                case a: String => 
180
-
                    NONE
171
+
                    a
181
172
 
                case _ => 
182
173
 
                    pAdd
183
174
 
            }
184
-
            let nodoAdd =             match getString(this, getKeyEcosystNode(item)) {
175
+
            let nodoAdd =             match getString(this, getKeyProject(item)) {
185
176
 
                case a: String => 
186
-
                    NONE
177
+
                    a
187
178
 
                case _ => 
188
179
 
                    eAdd
189
180
 
            }
190
181
 
            let preTokenQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
191
182
 
                case a: Int => 
192
183
 
                    a
193
184
 
                case _ => 
194
-
                    SecondFaseQtyGTS
185
+
                    SecondFaseQty
195
186
 
            }
196
187
 
            let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
197
188
 
                case a: Int => 
198
189
 
                    a
199
190
 
                case _ => 
200
191
 
                    0
201
192
 
            }
202
193
 
            let userAddress = toBase58String(i.caller.bytes)
203
194
 
            let subTotal = (totalAmount - ((igv * totalAmount) / 100))
204
-
            let cPG = ((88 * gts) / 100)
195
+
            let cPB = ((88 * ybitco2) / 100)
205
196
 
            let uI = ((subTotal * uIP) / 100)
206
-
            let uGI = ((uI * 10000) / cPG)
197
+
            let uBI = ((uI / cPB) * 1)
207
198
 
            let pI = ((subTotal * pIP) / 100)
208
199
 
            let eI = ((subTotal * eIP) / 100)
209
-
            let eGI = (((subTotal * eGP) * 10000) / (100 * cPG))
200
+
            let eBI = (((subTotal * eBP) / (100 * cPB)) * 1)
210
201
 
            let sI = ((totalAmount - pI) - eI)
211
-
            let sGI = (((subTotal * sGP) * 10000) / (100 * cPG))
212
-
            let QVentasgts = (((subTotal * 11) * 10000) / (cPG * 100))
202
+
            let sBI = (((subTotal * sBP) / (100 * cPB)) * 1)
203
+
            let QVentasgts = (((subTotal * 11) / (cPB * 100)) * 1)
213
204
 
            if ((totalAmount > pmt.amount))
214
205
 
                then throw("Payment Amount can't be less than item Purchase Order")
215
206
 
                else if ((pmt.amount > totalAmount))
216
207
 
                    then throw("Payment Amount can't be higher than item Purchase Order")
217
-
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_yBitCO2cents", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, yBitCO2cents", subTotal), DataEntry("CP 1GTS, yBitCO2cents", (cPG * 1)), DataEntry(getKeyUI(item), uI), DataEntry("UGI, 10e-4 gts01", uGI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, yBitCO2cents", eI), DataEntry("EcSys, 10e-4 gts01", eGI), DataEntry(getKeySI(item), sI), DataEntry("SGI, 10e-4 gts01", sGI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 gts01", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - QVentasgts)), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uGI, gts01), ScriptTransfer(pAdd, pI, yBitCO2), ScriptTransfer(eAdd, eI, yBitCO2), ScriptTransfer(eAdd, eGI, gts01), ScriptTransfer(issuer, sI, yBitCO2), ScriptTransfer(issuer, sGI, gts01)]))
208
+
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry("Payment_amount,_wvls", totalAmount), DataEntry("Imp, %", igv), DataEntry("STtl, wvls", subTotal), DataEntry("CP 1 B, wvls", (cPB * 10000)), DataEntry(getKeyUI(item), uI), DataEntry("UBI, 10e-4 ybitco2", uBI), DataEntry(getKeyPI(item), pI), DataEntry("EcSys, wvls", eI), DataEntry("EcSys, 10e-4 ybitco2", eBI), DataEntry(getKeySI(item), sI), DataEntry("SBI, 10e-4 ybitco2", sBI), DataEntry(("Order_Status:_" + userAddress), "Adquisición Confirmada!"), DataEntry("QporVentasGTS, 10e-4 ybitco2", QVentasgts), DataEntry(getKeyBalanceQtySupplier(item), (SecondFaseQty - (QVentasgts / 1))), DataEntry(getKeyBalanceQtySupplier(item), preTokenQty), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (QVentasgts / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(i.caller, uBI, yBitCO2), ScriptTransfer(pAdd, pI, unit), ScriptTransfer(eAdd, eI, unit), ScriptTransfer(eAdd, eBI, yBitCO2), ScriptTransfer(issuer, sI, unit), ScriptTransfer(issuer, sBI, yBitCO2)]))
218
209
 
            }
219
210
 
    }
220
211
 
221
212
 
222
213
 
223
214
 
@Callable(i)
224
-
func withdrawGTS (item,amount) = {
215
+
func withdraw (item,amount) = {
225
216
 
    let userAddress = toBase58String(i.caller.bytes)
226
217
 
    let supplier =     match getString(this, getKeyItemSupplier(item)) {
227
218
 
        case a: String => 
228
219
 
            a
229
220
 
        case _ => 
230
221
 
            NONE
231
222
 
    }
232
223
 
    let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
233
224
 
        case a: Int => 
234
225
 
            a
235
226
 
        case _ => 
236
-
            startQtyGTS
227
+
            startQty
237
228
 
    }
238
229
 
    let newAmount = (preIcoQty - amount)
239
230
 
    if ((0 > amount))
240
231
 
        then throw("El balance de retiro no puede ser negativo!")
241
232
 
        else if ((0 >= newAmount))
242
233
 
            then throw("Ooppss.. Insuficiente balance!")
243
-
            else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, gts01)]))
234
+
            else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
244
235
 
    }
245
236
 
246
237
 
247
238
 
@Verifier(tx)
248
239
 
func verify () = match tx {
249
240
 
    case t: SetScriptTransaction => 
250
241
 
        sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
251
242
 
    case d: DataTransaction|ReissueTransaction => 
252
243
 
        true
253
244
 
    case tx: TransferTransaction => 
254
245
 
        true
255
246
 
    case tx: ExchangeTransaction => 
256
-
        let withyBitCO2 = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
247
+
        let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
257
248
 
            then true
258
249
 
            else !(isDefined(tx.sellOrder.assetPair.amountAsset))
259
-
        withyBitCO2
250
+
        withWaves
260
251
 
    case _ => 
261
252
 
        false
262
253
 
}
263
254
 

github/deemru/w8io/169f3d6 
126.68 ms ◑