w8 · tx · 3mK···Vio

tx · 3mKbbnXGGUDc1mMLarRf9DLPSQrUMN7cchvDqFzxoVio

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.18 12:47 [1751556] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3mKbbnXGGUDc1mMLarRf9DLPSQrUMN7cchvDqFzxoVio",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1634550442814,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "5wHQjzwsQGQ9LfbD5vQdo3VJ6CYaygMDUFhhQr4mASrixXixh6gDzDkjPjaGD7pK5RDEPVpoXoCy6m9ouRWH3mJB"
    ],
    "script": "base64:AAIDAAAAAAAAABcIARIECgIICBIHCgUICAgIARIECgIIAQAAADUAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAtjUM0AAAAAAMRmlyc3RGYXNlUXR5AAAAAAASl6yQAAAAAA1TZWNvbmRGYXNlUXR5AAAAAACjnWBAAAAAAAROT05FAgAAAARub25lAAAAAAtPd25lclB1YktleQEAAAAgdiWBR/bYuTfu7hq3cysJa14Q3mfrzJBzirlSbXhIDw8AAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLGfyy1r0onBhV5KbTmujr+1cm+CidoWkwAAAAAEZUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVJl9LDPuC4uFUEENum3we4/11P1VuB5sVwAAAAAEcEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEOlrjWInpptJ9aV0memID9lDjKQsHSkagAAAAAFZXVyb3UAAAAAAAAAAHQAAAAABXVzZG53AAAAAAAAAAnrAAAAAAViY28yZQAAAAAAAAGGoAAAAAAIYml0ZHNjdG8AAAAAAAAAAAMAAAAAA3BJUAAAAAAAAAAACgAAAAADdUJQAAAAAAAAAAAHAAAAAANzQlAAAAAAAAAAAAIAAAAAA2VJUAAAAAAAAAAAAQAAAAADZUJQAAAAAAAAAAACAAAAAAlyZWxhY2RjdG8AAAAAAAAAAAsBAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAUVmVuZGVkb3IsIExpbWEtUGVyw7oBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACAgAAAA5Qcm9kdWN0by1HVFM6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQAAAARpdGVtAgAAAA1Jc3N1ZXIvVGllbmRhAQAAAA5nZXRWYWx1ZUlzc3VlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADGdldEtleUlzc3VlcgAAAAEFAAAABGl0ZW0BAAAADWdldEtleVByb2plY3QAAAABAAAABGl0ZW0CAAAAB1Byb2plY3QBAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtAQAAAApnZXRLZXlOb2RvAAAAAQAAAARpdGVtAgAAAAROb2RvAQAAAAxnZXRWYWx1ZU5vZG8AAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0CAAAACk9yZGVyX+KEljoBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEAAAAEaXRlbQIAAAAYQ2F0ZWdvcsOtYSBkZWwgUHJvZHVjdG86AQAAABBnZXRWYWx1ZUl0ZW1OYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEAAAAEaXRlbQIAAAATTm9tYnJlIGRlbCBVc3VhcmlvOgEAAAAQZ2V0VmFsdWVVc2VyTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleVVzZXJOYW1lAAAAAQUAAAAEaXRlbQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQAAAARpdGVtAgAAACPihJYgZGUgRG9jdW1lbnRvIC8gRE5JIGRlbCBVc3VhcmlvOgEAAAAUZ2V0VmFsdWVVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlVSQAAAAEAAAAEaXRlbQIAAAAIVUksIGJpdDoBAAAACmdldFZhbHVlVUkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVBJAAAAAQAAAARpdGVtAgAAAAlQSSwgd3ZsczoBAAAACmdldFZhbHVlUEkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlQSQAAAAEFAAAABGl0ZW0BAAAACGdldEtleVNJAAAAAQAAAARpdGVtAgAAAAhTSSwgYml0OgEAAAAKZ2V0VmFsdWVTSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQEAAAAJZ2V0S2V5TkliAAAAAQAAAARpdGVtAgAAAAlOSWIsIGJpdDoBAAAAC2dldFZhbHVlTkliAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAJZ2V0S2V5TkliAAAAAQUAAAAEaXRlbQEAAAAJZ2V0S2V5Tkl3AAAAAQAAAARpdGVtAgAAAApOSXcsIHd2bHM6AQAAAAtnZXRWYWx1ZU5JdwAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JdwAAAAEFAAAABGl0ZW0BAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtAgAAADRUb2tlbnMgT2ZlcnRhZG9zIGVuIGxhIHByZXNlbnRlIGV0YXBhIC8gU2FsZG8sIHl0b2s6AQAAAB9nZXRWYWx1ZVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAG0JhbGFuY2UvU2FsZG8gR1RTLCB5dG9rZW5zOgEAAAAaZ2V0VmFsdWVCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyAgAAABxJbmdyZXNvcyBwb3IgVmVudGFHVFMsIHd2bHM6AQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgAAAAMAAAABaQEAAAAHZGVwb3NpdAAAAAIAAAAFdGl0bGUAAAAMc3VwcGxpZXJEYXRhBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHeUJpdENPMgkAAAIAAAABAgAAAClkZXBvc2l0byBwZXJtaXRpZG8gc29sbyBlbiB5Qml0Q08yIHRva2VucwQAAAAIc3VwcGxpZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANY3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAhzdGFydFF0eQQAAAAJbmV3QW1vdW50CQAAZAAAAAIFAAAADWN1cnJlbnRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50AwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAcTm8gaGF5IHlCaXRDTzIgZW4gc3UgYmFsYW5jZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAIc3VwcGxpZXIFAAAACW5ld0Ftb3VudAUAAAADbmlsAAAAAWkBAAAAC3B1cmNoYXNlR1RTAAAABQAAAARpdGVtAAAACGl0ZW1OYW1lAAAACHVzZXJOYW1lAAAADHVzZXJEb2N1bWVudAAAAAt0b3RhbEFtb3VudAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAE0VsIFByZWNpbyBlbiB3YXZlcy4EAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAACWlzc3VlckFkZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAZpc3N1ZXIEAAAAB3Byb2pBZGQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABHBBZGQEAAAAB25vZG9BZGQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAACmdldEtleU5vZG8AAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABGVBZGQEAAAAC3ByZVRva2VuUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAADVNlY29uZEZhc2VRdHkEAAAAD2JhbGFuY2VTdXBwbGllcgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3ViVG90YWwFAAAAC3RvdGFsQW1vdW50BAAAAANwSXcJAABpAAAAAgkAAGgAAAACBQAAAANwSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAAA2VJdwkAAGkAAAACCQAAaAAAAAIFAAAAA2VJUAUAAAAIc3ViVG90YWwFAAAACXJlbGFjZGN0bwQAAAANYmNvMm1lbm9zZGN0bwkAAGkAAAACCQAAaAAAAAIJAABoAAAAAgkAAGUAAAACAAAAAAAAAABkBQAAAAhiaXRkc2N0bwUAAAAFZXVyb3UFAAAABWJjbzJlAAAAAAAAACcQBAAAAAlzdWJUb3RhbGIJAABpAAAAAgkAAGkAAAACCQAAaAAAAAIFAAAAC3RvdGFsQW1vdW50BQAAAAV1c2RudwAAAAAAAAAAZAUAAAANYmNvMm1lbm9zZGN0bwQAAAADdUliCQAAaQAAAAIJAABoAAAAAgUAAAADdUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADc0liCQAAaQAAAAIJAABoAAAAAgUAAAADc0JQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAADZUliCQAAaQAAAAIJAABoAAAAAgUAAAADZUJQBQAAAAlzdWJUb3RhbGIFAAAACXJlbGFjZGN0bwQAAAANQmFsYW5jZVRpZW5kYQkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50AwkAAGYAAAACBQAAAAt0b3RhbEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA1UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgbGVzcyB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIDCQAAZgAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAt0b3RhbEFtb3VudAkAAAIAAAABAgAAADdQYXltZW50IEFtb3VudCBjYW4ndCBiZSBoaWdoZXIgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtCQAAZAAAAAIJAQAAABpnZXRWYWx1ZVVzZXJJdGVtR3RzQ291bnRlcgAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAARpdGVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIFAAAACHN1cHBsaWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAKZ2V0S2V5SXRlbQAAAAIFAAAACHN1cHBsaWVyBQAAAARpdGVtBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtBQAAAAhpdGVtTmFtZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleVVzZXJOYW1lAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtBQAAAAx1c2VyRG9jdW1lbnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAxnZXRLZXlJc3N1ZXIAAAABBQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAANZ2V0S2V5UHJvamVjdAAAAAEFAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAACmdldEtleU5vZG8AAAABBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZUaWVuZGEFAAAACHN1cHBsaWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAR1c2RuBQAAAAV1c2RudwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAFZXVyb3UFAAAABWV1cm91CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAABZBcG95byBFY29sw7NnaWNvLCB3dmxzBQAAAAt0b3RhbEFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAnMSBCaXQtQ08yIFByZWNpbyBOb21pbmFsLCBldXJvcyB4IDEwZS0yBQAAAAViY28yZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAqMSBCaXQtQ08yIFByZWNpbyBjb24gRGVzY3RvLCBldXJvcyB4IDEwZS0yBQAAAA1iY28ybWVub3NkY3RvCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAB5TdWJUb3RhbCBhIGRpc3RyaWJ1aXIsIGJpdC1jbzIFAAAACXN1YlRvdGFsYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAADcEl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAJZ2V0S2V5Tkl3AAAAAQUAAAAEaXRlbQUAAAADZUl3CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAN1SWIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAA3NJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACWdldEtleU5JYgAAAAEFAAAABGl0ZW0FAAAAA2VJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA5PcmRlcl9TdGF0dXM6XwUAAAALdXNlckFkZHJlc3MCAAAAGFRyYW5zYWNjacOzbiBDb25maXJtYWRhIQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAALUHJlVG9rZW5RdHkFAAAAC3ByZVRva2VuUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAA9iYWxhbmNlU3VwcGxpZXIFAAAAD2JhbGFuY2VTdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAANYmFsYW5jZVRpZW5kYQUAAAANQmFsYW5jZVRpZW5kYQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0JAABlAAAAAgUAAAALcHJlVG9rZW5RdHkJAABpAAAAAgUAAAANQmFsYW5jZVRpZW5kYQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARwQWRkBQAAAANwSXcFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAN1SWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAGaXNzdWVyBQAAAANzSWIFAAAAB3lCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAEZUFkZAUAAAADZUl3BQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABGVBZGQFAAAAA2VJYgUAAAAHeUJpdENPMgUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAgAAAARpdGVtAAAABmFtb3VudAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAACtFbCBiYWxhbmNlIGRlIHJldGlybyBubyBwdWVkZSBzZXIgbmVnYXRpdm8hAwkAAGcAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAAeT29wcHNzLi4gSW5zdWZpY2llbnRlIGJhbGFuY2UhCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEaXRlbQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB3lCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYHBuZehA==",
    "height": 1751556,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7GrrNFK6jn2GLyArjpwyNKuWnfGAe8tn1QiXqnBTuHc8
Next: 7ufMijtjrURN5UQyN5QYAZpFcpxxxqTP7QH1w9qM6Xc3

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

Old	New		Differences
8	8		let FirstFaseQty = 311930000
9	9
10	10		let SecondFaseQty = 2745000000
11		-
12		-	let bits = 10000
13		-
14		-	let wvs = 10000
15	11
16	12		let NONE = "none"
17	13

27	23
28	24		let usdnw = 2539
29	25
30		-	let bco2e = ~~1000~~
	26	+	let bco2e = 100000
31	27
32	28		let bitdscto = 3
33	29

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

github/deemru/w8io/169f3d6 
40.53 ms ◑