tx · 4CjRN7imG9WC5doaVq3ZMiJGGHKcUTHEqNNRyp5Ve5yY

3MpjwMAGCaNqNFRa34foE5sTfV6zb76bYja:  -0.01000010 Waves

2021.07.07 15:29 [1603182] smart account 3MpjwMAGCaNqNFRa34foE5sTfV6zb76bYja > SELF 0.00000000 Waves

{ "type": 13, "id": "4CjRN7imG9WC5doaVq3ZMiJGGHKcUTHEqNNRyp5Ve5yY", "fee": 1000010, "feeAssetId": null, "timestamp": 1625661046850, "version": 2, "chainId": 84, "sender": "3MpjwMAGCaNqNFRa34foE5sTfV6zb76bYja", "senderPublicKey": "7Cy4wXHvgCRHP6MMhu9tTdayLHr9P9Dc342DVcCoCPzm", "proofs": [ "3WNPHeA4qjdTuydoUt7RfjyNkDmDPHLsAXe2ruZNqq9Wx7M3TBiZJjEn3TCf3ZEEy9SrS7bJdrfTaouGBbw1Ex7k" ], "script": "base64:AAIFAAAAAAAAAkQIAhIFCgMIAQgSAwoBCBIAGgoKAmExEgROT05FGhQKAmEyEg5nZXROdW1iZXJCeUtleRoJCgJhMxIDa2V5GgkKAmE0EgNudW0aDQoCYTUSByRtYXRjaDAaBwoCYTYSAWEaEQoCYTcSC2dldFN0ckJ5S2V5GgkKAmE4EgNzdHIaFQoCYTkSD2dldEtleUl0ZW1QcmljZRoKCgJiMRIEaXRlbRoXCgJiMhIRZ2V0VmFsdWVJdGVtUHJpY2UaGwoCYjMSFWdldEtleVVzZXJJdGVtQ291bnRlchoKCgJiNBIEdXNlchodCgJiNRIXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIaEAoCYjYSCmdldEtleUl0ZW0aDgoCYjcSCHN1cHBsaWVyGgsKAmI4EgV0aXRsZRoUCgJiORIOZ2V0S2V5SXRlbURhdGEaGAoCYzESEmdldEtleUl0ZW1TdXBwbGllchoaCgJjMhIUZ2V0VmFsdWVJdGVtU3VwcGxpZXIaGwoCYzMSFWdldEtleUJhbGFuY2VTdXBwbGllchoNCgJjNBIHYWNjb3VudBodCgJjNRIXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIaBwoCYzYSAWkaCwoCYzcSBXByaWNlGgoKAmM4EgRkYXRhGhUKAmM5Eg9zdXBwbGllckFkZHJlc3MaCQoCZDESA3BtdBoRCgJkMhILdXNlckFkZHJlc3MaFAoCZDMSDnN1cHBsaWVyQWRkcmVzGg0KAmQ0EgdiYWxhbmNlAAAADQAAAAACYTECAAAABG5vbmUBAAAAAmEyAAAAAQAAAAJhMwQAAAACYTQEAAAAAmE1CQAEGgAAAAIFAAAABHRoaXMFAAAAAmEzAwkAAAEAAAACBQAAAAJhNQIAAAADSW50BAAAAAJhNgUAAAACYTUFAAAAAmE2AAAAAAAAAAAABQAAAAJhNAEAAAACYTcAAAABAAAAAmEzBAAAAAJhOAQAAAACYTUJAAQdAAAAAgUAAAAEdGhpcwUAAAACYTMDCQAAAQAAAAIFAAAAAmE1AgAAAAZTdHJpbmcEAAAAAmE2BQAAAAJhNQUAAAACYTYFAAAAAmExBQAAAAJhOAEAAAACYTkAAAABAAAAAmIxCQABLAAAAAIFAAAAAmIxAgAAAAZfcHJpY2UBAAAAAmIyAAAAAQAAAAJiMQkBAAAAAmEyAAAAAQkBAAAAAmE5AAAAAQUAAAACYjEBAAAAAmIzAAAAAgAAAAJiNAAAAAJiMQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAACYjECAAAAAV8FAAAAAmI0AgAAAARfY250AQAAAAJiNQAAAAIAAAACYjQAAAACYjEJAQAAAAJhMgAAAAEJAQAAAAJiMwAAAAIFAAAAAmI0BQAAAAJiMQEAAAACYjYAAAACAAAAAmI3AAAAAmI4CQABLAAAAAICAAAABWl0ZW1fCQACWAAAAAEJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAAAmI3BQAAAAJiOAEAAAACYjkAAAABAAAAAmIxCQABLAAAAAIFAAAAAmIxAgAAAAVfZGF0YQEAAAACYzEAAAABAAAAAmIxCQABLAAAAAIFAAAAAmIxAgAAAAVfZGF0YQEAAAACYzIAAAABAAAAAmIxCQEAAAACYTcAAAABCQEAAAACYzEAAAABBQAAAAJiMQEAAAACYzMAAAABAAAAAmM0CQABLAAAAAIFAAAAAmM0AgAAAAhfYmFsYW5jZQEAAAACYzUAAAABAAAAAmM0CQEAAAACYTIAAAABCQEAAAACYzMAAAABBQAAAAJjNAAAAAMAAAACYzYBAAAAB2FkZEl0ZW0AAAADAAAAAmI4AAAAAmM3AAAAAmM4BAAAAAJjOQkAAlgAAAABCAgFAAAAAmM2AAAABmNhbGxlcgAAAAVieXRlcwQAAAACYjEJAQAAAAJiNgAAAAIFAAAAAmM5BQAAAAJiOAMJAABnAAAAAgAAAAAAAAAAAAUAAAACYzcJAAACAAAAAQIAAAAucHVyY2hhc2UgYW1vdW50IGNhbm5vdCBiZSBsZXNzIHRoYW4gaXRlbSBwcmljZQMJAQAAAAIhPQAAAAIJAQAAAAJjMgAAAAEFAAAAAmIxBQAAAAJhMQkAAAIAAAABAgAAABhhbiBpdGVtIGlzIGFscmVhZHkgZXhpc3QJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAAmMxAAAAAQUAAAACYjEFAAAAAmM5CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAACYTkAAAABBQAAAAJiMQUAAAACYzcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAAmI5AAAAAQUAAAACYjEFAAAAAmM4BQAAAANuaWwAAAACYzYBAAAACHB1cmNoYXNlAAAAAQAAAAJiMQQAAAACZDEJAAGRAAAAAggFAAAAAmM2AAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAJkMQAAAAdhc3NldElkCQAAAgAAAAECAAAAHldBVkVTIHRva2VuIG9ubHkgYXQgdGhlIG1vbWVudAQAAAACZDIJAAJYAAAAAQgIBQAAAAJjNgAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAAmM3CQEAAAACYjIAAAABBQAAAAJiMQQAAAACZDMJAQAAAAJjMgAAAAEFAAAAAmIxAwkAAGYAAAACBQAAAAJjNwgFAAAAAmQxAAAABmFtb3VudAkAAAIAAAABAgAAAC1wdXJjaGFzZSBhbXVudCBjYW5ub3QgYmUgbGVzcyB0aGFuIGl0ZW0gcHJpY2UDCQAAZgAAAAIIBQAAAAJkMQAAAAZhbW91bnQFAAAAAmM3CQAAAgAAAAECAAAAMHB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBwcmljZQMJAAAAAAAAAgUAAAACZDMFAAAAAmExCQAAAgAAAAECAAAAHlN1cHBsaWVyIGFkZHJlc3MgZG9lc24ndCBleGlzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmIzAAAAAgUAAAACZDIFAAAAAmIxCQAAZAAAAAIJAQAAAAJiNQAAAAIFAAAAAmQyBQAAAAJiMQAAAAAAAAAAAQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmMzAAAAAQUAAAACZDMJAABkAAAAAgkBAAAAAmM1AAAAAQUAAAACZDMIBQAAAAJkMQAAAAZhbW91bnQFAAAAA25pbAAAAAJjNgEAAAAId2l0aGRyYXcAAAAABAAAAAJjOQkAAlgAAAABCAgFAAAAAmM2AAAABmNhbGxlcgAAAAVieXRlcwQAAAACZDQJAQAAAAJjNQAAAAEFAAAAAmM5AwkAAGcAAAACAAAAAAAAAAAABQAAAAJkNAkAAAIAAAABAgAAABJ6YSBtYcWCbyDFm3JvZGvDs3cJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAJjMwAAAAEFAAAAAmM5AAAAAAAAAAAACQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAAmM5BQAAAAJkNAUAAAAEdW5pdAUAAAADbmlsAAAAAIQnTgM=", "height": 1603182, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: DwFK241mEgQAXuVhGhBdwJkQdwmeZ1X8F3iTQ4RvM2uu Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 5 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let NONE = "none"
5+
6+func getNumberByKey (key) = {
7+ let num = match getInteger(this, key) {
8+ case a: Int =>
9+ a
10+ case _ =>
11+ 0
12+ }
13+ num
14+ }
15+
16+
17+func getStrByKey (key) = {
18+ let str = match getString(this, key) {
19+ case a: String =>
20+ a
21+ case _ =>
22+ NONE
23+ }
24+ str
25+ }
26+
27+
28+func getKeyItemPrice (item) = (item + "_price")
29+
30+
31+func getValueItemPrice (item) = getNumberByKey(getKeyItemPrice(item))
32+
33+
34+func getKeyUserItemCounter (user,item) = (((item + "_") + user) + "_cnt")
35+
36+
37+func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
38+
39+
40+func getKeyItem (supplier,title) = ("item_" + toBase58String(sha256(toBytes((supplier + title)))))
41+
42+
43+func getKeyItemData (item) = (item + "_data")
44+
45+
46+func getKeyItemSupplier (item) = (item + "_data")
47+
48+
49+func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
50+
51+
52+func getKeyBalanceSupplier (account) = (account + "_balance")
53+
54+
55+func getValueBalanceSupplier (account) = getNumberByKey(getKeyBalanceSupplier(account))
56+
57+
58+@Callable(i)
59+func addItem (title,price,data) = {
60+ let supplierAddress = toBase58String(i.caller.bytes)
61+ let item = getKeyItem(supplierAddress, title)
62+ if ((0 >= price))
63+ then throw("purchase amount cannot be less than item price")
64+ else if ((getValueItemSupplier(item) != NONE))
65+ then throw("an item is already exist")
66+ else [StringEntry(getKeyItemSupplier(item), supplierAddress), IntegerEntry(getKeyItemPrice(item), price), StringEntry(getKeyItemData(item), data)]
67+ }
68+
69+
70+
71+@Callable(i)
72+func purchase (item) = {
73+ let pmt = i.payments[0]
74+ if (isDefined(pmt.assetId))
75+ then throw("WAVES token only at the moment")
76+ else {
77+ let userAddress = toBase58String(i.caller.bytes)
78+ let price = getValueItemPrice(item)
79+ let supplierAddres = getValueItemSupplier(item)
80+ if ((price > pmt.amount))
81+ then throw("purchase amunt cannot be less than item price")
82+ else if ((pmt.amount > price))
83+ then throw("purchase amount cannot be higher than item price")
84+ else if ((supplierAddres == NONE))
85+ then throw("Supplier address doesn't exist")
86+ else [IntegerEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), IntegerEntry(getKeyBalanceSupplier(supplierAddres), (getValueBalanceSupplier(supplierAddres) + pmt.amount))]
87+ }
88+ }
89+
90+
91+
92+@Callable(i)
93+func withdraw () = {
94+ let supplierAddress = toBase58String(i.caller.bytes)
95+ let balance = getValueBalanceSupplier(supplierAddress)
96+ if ((0 >= balance))
97+ then throw("za mało środków")
98+ else [IntegerEntry(getKeyBalanceSupplier(supplierAddress), 0), ScriptTransfer(addressFromStringValue(supplierAddress), balance, unit)]
99+ }
100+
101+

github/deemru/w8io/169f3d6 
17.44 ms