w8 · tx · 2L9···FRb

tx · 2L9Yvfhyuxss3yEEn4CMEC1nKzbMhWkPNWBwUW1gMFRb

3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL:  -0.01000000 Waves

2021.10.28 22:19 [1766564] smart account 3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2L9Yvfhyuxss3yEEn4CMEC1nKzbMhWkPNWBwUW1gMFRb",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1635448815104,
    "version": 2,
    "chainId": 84,
    "sender": "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL",
    "senderPublicKey": "A695BnQcmLqEPwcN5kdhv4bHipgdE4FnM5CBEMtA95Mo",
    "proofs": [
        "4qkNJvAZh8AHicsELvNkgr6dGiR4GpkpurAxNT11nUpWPK374etnMKmFhrfPzxVm1rQHt2S7SoY7QNmZMJCtBPaJ"
    ],
    "script": "base64:AAIDAAAAAAAAABEIARIECgIICBIHCgUICAgBAQAAADQAAAAAB3hCaXRDTzIBAAAAICAEZKaqA3sNb6aq+pclWLOWiXpTDP/vusZoh2yDVNyNAAAAAAhzdGFydFF0eQAAAAAAAASqHQAAAAAMRmlyc3RGYXNlUXR5AAAAAAAAACu5AAAAAA1TZWNvbmRGYXNlUXR5AAAAAAAABDBEAAAAAAhub21QcmljZQAAAAAAAAAAAQAAAAADd3ZzAAAAAAAF9eEAAAAAABBzdXBwbGllckRpc2NvdW50AAAAAAAAAAAMAAAAAAROT05FAgAAAARub25lAAAAAAtPd25lclB1YktleQEAAAAghwo2r32S4n1Z60PhHNuoYGhC3c/vioX75j3CW29sfHYAAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEtIFY+5IU8slvHa3AYnimNvIdHW5z2X2gAAAAAEZUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEwWqDv2xgQzga5tOuDFjQrGc4MHZcTC8gAAAAAEcEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVNPFIUJMxXdBxNnhCNkHVKgXHs4GjKNXUwAAAAADaWd2AAAAAAAAAAASAAAAAANjUEIAAAAAAAAAAFgAAAAAA3VJUAAAAAAAAAAABQAAAAADcElQAAAAAAAAAAAKAAAAAANzSVAAAAAAAAAAAAEAAAAAA2VJUAAAAAAAAAAAAQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAABVnZXRLZXlQcm9qZWN0Q2F0ZWdvcnkAAAABAAAABGl0ZW0CAAAAC0NhdGVnb3LDrWE6AQAAABdnZXRWYWx1ZVByb2plY3RDYXRlZ29yeQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAFWdldEtleVByb2plY3RDYXRlZ29yeQAAAAEFAAAABGl0ZW0BAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAAEsAAAAAgUAAAAIc3VwcGxpZXICAAAAI0NvbXVuaWRhZCBBY2h1YXIgS2FwYXdpIGRlbCBFY3VhZG9yAQAAABFnZXRLZXlQcm9qZWN0TmFtZQAAAAEAAAAEaXRlbQIAAAAUTm9tYnJlIGRlbCBQcm95ZWN0bzoBAAAAE2dldFZhbHVlUHJvamVjdE5hbWUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABFnZXRLZXlQcm9qZWN0TmFtZQAAAAEFAAAABGl0ZW0BAAAAFGdldEtleVByb2plY3RDb3VudHJ5AAAAAQAAAARpdGVtAgAAABNQYcOtcyB8IFViaWNhY2nDs246AQAAABZnZXRWYWx1ZVByb2plY3RDb3VudHJ5AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAUZ2V0S2V5UHJvamVjdENvdW50cnkAAAABBQAAAARpdGVtAQAAABFnZXRLZXlQcm9qZWN0Q29kZQAAAAEAAAAEaXRlbQIAAAAIQ8OzZGlnbzoBAAAAE2dldFZhbHVlUHJvamVjdENvZGUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABFnZXRLZXlQcm9qZWN0Q29kZQAAAAEFAAAABGl0ZW0BAAAAF2dldEtleVByb2plY3RQcm9waWV0YXJ5AAAAAQAAAARpdGVtAgAAAChQcm9waWV0YXJpbyB8IEJlbmVmaWNpYXJpbyBkZWwgUHJveWVjdG86AQAAABlnZXRWYWx1ZVByb2plY3RQcm9waWV0YXJ5AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAXZ2V0S2V5UHJvamVjdFByb3BpZXRhcnkAAAABBQAAAARpdGVtAQAAABBnZXRLZXlQcm9qZWN0RGV2AAAAAQAAAAhzdXBwbGllcgIAAAAiRGVzYXJyb2xsYWRvciB8IFJlc3BvbnNhYmxlIExlZ2FsOgEAAAASZ2V0VmFsdWVQcm9qZWN0RGV2AAAAAQAAAAhzdXBwbGllcgkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEGdldEtleVByb2plY3REZXYAAAABBQAAAAhzdXBwbGllcgEAAAASZ2V0S2V5Rmlyc3RGYXNlUXR5AAAAAQAAAARpdGVtAgAAACxUb2tlbnMgb2ZlcnRhZG9zIGFsIDYlIGVuIGxhIEkgRmFzZSBQcmUtSUNPOgEAAAAUZ2V0VmFsdWVGaXJzdEZhc2VRdHkAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlGaXJzdEZhc2VRdHkAAAABBQAAAARpdGVtAQAAABNnZXRLZXlOb21Ub2tlblByaWNlAAAAAQAAAARpdGVtAgAAACBQcmVjaW8gTm9taW5hbCwgMSB0b2tlbiBCaXQtQ08yOgEAAAAYZ2V0S2V5RGVzY3VlbnRvNlRva1ByaWNlAAAAAQAAAARpdGVtAgAAADBQcmVjaW8gZGUgMSB0b2tlbiBCaXQtQ08yIGNvbiBlbCA2JSBkZSBkZXNjdWVudG8BAAAAGmdldFZhbHVlRGVzY3VlbnRvNlRva1ByaWNlAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5RGVzY3VlbnRvNlRva1ByaWNlAAAAAQUAAAAEaXRlbQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABAAAABGl0ZW0CAAAAKFNhbGRvIGRlIHRva2VucyBhbCA2JSBlbiBvZmVydGEsIGFjdHVhbDoBAAAAH2dldFZhbHVlU2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEFAAAABGl0ZW0BAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQAAAARpdGVtAgAAADnihJYgZGUgRG9jdW1lbnRvIE5hY2lvbmFsIGRlIElkZW50aWRhZCAvIEROSSBkZWwgVXN1YXJpbzoBAAAAFGdldFZhbHVlVXNlckRvY3VtZW50AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABAAAABGl0ZW0CAAAAIFBhw61zIGRlIFJlc2lkZW5jaWEgZGVsIFVzdWFyaW86AQAAABNnZXRWYWx1ZVVzZXJDb3VudHJ5AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABBQAAAARpdGVtAQAAABNnZXRLZXlEaXNjb3VudDZVc2VyAAAAAQAAAARpdGVtAgAAAB5EZXNjdWVudG8gcGFyYSBlbCBVc3VhcmlvLCA2JToBAAAAFWdldFZhbHVlRGlzY291bnQ2VXNlcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAE2dldEtleURpc2NvdW50NlVzZXIAAAABBQAAAARpdGVtAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtAgAAACVPcmRlbiBkZSBDb21wcmEsIGNhbnRpZGFkIHNvbGljaXRhZGE6AQAAABhnZXRWYWx1ZUl0ZW1Vc2VyT3JkZXJRdHkAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAoSW5ncmVzb3MgcG9yIFZlbnRhIERpcmVjdGEgLyBCbG9ja0NoYWluOgEAAAAXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIAAAACAAAAAWkBAAAAB2RlcG9zaXQAAAACAAAABXRpdGxlAAAADHN1cHBsaWVyRGF0YQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB3hCaXRDTzIJAAACAAAAAQIAAAApZGVwb3NpdG8gcGVybWl0aWRvIHNvbG8gZW4geEJpdENPMiB0b2tlbnMEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHE5vIGhheSB4Qml0Q08yIGVuIHN1IGJhbGFuY2UJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAhwdXJjaGFzZQAAAAUAAAAEaXRlbQAAAAx1c2VyRG9jdW1lbnQAAAALdXNlckNvdW50cnkAAAAMdXNlckRpc2NvdW50AAAACG9yZGVyUXR5BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAABtRW4gbGEgcHJlc2VudGUgUGxhc3RhZm9ybWEgVWQuIHB1ZWRlIGFkcXVpcmlyIHN1cyB0b2tlbnMgeEJpdENPMiB1c2FuZG8gV2F2ZXNLZWVwZXIgeSBzdSB0b2tlbiBkZSBwYWdvIFdhdmVzLgQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAAD2JhbGFuY2VTdXBwbGllcgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAARY3VycmVudFRva2VuUHJpY2UJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIJAABlAAAAAgAAAAAAAAAAZAUAAAAMdXNlckRpc2NvdW50BQAAAAhub21QcmljZQUAAAADd3ZzAAAAAAAAAABkBAAAAAt0b3RhbEFtb3VudAkAAGgAAAACBQAAAAhvcmRlclF0eQUAAAARY3VycmVudFRva2VuUHJpY2UDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQYXltZW50IEFtb3VudCBjYW4ndCBiZSBsZXNzIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RvdGFsQW1vdW50CQAAAgAAAAECAAAAN1BheW1lbnQgQW1vdW50IGNhbid0IGJlIGhpZ2hlciB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5UHJvamVjdENhdGVnb3J5AAAAAQUAAAAEaXRlbQIAAAAWQ29uc2VydmFjacOzbiBGb3Jlc3RhbAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleVByb2plY3ROYW1lAAAAAQUAAAAEaXRlbQIAAAAgUmVzZXJ2YSBBbWF6w7NuaWNhIEFjaHVhci1LYXBhd2kJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABRnZXRLZXlQcm9qZWN0Q291bnRyeQAAAAEFAAAABGl0ZW0CAAAAB0VjdWFkb3IJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlQcm9qZWN0Q29kZQAAAAEFAAAABGl0ZW0CAAAAGTAxLUVDX0FDSC1LQVBBV0lfMDFQUkVJQ08JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABdnZXRLZXlQcm9qZWN0UHJvcGlldGFyeQAAAAEFAAAABGl0ZW0CAAAAF0NvbXVuaWRhZCBBY2h1YXIgS2FwYXdpCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAQZ2V0S2V5UHJvamVjdERldgAAAAEFAAAACHN1cHBsaWVyAgAAACRGdW5kYWNpw7NuIEFsaWFuemEgRWNvbMOzZ2ljYSAnTkFTRScJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABNnZXRLZXlOb21Ub2tlblByaWNlAAAAAQUAAAAEaXRlbQIAAAALMTAuMDAgRXVyb3MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAOENhbnRpZGFkIGRlIFRva2VucyBCaXQtQ08yIGEgRW1pdGlyLCBJIHkgSUkgRmFzZSBQcmUtSUNPBQAAAAhzdGFydFF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUZpcnN0RmFzZVF0eQAAAAEFAAAABGl0ZW0FAAAADEZpcnN0RmFzZVF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAGGdldEtleURlc2N1ZW50bzZUb2tQcmljZQAAAAEFAAAABGl0ZW0FAAAAEWN1cnJlbnRUb2tlblByaWNlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0JAABkAAAAAgkBAAAAF2dldFZhbHVlVXNlckl0ZW1Db3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtBQAAAAx1c2VyRG9jdW1lbnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlVc2VyQ291bnRyeQAAAAEFAAAABGl0ZW0FAAAAC3VzZXJDb3VudHJ5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAATZ2V0S2V5RGlzY291bnQ2VXNlcgAAAAEFAAAABGl0ZW0FAAAADHVzZXJEaXNjb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtBQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAVcHVyY2hhc2VPcmRlci9TdGF0dXM6AgAAABrCoUFkcXVpc2ljacOzbiBDb25maXJtYWRhIQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQkAAGUAAAACCQAAZAAAAAIJAQAAAB9nZXRWYWx1ZVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQUAAAAJcHJlSWNvUXR5BQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIJAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAsRGlyZWNjacOzbiBkZWwgUHJveWVjdG8gZW4gV2F2ZXMtQmxvY2tDaGFpbjoCAAAAIzNOOURwV0R2TlBucTN3dXV5aDJjR2s5aGNLZm9rZTlDQ2ZMBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAAIb3JkZXJRdHkFAAAAB3hCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMHsM81kA==",
    "height": 1766564,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ceK4SEa6ABcUedxNKJsTDHWuhboD313v3YK5wxmMfMr
