tx · 9LXAkVvc73oLyu77La1BUMfDFGdi7Cb11AXxdswNzwRt

3Mynaio8coZLr58tu2AdBEhmCvB17vTBRkA:  -0.01000000 Waves

2023.06.03 18:46 [2606705] smart account 3Mynaio8coZLr58tu2AdBEhmCvB17vTBRkA > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9LXAkVvc73oLyu77La1BUMfDFGdi7Cb11AXxdswNzwRt",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1685807255229,
    "version": 2,
    "chainId": 84,
    "sender": "3Mynaio8coZLr58tu2AdBEhmCvB17vTBRkA",
    "senderPublicKey": "Dx7cJVhpJb4qUDGiDnSjj6Wfjdj5nmzwVLfaggkbjDtv",
    "proofs": [
        "4xQWNW6YT6qgAj9qzVYxPdB5NUGwyPWXbGRMkmwKTjDZBboPmr3d1qc87yxF6ZEypKF4XWrqEroztcX1dEEPxNtn"
    ],
    "script": "base64:BgIGCAISABIABwEKbnVtVG9XYXZlcwEDbnVtCQBoAgUDbnVtAIDC1y8BC2lzUGF5bWVudE9rAQFpBBFhY2NlcHRhYmxlQXNzZXRJZAEgIkSm54hUfVEormpXug9p+nbhDnc37ahHq1IfaU2UQkcDCQAAAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUUGF5bWVudCBub3QgYXR0YWNoZWQEAXAJAJEDAggFAWkIcGF5bWVudHMAAAQHJG1hdGNoMAgFAXAHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAdhc3NldElkBQckbWF0Y2gwAwkAAAIFB2Fzc2V0SWQFEWFjY2VwdGFibGVBc3NldElkCQBnAggFAXAGYW1vdW50CQEKbnVtVG9XYXZlcwEAAQcJAGcCCAUBcAZhbW91bnQJAQpudW1Ub1dhdmVzAQABARNnZXRMdWNreVdoZWVsQmV0S2V5AQFpCQCsAgICD2JldF9MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXIBE2dldEx1Y2t5V2hlZWxXb25LZXkBAWkJAKwCAgIPd29uX0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgEcZ2V0THVja3lXaGVlbFJhbmRvbU51bWJlcktleQEBaQkArAICAhhyYW5kb21OdW1iZXJfTHVja3lXaGVlbF8JAKUIAQgFAWkGY2FsbGVyARNnZXRMdWNreVdoZWVsTG9nS2V5AQFpCQCsAgICD2xvZ19MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXIBGWdhbWVMdWNreVdoZWVsV2hhdFVzZXJXb24BBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAACAAEFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQACAwkAAAIABQUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAEDCQAAAgAHBQckbWF0Y2gwCQEKbnVtVG9XYXZlcwEABgMJAAACAAsFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQABAAACAWkBEGNvbW1pdEx1Y2t5V2hlZWwAAwkBASEBCQELaXNQYXltZW50T2sBBQFpCQACAQIdV3JvbmcgcGF5bWVudCBhbW91bnQgb3IgYXNzZXQJAMwIAgkBDEludGVnZXJFbnRyeQIJARNnZXRMdWNreVdoZWVsQmV0S2V5AQUBaQkAZAIFBmhlaWdodAABCQDMCAIJAQtEZWxldGVFbnRyeQEJARxnZXRMdWNreVdoZWVsUmFuZG9tTnVtYmVyS2V5AQUBaQkAzAgCCQELRGVsZXRlRW50cnkBCQETZ2V0THVja3lXaGVlbFdvbktleQEFAWkFA25pbAFpARByZXZlYWxMdWNreVdoZWVsAAQMY29tbWl0SGVpZ2h0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJARFAZXh0ck5hdGl2ZSgxMDU1KQEJARNnZXRMdWNreVdoZWVsQmV0S2V5AQUBaQINQmV0IG5vdCBmb3VuZAMJAGYCBQxjb21taXRIZWlnaHQFBmhlaWdodAkAAgEJAKwCAgkArAICAgV3YWl0IAkApAMBCQBlAgUMY29tbWl0SGVpZ2h0BQZoZWlnaHQCGSBibG9ja3MgdG8gcmV2ZWFsIHRoaXMgaWQEC3JldmVhbEJsb2NrCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAO0HAQUMY29tbWl0SGVpZ2h0AhF1bmV4Y3BlY3RlZCBlcnJvcgQDdnJmCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQtyZXZlYWxCbG9jawN2cmYCEXVuZXhjcGVjdGVkIGVycm9yBApyYW5kb21TZWVkCQCxCQEJAPUDAQUDdnJmBAxyYW5kb21OdW1iZXIJAGQCCQBqAgUKcmFuZG9tU2VlZAkAZAIJAGUCAAwAAQABAAEEDXdpbm5pbmdBbW91bnQJARlnYW1lTHVja3lXaGVlbFdoYXRVc2VyV29uAQUMcmFuZG9tTnVtYmVyAwkAZgIFDXdpbm5pbmdBbW91bnQAAAkAzAgCCQELRGVsZXRlRW50cnkBCQETZ2V0THVja3lXaGVlbEJldEtleQEFAWkJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQ13aW5uaW5nQW1vdW50BQR1bml0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQETZ2V0THVja3lXaGVlbFdvbktleQEFAWkFDXdpbm5pbmdBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARxnZXRMdWNreVdoZWVsUmFuZG9tTnVtYmVyS2V5AQUBaQUMcmFuZG9tTnVtYmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQETZ2V0THVja3lXaGVlbExvZ0tleQEFAWkFDXdpbm5pbmdBbW91bnQFA25pbAkAzAgCCQELRGVsZXRlRW50cnkBCQETZ2V0THVja3lXaGVlbEJldEtleQEFAWkJAMwIAgkBDEludGVnZXJFbnRyeQIJARNnZXRMdWNreVdoZWVsV29uS2V5AQUBaQUNd2lubmluZ0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHGdldEx1Y2t5V2hlZWxSYW5kb21OdW1iZXJLZXkBBQFpBQxyYW5kb21OdW1iZXIFA25pbABT9/cB",
    "height": 2606705,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D6gbhA39Wfb7w2eRvjkZnXJYgaY762jdt7rK8jh4Fmk1
