tx · Azpb4TFbDfEvR53Y3578PhLbERoDcqWvD6ZE6TFfUVGL

3NCtYwvCELajuvwxWYEaBEsMgvh2xBuM7Jn:  -0.00400000 Waves

2022.08.08 15:10 [2175463] smart account 3NCtYwvCELajuvwxWYEaBEsMgvh2xBuM7Jn > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Azpb4TFbDfEvR53Y3578PhLbERoDcqWvD6ZE6TFfUVGL",
    "fee": 400000,
    "feeAssetId": null,
    "timestamp": 1659960643183,
    "version": 2,
    "chainId": 84,
    "sender": "3NCtYwvCELajuvwxWYEaBEsMgvh2xBuM7Jn",
    "senderPublicKey": "8teWsjs6hE9vKVLe84mmc29U9yFoNq1eRiHfw4jqdRQf",
    "proofs": [
        "48qdqWKXoHKZL5ieLZM9nAMP5zjEhhF5a16ZheBS7ppffBebnjM5xYjkGEmqbTCKoPzjecJVqvHDkmWMvb1ZWEji"
    ],
    "script": "base64:AAIDAAAAAAAAAA4IARIFCgMIAQESAwoBCAAAAAQAAAAABm9yYWNsZQkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAAA8kT1JBQ0xFX0FERFJFU1MAAAAABm1pbkJldAAAAAAAAvrwgAAAAAAJbWF4U3VtQmV0AAAAAAA7msoAAQAAAA1jYWxjV2luQW1vdW50AAAAAwAAAAR0aGlzAAAAA2tleQAAAAVrb2VmZgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAkAAGgAAAACBQAAAAFhBQAAAAVrb2VmZgAAAAAAAAAAAAAAAAIAAAABaQEAAAADYmV0AAAAAwAAAAVyb3VuZAAAAAlndWVzc1R5cGUAAAAKZ3Vlc3NWYWx1ZQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAHEJldHMgb25seSBpbiBXYXZlcyBzdXBwb3J0ZWQDCQAAZgAAAAIFAAAABm1pbkJldAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAAClZb3VyIEJldCBhbW91bnQgaXMgbGVzcyB0aGVuIG1pbmltYWwgYmV0IAkAAaQAAAABBQAAAAZtaW5CZXQDAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQbAAAAAgUAAAAGb3JhY2xlCQABLAAAAAIFAAAABXJvdW5kAgAAAAVfc3RvcAYJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABm9yYWNsZQUAAAAFcm91bmQJAAACAAAAAQIAAAAcVGhpcyByb3VuZCBpcyBhbHJlYWR5IHBsYXllZAQAAAAMcm91bmRCZXRzS2V5CQABLAAAAAIFAAAABXJvdW5kAgAAAAhfc3VtQmV0cwQAAAAKY3VyU3VtQmV0cwQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAxyb3VuZEJldHNLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAKbmV3U3VtQmV0cwkAAGQAAAACBQAAAApjdXJTdW1CZXRzCAUAAAADcG10AAAABmFtb3VudAMJAABmAAAAAgUAAAAKbmV3U3VtQmV0cwUAAAAJbWF4U3VtQmV0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAIU1heGltdW0gYW1vdW50IG9mIGJldHMgZm9yIHJvdW5kIAkAAaQAAAABBQAAAAltYXhTdW1CZXQCAAAAFS4gV2l0aCB5b3VyIGJldCBpdCdzIAkAAaQAAAABBQAAAApuZXdTdW1CZXRzBAAAAAZiZXRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAABXwUAAAAFcm91bmQCAAAAAV8JAAGkAAAAAQUAAAAJZ3Vlc3NUeXBlAgAAAAFfCQABpAAAAAEFAAAACmd1ZXNzVmFsdWUEAAAADGN1ckJldEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAZiZXRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAMbmV3QmV0QW1vdW50CQAAZAAAAAIFAAAADGN1ckJldEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABmJldEtleQUAAAAMbmV3QmV0QW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAxyb3VuZEJldHNLZXkFAAAACm5ld1N1bUJldHMFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAEAAAAFcm91bmQEAAAACmJldEtleVBhcnQJAAEsAAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAAAV8FAAAABXJvdW5kBAAAAAt3aXRoZHJhd0tleQkAASwAAAACBQAAAApiZXRLZXlQYXJ0AgAAAAlfd2l0aGRyYXcDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAR0aGlzBQAAAAt3aXRoZHJhd0tleQkAAAIAAAABAgAAAB9Zb3UgaGF2ZSBhbHJlYWR5IGdvdCB5b3VyIHByaXplBAAAAAp2YWxDb21wbGV4CQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAZvcmFjbGUFAAAABXJvdW5kBAAAAAZ3aW5OdW0JAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAATAAAAACCQABLwAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAIAAAAAAAAAAAAEAAAAC3dpblJlZEJsYWNrCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAADAAAAAAAAAAACBAAAAAp3aW5FdmVuT2RkCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAEAAAAAAAAAAADBAAAAAt3aW5EZXNrSGFsZgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABMAAAAAIJAAEvAAAAAgUAAAAKdmFsQ29tcGxleAAAAAAAAAAABQAAAAAAAAAABAQAAAAMd2luRGVza1RoaXJkCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAEwAAAAAgkAAS8AAAACBQAAAAp2YWxDb21wbGV4AAAAAAAAAAAGAAAAAAAAAAAFBAAAAAZ3aW5Sb3cJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAATAAAAACCQABLwAAAAIFAAAACnZhbENvbXBsZXgAAAAAAAAAAAcAAAAAAAAAAAYEAAAACXdpbkFtb3VudAkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18wXwkAAaQAAAABBQAAAAZ3aW5OdW0AAAAAAAAAACQJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18xXwkAAaQAAAABBQAAAAt3aW5SZWRCbGFjawAAAAAAAAAAAgkBAAAADWNhbGNXaW5BbW91bnQAAAADBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAADXzJfCQABpAAAAAEFAAAACndpbkV2ZW5PZGQAAAAAAAAAAAIJAQAAAA1jYWxjV2luQW1vdW50AAAAAwUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIFAAAACmJldEtleVBhcnQCAAAAA18zXwkAAaQAAAABBQAAAAt3aW5EZXNrSGFsZgAAAAAAAAAAAgkBAAAADWNhbGNXaW5BbW91bnQAAAADBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAADXzRfCQABpAAAAAEFAAAADHdpbkRlc2tUaGlyZAAAAAAAAAAAAwkBAAAADWNhbGNXaW5BbW91bnQAAAADBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAKYmV0S2V5UGFydAIAAAADXzVfCQABpAAAAAEFAAAABndpblJvdwAAAAAAAAAAAwMJAAAAAAAAAgUAAAAJd2luQW1vdW50AAAAAAAAAAAACQAAAgAAAAECAAAAGllvdSB3b24gbm90aGluZyB0aGlzIHJvdW5kCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAALd2l0aGRyYXdLZXkFAAAACXdpbkFtb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAJd2luQW1vdW50BQAAAAR1bml0BQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAEAAAAg2AGRxriAuyMT3c9AcH6CQ43JiN5WSLBSu4r1qoLU0WKqOYr1",
    "height": 2175463,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: YuXGCvqVbapnSB93EXpHim4Lxp33dDWjSasgE3Zu4ik
