tx · GpMN48JMwwAafVJd3nsvpaZK6nRSykdoWL4UC4Jc33AR

3N8agPk8fYWezXr7adzC2qvrMyFshjsqi63:  -0.01400000 Waves

2019.07.26 11:29 [602802] smart account 3N8agPk8fYWezXr7adzC2qvrMyFshjsqi63 > SELF 0.00000000 Waves

{ "type": 13, "id": "GpMN48JMwwAafVJd3nsvpaZK6nRSykdoWL4UC4Jc33AR", "fee": 1400000, "feeAssetId": null, "timestamp": 1564129752036, "version": 1, "sender": "3N8agPk8fYWezXr7adzC2qvrMyFshjsqi63", "senderPublicKey": "HcBidkpthq88rmpgyqZev1Rk8sgRakGsJhx1HnVD2ah9", "proofs": [ "4hdAZqfMpB81ELds7WfaQnSTsbDNShVNpCY9cy7qgG7xqLs7MX8Pd3tEmNN6FkiMA1cEzDKCUe1M9sde8mDsqH8Q" ], "script": "base64:AAIDAAAAAAAAAAAAAAAEAAAAAAZvcmFjbGUJAQAAAAdleHRyYWN0AAAAAQkBAAAAEWFkZHJlc3NGcm9tU3RyaW5nAAAAAQIAAAAPJE9SQUNMRV9BRERSRVNTAAAAAAZtaW5CZXQAAAAAAAL68IAAAAAACW1heFN1bUJldAAAAAAAO5rKAAEAAAANY2FsY1dpbkFtb3VudAAAAAMAAAAEdGhpcwAAAANrZXkAAAAFa29lZmYEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAJAABoAAAAAgUAAAABYQUAAAAFa29lZmYAAAAAAAAAAAAAAAACAAAAAWkBAAAAA2JldAAAAAMAAAAFcm91bmQAAAAJZ3Vlc3NUeXBlAAAACmd1ZXNzVmFsdWUEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABxCZXRzIG9ubHkgaW4gV2F2ZXMgc3VwcG9ydGVkAwkAAGYAAAACBQAAAAZtaW5CZXQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAAApWW91ciBCZXQgYW1vdW50IGlzIGxlc3MgdGhlbiBtaW5pbWFsIGJldCAJAAGkAAAAAQUAAAAGbWluQmV0AwMJAQAAAAlpc0RlZmluZWQAAAABCQAEGwAAAAIFAAAABm9yYWNsZQkAASwAAAACBQAAAAVyb3VuZAIAAAAFX3N0b3AGCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAZvcmFjbGUFAAAABXJvdW5kCQAAAgAAAAECAAAAHFRoaXMgcm91bmQgaXMgYWxyZWFkeSBwbGF5ZWQEAAAADHJvdW5kQmV0c0tleQkAASwAAAACBQAAAAVyb3VuZAIAAAAIX3N1bUJldHMEAAAACmN1clN1bUJldHMEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAMcm91bmRCZXRzS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAACm5ld1N1bUJldHMJAABkAAAAAgUAAAAKY3VyU3VtQmV0cwgFAAAAA3BtdAAAAAZhbW91bnQDCQAAZgAAAAIFAAAACm5ld1N1bUJldHMFAAAACW1heFN1bUJldAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAACFNYXhpbXVtIGFtb3VudCBvZiBiZXRzIGZvciByb3VuZCAJAAGkAAAAAQUAAAAJbWF4U3VtQmV0AgAAABUuIFdpdGggeW91ciBiZXQgaXQncyAJAAGkAAAAAQUAAAAKbmV3U3VtQmV0cwQAAAAGYmV0S2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAAAV8FAAAABXJvdW5kAgAAAAFfCQABpAAAAAEFAAAACWd1ZXNzVHlwZQIAAAABXwkAAaQAAAABBQAAAApndWVzc1ZhbHVlBAAAAAxjdXJCZXRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAGYmV0S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAADG5ld0JldEFtb3VudAkAAGQAAAACBQAAAAxjdXJCZXRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAZiZXRLZXkFAAAADG5ld0JldEFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAMcm91bmRCZXRzS2V5BQAAAApuZXdTdW1CZXRzBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAABAAAABXJvdW5kBAAAAApiZXRLZXlQYXJ0CQABLAAAAAIJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAFfBQAAAAVyb3VuZAQAAAALd2l0aGRyYXdLZXkJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAAJX3dpdGhkcmF3AwkBAAAACWlzRGVmaW5lZAAAAAEJAAQaAAAAAgUAAAAEdGhpcwUAAAALd2l0aGRyYXdLZXkJAAACAAAAAQIAAAAfWW91IGhhdmUgYWxyZWFkeSBnb3QgeW91ciBwcml6ZQQAAAAKdmFsQ29tcGxleAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAGb3JhY2xlBQAAAAVyb3VuZAQAAAAGd2luTnVtCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAACAAAAAAAAAAAABAAAAAt3aW5SZWRCbGFjawkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABMAAAAAIJAAEvAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAAAwAAAAAAAAAAAgQAAAAKd2luRXZlbk9kZAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABMAAAAAIJAAEvAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABAAAAAAAAAAAAwQAAAALd2luRGVza0hhbGYJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAATAAAAACCQABLwAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAUAAAAAAAAAAAQEAAAADHdpbkRlc2tUaGlyZAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABMAAAAAIJAAEvAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABgAAAAAAAAAABQQAAAAGd2luUm93CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAHAAAAAAAAAAAGBAAAAAl3aW5BbW91bnQJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACCQEAAAANY2FsY1dpbkFtb3VudAAAAAMFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACBQAAAApiZXRLZXlQYXJ0AgAAAANfMF8JAAGkAAAAAQUAAAAGd2luTnVtAAAAAAAAAAAkCQEAAAANY2FsY1dpbkFtb3VudAAAAAMFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACBQAAAApiZXRLZXlQYXJ0AgAAAANfMV8JAAGkAAAAAQUAAAALd2luUmVkQmxhY2sAAAAAAAAAAAIJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18yXwkAAaQAAAABBQAAAAp3aW5FdmVuT2RkAAAAAAAAAAACCQEAAAANY2FsY1dpbkFtb3VudAAAAAMFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACBQAAAApiZXRLZXlQYXJ0AgAAAANfM18JAAGkAAAAAQUAAAALd2luRGVza0hhbGYAAAAAAAAAAAIJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA180XwkAAaQAAAABBQAAAAx3aW5EZXNrVGhpcmQAAAAAAAAAAAMJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA181XwkAAaQAAAABBQAAAAZ3aW5Sb3cAAAAAAAAAAAMDCQAAAAAAAAIFAAAACXdpbkFtb3VudAAAAAAAAAAAAAkAAAIAAAABAgAAABpZb3Ugd29uIG5vdGhpbmcgdGhpcyByb3VuZAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAC3dpdGhkcmF3S2V5BQAAAAl3aW5BbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAACXdpbkFtb3VudAUAAAAEdW5pdAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAABAAAAINgBkca4gLsjE93PQHB+gkONyYjeVkiwUruK9aqC1NFilixrqw==", "chainId": 84, "height": 602802, "spentComplexity": 0 } View: original | compacted Prev: 4ab76Cj9vDAWSyfqwqkGn8yKow97bYPBXbowrNivfZpY 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 a: Unit =>
9- base58'2ee4oFDYriWJ9EMeR'
10- case _ =>
11- throw()
12- }
13- let rand = (((((lastPlay + inv.transactionId) + inv.callerPublicKey) + lastBlock.generationSignature) + toBytes(lastBlock.timestamp)) + toBytes(lastBlock.height))
14- sha256(rand)
15- }
4+let oracle = extract(addressFromString("$ORACLE_ADDRESS"))
5+
6+let minBet = 50000000
7+
8+let maxSumBet = 1000000000
9+
10+func calcWinAmount (this,key,koeff) = match getInteger(this, key) {
11+ case a: Int =>
12+ (a * koeff)
13+ case _ =>
14+ 0
15+}
1616
1717
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)))
18+@Callable(i)
19+func bet (round,guessType,guessValue) = {
20+ let pmt = extract(i.payment)
21+ if (isDefined(pmt.assetId))
22+ then throw("Bets only in Waves supported")
23+ else if ((minBet > pmt.amount))
24+ then throw(("Your Bet amount is less then minimal bet " + toString(minBet)))
25+ else if (if (isDefined(getBoolean(oracle, (round + "_stop"))))
26+ then true
27+ else isDefined(getString(oracle, round)))
28+ then throw("This round is already played")
2729 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))
30+ let roundBetsKey = (round + "_sumBets")
31+ let curSumBets = match getInteger(this, roundBetsKey) {
32+ case a: Int =>
33+ a
34+ case _ =>
35+ 0
36+ }
37+ let newSumBets = (curSumBets + pmt.amount)
38+ if ((newSumBets > maxSumBet))
39+ then throw(((("Maximum amount of bets for round " + toString(maxSumBet)) + ". With your bet it's ") + toString(newSumBets)))
40+ else {
41+ let betKey = ((((((toBase58String(i.caller.bytes) + "_") + round) + "_") + toString(guessType)) + "_") + toString(guessValue))
42+ let curBetAmount = match getInteger(this, betKey) {
43+ case a: Int =>
44+ a
45+ case _ =>
46+ 0
47+ }
48+ let newBetAmount = (curBetAmount + pmt.amount)
49+ WriteSet([DataEntry(betKey, newBetAmount), DataEntry(roundBetsKey, newSumBets)])
50+ }
3451 }
3552 }
3653
3754
38-@Callable(inv)
39-func lotto () = startLotto(inv)
55+
56+@Callable(i)
57+func withdraw (round) = {
58+ let betKeyPart = ((toBase58String(i.caller.bytes) + "_") + round)
59+ let withdrawKey = (betKeyPart + "_withdraw")
60+ if (isDefined(getInteger(this, withdrawKey)))
61+ then throw("You have already got your prize")
62+ else {
63+ let valComplex = getStringValue(oracle, round)
64+ let winNum = parseIntValue(drop(take(valComplex, 2), 0))
65+ let winRedBlack = parseIntValue(drop(take(valComplex, 3), 2))
66+ let winEvenOdd = parseIntValue(drop(take(valComplex, 4), 3))
67+ let winDeskHalf = parseIntValue(drop(take(valComplex, 5), 4))
68+ let winDeskThird = parseIntValue(drop(take(valComplex, 6), 5))
69+ let winRow = parseIntValue(drop(take(valComplex, 7), 6))
70+ let winAmount = (((((calcWinAmount(this, ((betKeyPart + "_0_") + toString(winNum)), 36) + calcWinAmount(this, ((betKeyPart + "_1_") + toString(winRedBlack)), 2)) + calcWinAmount(this, ((betKeyPart + "_2_") + toString(winEvenOdd)), 2)) + calcWinAmount(this, ((betKeyPart + "_3_") + toString(winDeskHalf)), 2)) + calcWinAmount(this, ((betKeyPart + "_4_") + toString(winDeskThird)), 3)) + calcWinAmount(this, ((betKeyPart + "_5_") + toString(winRow)), 3))
71+ if ((winAmount == 0))
72+ then throw("You won nothing this round")
73+ else ScriptResult(WriteSet([DataEntry(withdrawKey, winAmount)]), TransferSet([ScriptTransfer(i.caller, winAmount, unit)]))
74+ }
75+ }
4076
4177
42-
43-@Callable(inv)
44-func default () = startLotto(inv)
45-
78+@Verifier(tx)
79+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], base58'FYCT9GxhR2igEeyf9SWGi85bebBVaTAf9WUihEQnnBa9')
4680

github/deemru/w8io/169f3d6 
38.47 ms