Next: J66F5jHRodUYP18ArFJhHV8XgQvEQm4Csv1QZFpMPpLc

Diff: 
Old
New
Differences
29
29
 
30
30
 
31
31
 
func getLuckyWheelRandomNumberKey (i) = ("randomNumber_LuckyWheel_" + toString(i.caller))
32
+
33
+
34
+
func getLuckyWheelLogKey (i) = ("log_LuckyWheel_" + toString(i.caller))
32
35
 
33
36
 
34
37
 
func gameLuckyWheelWhatUserWon (value) = match value {
64
67
 
            let randomNumber = ((randomSeed % ((12 - 1) + 1)) + 1)
65
68
 
            let winningAmount = gameLuckyWheelWhatUserWon(randomNumber)
66
69
 
            if ((winningAmount > 0))
67
-
                then [DeleteEntry(getLuckyWheelBetKey(i)), ScriptTransfer(i.caller, winningAmount, unit), IntegerEntry(getLuckyWheelWonKey(i), winningAmount), IntegerEntry(getLuckyWheelRandomNumberKey(i), randomNumber)]
70
+
                then [DeleteEntry(getLuckyWheelBetKey(i)), ScriptTransfer(i.caller, winningAmount, unit), IntegerEntry(getLuckyWheelWonKey(i), winningAmount), IntegerEntry(getLuckyWheelRandomNumberKey(i), randomNumber), IntegerEntry(getLuckyWheelLogKey(i), winningAmount)]
68
71
 
                else [DeleteEntry(getLuckyWheelBetKey(i)), IntegerEntry(getLuckyWheelWonKey(i), winningAmount), IntegerEntry(getLuckyWheelRandomNumberKey(i), randomNumber)]
69
72
 
            }
70
73
 
    }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func numToWaves (num) = (num * 100000000)
5
5
 
6
6
 
7
7
 
