tx · dM25ThcHsBdKo76sQrCgUUEeNQxZKboDqPcA2YMzeyG

3N9bCLWJvRQQmKHye2xD7xd3a8bGMicRo9R:  -0.01000000 Waves

2023.06.12 20:56 [2619783] smart account 3N9bCLWJvRQQmKHye2xD7xd3a8bGMicRo9R > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "dM25ThcHsBdKo76sQrCgUUEeNQxZKboDqPcA2YMzeyG",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1686592710325,
    "version": 2,
    "chainId": 84,
    "sender": "3N9bCLWJvRQQmKHye2xD7xd3a8bGMicRo9R",
    "senderPublicKey": "3Lws6NHDGo96BZXMyvFcRMbR4bh6sRJ3Y7UUcd5vvhqG",
    "proofs": [
        "2qE5dF5255QYbJgoA6gMqaNg6JT4k4YNCj5nQFkG1zJdSMpFgNsxtJSWe7uPbgqdyCk4HRY1vcjyVw7B9qu3tjoa"
    ],
    "script": "base64:BgIHCAISAwoBARsBCm51bVRvV2F2ZXMBA251bQkAaAIFA251bQCAwtcvAQtpc1BheW1lbnRPawIBaQNzdW0EEWFjY2VwdGFibGVBc3NldElkAQQTq9kzBAFwCQCRAwIIBQFpCHBheW1lbnRzAAADCQBnAggFAXAGYW1vdW50CQEKbnVtVG9XYXZlcwEFA3N1bQkAAAIIBQFwB2Fzc2V0SWQFBHVuaXQHAQttYXBJbnRUb1N0cgIFYWNjdW0EbmV4dAkAzAgCCQCkAwEFBG5leHQFBWFjY3VtAQttYXBTdHJUb0ludAIFYWNjdW0EbmV4dAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEFBG5leHQFBWFjY3VtAQttYXBJbnRUb1N1bQIFYWNjdW0EbmV4dAkAZAIFBWFjY3VtBQRuZXh0AQxsaXN0SW50VG9TdW0BA2FycgoAAiRsBQNhcnIKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC21hcEludFRvU3VtAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIBE2xpc3RJbnRUb0xpc3RTdHJpbmcBA2FycgoAAiRsBQNhcnIKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC21hcEludFRvU3RyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIBE2xpc3RTdHJpbmdUb0xpc3RJbmcBA2FycgoAAiRsBQNhcnIKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC21hcFN0clRvSW50AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIBGmxpc3RTdHJpbmdDb21wcmVzc1RvU3RyaW5nAQNhcnIJALkJAgUDYXJyAgF8ARxzdHJpbmdEZWNvbXByZXNzVG9MaXN0U3RyaW5nAQNzdHIJALUJAgUDc3RyAgF8ARdsaXN0SW50Q29tcHJlc3NUb1N0cmluZwEDYXJyCQC5CQIJARNsaXN0SW50VG9MaXN0U3RyaW5nAQUDYXJyAgF8ARlzdHJpbmdEZWNvbXByZXNzVG9MaXN0SW50AQZhcnJTdHIJARNsaXN0U3RyaW5nVG9MaXN0SW5nAQkAtQkCBQZhcnJTdHICAXwBCWdldFJhbmRvbQEMY29tbWl0SGVpZ2h0BAtyZXZlYWxCbG9jawkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDtBwEFDGNvbW1pdEhlaWdodAIRdW5leGNwZWN0ZWQgZXJyb3IEA3ZyZgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAULcmV2ZWFsQmxvY2sDdnJmAhF1bmV4Y3BlY3RlZCBlcnJvcgQKcmFuZG9tSGFzaAkA9wMBCQEFdmFsdWUBBQN2cmYEBGhhc2gJALIJAgUKcmFuZG9tSGFzaAAQCQBqAgUEaGFzaAAlAQ9nZXRSYW5kb21SdWxsZXQBDGNvbW1pdEhlaWdodAQKcmFuZG9tSGFzaAkA9wMBCQDLAQIJAQV2YWx1ZQEICQEFdmFsdWUBCQDtBwEFDGNvbW1pdEhlaWdodAN2cmYJAJoDAQUMY29tbWl0SGVpZ2h0BAdoYXNoSW50CQCyCQIFCnJhbmRvbUhhc2gAGAkAagIFB2hhc2hJbnQAJQEPUl9XaW5DYWxjdWxhdG9yBAxyYW5kb21OdW1iZXIJYmV0QW1vdW50EnNlbGVjdGVkTnVtYmVyQmV0cwxiZXREaXJlY3Rpb24EC1JFRF9TRUNUT1JTCQDMCAIAIAkAzAgCABMJAMwIAgAVCQDMCAIAGQkAzAgCACIJAMwIAgAbCQDMCAIAJAkAzAgCAB4JAMwIAgAXCQDMCAIABQkAzAgCABAJAMwIAgABCQDMCAIADgkAzAgCAAkJAMwIAgASCQDMCAIABwkAzAgCAAwJAMwIAgADBQNuaWwEDUJMQUNLX1NFQ1RPUlMJAMwIAgACCQDMCAIABAkAzAgCAAYJAMwIAgAICQDMCAIACgkAzAgCAAsJAMwIAgANCQDMCAIADwkAzAgCABEJAMwIAgAUCQDMCAIAFgkAzAgCABgJAMwIAgAaCQDMCAIAHAkAzAgCAB0JAMwIAgAfCQDMCAIAIQkAzAgCACMFA25pbAMJAAACBQxiZXREaXJlY3Rpb24CA3JlZAMJAQ9jb250YWluc0VsZW1lbnQCBQtSRURfU0VDVE9SUwUMcmFuZG9tTnVtYmVyCQBoAgUJYmV0QW1vdW50AAIAAAMJAAACBQxiZXREaXJlY3Rpb24CBWJsYWNrAwkBD2NvbnRhaW5zRWxlbWVudAIFDUJMQUNLX1NFQ1RPUlMFDHJhbmRvbU51bWJlcgkAaAIFCWJldEFtb3VudAACAAADCQAAAgUMYmV0RGlyZWN0aW9uAgNvZGQDCQECIT0CCQBqAgUMcmFuZG9tTnVtYmVyAAIAAAkAaAIFCWJldEFtb3VudAACAAADCQAAAgUMYmV0RGlyZWN0aW9uAgRldmVuAwkAAAIJAGoCBQxyYW5kb21OdW1iZXIAAgAACQBoAgUJYmV0QW1vdW50AAIAAAMDCQAAAgkAkAMBBRJzZWxlY3RlZE51bWJlckJldHMAAQkAAAIFDGJldERpcmVjdGlvbgIDbnVtBwMJAAACCQCRAwIFEnNlbGVjdGVkTnVtYmVyQmV0cwAABQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQAJAAAAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzAAIDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQAEgAAAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzAAMDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQADAAAAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzAAQDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQACQAAAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzAAwDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQAAwAAAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzABIDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQAAgAAAAABC1JfZ2V0QmV0S2V5AQFpCQCsAgICDWJldF9Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyARFSX2dldEJldEFtb3VudEtleQEBaQkArAICAhNiZXRBbW91bnRfUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgEXUl9nZXRTZWxlY3RlZE51bWJlcnNLZXkBAWkJAKwCAgIZc2VsZWN0ZWROdW1iZXJzX1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXIBEVJfZ2V0RGlyZWN0aW9uS2V5AQFpCQCsAgICE2RpcmVjdGlvbl9Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyAQtSX2dldExvZ0tleQEBaQkArAICCQCsAgIJAKwCAgINbG9nX1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXICAV8JANgEAQgFAWkNdHJhbnNhY3Rpb25JZAEOUl9nZXRTdGF0dXNLZXkBAWkJAKwCAgIQc3RhdHVzX1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXIBDExXX2dldEJldEtleQEBaQkArAICAg9iZXRfTHVja3lXaGVlbF8JAKUIAQgFAWkGY2FsbGVyAQxMV19nZXRXb25LZXkBAWkJAKwCAgIPd29uX0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgEVTFdfZ2V0UmFuZG9tTnVtYmVyS2V5AQFpCQCsAgICGHJhbmRvbU51bWJlcl9MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXIBDExXX2dldExvZ0tleQEBaQkArAICCQCsAgIJAKwCAgIPbG9nX0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgIBXwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkAQ5MV193aGF0VXNlcldvbgEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAAIAAQUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAIDCQAAAgADBQckbWF0Y2gwCQEKbnVtVG9XYXZlcwEAAQMJAAACAAcFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQAGAwkAAAIACQUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAEAAAEPTFdfZ2V0U3RhdHVzS2V5AQFpCQCsAgICEHN0YXR1c19Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyAQFpAQ9Sb3VsZXR0ZV9yZXZlYWwBDGNvbW1pdEhlaWdodAQMcmFuZG9tTnVtYmVyCQEPZ2V0UmFuZG9tUnVsbGV0AQUMY29tbWl0SGVpZ2h0BA13aW5uaW5nQW1vdW50CQEKbnVtVG9XYXZlcwEJAQ9SX1dpbkNhbGN1bGF0b3IEBQxyYW5kb21OdW1iZXIAAwUDbmlsAgVibGFjawkAAgEJAKQDAQUNd2lubmluZ0Ftb3VudAD+JDcy",
    "height": 2619783,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3kSuHsEnnNmfASYwa3m5QvrU5S65hGkJ88c1N77MmKCZ
