tx · 6PjaPr5qNjGqveGJqR7RvEPGrtdYVszFhmBbsfpCfmB1

3MtWYHeMrDBXUmBKtXWFq8eBv3p7X7k2fox:  -0.01000000 Waves

2022.10.28 12:36 [2292092] smart account 3MtWYHeMrDBXUmBKtXWFq8eBv3p7X7k2fox > SELF 0.00000000 Waves

{ "type": 13, "id": "6PjaPr5qNjGqveGJqR7RvEPGrtdYVszFhmBbsfpCfmB1", "fee": 1000000, "feeAssetId": null, "timestamp": 1666949770809, "version": 2, "chainId": 84, "sender": "3MtWYHeMrDBXUmBKtXWFq8eBv3p7X7k2fox", "senderPublicKey": "3wSv69WqTiGQVZxyv9hfHfPvXTxrKrWFutonxuaf24vp", "proofs": [ "2Mp4NC7acsj4ECaUe74qiFe7hN8P1Ca7fSvfEFEVJf64ArB8VLZJ8jnkF5XFYSEUvbAbHJEdATfL1z1LxjNM4fV6" ], "script": "base64:AAIDAAAAAAAAAA4IARIFCgMIAQESAwoBCAAAAAQAAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAAA8kT1JBQ0xFX0FERFJFU1MAAAAABm1pbkJldAAAAAAAAvrwgAAAAAAJbWF4U3VtQmV0AAAAAAA7msoAAQAAAA1jYWxjV2luQW1vdW50AAAAAwAAAAR0aGlzAAAAA2tleQAAAAVrb2VmZgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAkAAGgAAAACBQAAAAFhBQAAAAVrb2VmZgAAAAAAAAAAAAAAAAIAAAABaQEAAAADYmV0AAAAAwAAAAVyb3VuZAAAAAlndWVzc1R5cGUAAAAKZ3Vlc3NWYWx1ZQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAHEJldHMgb25seSBpbiBXYXZlcyBzdXBwb3J0ZWQDCQAAZgAAAAIFAAAABm1pbkJldAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAAClZb3VyIEJldCBhbW91bnQgaXMgbGVzcyB0aGVuIG1pbmltYWwgYmV0IAkAAaQAAAABBQAAAAZtaW5CZXQDAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQbAAAAAgUAAAAGb3JhY2xlCQABLAAAAAIFAAAABXJvdW5kAgAAAAVfc3RvcAYJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABm9yYWNsZQUAAAAFcm91bmQJAAACAAAAAQIAAAAcVGhpcyByb3VuZCBpcyBhbHJlYWR5IHBsYXllZAQAAAAMcm91bmRCZXRzS2V5CQABLAAAAAIFAAAABXJvdW5kAgAAAAhfc3VtQmV0cwQAAAAKY3VyU3VtQmV0cwQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAxyb3VuZEJldHNLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAKbmV3U3VtQmV0cwkAAGQAAAACBQAAAApjdXJTdW1CZXRzCAUAAAADcG10AAAABmFtb3VudAMJAABmAAAAAgUAAAAKbmV3U3VtQmV0cwUAAAAJbWF4U3VtQmV0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAIU1heGltdW0gYW1vdW50IG9mIGJldHMgZm9yIHJvdW5kIAkAAaQAAAABBQAAAAltYXhTdW1CZXQCAAAAFS4gV2l0aCB5b3VyIGJldCBpdCdzIAkAAaQAAAABBQAAAApuZXdTdW1CZXRzBAAAAAZiZXRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAABXwUAAAAFcm91bmQCAAAAAV8JAAGkAAAAAQUAAAAJZ3Vlc3NUeXBlAgAAAAFfCQABpAAAAAEFAAAACmd1ZXNzVmFsdWUEAAAADGN1ckJldEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAZiZXRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAMbmV3QmV0QW1vdW50CQAAZAAAAAIFAAAADGN1ckJldEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABmJldEtleQUAAAAMbmV3QmV0QW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAxyb3VuZEJldHNLZXkFAAAACm5ld1N1bUJldHMFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAEAAAAFcm91bmQEAAAACmJldEtleVBhcnQJAAEsAAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAAAV8FAAAABXJvdW5kBAAAAAt3aXRoZHJhd0tleQkAASwAAAACBQAAAApiZXRLZXlQYXJ0AgAAAAlfd2l0aGRyYXcDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAR0aGlzBQAAAAt3aXRoZHJhd0tleQkAAAIAAAABAgAAAB9Zb3UgaGF2ZSBhbHJlYWR5IGdvdCB5b3VyIHByaXplBAAAAAp2YWxDb21wbGV4CQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAZvcmFjbGUFAAAABXJvdW5kBAAAAAZ3aW5OdW0JAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAATAAAAACCQABLwAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAIAAAAAAAAAAAAEAAAAC3dpblJlZEJsYWNrCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAADAAAAAAAAAAACBAAAAAp3aW5FdmVuT2RkCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAEAAAAAAAAAAADBAAAAAt3aW5EZXNrSGFsZgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABMAAAAAIJAAEvAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABQAAAAAAAAAABAQAAAAMd2luRGVza1RoaXJkCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAGAAAAAAAAAAAFBAAAAAZ3aW5Sb3cJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAATAAAAACCQABLwAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAcAAAAAAAAAAAYEAAAACXdpbkFtb3VudAkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18wXwkAAaQAAAABBQAAAAZ3aW5OdW0AAAAAAAAAACQJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18xXwkAAaQAAAABBQAAAAt3aW5SZWRCbGFjawAAAAAAAAAAAgkBAAAADWNhbGNXaW5BbW91bnQAAAADBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAADXzJfCQABpAAAAAEFAAAACndpbkV2ZW5PZGQAAAAAAAAAAAIJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18zXwkAAaQAAAABBQAAAAt3aW5EZXNrSGFsZgAAAAAAAAAAAgkBAAAADWNhbGNXaW5BbW91bnQAAAADBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAADXzRfCQABpAAAAAEFAAAADHdpbkRlc2tUaGlyZAAAAAAAAAAAAwkBAAAADWNhbGNXaW5BbW91bnQAAAADBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAADXzVfCQABpAAAAAEFAAAABndpblJvdwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAJd2luQW1vdW50AAAAAAAAAAAACQAAAgAAAAECAAAAGllvdSB3b24gbm90aGluZyB0aGlzIHJvdW5kCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAALd2l0aGRyYXdLZXkFAAAACXdpbkFtb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAJd2luQW1vdW50BQAAAAR1bml0BQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAEAAAAaAVQyZMcARFuPWaB7yYQ/nq8eXBFPLfcTfRNxR3Ak", "height": 2292092, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 8Yhj12dxuzW1G6yk8AF1XegtZrraRqAFukgvPUgBqSzP Next: none Full:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
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+}
416
517
618 @Callable(i)
7-func call () = {
8- let asset = Issue("Asset", "", 1, 0, true, unit, 0)
9- let assetId = calculateAssetId(asset)
10-[BinaryEntry("bin", base58''), BooleanEntry("bool", true), IntegerEntry("int", 1), StringEntry("str", ""), DeleteEntry("str"), asset, Reissue(assetId, 1, false), Burn(assetId, 1), ScriptTransfer(i.caller, 1, assetId)]
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")
29+ else {
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+ }
51+ }
52+ }
53+
54+
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+ }
1175 }
1276
1377
1478 @Verifier(tx)
15-func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
79+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], base58'3MtWYHeMrDBXUmBKtXWFq8eBv3p7X7k2fox')
1680

github/deemru/w8io/873ac7e 
27.22 ms