func isPaymentOk (i) = {
8
8
 
    let acceptableAssetId = base58'3JmaWyFqWo8YSA8x3DXCBUW7veesxacvKx19dMv7wTMg'
9
9
 
    if ((size(i.payments) == 0))
10
10
 
        then throw("Payment not attached")
11
11
 
        else {
12
12
 
            let p = i.payments[0]
13
13
 
            match p.assetId {
14
14
 
                case assetId: ByteVector => 
15
15
 
                    if ((assetId == acceptableAssetId))
16
16
 
                        then (p.amount >= numToWaves(1))
17
17
 
                        else false
18
18
 
                case _ => 
19
19
 
                    (p.amount >= numToWaves(1))
20
20
 
            }
21
21
 
            }
22
22
 
    }
23
23
 
24
24
 
25
25
 
func getLuckyWheelBetKey (i) = ("bet_LuckyWheel_" + toString(i.caller))
26
26
 
27
27
 
28
28
 
func getLuckyWheelWonKey (i) = ("won_LuckyWheel_" + toString(i.caller))
29
29
 
30
30
 
31
31
 
func getLuckyWheelRandomNumberKey (i) = ("randomNumber_LuckyWheel_" + toString(i.caller))
32
+
33
+
34
+
func getLuckyWheelLogKey (i) = ("log_LuckyWheel_" + toString(i.caller))
32
35
 
33
36
 
34
37
 
func gameLuckyWheelWhatUserWon (value) = match value {
35
38
 
    case _ => 
36
39
 
        if ((1 == $match0))
37
40
 
            then numToWaves(2)
38
41
 
            else if ((5 == $match0))
39
42
 
                then numToWaves(1)
40
43
 
                else if ((7 == $match0))
41
44
 
                    then numToWaves(6)
42
45
 
                    else if ((11 == $match0))
43
46
 
                        then numToWaves(1)
44
47
 
                        else 0
45
48
 
}
46
49
 
47
50
 
48
51
 
@Callable(i)
49
52
 
func commitLuckyWheel () = if (!(isPaymentOk(i)))
50
53
 
    then throw("Wrong payment amount or asset")
51
54
 
    else [IntegerEntry(getLuckyWheelBetKey(i), (height + 1)), DeleteEntry(getLuckyWheelRandomNumberKey(i)), DeleteEntry(getLuckyWheelWonKey(i))]
52
55
 
53
56
 
54
57
 
55
58
 
@Callable(i)
56
59
 
func revealLuckyWheel () = {
57
60
 
    let commitHeight = valueOrErrorMessage(getIntegerValue(getLuckyWheelBetKey(i)), "Bet not found")
58
61
 
    if ((commitHeight > height))
59
62
 
        then throw((("wait " + toString((commitHeight - height))) + " blocks to reveal this id"))
60
63
 
        else {
61
64
 
            let revealBlock = valueOrErrorMessage(blockInfoByHeight(commitHeight), "unexcpected error")
62
65
 
            let vrf = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
63
66
 
            let randomSeed = toInt(keccak256(vrf))
64
67
 
            let randomNumber = ((randomSeed % ((12 - 1) + 1)) + 1)
65
68
 
            let winningAmount = gameLuckyWheelWhatUserWon(randomNumber)
66
69
 
            if ((winningAmount > 0))
67
-
                then [DeleteEntry(getLuckyWheelBetKey(i)), ScriptTransfer(i.caller, winningAmount, unit), IntegerEntry(getLuckyWheelWonKey(i), winningAmount), IntegerEntry(getLuckyWheelRandomNumberKey(i), randomNumber)]
70
+
                then [DeleteEntry(getLuckyWheelBetKey(i)), ScriptTransfer(i.caller, winningAmount, unit), IntegerEntry(getLuckyWheelWonKey(i), winningAmount), IntegerEntry(getLuckyWheelRandomNumberKey(i), randomNumber), IntegerEntry(getLuckyWheelLogKey(i), winningAmount)]
68
71
 
                else [DeleteEntry(getLuckyWheelBetKey(i)), IntegerEntry(getLuckyWheelWonKey(i), winningAmount), IntegerEntry(getLuckyWheelRandomNumberKey(i), randomNumber)]
69
72
 
            }
70
73
 
    }
71
74
 
72
75
 

github/deemru/w8io/169f3d6 
29.25 ms ◑