Next: AXVm3vy3m7wMSLxiZts8qXctKLiYTiFn2NfiVVJQEHeU

Diff: 
Old New Differences
5 5  
6 6  let startQty = 305693
7 7  
8 - let FirstFaseQty = 31193
8 + let FirstFaseQty = 11193
9 9  
10 10  let SecondFaseQty = 274500
11 11  
208 208                  then throw("Payment Amount can't be less than item Purchase Order")
209 209                  else if ((pmt.amount > totalAmount))
210 210                      then throw("Payment Amount can't be higher than item Purchase Order")
211 -                     else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal Amazónica"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
211 +                     else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
212 212              }
213 213      }
214 214  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let xBitCO2 = base58'39yw38hm342hiK43SqELTaZRkTWJoBc22XpxmsSiBrsN'
5 5  
6 6  let startQty = 305693
7 7  
8 - let FirstFaseQty = 31193
8 + let FirstFaseQty = 11193
9 9  
10 10  let SecondFaseQty = 274500
11 11  
12 12  let nomPrice = 1
13 13  
14 14  let wvs = 100000000
15 15  
16 16  let supplierDiscount = 12
17 17  
18 18  let NONE = "none"
19 19  
20 20  let OwnerPubKey = base58'A695BnQcmLqEPwcN5kdhv4bHipgdE4FnM5CBEMtA95Mo'
21 21  
22 22  let issuer = Address(base58'3Mvn8oonnpiasA3bkq36N9qeqqXWfFW437o')
23 23  
24 24  let eAdd = Address(base58'3MvrQGkHQtyLTC2QXgPnQ6oCEWhHyUJpU4q')
25 25  
26 26  let pAdd = Address(base58'3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL')
27 27  
28 28  let igv = 18
29 29  
30 30  let cPB = 88
31 31  
32 32  let uIP = 5
33 33  
34 34  let pIP = 10
35 35  
36 36  let sIP = 1
37 37  
38 38  let eIP = 1
39 39  
40 40  func getNumberByKey (key) = {
41 41      let num =     match getInteger(this, key) {
42 42          case a: Int => 
43 43              a
44 44          case _ => 
45 45              0
46 46      }
47 47      num
48 48      }
49 49  
50 50  
51 51  func getStrByKey (key) = {
52 52      let str =     match getString(this, key) {
53 53          case a: String => 
54 54              a
55 55          case _ => 
56 56              NONE
57 57      }
58 58      str
59 59      }
60 60  
61 61  
62 62  func getKeyProjectCategory (item) = "Categoría:"
63 63  
64 64  
65 65  func getValueProjectCategory (item) = getStrByKey(getKeyProjectCategory(item))
66 66  
67 67  
68 68  func getKeyItemSupplier (supplier) = (supplier + "Comunidad Achuar Kapawi del Ecuador")
69 69  
70 70  
71 71  func getKeyProjectName (item) = "Nombre del Proyecto:"
72 72  
73 73  
74 74  func getValueProjectName (item) = getStrByKey(getKeyProjectName(item))
75 75  
76 76  
77 77  func getKeyProjectCountry (item) = "País | Ubicación:"
78 78  
79 79  
80 80  func getValueProjectCountry (item) = getStrByKey(getKeyProjectCountry(item))
81 81  
82 82  
83 83  func getKeyProjectCode (item) = "Código:"
84 84  
85 85  
86 86  func getValueProjectCode (item) = getStrByKey(getKeyProjectCode(item))
87 87  
88 88  
89 89  func getKeyProjectPropietary (item) = "Propietario | Beneficiario del Proyecto:"
90 90  
91 91  
92 92  func getValueProjectPropietary (item) = getStrByKey(getKeyProjectPropietary(item))
93 93  
94 94  
95 95  func getKeyProjectDev (supplier) = "Desarrollador | Responsable Legal:"
96 96  
97 97  
98 98  func getValueProjectDev (supplier) = getStrByKey(getKeyProjectDev(supplier))
99 99  
100 100  
101 101  func getKeyFirstFaseQty (item) = "Tokens ofertados al 6% en la I Fase Pre-ICO:"
102 102  
103 103  
104 104  func getValueFirstFaseQty (item) = getStrByKey(getKeyFirstFaseQty(item))
105 105  
106 106  
107 107  func getKeyNomTokenPrice (item) = "Precio Nominal, 1 token Bit-CO2:"
108 108  
109 109  
110 110  func getKeyDescuento6TokPrice (item) = "Precio de 1 token Bit-CO2 con el 6% de descuento"
111 111  
112 112  
113 113  func getValueDescuento6TokPrice (item) = getNumberByKey(getKeyDescuento6TokPrice(item))
114 114  
115 115  
116 116  func getKeySaldoTokenQtyStartEtapa (item) = "Saldo de tokens al 6% en oferta, actual:"
117 117  
118 118  
119 119  func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
120 120  
121 121  
122 122  func getKeyUserItemCounter (user,item) = "Order_№:"
123 123  
124 124  
125 125  func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
126 126  
127 127  
128 128  func getKeyUserDocument (item) = "№ de Documento Nacional de Identidad / DNI del Usuario:"
129 129  
130 130  
131 131  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
132 132  
133 133  
134 134  func getKeyUserCountry (item) = "País de Residencia del Usuario:"
135 135  
136 136  
137 137  func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
138 138  
139 139  
140 140  func getKeyDiscount6User (item) = "Descuento para el Usuario, 6%:"
141 141  
142 142  
143 143  func getValueDiscount6User (item) = getNumberByKey(getKeyDiscount6User(item))
144 144  
145 145  
146 146  func getKeyItemUserOrderQty (item) = "Orden de Compra, cantidad solicitada:"
147 147  
148 148  
149 149  func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
150 150  
151 151  
152 152  func getKeyBalanceSupplier (supplier) = "Ingresos por Venta Directa / BlockChain:"
153 153  
154 154  
155 155  func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
156 156  
157 157  
158 158  @Callable(i)
159 159  func deposit (title,supplierData) = {
160 160      let pmt = extract(i.payment)
161 161      if ((pmt.assetId != xBitCO2))
162 162          then throw("deposito permitido solo en xBitCO2 tokens")
163 163          else {
164 164              let supplier = toBase58String(i.caller.bytes)
165 165              let currentAmount =             match getInteger(this, supplier) {
166 166                  case a: Int => 
167 167                      a
168 168                  case _ => 
169 169                      startQty
170 170              }
171 171              let newAmount = (currentAmount + pmt.amount)
172 172              if ((0 >= newAmount))
173 173                  then throw("No hay xBitCO2 en su balance")
174 174                  else WriteSet([DataEntry(supplier, newAmount)])
175 175              }
176 176      }
177 177  
178 178  
179 179  
180 180  @Callable(i)
181 181  func purchase (item,userDocument,userCountry,userDiscount,orderQty) = {
182 182      let pmt = extract(i.payment)
183 183      if (isDefined(pmt.assetId))
184 184          then throw("En la presente Plastaforma Ud. puede adquirir sus tokens xBitCO2 usando WavesKeeper y su token de pago Waves.")
185 185          else {
186 186              let supplier =             match getString(this, getKeyItemSupplier(item)) {
187 187                  case a: String => 
188 188                      a
189 189                  case _ => 
190 190                      NONE
191 191              }
192 192              let preIcoQty =             match getInteger(this, getKeySaldoTokenQtyStartEtapa(item)) {
193 193                  case a: Int => 
194 194                      a
195 195                  case _ => 
196 196                      startQty
197 197              }
198 198              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
199 199                  case a: Int => 
200 200                      a
201 201                  case _ => 
202 202                      0
203 203              }
204 204              let userAddress = toBase58String(i.caller.bytes)
205 205              let currentTokenPrice = ((((100 - userDiscount) * nomPrice) * wvs) / 100)
206 206              let totalAmount = (orderQty * currentTokenPrice)
207 207              if ((totalAmount > pmt.amount))
208 208                  then throw("Payment Amount can't be less than item Purchase Order")
209 209                  else if ((pmt.amount > totalAmount))
210 210                      then throw("Payment Amount can't be higher than item Purchase Order")
211 -                     else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal Amazónica"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
211 +                     else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
212 212              }
213 213      }
214 214  
215 215  
216 216  @Verifier(tx)
217 217  func verify () = match tx {
218 218      case t: SetScriptTransaction => 
219 219          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
220 220      case d: ReissueTransaction|DataTransaction => 
221 221          true
222 222      case tx: TransferTransaction => 
223 223          true
224 224      case tx: ExchangeTransaction => 
225 225          let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
226 226              then true
227 227              else !(isDefined(tx.sellOrder.assetPair.amountAsset))
228 228          withWaves
229 229      case _ => 
230 230          false
231 231  }
232 232

