Transaction Details
Open on Dero ExplorerInternal ID:
3477817
Transaction Hash:
fe61b1ac6edbe18180d2863f05d1dfb26a767abdfc0488cbe4970d950ef45de8
Block:
Timestamp:
2023-05-20 17:07:42 UTC (2.3 years ago)
Type:
sc
Ring Size:
2
Payloads:
1
Caller:
…qgl6q9xn
(1382931)
SC Data:
[{"name":"SC_ACTION","datatype":"U","value":"1"},{"name":"SC_CODE","datatype":"S","value":"/* dDice.bas\n Original Version: https://github.com/Nelbert442/dero-smartcontracts/tree/main/DERO-Dice\n Updated Version: https://github.com/newvcas8372/dDice\n Updated Author: newvcas8372\n*/\n\nFunction InitializePrivate() Uint64\n 10 IF EXISTS(\"owner\") == 0 THEN GOTO 15 ELSE GOTO 999\n 15 STORE(\"owner\", SIGNER())\n 20 STORE(\"minWager\", 5000)\n 30 STORE(\"maxWager\", 500000)\n 40 STORE(\"sc_giveback\", 9800)\n 50 STORE(\"balance\", 0)\n\n 60 STORE(\"Over-x2\", 50)\n 61 STORE(\"Under-x2\", 49)\n 65 STORE(\"Over-x3\", 67)\n 66 STORE(\"Under-x3\", 33)\n 70 STORE(\"Over-x4\", 75)\n 71 STORE(\"Under-x4\", 25)\n 75 STORE(\"Over-x5\", 80)\n 76 STORE(\"Under-x5\", 20)\n 80 STORE(\"Over-x6\", 84)\n 81 STORE(\"Under-x6\", 16)\n 85 STORE(\"Over-x7\", 86)\n 86 STORE(\"Under-x7\", 14)\n 90 STORE(\"Over-x8\", 88)\n 91 STORE(\"Under-x8\", 12)\n 95 STORE(\"Over-x9\", 89)\n 96 STORE(\"Under-x9\", 11)\n 100 STORE(\"Over-x10\", 90)\n 101 STORE(\"Under-x10\", 10)\n\n 120 STORE(\"2xPlays\", 0)\n 121 STORE(\"2xWins\", 0)\n 125 STORE(\"3xPlays\", 0)\n 126 STORE(\"3xWins\", 0)\n 130 STORE(\"4xPlays\", 0)\n 131 STORE(\"4xWins\", 0)\n 135 STORE(\"5xPlays\", 0)\n 136 STORE(\"5xWins\", 0)\n 140 STORE(\"6xPlays\", 0)\n 141 STORE(\"6xWins\", 0)\n 145 STORE(\"7xPlays\", 0)\n 146 STORE(\"7xWins\", 0)\n 150 STORE(\"8xPlays\", 0)\n 151 STORE(\"8xWins\", 0)\n 155 STORE(\"9xPlays\", 0)\n 156 STORE(\"9xWins\", 0)\n 160 STORE(\"10xPlays\", 0)\n 161 STORE(\"10xWins\", 0)\n\n 190 STORE(\"minMultiplier\", 2)\n 191 STORE(\"maxMultiplier\", 10)\n\n 210 RETURN 0\n 999 RETURN 1\nEnd Function\n\nFunction Donate() Uint64\n 10 DIM balance, dvalue as Uint64\n 11 LET dvalue = DEROVALUE()\n 15 IF dvalue == 0 THEN GOTO 85\n\n\t50 LET balance = LOAD(\"balance\") + dvalue\n\t60 STORE(\"balance\", balance)\n\n\t85 RETURN 0\nEnd Function\n\nFunction RollDiceHigh(multiplier Uint64) Uint64\n 10 DIM rolledNum, targetNumber, payoutAmount, minWager, maxWager, minMultiplier, maxMultiplier, currentHeight, betAmount as Uint64\n 11 DIM sendToAddr as String\n 13 LET currentHeight = BLOCK_HEIGHT()\n 14 LET betAmount = DEROVALUE()\n 15 LET sendToAddr = SIGNER()\n 16 IF ADDRESS_STRING(sendToAddr) == \"\" THEN GOTO 500\n\n 40 LET minWager = LOAD(\"minWager\")\n 41 LET maxWager = LOAD(\"maxWager\")\n 42 LET minMultiplier = LOAD(\"minMultiplier\")\n 43 LET maxMultiplier = LOAD(\"maxMultiplier\")\n 45 IF betAmount \u003c minWager THEN GOTO 900\n 50 IF betAmount \u003e maxWager THEN GOTO 900\n 55 LET payoutAmount = LOAD(\"sc_giveback\") * betAmount * multiplier / 10000\n \n 60 IF EXISTS(\"Over-x\" + ITOA(multiplier)) == 1 THEN GOTO 70 ELSE GOTO 900\n\n 70 LET rolledNum = RANDOM(99)\n 80 LET targetNumber = LOAD(\"Over-x\" + ITOA(multiplier))\n 85 STORE(ITOA(multiplier) + \"xPlays\", LOAD(ITOA(multiplier) + \"xPlays\") + 1)\n 90 IF rolledNum \u003e= targetNumber THEN GOTO 100 ELSE GOTO 500\n\n 100 IF LOAD(\"balance\") \u003c payoutAmount THEN GOTO 700\n 120 SEND_DERO_TO_ADDRESS(sendToAddr, payoutAmount)\n 125 STORE(\"balance\", LOAD(\"balance\") + (betAmount - payoutAmount))\n 126 STORE(ITOA(multiplier) + \"xWins\", LOAD(ITOA(multiplier) + \"xWins\") + 1)\n 130 RETURN 0\n\n 500 STORE(\"balance\", LOAD(\"balance\") + betAmount)\n 505 RETURN 0\n\n 700 STORE(ITOA(multiplier) + \"xWins\", LOAD(ITOA(multiplier) + \"xWins\") + 1)\n 710 SEND_DERO_TO_ADDRESS(sendToAddr, betAmount)\n 720 RETURN 0\n\n 900 SEND_DERO_TO_ADDRESS(sendToAddr, betAmount)\n 910 RETURN 0\nEnd Function\n\nFunction RollDiceLow(multiplier Uint64) Uint64\n 10 DIM rolledNum, targetNumber, payoutAmount, minWager, maxWager, minMultiplier, maxMultiplier, currentHeight, betAmount as Uint64\n 11 DIM sendToAddr as String\n 13 LET currentHeight = BLOCK_HEIGHT()\n 14 LET betAmount = DEROVALUE()\n 15 LET sendToAddr = SIGNER()\n 16 IF ADDRESS_STRING(sendToAddr) == \"\" THEN GOTO 500\n\n 40 LET minWager = LOAD(\"minWager\")\n 41 LET maxWager = LOAD(\"maxWager\")\n 42 LET minMultiplier = LOAD(\"minMultiplier\")\n 43 LET maxMultiplier = LOAD(\"maxMultiplier\")\n 45 IF betAmount \u003c minWager THEN GOTO 900\n 50 IF betAmount \u003e maxWager THEN GOTO 900\n 55 LET payoutAmount = LOAD(\"sc_giveback\") * betAmount * multiplier / 10000\n \n 60 IF EXISTS(\"Under-x\" + ITOA(multiplier)) == 1 THEN GOTO 70 ELSE GOTO 900\n\n 70 LET rolledNum = RANDOM(99)\n 80 LET targetNumber = LOAD(\"Under-x\" + ITOA(multiplier))\n 85 STORE(ITOA(multiplier) + \"xPlays\", LOAD(ITOA(multiplier) + \"xPlays\") + 1)\n 90 IF rolledNum \u003c= targetNumber THEN GOTO 100 ELSE GOTO 500\n\n 100 IF LOAD(\"balance\") \u003c payoutAmount THEN GOTO 700\n 120 SEND_DERO_TO_ADDRESS(sendToAddr, payoutAmount)\n 125 STORE(\"balance\", LOAD(\"balance\") + (betAmount - payoutAmount))\n 126 STORE(ITOA(multiplier) + \"xWins\", LOAD(ITOA(multiplier) + \"xWins\") + 1)\n 130 RETURN 0\n\n 500 STORE(\"balance\", LOAD(\"balance\") + betAmount)\n 505 RETURN 0\n\n 700 STORE(ITOA(multiplier) + \"xWins\", LOAD(ITOA(multiplier) + \"xWins\") + 1)\n 710 SEND_DERO_TO_ADDRESS(sendToAddr, betAmount)\n 720 RETURN 0\n\n 900 SEND_DERO_TO_ADDRESS(sendToAddr, betAmount)\n 910 RETURN 0\nEnd Function\n\nFunction TransferOwnership(newowner String) Uint64 \n 10 IF LOAD(\"owner\") == SIGNER() THEN GOTO 30 \n 20 RETURN 1\n 30 STORE(\"tmpowner\",ADDRESS_RAW(newowner))\n 40 RETURN 0\nEnd Function\n\nFunction ClaimOwnership() Uint64 \n 10 IF LOAD(\"tmpowner\") == SIGNER() THEN GOTO 30 \n 20 RETURN 1\n 30 STORE(\"owner\",SIGNER())\n 40 RETURN 0\nEnd Function\n\nFunction Withdraw(amount Uint64) Uint64\n 10 IF LOAD(\"owner\") == SIGNER() THEN GOTO 20 ELSE GOTO 50\n 20 IF LOAD(\"balance\") \u003c amount THEN GOTO 50\n 30 SEND_DERO_TO_ADDRESS(SIGNER(), amount)\n 40 STORE(\"balance\", LOAD(\"balance\") - amount)\n 50 RETURN 0\nEnd Function"}]
Payload
Token (SCID):
DERO
Deposited:
none
Fees:
0.08859 DERO