Next: 6cmWr9qU3yf4WXHiMH8B6BHLEdoSa9uJ1QCcheggJfMz

Diff: 

OldNewDifferences
100100 
101101 func R_WinCalculator (randomNumber,betAmount,selectedNumberBets,betDirection) = {
102102     let RED_SECTORS = [32, 19, 21, 25, 34, 27, 36, 30, 23, 5, 16, 1, 14, 9, 18, 7, 12, 3]
103+    let BLACK_SECTORS = [2, 4, 6, 8, 10, 11, 13, 15, 17, 20, 22, 24, 26, 28, 29, 31, 33, 35]
103104     if ((betDirection == "red"))
104105         then if (containsElement(RED_SECTORS, randomNumber))
105106             then (betAmount * 2)
106107             else 0
107108         else if ((betDirection == "black"))
108-            then if (if (!(containsElement(RED_SECTORS, randomNumber)))
109-                then (randomNumber != 0)
110-                else false)
111-                then ((betAmount * 2) + 99)
109+            then if (containsElement(BLACK_SECTORS, randomNumber))
110+                then (betAmount * 2)
112111                 else 0
113112             else if ((betDirection == "odd"))
114113                 then if (((randomNumber % 2) != 0))
198197 @Callable(i)
199198 func Roulette_reveal (commitHeight) = {
200199     let randomNumber = getRandomRullet(commitHeight)
201-    let winningAmount = numToWaves(R_WinCalculator(randomNumber, 3, [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12], "black"))
200+    let winningAmount = numToWaves(R_WinCalculator(randomNumber, 3, nil, "black"))
202201     throw(toString(winningAmount))
203202     }
204203 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 func numToWaves (num) = (num * 100000000)
55 
66 
77 func isPaymentOk (i,sum) = {
88     let acceptableAssetId = base58'WAVES'
99     let p = i.payments[0]
1010     if ((p.amount >= numToWaves(sum)))
1111         then (p.assetId == unit)
1212         else false
1313     }
1414 
1515 
1616 func mapIntToStr (accum,next) = toString(next) :: accum
1717 
1818 
1919 func mapStrToInt (accum,next) = parseIntValue(next) :: accum
2020 
2121 
2222 func mapIntToSum (accum,next) = (accum + next)
2323 
2424 
2525 func listIntToSum (arr) = {
2626     let $l = arr
2727     let $s = size($l)
2828     let $acc0 = 0
2929     func $f0_1 ($a,$i) =     if (($i >= $s))
3030         then $a
3131         else mapIntToSum($a, $l[$i])
3232 
3333     func $f0_2 ($a,$i) =     if (($i >= $s))
3434         then $a
3535         else throw("List size exceeds 50")
3636 
3737     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
3838     }
3939 
4040 
4141 func listIntToListString (arr) = {
4242     let $l = arr
4343     let $s = size($l)
4444     let $acc0 = nil
4545     func $f0_1 ($a,$i) =     if (($i >= $s))
4646         then $a
4747         else mapIntToStr($a, $l[$i])
4848 
4949     func $f0_2 ($a,$i) =     if (($i >= $s))
5050         then $a
5151         else throw("List size exceeds 50")
5252 
5353     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
5454     }
5555 
5656 
5757 func listStringToListIng (arr) = {
5858     let $l = arr
5959     let $s = size($l)
6060     let $acc0 = nil
6161     func $f0_1 ($a,$i) =     if (($i >= $s))
6262         then $a
6363         else mapStrToInt($a, $l[$i])
6464 
6565     func $f0_2 ($a,$i) =     if (($i >= $s))
6666         then $a
6767         else throw("List size exceeds 50")
6868 
6969     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
7070     }
7171 
7272 
7373 func listStringCompressToString (arr) = makeString(arr, "|")
7474 
7575 
7676 func stringDecompressToListString (str) = split(str, "|")
7777 
7878 
7979 func listIntCompressToString (arr) = makeString(listIntToListString(arr), "|")
8080 
8181 
8282 func stringDecompressToListInt (arrStr) = listStringToListIng(split(arrStr, "|"))
8383 
8484 
8585 func getRandom (commitHeight) = {
8686     let revealBlock = valueOrErrorMessage(blockInfoByHeight(commitHeight), "unexcpected error")
8787     let vrf = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
8888     let randomHash = sha256(value(vrf))
8989     let hash = toInt(randomHash, 16)
9090     (hash % 37)
9191     }
9292 
9393 
9494 func getRandomRullet (commitHeight) = {
9595     let randomHash = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes(commitHeight)))
9696     let hashInt = toInt(randomHash, 24)
9797     (hashInt % 37)
9898     }
9999 
100100 
101101 func R_WinCalculator (randomNumber,betAmount,selectedNumberBets,betDirection) = {
102102     let RED_SECTORS = [32, 19, 21, 25, 34, 27, 36, 30, 23, 5, 16, 1, 14, 9, 18, 7, 12, 3]
103+    let BLACK_SECTORS = [2, 4, 6, 8, 10, 11, 13, 15, 17, 20, 22, 24, 26, 28, 29, 31, 33, 35]
103104     if ((betDirection == "red"))
104105         then if (containsElement(RED_SECTORS, randomNumber))
105106             then (betAmount * 2)
106107             else 0
107108         else if ((betDirection == "black"))
108-            then if (if (!(containsElement(RED_SECTORS, randomNumber)))
109-                then (randomNumber != 0)
110-                else false)
111-                then ((betAmount * 2) + 99)
109+            then if (containsElement(BLACK_SECTORS, randomNumber))
110+                then (betAmount * 2)
112111                 else 0
113112             else if ((betDirection == "odd"))
114113                 then if (((randomNumber % 2) != 0))
115114                     then (betAmount * 2)
116115                     else 0
117116                 else if ((betDirection == "even"))
118117                     then if (((randomNumber % 2) == 0))
119118                         then (betAmount * 2)
120119                         else 0
121120                     else if (if ((size(selectedNumberBets) == 1))
122121                         then (betDirection == "num")
123122                         else false)
124123                         then if ((selectedNumberBets[0] == randomNumber))
125124                             then (betAmount * 36)
126125                             else 0
127126                         else if ((size(selectedNumberBets) == 2))
128127                             then if (containsElement(selectedNumberBets, randomNumber))
129128                                 then (betAmount * 18)
130129                                 else 0
131130                             else if ((size(selectedNumberBets) == 3))
132131                                 then if (containsElement(selectedNumberBets, randomNumber))
133132                                     then (betAmount * 12)
134133                                     else 0
135134                                 else if ((size(selectedNumberBets) == 4))
136135                                     then if (containsElement(selectedNumberBets, randomNumber))
137136                                         then (betAmount * 9)
138137                                         else 0
139138                                     else if ((size(selectedNumberBets) == 12))
140139                                         then if (containsElement(selectedNumberBets, randomNumber))
141140                                             then (betAmount * 3)
142141                                             else 0
143142                                         else if ((size(selectedNumberBets) == 18))
144143                                             then if (containsElement(selectedNumberBets, randomNumber))
145144                                                 then (betAmount * 2)
146145                                                 else 0
147146                                             else 0
148147     }
149148 
150149 
151150 func R_getBetKey (i) = ("bet_Roulette_" + toString(i.caller))
152151 
153152 
154153 func R_getBetAmountKey (i) = ("betAmount_Roulette_" + toString(i.caller))
155154 
156155 
157156 func R_getSelectedNumbersKey (i) = ("selectedNumbers_Roulette_" + toString(i.caller))
158157 
159158 
160159 func R_getDirectionKey (i) = ("direction_Roulette_" + toString(i.caller))
161160 
162161 
163162 func R_getLogKey (i) = ((("log_Roulette_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
164163 
165164 
166165 func R_getStatusKey (i) = ("status_Roulette_" + toString(i.caller))
167166 
168167 
169168 func LW_getBetKey (i) = ("bet_LuckyWheel_" + toString(i.caller))
170169 
171170 
172171 func LW_getWonKey (i) = ("won_LuckyWheel_" + toString(i.caller))
173172 
174173 
175174 func LW_getRandomNumberKey (i) = ("randomNumber_LuckyWheel_" + toString(i.caller))
176175 
177176 
178177 func LW_getLogKey (i) = ((("log_LuckyWheel_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
179178 
180179 
181180 func LW_whatUserWon (value) = match value {
182181     case _ => 
183182         if ((1 == $match0))
184183             then numToWaves(2)
185184             else if ((3 == $match0))
186185                 then numToWaves(1)
187186                 else if ((7 == $match0))
188187                     then numToWaves(6)
189188                     else if ((9 == $match0))
190189                         then numToWaves(1)
191190                         else 0
192191 }
193192 
194193 
195194 func LW_getStatusKey (i) = ("status_Roulette_" + toString(i.caller))
196195 
197196 
198197 @Callable(i)
199198 func Roulette_reveal (commitHeight) = {
200199     let randomNumber = getRandomRullet(commitHeight)
201-    let winningAmount = numToWaves(R_WinCalculator(randomNumber, 3, [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12], "black"))
200+    let winningAmount = numToWaves(R_WinCalculator(randomNumber, 3, nil, "black"))
202201     throw(toString(winningAmount))
203202     }
204203 
205204 
github/deemru/w8io/169f3d6 
83.16 ms ◑