tx · 3JYFsfAMhVnaAuowd36Mj4SBZt5sFAApan99RUDJp8YU

3NAgLTYxYirbav9NrvnnNXaGUSw2igFbPd6:  -0.01000000 Waves

2022.04.10 13:31 [2002363] smart account 3NAgLTYxYirbav9NrvnnNXaGUSw2igFbPd6 > SELF 0.00000000 Waves

{ "type": 13, "id": "3JYFsfAMhVnaAuowd36Mj4SBZt5sFAApan99RUDJp8YU", "fee": 1000000, "feeAssetId": null, "timestamp": 1649586685459, "version": 2, "chainId": 84, "sender": "3NAgLTYxYirbav9NrvnnNXaGUSw2igFbPd6", "senderPublicKey": "9Mjv3QWESHZvT6CG3hWHiqu26seybu11rbNdAfwmDwnD", "proofs": [ "5V38NkYDQ5Lx5RVceohZraK8ZfeY17nbTE9ecSDCdLSDUD2d9jrWhX4qybTKBQeHWYKYJpaF426xpphLGqVcsU8f" ], "script": "base64:AAIDAAAAAAAAAAkIARIAEgMKAQEAAAAAAAAAAgAAAAFpAQAAAAdkZXBvc2l0AAAAAAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAIWNhbiBob2RsIHdhdmVzIG9ubHkgYXQgdGhlIG1vbWVudAQAAAAKY3VycmVudEtleQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACmN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAJbmV3QW1vdW50CQAAZAAAAAIFAAAADWN1cnJlbnRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAApjdXJyZW50S2V5BQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAEAAAAGYW1vdW50BAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAANY3VycmVudEFtb3VudAUAAAAGYW1vdW50AwkAAGYAAAACAAAAAAAAAAAABQAAAAZhbW91bnQJAAACAAAAAQIAAAAeQ2FuJ3Qgd2l0aGRyYXcgbmVnYXRpdmUgYW1vdW50AwkAAGYAAAACAAAAAAAAAAAABQAAAAluZXdBbW91bnQJAAACAAAAAQIAAAASTm90IGVub3VnaCBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAKY3VycmVudEtleQUAAAAJbmV3QW1vdW50BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAABHVuaXQFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAH+vmYeA==", "height": 2002363, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 7LjFiCjJ8VjQKR1BMKocZTT3T9X1kZ3E2ycsx4Jd7YJQ Next: none Full:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func randomizer (inv) = {
5- let lastPlay = match getBinary(this, "lastPlay") {
6- case s: ByteVector =>
7- s
8- case _: Unit =>
9- base58'2ee4oFDYriWJ9EMeR'
10- case _ =>
11- throw("Match error")
12- }
13- let rand = (((((lastPlay + inv.transactionId) + inv.callerPublicKey) + lastBlock.generationSignature) + toBytes(lastBlock.timestamp)) + toBytes(lastBlock.height))
14- sha256(rand)
4+
5+
6+@Callable(i)
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+ }
1522 }
1623
1724
18-func startLotto (inv) = {
19- let playLimit = (wavesBalance(this) / 100)
20- let payment = extract(inv.payment)
21- if (!(isDefined(inv.payment)))
22- then throw("Should be with Payment in Waves")
23- else if (isDefined(payment.assetId))
24- then throw("Payment should be in Waves")
25- else if ((payment.amount > playLimit))
26- then throw(("Payment should be less than " + toString(playLimit)))
27- else {
28- let randhash = randomizer(inv)
29- let winTransfer = TransferSet([ScriptTransfer(inv.caller, ((payment.amount * 190) / 100), unit)])
30- let writeLastPlay = WriteSet([DataEntry("lastPlay", randhash)])
31- if ((500 > (toInt(randhash) % 1000)))
32- then ScriptResult(writeLastPlay, winTransfer)
33- else ScriptResult(writeLastPlay, TransferSet(nil))
34- }
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)]))
3541 }
3642
3743
38-@Callable(inv)
39-func lotto () = startLotto(inv)
40-
41-
42-
43-@Callable(inv)
44-func default () = startLotto(inv)
45-
44+@Verifier(tx)
45+func verify () = false
4646

github/deemru/w8io/c3f4982 
30.24 ms