tx · C4L5M2oQThhyXZTLC174q8rPzYPNd9krnQVziAjToQZ

3N1dByHUoXjvxXXmRo1NsS9Z52TkVTMbMfE:  -0.01000000 Waves

2021.07.07 11:55 [1602977] smart account 3N1dByHUoXjvxXXmRo1NsS9Z52TkVTMbMfE > SELF 0.00000000 Waves

{ "type": 13, "id": "C4L5M2oQThhyXZTLC174q8rPzYPNd9krnQVziAjToQZ", "fee": 1000000, "feeAssetId": null, "timestamp": 1625648124843, "version": 2, "chainId": 84, "sender": "3N1dByHUoXjvxXXmRo1NsS9Z52TkVTMbMfE", "senderPublicKey": "xb4uHqMmBpMNrqAdGQyGQKu8BXJxp57LqWAjybjT9um", "proofs": [ "3KAt6hZXxWmA2CNfVJghPBu9jYhAeCg846knUyuB5Mp54qMGT2NVFUrcraGN78fLbm6VtfMjEP1urW5GpPcFCUHY" ], "script": "base64:AAIFAAAAAAAAAi4IAhIFCgMIAQgSAwoBCBIAGgoKAmExEgROT05FGhQKAmEyEg5nZXROdW1iZXJCeUtleRoJCgJhMxIDa2V5GgkKAmE0EgNudW0aDQoCYTUSByRtYXRjaDAaBwoCYTYSAWEaEQoCYTcSC2dldFN0ckJ5S2V5GgkKAmE4EgNzdHIaFQoCYTkSD2dldEtleUl0ZW1QcmljZRoKCgJiMRIEaXRlbRoXCgJiMhIRZ2V0VmFsdWVJdGVtUHJpY2UaGwoCYjMSFWdldEtleVVzZXJJdGVtQ291bnRlchoKCgJiNBIEdXNlchodCgJiNRIXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIaEAoCYjYSCmdldEtleUl0ZW0aDgoCYjcSCHN1cHBsaWVyGgsKAmI4EgV0aXRsZRoUCgJiORIOZ2V0S2V5SXRlbURhdGEaGAoCYzESEmdldEtleUl0ZW1TdXBwbGllchoaCgJjMhIUZ2V0VmFsdWVJdGVtU3VwcGxpZXIaGwoCYzMSFWdldEtleUJhbGFuY2VTdXBwbGllchoNCgJjNBIHYWNjb3VudBodCgJjNRIXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIaBwoCYzYSAWkaCwoCYzcSBXByaWNlGgoKAmM4EgRkYXRhGhUKAmM5Eg9zdXBwbGllckFkZHJlc3MaCQoCZDESA3BtdBoRCgJkMhILdXNlckFkZHJlc3MaDQoCZDMSB2JhbGFuY2UAAAANAAAAAAJhMQIAAAAEbm9uZQEAAAACYTIAAAABAAAAAmEzBAAAAAJhNAQAAAACYTUJAAQaAAAAAgUAAAAEdGhpcwUAAAACYTMDCQAAAQAAAAIFAAAAAmE1AgAAAANJbnQEAAAAAmE2BQAAAAJhNQUAAAACYTYAAAAAAAAAAAAFAAAAAmE0AQAAAAJhNwAAAAEAAAACYTMEAAAAAmE4BAAAAAJhNQkABB0AAAACBQAAAAR0aGlzBQAAAAJhMwMJAAABAAAAAgUAAAACYTUCAAAABlN0cmluZwQAAAACYTYFAAAAAmE1BQAAAAJhNgUAAAACYTEFAAAAAmE4AQAAAAJhOQAAAAEAAAACYjEJAAEsAAAAAgUAAAACYjECAAAABl9wcmljZQEAAAACYjIAAAABAAAAAmIxCQEAAAACYTIAAAABCQEAAAACYTkAAAABBQAAAAJiMQEAAAACYjMAAAACAAAAAmI0AAAAAmIxCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAJiMQIAAAABXwUAAAACYjQCAAAABF9jbnQBAAAAAmI1AAAAAgAAAAJiNAAAAAJiMQkBAAAAAmEyAAAAAQkBAAAAAmIzAAAAAgUAAAACYjQFAAAAAmIxAQAAAAJiNgAAAAIAAAACYjcAAAACYjgJAAEsAAAAAgIAAAAFaXRlbV8JAAJYAAAAAQkAAfcAAAABCQABmwAAAAEJAAEsAAAAAgUAAAACYjcFAAAAAmI4AQAAAAJiOQAAAAEAAAACYjEJAAEsAAAAAgUAAAACYjECAAAABV9kYXRhAQAAAAJjMQAAAAEAAAACYjEJAAEsAAAAAgUAAAACYjECAAAABl9vd25lcgEAAAACYzIAAAABAAAAAmIxCQEAAAACYTcAAAABCQEAAAACYzEAAAABBQAAAAJiMQEAAAACYzMAAAABAAAAAmM0CQABLAAAAAIFAAAAAmM0AgAAAAhfYmFsYW5jZQEAAAACYzUAAAABAAAAAmM0CQEAAAACYTIAAAABCQEAAAACYzMAAAABBQAAAAJjNAAAAAMAAAACYzYBAAAAB2FkZEl0ZW0AAAADAAAAAmI4AAAAAmM3AAAAAmM4BAAAAAJjOQkAAlgAAAABCAgFAAAAAmM2AAAABmNhbGxlcgAAAAVieXRlcwQAAAACYjEJAQAAAAJiNgAAAAIFAAAAAmM5BQAAAAJiOAMJAABnAAAAAgAAAAAAAAAAAAUAAAACYzcJAAACAAAAAQIAAAAuUHVyY2hhc2UgYW1vdW50IGNhbm5vdCBiZSBsZXNzIHRoYW4gaXRlbSBwcmljZQMJAQAAAAIhPQAAAAIJAQAAAAJjMgAAAAEFAAAAAmIxBQAAAAJhMQkAAAIAAAABAgAAABZhbiBpdGVtIGFscmVhZHkgZXhpc3RzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAJjMQAAAAEFAAAAAmIxBQAAAAJjOQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmE5AAAAAQUAAAACYjEFAAAAAmM3CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAJiOQAAAAEFAAAAAmIxBQAAAAJjOAUAAAADbmlsAAAAAmM2AQAAAAhwdXJjaGFzZQAAAAEAAAACYjEEAAAAAmQxCQABkQAAAAIIBQAAAAJjNgAAAAhwYXltZW50cwAAAAAAAAAAAAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAACZDEAAAAHYXNzZXRJZAkAAAIAAAABAgAAABZXQVZFUyBPTkxZIEhIRVVBV0hFVUFTBAAAAAJkMgkAAlgAAAABCAgFAAAAAmM2AAAABmNhbGxlcgAAAAVieXRlcwQAAAACYzcJAQAAAAJiMgAAAAEFAAAAAmIxBAAAAAJjOQkBAAAAAmMyAAAAAQUAAAACYjEDCQAAZgAAAAIFAAAAAmM3CAUAAAACZDEAAAAGYW1vdW50CQAAAgAAAAECAAAALlB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgbGVzcyB0aGFuIGl0ZW0gcHJpY2UDCQAAAAAAAAIFAAAAAmM5BQAAAAJhMQkAAAIAAAABAgAAABdTdXBwbGllciBkb2VzIG5vdCBleGlzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmIzAAAAAgUAAAACZDIFAAAAAmIxCQAAZAAAAAIJAQAAAAJiNQAAAAIFAAAAAmQyBQAAAAJiMQAAAAAAAAAAAQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmMzAAAAAQUAAAACYzkJAABkAAAAAgkBAAAAAmM1AAAAAQUAAAACYzkIBQAAAAJkMQAAAAZhbW91bnQFAAAAA25pbAAAAAJjNgEAAAAId2l0aGRyYXcAAAAABAAAAAJjOQkAAlgAAAABCAgFAAAAAmM2AAAABmNhbGxlcgAAAAVieXRlcwQAAAACZDMJAQAAAAJjNQAAAAEFAAAAAmM5AwkAAGcAAAACAAAAAAAAAAAABQAAAAJkMwkAAAIAAAABAgAAABNpbnN1ZmljaWVudCBiYWxhbmNlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAACYzMAAAABBQAAAAJjOQAAAAAAAAAAAAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAJjOQUAAAACZDMFAAAABHVuaXQFAAAAA25pbAAAAAAceWLv", "height": 1602977, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: Cu6rFhMqa3YRwSZdvW4o78a1h7u3c7GFJSBHLjcSRSfh 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 + "_owner")
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 already exists")
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 ONLY HHEUAWHEUAS")
76+ else {
77+ let userAddress = toBase58String(i.caller.bytes)
78+ let price = getValueItemPrice(item)
79+ let supplierAddress = getValueItemSupplier(item)
80+ if ((price > pmt.amount))
81+ then throw("Purchase amount cannot be less than item price")
82+ else if ((supplierAddress == NONE))
83+ then throw("Supplier does not exist")
84+ else [IntegerEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), IntegerEntry(getKeyBalanceSupplier(supplierAddress), (getValueBalanceSupplier(supplierAddress) + pmt.amount))]
85+ }
86+ }
87+
88+
89+
90+@Callable(i)
91+func withdraw () = {
92+ let supplierAddress = toBase58String(i.caller.bytes)
93+ let balance = getValueBalanceSupplier(supplierAddress)
94+ if ((0 >= balance))
95+ then throw("insuficient balance")
96+ else [IntegerEntry(getKeyBalanceSupplier(supplierAddress), 0), ScriptTransfer(addressFromStringValue(supplierAddress), balance, unit)]
97+ }
98+
99+

github/deemru/w8io/026f985 
18.20 ms