tx · Fu9i3sGYU4FCvixJhCAgdWzWutZiWBPrzfKZT6fS4a4c

3MsaXCT52ggYJWZtBEwQJPTrMQcX8zQpABa:  -0.01000000 Waves

2021.12.21 09:06 [1843823] smart account 3MsaXCT52ggYJWZtBEwQJPTrMQcX8zQpABa > SELF 0.00000000 Waves

{ "type": 13, "id": "Fu9i3sGYU4FCvixJhCAgdWzWutZiWBPrzfKZT6fS4a4c", "fee": 1000000, "feeAssetId": null, "timestamp": 1640077628965, "version": 2, "chainId": 84, "sender": "3MsaXCT52ggYJWZtBEwQJPTrMQcX8zQpABa", "senderPublicKey": "3uLRwuGsawQLLWXXct1U2P3ePeRdUZjsv8YZatXH6kBR", "proofs": [ "TbhC2hGjCxUfB69muU3LRXXfaZ3YJcD9RHTyf2YhTL3Gfm587WbHRuHRsU2QWfsdUFiQSFVSniNyVt1TFxvu3E4" ], "script": "base64:AAIDAAAAAAAAAIkIARIAEgMKAQEaBgoBYRIBaRoICgFiEgNwbXQaDwoBYxIKY3VycmVudEtleRoSCgFkEg1jdXJyZW50QW1vdW50GgwKAWUSByRtYXRjaDAaBgoBZhIBYRoOCgFnEgluZXdBbW91bnQaCwoBaBIGYW1vdW50GgcKAWkSAnR4GgsKAWoSBnZlcmlmeQAAAAAAAAACAAAAAWEBAAAAB2RlcG9zaXQAAAAABAAAAAFiCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFhAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAAWIAAAAHYXNzZXRJZAkAAAIAAAABAgAAACFjYW4gaG9kbCB3YXZlcyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAAWMJAAJYAAAAAQgIBQAAAAFhAAAABmNhbGxlcgAAAAVieXRlcwQAAAABZAQAAAABZQkABBoAAAACBQAAAAR0aGlzBQAAAAFjAwkAAAEAAAACBQAAAAFlAgAAAANJbnQEAAAAAWYFAAAAAWUFAAAAAWYAAAAAAAAAAAAEAAAAAWcJAABkAAAAAgUAAAABZAgFAAAAAWIAAAAGYW1vdW50CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAFjBQAAAAFnBQAAAANuaWwAAAABYQEAAAAId2l0aGRyYXcAAAABAAAAAWgEAAAAAWMJAAJYAAAAAQgIBQAAAAFhAAAABmNhbGxlcgAAAAVieXRlcwQAAAABZAQAAAABZQkABBoAAAACBQAAAAR0aGlzBQAAAAFjAwkAAAEAAAACBQAAAAFlAgAAAANJbnQEAAAAAWYFAAAAAWUFAAAAAWYAAAAAAAAAAAAEAAAAAWcJAABlAAAAAgUAAAABZAUAAAABaAMJAABmAAAAAgAAAAAAAAAAAAUAAAABaAkAAAIAAAABAgAAAB5DYW4ndCB3aXRoZHJhdyBuZWdhdGl2ZSBhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAAAWcJAAACAAAAAQIAAAASTm90IGVub3VnaCBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAABYwUAAAABZwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFhAAAABmNhbGxlcgUAAAABaAUAAAAEdW5pdAUAAAADbmlsAAAAAQAAAAFpAQAAAAFqAAAAAAfha0pc", "height": 1843823, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 5vbyniGSLfDtFnKoYbHdk5TSpF9pykw8Gx5dDF221mwF Next: none Full:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44
55
66 @Callable(i)
7-func myToken () = $Tuple2([Issue(("S_" + take(toBase58String(i.caller.bytes), 6)), "", 100000, 2, true)], unit)
7+func deposit () = {
8+ let pmt = extract(i.payment)
9+ if (isDefined(pmt.assetId))
10+ then throw("can hodl waves only at the moment")
11+ else {
12+ let currentKey = toBase58String(i.caller.bytes)
13+ let currentAmount = match getInteger(this, currentKey) {
14+ case a: Int =>
15+ a
16+ case _ =>
17+ 0
18+ }
19+ let newAmount = (currentAmount + pmt.amount)
20+ WriteSet([DataEntry(currentKey, newAmount)])
21+ }
22+ }
823
24+
25+
26+@Callable(i)
27+func withdraw (amount) = {
28+ let currentKey = toBase58String(i.caller.bytes)
29+ let currentAmount = match getInteger(this, currentKey) {
30+ case a: Int =>
31+ a
32+ case _ =>
33+ 0
34+ }
35+ let newAmount = (currentAmount - amount)
36+ if ((0 > amount))
37+ then throw("Can't withdraw negative amount")
38+ else if ((0 > newAmount))
39+ then throw("Not enough balance")
40+ else ScriptResult(WriteSet([DataEntry(currentKey, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
41+ }
42+
43+
44+@Verifier(tx)
45+func verify () = false
946

github/deemru/w8io/169f3d6 
21.41 ms