tx · DWo4uXVErK9w38XKceA9CLwmbHRFfYRwMNfrZwWkymt8

3N9GKCsktAL7oPFmaKsgPBoDfu3ijk23Vmm:  -0.01400000 Waves

2020.04.03 11:46 [937769] smart account 3N9GKCsktAL7oPFmaKsgPBoDfu3ijk23Vmm > SELF 0.00000000 Waves

{ "type": 13, "id": "DWo4uXVErK9w38XKceA9CLwmbHRFfYRwMNfrZwWkymt8", "fee": 1400000, "feeAssetId": null, "timestamp": 1585899910791, "version": 1, "sender": "3N9GKCsktAL7oPFmaKsgPBoDfu3ijk23Vmm", "senderPublicKey": "BjzUYgMDny7cYArZdjtnVo62UoVZKiCEeCoKYFnevrWU", "proofs": [ "5D9Zv1pEAXETf4FbAHCdV3BM1eBYKeFaSb2PauMAs1hyPoYXVXE4CBtWtnHDfgbhUqntXjLEhmarURQvbs6pNydf" ], "script": "base64:AAIDAAAAAAAAABgIARIDCgEBEgkKBwgICAgBCAgSBAoCCAEAAAAtAAAAAAdhQml0Q08yAQAAACDH+HoAnTdQnyoybLskiHPdWM4Tg4veh8IaLSgbZ8EolgAAAAAIc3RhcnRRdHkAAAAAAAACSfAAAAAACG5vbVByaWNlAAAAAAAAAAABAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAAC093bmVyUHViS2V5AQAAACCfmEAXldMf/BjZSW6/ZEf7k5r0z4tisH8Gw1nNGq2ESQAAAAAGaXNzdWVyCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFU1D3rjtmNadk6Svjh9eFrA7lQldo3DBRUAAAAAANpZ3YAAAAAAAAAABIAAAAAA2NQQgAAAAAABT7GAAAAAAADdUlQAAAAAAAAAAAFAAAAAANwSVAAAAAAAAAAAAoAAAAAA3NJUAAAAAAAAAAAAQAAAAADZUlQAAAAAAAAAAABAAAAAAJwQQkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMr3Oz7nL9FV4g+t+EWzLN77jdANRWt9bwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAAV0aXRsZQkAASwAAAACAgAAAAZBIHkgRzoJAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAAIc3VwcGxpZXIFAAAABXRpdGxlAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAGX1AgU0FDAQAAABRnZXRWYWx1ZUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAADWdldEtleVByb2plY3QAAAABAAAAAnBBCQABLAAAAAIFAAAAAnBBAgAAAAlfQS1QcmVJQ08BAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAACcEEJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAACcEEBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABAAAABGl0ZW0CAAAACVVzZXJOYW1lOgEAAAAQZ2V0VmFsdWVJdGVtVXNlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABAAAABGl0ZW0CAAAACVVzZXJQYWlzOgEAAAATZ2V0VmFsdWVVc2VyQ291bnRyeQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEWdldEtleVVzZXJDb3VudHJ5AAAAAQUAAAAEaXRlbQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQAAAARpdGVtAgAAAANVRDoBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXICAAAAF1NlbGxlcl9CYWxhbmNlLF9hQml0Q08yAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAABlVJLF8lOgEAAAAKZ2V0VmFsdWVVSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5UEkAAAABAAAABGl0ZW0CAAAABlBJLF8lOgEAAAAKZ2V0VmFsdWVQSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5U0kAAAABAAAABGl0ZW0CAAAABlNJLF8lOgEAAAAKZ2V0VmFsdWVTSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5RUkAAAABAAAAAmVBAgAAAAZFSSxfJToBAAAACmdldFZhbHVlRUkAAAABAAAAAmVBCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5RUkAAAABBQAAAAJlQQEAAAASZ2V0S2V5SXRlbVVzZXJEYXRhAAAAAQAAAARpdGVtAgAAAAxVc2VyQ291bnRyeToBAAAAFmdldEtleUl0ZW1EaXNjb3VudFVzZXIAAAABAAAABGl0ZW0CAAAAEFVzZXJEaXNjb3VudCwgJToBAAAAGGdldFZhbHVlSXRlbURpc2NvdW50VXNlcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFmdldEtleUl0ZW1EaXNjb3VudFVzZXIAAAABBQAAAARpdGVtAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtAgAAABJPcmRlcl9xdHksX3Rva2VuczoBAAAAGGdldFZhbHVlSXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAFkJhbGFuY2UvU2FsZG8sIHRva2VuczoBAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQAAAAMAAAABaQEAAAAHZGVwb3NpdAAAAAEAAAAGYW1vdW50BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHYUJpdENPMgkAAAIAAAABAgAAAC5Vc2UgY0JpdENPMiB0b2tlbnMgb25seSBmb3IgdGhlIHdhbGxldCBkZXBvc2l0BAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABkAAAAAgUAAAANY3VycmVudEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAcAAAAEaXRlbQAAAAh1c2VyTmFtZQAAAAt1c2VyQ291bnRyeQAAAAJ1RAAAAAt0b3RhbEFtb3VudAAAAAJwQQAAAAJlQQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAdhQml0Q08yCQAAAgAAAAECAAAANHlvdSBjYW4gYWRxdWlyZSB0aGVzZSBwcm9kdWN0cyBvbmx5IGJ5IEJpdENPMiB0b2tlbnMEAAAACHN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUEAAAAD2JhbGFuY2VTdXBwbGllcgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3ViVG90YWwJAABpAAAAAgkAAGUAAAACBQAAAAt0b3RhbEFtb3VudAkAAGgAAAACCQAAaAAAAAIFAAAAA2lndgUAAAALdG90YWxBbW91bnQFAAAAA3d2cwAAAAAAAAAAZAQAAAACdUkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADdUlQCQAAaAAAAAIFAAAAA2NQQgAAAAAAAAAAZAQAAAACcEkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADcElQAAAAAAAAAABkBAAAAAJlSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAA2VCSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAJAABoAAAAAgUAAAADY1BCAAAAAAAAAABkBAAAAAJzSQkAAGUAAAACCQAAZQAAAAIFAAAAC3RvdGFsQW1vdW50BQAAAANwSVAFAAAAAmVJBAAAAANzQkkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADc0lQCQAAaAAAAAIFAAAAA2NQQgAAAAAAAAAAZAMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlVc2VyQ291bnRyeQAAAAEFAAAABGl0ZW0FAAAAC3VzZXJDb3VudHJ5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQUAAAAEaXRlbQUAAAACdUQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAE1BheW1lbnRfYW1vdW50LF93dnMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5VUkAAAABBQAAAARpdGVtBQAAAAJ1SQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQUAAAACcEkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0FAAAAAnNJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5RUkAAAABBQAAAAJlQQUAAAACZUkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABUVjU3lzBQAAAANlQkkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAOT3JkZXJfU3RhdHVzOl8FAAAAC3VzZXJBZGRyZXNzAgAAAAljb25maXJtZWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACBQAAAA9iYWxhbmNlU3VwcGxpZXIIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAACdUkFAAAAB2FCaXRDTzIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAJwQQUAAAACcEkFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAhzdXBwbGllcgUAAAACc0kFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAhzdXBwbGllcgUAAAADc0JJBQAAAAdhQml0Q08yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAACZUEFAAAAAmVJBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAACZUEFAAAAA2VCSQUAAAAHYUJpdENPMgUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAgAAAARpdGVtAAAABmFtb3VudAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAAB5DYW4ndCB3aXRoZHJhdyBuZWdhdGl2ZSBhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAAB9Ob3QgZW5vdWdodCAvc3VmaWNpZW50ZSBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEaXRlbQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB2FCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAQAAAAJcmVjaXBpZW50CQACWAAAAAEICQAEJAAAAAEIBQAAAAJ0eAAAAAlyZWNpcGllbnQAAAAFYnl0ZXMDCQAAAAAAAAIIBQAAAAJ0eAAAAAZzZW5kZXIFAAAABmlzc3VlcgYJAAACAAAAAQIAAAAgWW91IGNhbid0IHRyYW5zZmVycmVkIHRoaXMgdG9rZW4HdMnarQ==", "chainId": 84, "height": 937769, "spentComplexity": 0 } View: original | compacted Prev: GQR1RoRHSo1EKfzS98opH8XYSfUAqDMocru71ApSoKSY Next: 7ms2BNMefV2Fit2wMdE5ZHRatWcvKE3rNN6zKhqiXY8G Diff:
OldNewDifferences
1717
1818 let igv = 18
1919
20-let userIncomePercent = 5
20+let cPB = 88000000
2121
22-let projectIncomePercent = 10
22+let uIP = 5
2323
24-let agentIncomePercent = 1
24+let pIP = 10
2525
26-let supplierIncomePercent = 1
26+let sIP = 1
2727
28-let platformIncomePercent = 2
28+let eIP = 1
29+
30+let pA = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
2931
3032 func getNumberByKey (key) = {
3133 let num = match getInteger(this, key) {
4951 }
5052
5153
52-func getKeyItem (supplier,title) = ("Aceites y Grasas de:" + toBase58String(sha256(toBytes((supplier + title)))))
54+func getKeyItem (supplier,title) = ("A y G:" + toBase58String(sha256(toBytes((supplier + title)))))
5355
5456
55-func getKeyItemSupplier (item) = (item + "_Prestec SAC")
57+func getKeyItemSupplier (item) = (item + "_P SAC")
5658
5759
5860 func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
61+
62+
63+func getKeyProject (pA) = (pA + "_A-PreICO")
64+
65+
66+func getValueProject (pA) = getStrByKey(getKeyProject(pA))
5967
6068
6169 func getKeyUserItemCounter (user,item) = "Order_№:"
7078 func getValueItemUser (item) = getStrByKey(getKeyItemUser(item))
7179
7280
73-func getKeyItemUserDocument (item) = "UserDNI:"
81+func getKeyUserCountry (item) = "UserPais:"
82+
83+
84+func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
85+
86+
87+func getKeyItemUD (item) = "UD:"
7488
7589
7690 func getKeyBalanceSupplier (supplier) = "Seller_Balance,_aBitCO2"
7993 func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
8094
8195
82-func getKeyIncomeUser (item) = "UserIncome,_%:"
96+func getKeyUI (item) = "UI,_%:"
8397
8498
85-func getValueIncomeUser (item) = getNumberByKey(getKeyIncomeUser(item))
99+func getValueUI (item) = getNumberByKey(getKeyUI(item))
86100
87101
88-func getKeyIncomeProject (item) = "ProjectIncome,_%:"
102+func getKeyPI (item) = "PI,_%:"
89103
90104
91-func getValueIncomeProject (item) = getNumberByKey(getKeyIncomeProject(item))
105+func getValuePI (item) = getNumberByKey(getKeyPI(item))
92106
93107
94-func getKeyIncomeAgent (item) = "AgentIncome,_%:"
108+func getKeySI (item) = "SI,_%:"
95109
96110
97-func getValueIncomeAgent (item) = getNumberByKey(getKeyIncomeAgent(item))
111+func getValueSI (item) = getNumberByKey(getKeySI(item))
98112
99113
100-func getKeyIncomeSupplier (item) = "SupplierIncome,_%:"
114+func getKeyEI (eA) = "EI,_%:"
101115
102116
103-func getValueIncomeSupplier (item) = getNumberByKey(getKeyIncomeSupplier(item))
104-
105-
106-func getKeyIncomePlatform (item) = "PlatformIncome,_%:"
107-
108-
109-func getValueIncomePlatform (item) = getNumberByKey(getKeyIncomePlatform(item))
117+func getValueEI (eA) = getNumberByKey(getKeyEI(eA))
110118
111119
112120 func getKeyItemUserData (item) = "UserCountry:"
151159
152160
153161 @Callable(i)
154-func purchaseGTS (item,userName,userDNI,totalAmount,project) = {
162+func purchaseGTS (item,userName,userCountry,uD,totalAmount,pA,eA) = {
155163 let pmt = extract(i.payment)
156164 if (isDefined((pmt.assetId != aBitCO2)))
157165 then throw("you can adquire these products only by BitCO2 tokens")
169177 0
170178 }
171179 let userAddress = toBase58String(i.caller.bytes)
172- let subTotal = (totalAmount - ((igv * totalAmount) / 100))
173- let userIncome = ((subTotal * userIncomePercent) / 100)
174- let projectIncome = ((subTotal * projectIncomePercent) / 100)
175- let agentIncome = ((subTotal * agentIncomePercent) / 100)
176- let supplierIncome = ((subTotal * supplierIncomePercent) / 100)
177- let platformIncome = ((subTotal * platformIncomePercent) / 100)
180+ let subTotal = ((totalAmount - ((igv * totalAmount) * wvs)) / 100)
181+ let uI = ((subTotal * uIP) / (cPB * 100))
182+ let pI = ((subTotal * pIP) / 100)
183+ let eI = ((subTotal * eIP) / 100)
184+ let eBI = ((subTotal * eIP) / (cPB * 100))
185+ let sI = ((totalAmount - pIP) - eI)
186+ let sBI = ((subTotal * sIP) / (cPB * 100))
178187 if ((totalAmount > pmt.amount))
179188 then throw("Payment Amount can't be less than item Purchase Order")
180189 else if ((pmt.amount > totalAmount))
181190 then throw("Payment Amount can't be higher than item Purchase Order")
182- else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), userName), DataEntry(getKeyItemUserDocument(item), userDNI), DataEntry("Payment_amount,_waves", totalAmount), DataEntry("IGV, %", igv), DataEntry("SubTotal, gcc/wvs/euros", subTotal), DataEntry(getKeyIncomeUser(item), userIncome), DataEntry(getKeyIncomeProject(item), projectIncome), DataEntry(getKeyIncomeAgent(item), agentIncome), DataEntry(getKeyIncomeSupplier(item), supplierIncome), DataEntry(getKeyIncomePlatform(item), platformIncome), DataEntry(("Order_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), userIncome, aBitCO2), ScriptTransfer(addressFromStringValue(supplier), supplierIncome, aBitCO2)]))
183- }
184- }
185-
186-
187-
188-@Callable(i)
189-func purchase (item,userName,userCountry,userDiscount,orderQty) = {
190- let pmt = extract(i.payment)
191- if (isDefined(pmt.assetId))
192- then throw("you can adquire cBitCO2 only by Waves tokens")
193- else {
194- let supplier = match getString(this, getKeyItemSupplier(item)) {
195- case a: String =>
196- a
197- case _ =>
198- NONE
199- }
200- let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
201- case a: Int =>
202- a
203- case _ =>
204- startQty
205- }
206- let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
207- case a: Int =>
208- a
209- case _ =>
210- 0
211- }
212- let userAddress = toBase58String(i.caller.bytes)
213- let buyerTokenPrice = ((((100 - userDiscount) * nomPrice) * wvs) / 100)
214- let totalAmount = (orderQty * buyerTokenPrice)
215- if ((totalAmount > pmt.amount))
216- then throw("Payment Amount can't be less than item Purchase Order")
217- else if ((pmt.amount > totalAmount))
218- then throw("Payment Amount can't be higher than item Purchase Order")
219- else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUser(item), userName), DataEntry(getKeyItemUserData(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, wvs", (nomPrice * wvs)), DataEntry("tokenPrice/User, wvs", buyerTokenPrice), DataEntry("investedAmount/User, wvs", totalAmount), DataEntry("purchaseOrder/Status:", "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, aBitCO2)]))
191+ else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUD(item), uD), DataEntry("Payment_amount,_wvs", totalAmount), DataEntry(getKeyUI(item), uI), DataEntry(getKeyPI(item), pI), DataEntry(getKeySI(item), sI), DataEntry(getKeyEI(eA), eI), DataEntry("EcSys", eBI), DataEntry(("Order_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), uI, aBitCO2), ScriptTransfer(addressFromStringValue(pA), pI, unit), ScriptTransfer(addressFromStringValue(supplier), sI, unit), ScriptTransfer(addressFromStringValue(supplier), sBI, aBitCO2), ScriptTransfer(addressFromStringValue(eA), eI, unit), ScriptTransfer(addressFromStringValue(eA), eBI, aBitCO2)]))
220192 }
221193 }
222194
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let aBitCO2 = base58'ETbtNp6MBuSM9EfjmLDwctrYEBBiq8CZ7ti7zbwTktry'
55
66 let startQty = 150000
77
88 let nomPrice = 1
99
1010 let wvs = 100000000
1111
1212 let NONE = "none"
1313
1414 let OwnerPubKey = base58'BjzUYgMDny7cYArZdjtnVo62UoVZKiCEeCoKYFnevrWU'
1515
1616 let issuer = Address(base58'3N9GKCsktAL7oPFmaKsgPBoDfu3ijk23Vmm')
1717
1818 let igv = 18
1919
20-let userIncomePercent = 5
20+let cPB = 88000000
2121
22-let projectIncomePercent = 10
22+let uIP = 5
2323
24-let agentIncomePercent = 1
24+let pIP = 10
2525
26-let supplierIncomePercent = 1
26+let sIP = 1
2727
28-let platformIncomePercent = 2
28+let eIP = 1
29+
30+let pA = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
2931
3032 func getNumberByKey (key) = {
3133 let num = match getInteger(this, key) {
3234 case a: Int =>
3335 a
3436 case _ =>
3537 0
3638 }
3739 num
3840 }
3941
4042
4143 func getStrByKey (key) = {
4244 let str = match getString(this, key) {
4345 case a: String =>
4446 a
4547 case _ =>
4648 NONE
4749 }
4850 str
4951 }
5052
5153
52-func getKeyItem (supplier,title) = ("Aceites y Grasas de:" + toBase58String(sha256(toBytes((supplier + title)))))
54+func getKeyItem (supplier,title) = ("A y G:" + toBase58String(sha256(toBytes((supplier + title)))))
5355
5456
55-func getKeyItemSupplier (item) = (item + "_Prestec SAC")
57+func getKeyItemSupplier (item) = (item + "_P SAC")
5658
5759
5860 func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
61+
62+
63+func getKeyProject (pA) = (pA + "_A-PreICO")
64+
65+
66+func getValueProject (pA) = getStrByKey(getKeyProject(pA))
5967
6068
6169 func getKeyUserItemCounter (user,item) = "Order_№:"
6270
6371
6472 func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
6573
6674
6775 func getKeyItemUser (item) = "UserName:"
6876
6977
7078 func getValueItemUser (item) = getStrByKey(getKeyItemUser(item))
7179
7280
73-func getKeyItemUserDocument (item) = "UserDNI:"
81+func getKeyUserCountry (item) = "UserPais:"
82+
83+
84+func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
85+
86+
87+func getKeyItemUD (item) = "UD:"
7488
7589
7690 func getKeyBalanceSupplier (supplier) = "Seller_Balance,_aBitCO2"
7791
7892
7993 func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
8094
8195
82-func getKeyIncomeUser (item) = "UserIncome,_%:"
96+func getKeyUI (item) = "UI,_%:"
8397
8498
85-func getValueIncomeUser (item) = getNumberByKey(getKeyIncomeUser(item))
99+func getValueUI (item) = getNumberByKey(getKeyUI(item))
86100
87101
88-func getKeyIncomeProject (item) = "ProjectIncome,_%:"
102+func getKeyPI (item) = "PI,_%:"
89103
90104
91-func getValueIncomeProject (item) = getNumberByKey(getKeyIncomeProject(item))
105+func getValuePI (item) = getNumberByKey(getKeyPI(item))
92106
93107
94-func getKeyIncomeAgent (item) = "AgentIncome,_%:"
108+func getKeySI (item) = "SI,_%:"
95109
96110
97-func getValueIncomeAgent (item) = getNumberByKey(getKeyIncomeAgent(item))
111+func getValueSI (item) = getNumberByKey(getKeySI(item))
98112
99113
100-func getKeyIncomeSupplier (item) = "SupplierIncome,_%:"
114+func getKeyEI (eA) = "EI,_%:"
101115
102116
103-func getValueIncomeSupplier (item) = getNumberByKey(getKeyIncomeSupplier(item))
104-
105-
106-func getKeyIncomePlatform (item) = "PlatformIncome,_%:"
107-
108-
109-func getValueIncomePlatform (item) = getNumberByKey(getKeyIncomePlatform(item))
117+func getValueEI (eA) = getNumberByKey(getKeyEI(eA))
110118
111119
112120 func getKeyItemUserData (item) = "UserCountry:"
113121
114122
115123 func getKeyItemDiscountUser (item) = "UserDiscount, %:"
116124
117125
118126 func getValueItemDiscountUser (item) = getNumberByKey(getKeyItemDiscountUser(item))
119127
120128
121129 func getKeyItemUserOrderQty (item) = "Order_qty,_tokens:"
122130
123131
124132 func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
125133
126134
127135 func getKeyBalanceQtySupplier (item) = "Balance/Saldo, tokens:"
128136
129137
130138 func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
131139
132140
133141 @Callable(i)
134142 func deposit (amount) = {
135143 let pmt = extract(i.payment)
136144 if ((pmt.assetId != aBitCO2))
137145 then throw("Use cBitCO2 tokens only for the wallet deposit")
138146 else {
139147 let supplier = toBase58String(i.caller.bytes)
140148 let currentAmount = match getInteger(this, supplier) {
141149 case a: Int =>
142150 a
143151 case _ =>
144152 startQty
145153 }
146154 let newAmount = (currentAmount + pmt.amount)
147155 WriteSet([DataEntry(supplier, newAmount)])
148156 }
149157 }
150158
151159
152160
153161 @Callable(i)
154-func purchaseGTS (item,userName,userDNI,totalAmount,project) = {
162+func purchaseGTS (item,userName,userCountry,uD,totalAmount,pA,eA) = {
155163 let pmt = extract(i.payment)
156164 if (isDefined((pmt.assetId != aBitCO2)))
157165 then throw("you can adquire these products only by BitCO2 tokens")
158166 else {
159167 let supplier = match getString(this, getKeyItemSupplier(item)) {
160168 case a: String =>
161169 a
162170 case _ =>
163171 NONE
164172 }
165173 let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
166174 case a: Int =>
167175 a
168176 case _ =>
169177 0
170178 }
171179 let userAddress = toBase58String(i.caller.bytes)
172- let subTotal = (totalAmount - ((igv * totalAmount) / 100))
173- let userIncome = ((subTotal * userIncomePercent) / 100)
174- let projectIncome = ((subTotal * projectIncomePercent) / 100)
175- let agentIncome = ((subTotal * agentIncomePercent) / 100)
176- let supplierIncome = ((subTotal * supplierIncomePercent) / 100)
177- let platformIncome = ((subTotal * platformIncomePercent) / 100)
180+ let subTotal = ((totalAmount - ((igv * totalAmount) * wvs)) / 100)
181+ let uI = ((subTotal * uIP) / (cPB * 100))
182+ let pI = ((subTotal * pIP) / 100)
183+ let eI = ((subTotal * eIP) / 100)
184+ let eBI = ((subTotal * eIP) / (cPB * 100))
185+ let sI = ((totalAmount - pIP) - eI)
186+ let sBI = ((subTotal * sIP) / (cPB * 100))
178187 if ((totalAmount > pmt.amount))
179188 then throw("Payment Amount can't be less than item Purchase Order")
180189 else if ((pmt.amount > totalAmount))
181190 then throw("Payment Amount can't be higher than item Purchase Order")
182- else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), userName), DataEntry(getKeyItemUserDocument(item), userDNI), DataEntry("Payment_amount,_waves", totalAmount), DataEntry("IGV, %", igv), DataEntry("SubTotal, gcc/wvs/euros", subTotal), DataEntry(getKeyIncomeUser(item), userIncome), DataEntry(getKeyIncomeProject(item), projectIncome), DataEntry(getKeyIncomeAgent(item), agentIncome), DataEntry(getKeyIncomeSupplier(item), supplierIncome), DataEntry(getKeyIncomePlatform(item), platformIncome), DataEntry(("Order_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), userIncome, aBitCO2), ScriptTransfer(addressFromStringValue(supplier), supplierIncome, aBitCO2)]))
183- }
184- }
185-
186-
187-
188-@Callable(i)
189-func purchase (item,userName,userCountry,userDiscount,orderQty) = {
190- let pmt = extract(i.payment)
191- if (isDefined(pmt.assetId))
192- then throw("you can adquire cBitCO2 only by Waves tokens")
193- else {
194- let supplier = match getString(this, getKeyItemSupplier(item)) {
195- case a: String =>
196- a
197- case _ =>
198- NONE
199- }
200- let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
201- case a: Int =>
202- a
203- case _ =>
204- startQty
205- }
206- let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
207- case a: Int =>
208- a
209- case _ =>
210- 0
211- }
212- let userAddress = toBase58String(i.caller.bytes)
213- let buyerTokenPrice = ((((100 - userDiscount) * nomPrice) * wvs) / 100)
214- let totalAmount = (orderQty * buyerTokenPrice)
215- if ((totalAmount > pmt.amount))
216- then throw("Payment Amount can't be less than item Purchase Order")
217- else if ((pmt.amount > totalAmount))
218- then throw("Payment Amount can't be higher than item Purchase Order")
219- else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyBalanceQtySupplier(item), (preIcoQty - orderQty)), DataEntry(getKeyItemUser(item), userName), DataEntry(getKeyItemUserData(item), userCountry), DataEntry(getKeyItemDiscountUser(item), userDiscount), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("tokenPrice/Supplier, wvs", (nomPrice * wvs)), DataEntry("tokenPrice/User, wvs", buyerTokenPrice), DataEntry("investedAmount/User, wvs", totalAmount), DataEntry("purchaseOrder/Status:", "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, aBitCO2)]))
191+ else ScriptResult(WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyItemUser(item), userName), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUD(item), uD), DataEntry("Payment_amount,_wvs", totalAmount), DataEntry(getKeyUI(item), uI), DataEntry(getKeyPI(item), pI), DataEntry(getKeySI(item), sI), DataEntry(getKeyEI(eA), eI), DataEntry("EcSys", eBI), DataEntry(("Order_Status:_" + userAddress), "confirmed"), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), uI, aBitCO2), ScriptTransfer(addressFromStringValue(pA), pI, unit), ScriptTransfer(addressFromStringValue(supplier), sI, unit), ScriptTransfer(addressFromStringValue(supplier), sBI, aBitCO2), ScriptTransfer(addressFromStringValue(eA), eI, unit), ScriptTransfer(addressFromStringValue(eA), eBI, aBitCO2)]))
220192 }
221193 }
222194
223195
224196
225197 @Callable(i)
226198 func withdraw (item,amount) = {
227199 let userAddress = toBase58String(i.caller.bytes)
228200 let supplier = match getString(this, getKeyItemSupplier(item)) {
229201 case a: String =>
230202 a
231203 case _ =>
232204 NONE
233205 }
234206 let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
235207 case a: Int =>
236208 a
237209 case _ =>
238210 startQty
239211 }
240212 let newAmount = (preIcoQty - amount)
241213 if ((0 > amount))
242214 then throw("Can't withdraw negative amount")
243215 else if ((0 > newAmount))
244216 then throw("Not enought /suficiente balance")
245217 else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, aBitCO2)]))
246218 }
247219
248220
249221 @Verifier(tx)
250222 func verify () = match tx {
251223 case t: SetScriptTransaction =>
252224 sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
253225 case d: DataTransaction =>
254226 true
255227 case tx: TransferTransaction =>
256228 let recipient = toBase58String(addressFromRecipient(tx.recipient).bytes)
257229 if ((tx.sender == issuer))
258230 then true
259231 else throw("You can't transferred this token")
260232 case _ =>
261233 false
262234 }
263235

github/deemru/w8io/169f3d6 
43.64 ms