tx · Fq1kwXvtwcozRt3Whf9nQk5Tb6SAUNi7DZE8WRVwRDNC

3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2:  -0.01400000 Waves

2020.04.03 23:50 [938496] smart account 3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2 > SELF 0.00000000 Waves

{ "type": 13, "id": "Fq1kwXvtwcozRt3Whf9nQk5Tb6SAUNi7DZE8WRVwRDNC", "fee": 1400000, "feeAssetId": null, "timestamp": 1585943315504, "version": 1, "sender": "3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2", "senderPublicKey": "GQpgNnxYTNNWmyiXVfx9rpMV1hgft2HPhJ3CkWeLuxAt", "proofs": [ "2cqvHh4vXaxuZDdpDWd75JWDNqKGSUb9tQxp9pJHPMjxYzRtJXx3qCpFdzfFoShwxM16sTChGfDheo2EwDbsnypS" ], "script": "base64:AAIDAAAAAAAAABgIARIDCgEBEgkKBwgICAgBCAgSBAoCCAEAAAAtAAAAAAdiQml0Q08yAQAAACAkubz3kBYNSCNdNAZyd/QzZ1pU4dNNWTExj4jouAng0QAAAAAIc3RhcnRRdHkAAAAAAAADDUAAAAAACG5vbVByaWNlAAAAAAAAAAABAAAAAAN3dnMAAAAAAAX14QAAAAAABE5PTkUCAAAABG5vbmUAAAAAC093bmVyUHViS2V5AQAAACDk+ZK9KsQFHVZZW7IN9p8J1NIEPNOpQPwtCMeTNH1ZKQAAAAAGaXNzdWVyCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUJl3qqTQTlNIF00aC5xcoGj4+wY7a0SD9AAAAAANpZ3YAAAAAAAAAABIAAAAAA2NQQgAAAAAABT7GAAAAAAADdUlQAAAAAAAAAAAFAAAAAANwSVAAAAAAAAAAAAoAAAAAA3NJUAAAAAAAAAAAAQAAAAADZUlQAAAAAAAAAAABAAAAAAJwQQkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMr3Oz7nL9FV4g+t+EWzLN77jdANRWt9bwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAApnZXRLZXlJdGVtAAAAAgAAAAhzdXBwbGllcgAAAAV0aXRsZQkAASwAAAACAgAAAAZBIHkgRzoJAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAAIc3VwcGxpZXIFAAAABXRpdGxlAQAAABJnZXRLZXlJdGVtU3VwcGxpZXIAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAGX1AgU0FDAQAAABRnZXRWYWx1ZUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0BAAAADWdldEtleVByb2plY3QAAAABAAAAAnBBCQABLAAAAAIFAAAAAnBBAgAAAAlfQS1QcmVJQ08BAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAACcEEJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAACcEEBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtAgAAAApPcmRlcl/ihJY6AQAAABdnZXRWYWx1ZVVzZXJJdGVtQ291bnRlcgAAAAIAAAAEdXNlcgAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAAEdXNlcgUAAAAEaXRlbQEAAAAOZ2V0S2V5SXRlbVVzZXIAAAABAAAABGl0ZW0CAAAACVVzZXJOYW1lOgEAAAAQZ2V0VmFsdWVJdGVtVXNlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABAAAABGl0ZW0CAAAACVVzZXJQYWlzOgEAAAATZ2V0VmFsdWVVc2VyQ291bnRyeQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEWdldEtleVVzZXJDb3VudHJ5AAAAAQUAAAAEaXRlbQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQAAAARpdGVtAgAAAANVRDoBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXICAAAAF1NlbGxlcl9CYWxhbmNlLF9hQml0Q08yAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgEAAAAIZ2V0S2V5VUkAAAABAAAABGl0ZW0CAAAABlVJLF8lOgEAAAAKZ2V0VmFsdWVVSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5UEkAAAABAAAABGl0ZW0CAAAABlBJLF8lOgEAAAAKZ2V0VmFsdWVQSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5U0kAAAABAAAABGl0ZW0CAAAABlNJLF8lOgEAAAAKZ2V0VmFsdWVTSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5RUkAAAABAAAAAmVBAgAAAAZFSSxfJToBAAAACmdldFZhbHVlRUkAAAABAAAAAmVBCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAIZ2V0S2V5RUkAAAABBQAAAAJlQQEAAAASZ2V0S2V5SXRlbVVzZXJEYXRhAAAAAQAAAARpdGVtAgAAAAxVc2VyQ291bnRyeToBAAAAFmdldEtleUl0ZW1EaXNjb3VudFVzZXIAAAABAAAABGl0ZW0CAAAAEFVzZXJEaXNjb3VudCwgJToBAAAAGGdldFZhbHVlSXRlbURpc2NvdW50VXNlcgAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFmdldEtleUl0ZW1EaXNjb3VudFVzZXIAAAABBQAAAARpdGVtAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtAgAAABJPcmRlcl9xdHksX3Rva2VuczoBAAAAGGdldFZhbHVlSXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAFkJhbGFuY2UvU2FsZG8sIHRva2VuczoBAAAAGmdldFZhbHVlQmFsYW5jZVF0eVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQAAAAMAAAABaQEAAAAHZGVwb3NpdAAAAAEAAAAGYW1vdW50BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHYkJpdENPMgkAAAIAAAABAgAAAC5Vc2UgYkJpdENPMiB0b2tlbnMgb25seSBmb3IgdGhlIHdhbGxldCBkZXBvc2l0BAAAAAhzdXBwbGllcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABkAAAAAgUAAAANY3VycmVudEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAcAAAAEaXRlbQAAAAh1c2VyTmFtZQAAAAt1c2VyQ291bnRyeQAAAAJ1RAAAAAt0b3RhbEFtb3VudAAAAAJwQQAAAAJlQQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAALXlvdSBjYW4gYWRxdWlyZSBQcm9kdWN0cyBvbmx5IGJ5IFdhdmVzIHRva2VucwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAPYmFsYW5jZVN1cHBsaWVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAhzdWJUb3RhbAkAAGUAAAACBQAAAAt0b3RhbEFtb3VudAkAAGkAAAACCQAAaAAAAAIFAAAAA2lndgUAAAALdG90YWxBbW91bnQAAAAAAAAAAGQEAAAAAnVJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA3VJUAAAAAAAAAAAZAQAAAACcEkJAABpAAAAAgkAAGgAAAACBQAAAAhzdWJUb3RhbAUAAAADcElQAAAAAAAAAABkBAAAAAJlSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAA2VCSQkAAGkAAAACCQAAaAAAAAIFAAAACHN1YlRvdGFsBQAAAANlSVAAAAAAAAAAAGQEAAAAAnNJCQAAZQAAAAIJAABlAAAAAgUAAAALdG90YWxBbW91bnQFAAAAAnBJBQAAAAJlSQQAAAADc0JJCQAAaQAAAAIJAABoAAAAAgUAAAAIc3ViVG90YWwFAAAAA3NJUAAAAAAAAAAAZAMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1Vc2VyAAAAAQUAAAAEaXRlbQUAAAAIdXNlck5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABFnZXRLZXlVc2VyQ291bnRyeQAAAAEFAAAABGl0ZW0FAAAAC3VzZXJDb3VudHJ5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAMZ2V0S2V5SXRlbVVEAAAAAQUAAAAEaXRlbQUAAAACdUQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAE1BheW1lbnRfYW1vdW50LF93dnMFAAAAC3RvdGFsQW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZJbXAsICUFAAAAA2lndgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAJU1R0bCwgd3ZzBQAAAAhzdWJUb3RhbAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAALQ1AgMSBCLCB3dnMFAAAAA2NQQgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQUAAAACdUkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAA1VCSQkAAGkAAAACBQAAAAJ1SQUAAAADY1BCCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5UEkAAAABBQAAAARpdGVtBQAAAAJwSQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleUVJAAAAAQUAAAACZUEFAAAAAmVJCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAVFY1N5cwkAAGkAAAACBQAAAANlQkkFAAAAA2NQQgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAA5PcmRlcl9TdGF0dXM6XwUAAAALdXNlckFkZHJlc3MCAAAACWNvbmZpcm1lZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQUAAAACc0kJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABlNCSTogYgkAAGkAAAACBQAAAANzQkkFAAAAA2NQQgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyCQAAZAAAAAIFAAAAD2JhbGFuY2VTdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAgAAAARpdGVtAAAABmFtb3VudAQAAAALdXNlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIc3VwcGxpZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQQAAAAJcHJlSWNvUXR5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAACHN0YXJ0UXR5BAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJcHJlSWNvUXR5BQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAAB5DYW4ndCB3aXRoZHJhdyBuZWdhdGl2ZSBhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAACFOb3QgZW5vdWdodCAvaW5zdWZpY2llbnRlIGJhbGFuY2UJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAARpdGVtBQAAAAluZXdBbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAHYkJpdENPMgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAF0BQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAALT3duZXJQdWJLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAD0RhdGFUcmFuc2FjdGlvbgQAAAABZAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAlyZWNpcGllbnQJAAJYAAAAAQgJAAQkAAAAAQgFAAAAAnR4AAAACXJlY2lwaWVudAAAAAVieXRlcwMJAAAAAAAAAggFAAAAAnR4AAAABnNlbmRlcgUAAAAGaXNzdWVyBgkAAAIAAAABAgAAACBZb3UgY2FuJ3QgdHJhbnNmZXJyZWQgdGhpcyB0b2tlbgfiN01z", "chainId": 84, "height": 938496, "spentComplexity": 0 } View: original | compacted Prev: none Next: 3mudBmfC2Gg7R1eLb5A1bHMnUj2nsF2MtKGJ9G31UExv Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 3 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let bBitCO2 = base58'3UMwob2PDKVYmDMZZdT9ijK7EdRJZKFoBLCAXnwKtNN4'
5+
6+let startQty = 200000
7+
8+let nomPrice = 1
9+
10+let wvs = 100000000
11+
12+let NONE = "none"
13+
14+let OwnerPubKey = base58'GQpgNnxYTNNWmyiXVfx9rpMV1hgft2HPhJ3CkWeLuxAt'
15+
16+let issuer = Address(base58'3MsQwxepm5q2BG1PYUMwqoD2JLgKrACa3P2')
17+
18+let igv = 18
19+
20+let cPB = 88000000
21+
22+let uIP = 5
23+
24+let pIP = 10
25+
26+let sIP = 1
27+
28+let eIP = 1
29+
30+let pA = Address(base58'3N8RGScPyKYySaXd5Z3VcpnttH2uBeMpSy4')
31+
32+func getNumberByKey (key) = {
33+ let num = match getInteger(this, key) {
34+ case a: Int =>
35+ a
36+ case _ =>
37+ 0
38+ }
39+ num
40+ }
41+
42+
43+func getStrByKey (key) = {
44+ let str = match getString(this, key) {
45+ case a: String =>
46+ a
47+ case _ =>
48+ NONE
49+ }
50+ str
51+ }
52+
53+
54+func getKeyItem (supplier,title) = ("A y G:" + toBase58String(sha256(toBytes((supplier + title)))))
55+
56+
57+func getKeyItemSupplier (item) = (item + "_P SAC")
58+
59+
60+func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
61+
62+
63+func getKeyProject (pA) = (pA + "_A-PreICO")
64+
65+
66+func getValueProject (pA) = getStrByKey(getKeyProject(pA))
67+
68+
69+func getKeyUserItemCounter (user,item) = "Order_№:"
70+
71+
72+func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
73+
74+
75+func getKeyItemUser (item) = "UserName:"
76+
77+
78+func getValueItemUser (item) = getStrByKey(getKeyItemUser(item))
79+
80+
81+func getKeyUserCountry (item) = "UserPais:"
82+
83+
84+func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
85+
86+
87+func getKeyItemUD (item) = "UD:"
88+
89+
90+func getKeyBalanceSupplier (supplier) = "Seller_Balance,_aBitCO2"
91+
92+
93+func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
94+
95+
96+func getKeyUI (item) = "UI,_%:"
97+
98+
99+func getValueUI (item) = getNumberByKey(getKeyUI(item))
100+
101+
102+func getKeyPI (item) = "PI,_%:"
103+
104+
105+func getValuePI (item) = getNumberByKey(getKeyPI(item))
106+
107+
108+func getKeySI (item) = "SI,_%:"
109+
110+
111+func getValueSI (item) = getNumberByKey(getKeySI(item))
112+
113+
114+func getKeyEI (eA) = "EI,_%:"
115+
116+
117+func getValueEI (eA) = getNumberByKey(getKeyEI(eA))
118+
119+
120+func getKeyItemUserData (item) = "UserCountry:"
121+
122+
123+func getKeyItemDiscountUser (item) = "UserDiscount, %:"
124+
125+
126+func getValueItemDiscountUser (item) = getNumberByKey(getKeyItemDiscountUser(item))
127+
128+
129+func getKeyItemUserOrderQty (item) = "Order_qty,_tokens:"
130+
131+
132+func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
133+
134+
135+func getKeyBalanceQtySupplier (item) = "Balance/Saldo, tokens:"
136+
137+
138+func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
139+
140+
141+@Callable(i)
142+func deposit (amount) = {
143+ let pmt = extract(i.payment)
144+ if ((pmt.assetId != bBitCO2))
145+ then throw("Use bBitCO2 tokens only for the wallet deposit")
146+ else {
147+ let supplier = toBase58String(i.caller.bytes)
148+ let currentAmount = match getInteger(this, supplier) {
149+ case a: Int =>
150+ a
151+ case _ =>
152+ startQty
153+ }
154+ let newAmount = (currentAmount + pmt.amount)
155+ WriteSet([DataEntry(supplier, newAmount)])
156+ }
157+ }
158+
159+
160+
161+@Callable(i)
162+func purchaseGTS (item,userName,userCountry,uD,totalAmount,pA,eA) = {
163+ let pmt = extract(i.payment)
164+ if (isDefined(pmt.assetId))
165+ then throw("you can adquire Products only by Waves tokens")
166+ else {
167+ let supplier = match getString(this, getKeyItemSupplier(item)) {
168+ case a: String =>
169+ a
170+ case _ =>
171+ NONE
172+ }
173+ let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
174+ case a: Int =>
175+ a
176+ case _ =>
177+ 0
178+ }
179+ let userAddress = toBase58String(i.caller.bytes)
180+ let subTotal = (totalAmount - ((igv * totalAmount) / 100))
181+ let uI = ((subTotal * uIP) / 100)
182+ let pI = ((subTotal * pIP) / 100)
183+ let eI = ((subTotal * eIP) / 100)
184+ let eBI = ((subTotal * eIP) / 100)
185+ let sI = ((totalAmount - pI) - eI)
186+ let sBI = ((subTotal * sIP) / 100)
187+ if ((totalAmount > pmt.amount))
188+ then throw("Payment Amount can't be less than item Purchase Order")
189+ else if ((pmt.amount > totalAmount))
190+ then throw("Payment Amount can't be higher than item Purchase Order")
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("Imp, %", igv), DataEntry("STtl, wvs", subTotal), DataEntry("CP 1 B, wvs", cPB), DataEntry(getKeyUI(item), uI), DataEntry("UBI", (uI / cPB)), DataEntry(getKeyPI(item), pI), DataEntry(getKeyEI(eA), eI), DataEntry("EcSys", (eBI / cPB)), DataEntry(("Order_Status:_" + userAddress), "confirmed"), DataEntry(getKeySI(item), sI), DataEntry("SBI: b", (sBI / cPB)), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet(nil))
192+ }
193+ }
194+
195+
196+
197+@Callable(i)
198+func withdraw (item,amount) = {
199+ let userAddress = toBase58String(i.caller.bytes)
200+ let supplier = match getString(this, getKeyItemSupplier(item)) {
201+ case a: String =>
202+ a
203+ case _ =>
204+ NONE
205+ }
206+ let preIcoQty = match getInteger(this, getKeyBalanceQtySupplier(item)) {
207+ case a: Int =>
208+ a
209+ case _ =>
210+ startQty
211+ }
212+ let newAmount = (preIcoQty - amount)
213+ if ((0 > amount))
214+ then throw("Can't withdraw negative amount")
215+ else if ((0 > newAmount))
216+ then throw("Not enought /insuficiente balance")
217+ else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, bBitCO2)]))
218+ }
219+
220+
221+@Verifier(tx)
222+func verify () = match tx {
223+ case t: SetScriptTransaction =>
224+ sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
225+ case d: DataTransaction =>
226+ true
227+ case tx: TransferTransaction =>
228+ let recipient = toBase58String(addressFromRecipient(tx.recipient).bytes)
229+ if ((tx.sender == issuer))
230+ then true
231+ else throw("You can't transferred this token")
232+ case _ =>
233+ false
234+}
235+

github/deemru/w8io/873ac7e 
16.68 ms