tx · Ds8rWA1iitPHEtJdG92UzRvwxYW89WGCXRwDw1hYsNYV

3N6GuFb7Ucxs3cZjmwYDusKtfLaAigDtav5:  -0.01000000 Waves

2023.06.07 08:33 [2611835] smart account 3N6GuFb7Ucxs3cZjmwYDusKtfLaAigDtav5 > SELF 0.00000000 Waves

{ "type": 13, "id": "Ds8rWA1iitPHEtJdG92UzRvwxYW89WGCXRwDw1hYsNYV", "fee": 1000000, "feeAssetId": null, "timestamp": 1686116001215, "version": 2, "chainId": 84, "sender": "3N6GuFb7Ucxs3cZjmwYDusKtfLaAigDtav5", "senderPublicKey": "EMAuwff72FwVoiJK9xHyuUUMbpKmgV5temqeLU2aEsiS", "proofs": [ "p1NJq6AqLm5FvTmvQNAQqcUjn1nwWHptGC4QUfTJ5AiCd34cNjoZEtTWCuwwDR89aiV7wqZsDDCAnJRwvTqmmNs" ], "script": "base64:BgIOCAISABIAEgYKBAERAQgIAQpudW1Ub1dhdmVzAQNudW0JAGgCBQNudW0AgMLXLwELaXNQYXltZW50T2sBAWkEEWFjY2VwdGFibGVBc3NldElkASAiRKbniFR9USiuale6D2n6duEOdzftqEerUh9pTZRCRwMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRQYXltZW50IG5vdCBhdHRhY2hlZAQBcAkAkQMCCAUBaQhwYXltZW50cwAABAckbWF0Y2gwCAUBcAdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEB2Fzc2V0SWQFByRtYXRjaDADCQAAAgUHYXNzZXRJZAURYWNjZXB0YWJsZUFzc2V0SWQJAGcCCAUBcAZhbW91bnQJAQpudW1Ub1dhdmVzAQABBwkAZwIIBQFwBmFtb3VudAkBCm51bVRvV2F2ZXMBAAEBDExXX2dldEJldEtleQEBaQkArAICAg9iZXRfTHVja3lXaGVlbF8JAKUIAQgFAWkGY2FsbGVyAQxMV19nZXRXb25LZXkBAWkJAKwCAgIPd29uX0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgEVTFdfZ2V0UmFuZG9tTnVtYmVyS2V5AQFpCQCsAgICGHJhbmRvbU51bWJlcl9MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXIBDExXX2dldExvZ0tleQEBaQkArAICCQCsAgIJAKwCAgIPbG9nX0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgIBXwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkAQ5MV193aGF0VXNlcldvbgEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAAIAAQUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAIDCQAAAgADBQckbWF0Y2gwCQEKbnVtVG9XYXZlcwEAAQMJAAACAAcFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQAGAwkAAAIACQUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAEAAAEPUl9XaW5DYWxjdWxhdG9yBANiZXQSc2VsZWN0ZWROdW1iZXJCZXRzDHJhbmRvbU51bWJlcgxiZXREaXJlY3Rpb24EC1JFRF9TRUNUT1JTCQDMCAIAIAkAzAgCABMJAMwIAgAVCQDMCAIAGQkAzAgCACIJAMwIAgAbCQDMCAIAJAkAzAgCAB4JAMwIAgAXCQDMCAIABQkAzAgCABAJAMwIAgABCQDMCAIADgkAzAgCAAkJAMwIAgASCQDMCAIABwkAzAgCAAwJAMwIAgADBQNuaWwDAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzAAEJAAACBQxiZXREaXJlY3Rpb24CA251bQcDCQAAAgkAkQMCBRJzZWxlY3RlZE51bWJlckJldHMAAAUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0ACQAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwACAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0ABIAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwADAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0AAwAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwAEAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0AAkAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwAMAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0AAMAAAMJAAACBQxiZXREaXJlY3Rpb24CA3JlZAMJAQ9jb250YWluc0VsZW1lbnQCBQtSRURfU0VDVE9SUwUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0AAIAAAMJAAACBQxiZXREaXJlY3Rpb24CBWJsYWNrAwMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFC1JFRF9TRUNUT1JTBQxyYW5kb21OdW1iZXIJAQIhPQIFDHJhbmRvbU51bWJlcgAABwkAaAIFA2JldAACAAADCQAAAgUMYmV0RGlyZWN0aW9uAgNvZGQDCQECIT0CCQBqAgUMcmFuZG9tTnVtYmVyAAIAAAkAaAIFA2JldAACAAADCQAAAgUMYmV0RGlyZWN0aW9uAgRldmVuAwkAAAIJAGoCBQxyYW5kb21OdW1iZXIAAgAACQBoAgUDYmV0AAIAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwASAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUDYmV0AAIAAAAAAwFpARFMdWNreVdoZWVsX2NvbW1pdAADCQEBIQEJAQtpc1BheW1lbnRPawEFAWkJAAIBAh1Xcm9uZyBwYXltZW50IGFtb3VudCBvciBhc3NldAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDExXX2dldEJldEtleQEFAWkJAGQCBQZoZWlnaHQAAQkAzAgCCQELRGVsZXRlRW50cnkBCQEVTFdfZ2V0UmFuZG9tTnVtYmVyS2V5AQUBaQkAzAgCCQELRGVsZXRlRW50cnkBCQEMTFdfZ2V0V29uS2V5AQUBaQUDbmlsAWkBEUx1Y2t5V2hlZWxfcmV2ZWFsAAQMY29tbWl0SGVpZ2h0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJARFAZXh0ck5hdGl2ZSgxMDU1KQEJAQxMV19nZXRCZXRLZXkBBQFpAg1CZXQgbm90IGZvdW5kAwkAZgIFDGNvbW1pdEhlaWdodAUGaGVpZ2h0CQACAQkArAICCQCsAgICBXdhaXQgCQCkAwEJAGUCBQxjb21taXRIZWlnaHQFBmhlaWdodAIZIGJsb2NrcyB0byByZXZlYWwgdGhpcyBpZAQLcmV2ZWFsQmxvY2sJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7QcBBQxjb21taXRIZWlnaHQCEXVuZXhjcGVjdGVkIGVycm9yBAN2cmYJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFC3JldmVhbEJsb2NrA3ZyZgIRdW5leGNwZWN0ZWQgZXJyb3IECnJhbmRvbUhhc2gJAPcDAQkBBXZhbHVlAQUDdnJmBApyYW5kb21TZWVkCQBqAgkAsgkCBQpyYW5kb21IYXNoABAADAQMcmFuZG9tTnVtYmVyCQBkAgkAagIFCnJhbmRvbVNlZWQJAGQCCQBlAgAMAAEAAQABBA13aW5uaW5nQW1vdW50CQEOTFdfd2hhdFVzZXJXb24BBQxyYW5kb21OdW1iZXIDCQBmAgUNd2lubmluZ0Ftb3VudAAACQDMCAIJAQtEZWxldGVFbnRyeQEJAQxMV19nZXRCZXRLZXkBBQFpCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUNd2lubmluZ0Ftb3VudAUEdW5pdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDExXX2dldFdvbktleQEFAWkFDXdpbm5pbmdBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARVMV19nZXRSYW5kb21OdW1iZXJLZXkBBQFpBQxyYW5kb21OdW1iZXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQxMV19nZXRMb2dLZXkBBQFpBQ13aW5uaW5nQW1vdW50BQNuaWwJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBDExXX2dldEJldEtleQEFAWkJAMwIAgkBDEludGVnZXJFbnRyeQIJAQxMV19nZXRXb25LZXkBBQFpBQ13aW5uaW5nQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEVTFdfZ2V0UmFuZG9tTnVtYmVyS2V5AQUBaQUMcmFuZG9tTnVtYmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEMTFdfZ2V0TG9nS2V5AQUBaQUNd2lubmluZ0Ftb3VudAUDbmlsAWkBBFRlc3QEA2JldBJzZWxlY3RlZE51bWJlckJldHMMcmFuZG9tTnVtYmVyDGJldERpcmVjdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgIPUl9XaW5DYWxjdWxhdG9yCQEPUl9XaW5DYWxjdWxhdG9yBAUDYmV0BRJzZWxlY3RlZE51bWJlckJldHMFDHJhbmRvbU51bWJlcgUMYmV0RGlyZWN0aW9uBQNuaWwAuEZJfQ==", "height": 2611835, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: DRykuMBG3XybRhBPrJQWswKMcWXJzUqBuzFBeXvqya57 Next: 85sCb1oszDSXSS5vutYCjhrhhABJZzo3X96JGW83pWnP Diff:
OldNewDifferences
4848 }
4949
5050
51-func winCalculator (bet,selectedNumberBets,randomNumber,betDirection) = {
51+func R_WinCalculator (bet,selectedNumberBets,randomNumber,betDirection) = {
5252 let RED_SECTORS = [32, 19, 21, 25, 34, 27, 36, 30, 23, 5, 16, 1, 14, 9, 18, 7, 12, 3]
5353 if (if ((size(selectedNumberBets) == 1))
5454 then (betDirection == "num")
126126
127127
128128 @Callable(i)
129-func Test () = nil
129+func Test (bet,selectedNumberBets,randomNumber,betDirection) = [IntegerEntry("R_WinCalculator", R_WinCalculator(bet, selectedNumberBets, randomNumber, betDirection))]
130130
131131
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) = {
88 let acceptableAssetId = base58'3JmaWyFqWo8YSA8x3DXCBUW7veesxacvKx19dMv7wTMg'
99 if ((size(i.payments) == 0))
1010 then throw("Payment not attached")
1111 else {
1212 let p = i.payments[0]
1313 match p.assetId {
1414 case assetId: ByteVector =>
1515 if ((assetId == acceptableAssetId))
1616 then (p.amount >= numToWaves(1))
1717 else false
1818 case _ =>
1919 (p.amount >= numToWaves(1))
2020 }
2121 }
2222 }
2323
2424
2525 func LW_getBetKey (i) = ("bet_LuckyWheel_" + toString(i.caller))
2626
2727
2828 func LW_getWonKey (i) = ("won_LuckyWheel_" + toString(i.caller))
2929
3030
3131 func LW_getRandomNumberKey (i) = ("randomNumber_LuckyWheel_" + toString(i.caller))
3232
3333
3434 func LW_getLogKey (i) = ((("log_LuckyWheel_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
3535
3636
3737 func LW_whatUserWon (value) = match value {
3838 case _ =>
3939 if ((1 == $match0))
4040 then numToWaves(2)
4141 else if ((3 == $match0))
4242 then numToWaves(1)
4343 else if ((7 == $match0))
4444 then numToWaves(6)
4545 else if ((9 == $match0))
4646 then numToWaves(1)
4747 else 0
4848 }
4949
5050
51-func winCalculator (bet,selectedNumberBets,randomNumber,betDirection) = {
51+func R_WinCalculator (bet,selectedNumberBets,randomNumber,betDirection) = {
5252 let RED_SECTORS = [32, 19, 21, 25, 34, 27, 36, 30, 23, 5, 16, 1, 14, 9, 18, 7, 12, 3]
5353 if (if ((size(selectedNumberBets) == 1))
5454 then (betDirection == "num")
5555 else false)
5656 then if ((selectedNumberBets[0] == randomNumber))
5757 then (bet * 36)
5858 else 0
5959 else if ((size(selectedNumberBets) == 2))
6060 then if (containsElement(selectedNumberBets, randomNumber))
6161 then (bet * 18)
6262 else 0
6363 else if ((size(selectedNumberBets) == 3))
6464 then if (containsElement(selectedNumberBets, randomNumber))
6565 then (bet * 12)
6666 else 0
6767 else if ((size(selectedNumberBets) == 4))
6868 then if (containsElement(selectedNumberBets, randomNumber))
6969 then (bet * 9)
7070 else 0
7171 else if ((size(selectedNumberBets) == 12))
7272 then if (containsElement(selectedNumberBets, randomNumber))
7373 then (bet * 3)
7474 else 0
7575 else if ((betDirection == "red"))
7676 then if (containsElement(RED_SECTORS, randomNumber))
7777 then (bet * 2)
7878 else 0
7979 else if ((betDirection == "black"))
8080 then if (if (!(containsElement(RED_SECTORS, randomNumber)))
8181 then (randomNumber != 0)
8282 else false)
8383 then (bet * 2)
8484 else 0
8585 else if ((betDirection == "odd"))
8686 then if (((randomNumber % 2) != 0))
8787 then (bet * 2)
8888 else 0
8989 else if ((betDirection == "even"))
9090 then if (((randomNumber % 2) == 0))
9191 then (bet * 2)
9292 else 0
9393 else if ((size(selectedNumberBets) == 18))
9494 then if (containsElement(selectedNumberBets, randomNumber))
9595 then (bet * 2)
9696 else 0
9797 else 0
9898 }
9999
100100
101101 @Callable(i)
102102 func LuckyWheel_commit () = if (!(isPaymentOk(i)))
103103 then throw("Wrong payment amount or asset")
104104 else [IntegerEntry(LW_getBetKey(i), (height + 1)), DeleteEntry(LW_getRandomNumberKey(i)), DeleteEntry(LW_getWonKey(i))]
105105
106106
107107
108108 @Callable(i)
109109 func LuckyWheel_reveal () = {
110110 let commitHeight = valueOrErrorMessage(getIntegerValue(LW_getBetKey(i)), "Bet not found")
111111 if ((commitHeight > height))
112112 then throw((("wait " + toString((commitHeight - height))) + " blocks to reveal this id"))
113113 else {
114114 let revealBlock = valueOrErrorMessage(blockInfoByHeight(commitHeight), "unexcpected error")
115115 let vrf = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
116116 let randomHash = sha256(value(vrf))
117117 let randomSeed = (toInt(randomHash, 16) % 12)
118118 let randomNumber = ((randomSeed % ((12 - 1) + 1)) + 1)
119119 let winningAmount = LW_whatUserWon(randomNumber)
120120 if ((winningAmount > 0))
121121 then [DeleteEntry(LW_getBetKey(i)), ScriptTransfer(i.caller, winningAmount, unit), IntegerEntry(LW_getWonKey(i), winningAmount), IntegerEntry(LW_getRandomNumberKey(i), randomNumber), IntegerEntry(LW_getLogKey(i), winningAmount)]
122122 else [DeleteEntry(LW_getBetKey(i)), IntegerEntry(LW_getWonKey(i), winningAmount), IntegerEntry(LW_getRandomNumberKey(i), randomNumber), IntegerEntry(LW_getLogKey(i), winningAmount)]
123123 }
124124 }
125125
126126
127127
128128 @Callable(i)
129-func Test () = nil
129+func Test (bet,selectedNumberBets,randomNumber,betDirection) = [IntegerEntry("R_WinCalculator", R_WinCalculator(bet, selectedNumberBets, randomNumber, betDirection))]
130130
131131

github/deemru/w8io/873ac7e 
29.41 ms