Old	New		Differences
5	5
6	6		let startQty = 305693
7	7
8		-	let FirstFaseQty = ~~31193~~
	8	+	let FirstFaseQty = 11193
9	9
10	10		let SecondFaseQty = 274500
11	11

208	208		then throw("Payment Amount can't be less than item Purchase Order")
209	209		else if ((pmt.amount > totalAmount))
210	210		then throw("Payment Amount can't be higher than item Purchase Order")
211		-	else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal ~~Amazónica~~"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty~~), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"~~), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
	211	+	else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
212	212		}
213	213		}
214	214

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let xBitCO2 = base58'39yw38hm342hiK43SqELTaZRkTWJoBc22XpxmsSiBrsN'
5	5
6	6		let startQty = 305693
7	7
8		-	let FirstFaseQty = ~~31193~~
	8	+	let FirstFaseQty = 11193
9	9
10	10		let SecondFaseQty = 274500
11	11
12	12		let nomPrice = 1
13	13
14	14		let wvs = 100000000
15	15
16	16		let supplierDiscount = 12
17	17
18	18		let NONE = "none"
19	19
20	20		let OwnerPubKey = base58'A695BnQcmLqEPwcN5kdhv4bHipgdE4FnM5CBEMtA95Mo'
21	21
22	22		let issuer = Address(base58'3Mvn8oonnpiasA3bkq36N9qeqqXWfFW437o')
23	23
24	24		let eAdd = Address(base58'3MvrQGkHQtyLTC2QXgPnQ6oCEWhHyUJpU4q')
25	25
26	26		let pAdd = Address(base58'3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL')
27	27
28	28		let igv = 18
29	29
30	30		let cPB = 88
31	31
32	32		let uIP = 5
33	33
34	34		let pIP = 10
35	35
36	36		let sIP = 1
37	37
38	38		let eIP = 1
39	39
40	40		func getNumberByKey (key) = {
41	41		let num = match getInteger(this, key) {
42	42		case a: Int =>
43	43		a
44	44		case _ =>
45	45		0
46	46		}
47	47		num
48	48		}
49	49
50	50
51	51		func getStrByKey (key) = {
52	52		let str = match getString(this, key) {
53	53		case a: String =>
54	54		a
55	55		case _ =>
56	56		NONE
57	57		}
58	58		str
59	59		}
60	60
61	61
62	62		func getKeyProjectCategory (item) = "Categoría:"
63	63
64	64
65	65		func getValueProjectCategory (item) = getStrByKey(getKeyProjectCategory(item))
66	66
67	67
68	68		func getKeyItemSupplier (supplier) = (supplier + "Comunidad Achuar Kapawi del Ecuador")
69	69
70	70
71	71		func getKeyProjectName (item) = "Nombre del Proyecto:"
72	72
73	73
74	74		func getValueProjectName (item) = getStrByKey(getKeyProjectName(item))
75	75
76	76
77	77		func getKeyProjectCountry (item) = "País \| Ubicación:"
78	78
79	79
80	80		func getValueProjectCountry (item) = getStrByKey(getKeyProjectCountry(item))
81	81
82	82
83	83		func getKeyProjectCode (item) = "Código:"
84	84
85	85
86	86		func getValueProjectCode (item) = getStrByKey(getKeyProjectCode(item))
87	87
88	88
89	89		func getKeyProjectPropietary (item) = "Propietario \| Beneficiario del Proyecto:"
90	90
91	91
92	92		func getValueProjectPropietary (item) = getStrByKey(getKeyProjectPropietary(item))
93	93
94	94
95	95		func getKeyProjectDev (supplier) = "Desarrollador \| Responsable Legal:"
96	96
97	97
98	98		func getValueProjectDev (supplier) = getStrByKey(getKeyProjectDev(supplier))
99	99
100	100
101	101		func getKeyFirstFaseQty (item) = "Tokens ofertados al 6% en la I Fase Pre-ICO:"
102	102
103	103
104	104		func getValueFirstFaseQty (item) = getStrByKey(getKeyFirstFaseQty(item))
105	105
106	106
107	107		func getKeyNomTokenPrice (item) = "Precio Nominal, 1 token Bit-CO2:"
108	108
109	109
110	110		func getKeyDescuento6TokPrice (item) = "Precio de 1 token Bit-CO2 con el 6% de descuento"
111	111
112	112
113	113		func getValueDescuento6TokPrice (item) = getNumberByKey(getKeyDescuento6TokPrice(item))
114	114
115	115
116	116		func getKeySaldoTokenQtyStartEtapa (item) = "Saldo de tokens al 6% en oferta, actual:"
117	117
118	118
119	119		func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
120	120
121	121
122	122		func getKeyUserItemCounter (user,item) = "Order_№:"
123	123
124	124
125	125		func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
126	126
127	127
128	128		func getKeyUserDocument (item) = "№ de Documento Nacional de Identidad / DNI del Usuario:"
129	129
130	130
131	131		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
132	132
133	133
134	134		func getKeyUserCountry (item) = "País de Residencia del Usuario:"
135	135
136	136
137	137		func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
138	138
139	139
140	140		func getKeyDiscount6User (item) = "Descuento para el Usuario, 6%:"
141	141
142	142
143	143		func getValueDiscount6User (item) = getNumberByKey(getKeyDiscount6User(item))
144	144
145	145
146	146		func getKeyItemUserOrderQty (item) = "Orden de Compra, cantidad solicitada:"
147	147
148	148
149	149		func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
150	150
151	151
152	152		func getKeyBalanceSupplier (supplier) = "Ingresos por Venta Directa / BlockChain:"
153	153
154	154
155	155		func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
156	156
157	157
158	158		@Callable(i)
159	159		func deposit (title,supplierData) = {
160	160		let pmt = extract(i.payment)
161	161		if ((pmt.assetId != xBitCO2))
162	162		then throw("deposito permitido solo en xBitCO2 tokens")
163	163		else {
164	164		let supplier = toBase58String(i.caller.bytes)
165	165		let currentAmount = match getInteger(this, supplier) {
166	166		case a: Int =>
167	167		a
168	168		case _ =>
169	169		startQty
170	170		}
171	171		let newAmount = (currentAmount + pmt.amount)
172	172		if ((0 >= newAmount))
173	173		then throw("No hay xBitCO2 en su balance")
174	174		else WriteSet([DataEntry(supplier, newAmount)])
175	175		}
176	176		}
177	177
178	178
179	179
180	180		@Callable(i)
181	181		func purchase (item,userDocument,userCountry,userDiscount,orderQty) = {
182	182		let pmt = extract(i.payment)
183	183		if (isDefined(pmt.assetId))
184	184		then throw("En la presente Plastaforma Ud. puede adquirir sus tokens xBitCO2 usando WavesKeeper y su token de pago Waves.")
185	185		else {
186	186		let supplier = match getString(this, getKeyItemSupplier(item)) {
187	187		case a: String =>
188	188		a
189	189		case _ =>
190	190		NONE
191	191		}
192	192		let preIcoQty = match getInteger(this, getKeySaldoTokenQtyStartEtapa(item)) {
193	193		case a: Int =>
194	194		a
195	195		case _ =>
196	196		startQty
197	197		}
198	198		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
199	199		case a: Int =>
200	200		a
201	201		case _ =>
202	202		0
203	203		}
204	204		let userAddress = toBase58String(i.caller.bytes)
205	205		let currentTokenPrice = ((((100 - userDiscount) * nomPrice) * wvs) / 100)
206	206		let totalAmount = (orderQty * currentTokenPrice)
207	207		if ((totalAmount > pmt.amount))
208	208		then throw("Payment Amount can't be less than item Purchase Order")
209	209		else if ((pmt.amount > totalAmount))
210	210		then throw("Payment Amount can't be higher than item Purchase Order")
211		-	else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal ~~Amazónica~~"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty~~), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"~~), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
	211	+	else ScriptResult(WriteSet([DataEntry(getKeyProjectCategory(item), "Conservación Forestal"), DataEntry(getKeyProjectName(item), "Reserva Amazónica Achuar-Kapawi"), DataEntry(getKeyProjectCountry(item), "Ecuador"), DataEntry(getKeyProjectCode(item), "01-EC_ACH-KAPAWI_01PREICO"), DataEntry(getKeyProjectPropietary(item), "Comunidad Achuar Kapawi"), DataEntry(getKeyProjectDev(supplier), "Fundación Alianza Ecológica 'NASE'"), DataEntry(getKeyNomTokenPrice(item), "10.00 Euros"), DataEntry("Cantidad de Tokens Bit-CO2 a Emitir, I y II Fase Pre-ICO", startQty), DataEntry(getKeyFirstFaseQty(item), FirstFaseQty), DataEntry(getKeyDescuento6TokPrice(item), currentTokenPrice), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyDiscount6User(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("purchaseOrder/Status:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), ((getValueSaldoTokenQtyStartEtapa(item) + preIcoQty) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección del Proyecto en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
212	212		}
213	213		}
214	214
215	215
216	216		@Verifier(tx)
217	217		func verify () = match tx {
218	218		case t: SetScriptTransaction =>
219	219		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
220	220		case d: ReissueTransaction\|DataTransaction =>
221	221		true
222	222		case tx: TransferTransaction =>
223	223		true
224	224		case tx: ExchangeTransaction =>
225	225		let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
226	226		then true
227	227		else !(isDefined(tx.sellOrder.assetPair.amountAsset))
228	228		withWaves
229	229		case _ =>
230	230		false
231	231		}
232	232

github/deemru/w8io/169f3d6 
74.02 ms ◑