Next: none

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let answersCount = 20
4
+
let oracle = extract(addressFromString("$ORACLE_ADDRESS"))
5
5
 
6
-
let answers = ["It is certain.", "It is decidedly so.", "Without a doubt.", "Yes - definitely.", "You may rely on it.", "As I see it, yes.", "Most likely.", "Outlook good.", "Yes.", "Signs point to yes.", "Reply hazy, try again.", "Ask again later.", "Better not tell you now.", "Cannot predict now.", "Concentrate and ask again.", "Don't count on it.", "My reply is no.", "My sources say no.", "Outlook not so good.", "Very doubtful."]
6
+
let minBet = 50000000
7
7
 
8
-
func getAnswer (question,previousAnswer) = {
9
-
    let hash = sha256(toBytes((question + previousAnswer)))
10
-
    let index = toInt(hash)
11
-
answers[(index % answersCount)]
12
-
    }
8
+
let maxSumBet = 1000000000
13
9
 
14
-
15
-
func getPreviousAnswer (address) = match getString(this, (address + "_a")) {
16
-
    case a: String => 
17
-
        a
10
+
func calcWinAmount (this,key,koeff) = match getInteger(this, key) {
11
+
    case a: Int => 
12
+
        (a * koeff)
18
13
 
    case _ => 
19
-
        address
14
+
        0
20
15
 
}
21
16
 
22
17
 
23
18
 
@Callable(i)
24
-
func tellme (question) = {
25
-
    let callerAddress = toBase58String(i.caller.bytes)
26
-
    let answer = getAnswer(question, getPreviousAnswer(callerAddress))
27
-
    WriteSet([DataEntry((callerAddress + "_q"), question), DataEntry((callerAddress + "_a"), answer)])
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
+
                    }
28
52
 
    }
29
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
+
            }
75
+
    }
76
+
77
+
78
+
@Verifier(tx)
79
+
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], base58'FYCT9GxhR2igEeyf9SWGi85bebBVaTAf9WUihEQnnBa9')
30
80
 

github/deemru/w8io/169f3d6 
41.22 ms ◑