Smart Contract Details

Open on Dero Explorer

Internal ID:

5930

Hash / Transaction:

82c6eebd8a5561f2c66ae95bc82065c3a918273af29cbd91caf8d0c0bbe60b89

Block:

1323438

Timestamp:

2022-12-08 09:11:00 UTC (2.7 years ago)

Creator:

…qgv26xst (1414481)

Raw Data:

▼ Show

[{"name":"SC_ACTION","datatype":"U","value":1},{"name":"SC_CODE","datatype":"S","value":"// Lottery\n\n    Function Lottery() Uint64\n\t10  dim deposit_count,winner as Uint64\n\t20  LET deposit_count =  LOAD(\"deposit_count\")+1\n\t25  IF DEROVALUE() == 0 THEN GOTO 110 \n\t30  STORE(\"depositor_address\" + (deposit_count-1), SIGNER())\n\t40  STORE(\"deposit_total\", LOAD(\"deposit_total\") + DEROVALUE() )\n\t50  STORE(\"deposit_count\",deposit_count)\n\t60  IF LOAD(\"lotteryeveryXdeposit\") \u003e deposit_count THEN GOTO 110 \n\t70  LET winner  = RANDOM() % deposit_count \n\t80  SEND_DERO_TO_ADDRESS(LOAD(\"depositor_address\" + winner) , LOAD(\"lotterygiveback\")*LOAD(\"deposit_total\")/10000)\n    90  STORE(\"deposit_count\", 0)   \n\t100 STORE(\"deposit_total\", 0)  \n\t110  RETURN 0\n\tEnd Function\n\n\tFunction Initialize() Uint64\n\t10  IF SIGNER() == address_raw(\"dero1qyd2vnxncqch4jknxzmfkf4jrvck9vakklx0xcufv9apptqx8qlu6qgv26xst\") THEN GOTO 30\n\t20  RETURN 0 \n\t30 version(\"1.2.3\")\n\t40  STORE(\"owner\", SIGNER())   \n\t50  STORE(\"lotteryeveryXdeposit\", 40)   \n\t60  STORE(\"lotterygiveback\", 9500)\n    65  STORE(\"note\", \"Welcome to the lottery\")   \n\t70  STORE(\"deposit_count\", 0)   \n\t80  STORE(\"deposit_total\", 0)\n\t90 RETURN 0 \n\tEnd Function \t\n\t\n\tFunction TuneLotteryParameters(input Uint64, lotteryeveryXdeposit Uint64, lotterygiveback Uint64, note String) Uint64\n\t10  dim key,stored_owner as String\n\t20  dim value_uint64 as Uint64\n\t30  IF LOAD(\"owner\") == SIGNER() THEN GOTO 100\n\t40  RETURN 1\n\t100  STORE(\"lotteryeveryXdeposit\", lotteryeveryXdeposit)   \n\t130  STORE(\"lotterygiveback\", lotterygiveback)\n    135  STORE(\"note\", note)\n\t140  RETURN 0\n\tEnd Function\n\t \n\tFunction TransferOwnership(newowner String) Uint64 \n\t10  IF LOAD(\"owner\") == SIGNER() THEN GOTO 30 \n\t20  RETURN 1\n\t30  STORE(\"tmpowner\",ADDRESS_RAW(newowner))\n\t40  RETURN 0\n\tEnd Function\n\t\n    Function ClaimOwnership() Uint64 \n\t10  IF LOAD(\"tmpowner\") == SIGNER() THEN GOTO 30 \n\t20  RETURN 1\n\t30  STORE(\"owner\",SIGNER()) // ownership claim successful\n\t40  RETURN 0\n\tEnd Function\n\t\n    Function Withdraw( amount Uint64) Uint64 \n\t10  IF LOAD(\"owner\") == SIGNER() THEN GOTO 30 \n\t20  RETURN 1\n\t30  SEND_DERO_TO_ADDRESS(SIGNER(),amount)\n\t40  RETURN 0\n\tEnd Function\n\t\n    Function UpdateCode( code String) Uint64 \n\t10  IF LOAD(\"owner\") == SIGNER() THEN GOTO 30 \n\t20  RETURN 1\n\t30  UPDATE_SC_CODE(code)\n\t40  RETURN 0\n\tEnd Function"}]

Code:

▼ Show

// Lottery

    Function Lottery() Uint64
	10  dim deposit_count,winner as Uint64
	20  LET deposit_count =  LOAD("deposit_count")+1
	25  IF DEROVALUE() == 0 THEN GOTO 110 
	30  STORE("depositor_address" + (deposit_count-1), SIGNER())
	40  STORE("deposit_total", LOAD("deposit_total") + DEROVALUE() )
	50  STORE("deposit_count",deposit_count)
	60  IF LOAD("lotteryeveryXdeposit") > deposit_count THEN GOTO 110 
	70  LET winner  = RANDOM() % deposit_count 
	80  SEND_DERO_TO_ADDRESS(LOAD("depositor_address" + winner) , LOAD("lotterygiveback")*LOAD("deposit_total")/10000)
    90  STORE("deposit_count", 0)   
	100 STORE("deposit_total", 0)  
	110  RETURN 0
	End Function

	Function Initialize() Uint64
	10  IF SIGNER() == address_raw("dero1qyd2vnxncqch4jknxzmfkf4jrvck9vakklx0xcufv9apptqx8qlu6qgv26xst") THEN GOTO 30
	20  RETURN 0 
	30 version("1.2.3")
	40  STORE("owner", SIGNER())   
	50  STORE("lotteryeveryXdeposit", 40)   
	60  STORE("lotterygiveback", 9500)
    65  STORE("note", "Welcome to the lottery")   
	70  STORE("deposit_count", 0)   
	80  STORE("deposit_total", 0)
	90 RETURN 0 
	End Function 	
	
	Function TuneLotteryParameters(input Uint64, lotteryeveryXdeposit Uint64, lotterygiveback Uint64, note String) Uint64
	10  dim key,stored_owner as String
	20  dim value_uint64 as Uint64
	30  IF LOAD("owner") == SIGNER() THEN GOTO 100
	40  RETURN 1
	100  STORE("lotteryeveryXdeposit", lotteryeveryXdeposit)   
	130  STORE("lotterygiveback", lotterygiveback)
    135  STORE("note", note)
	140  RETURN 0
	End Function
	 
	Function TransferOwnership(newowner String) Uint64 
	10  IF LOAD("owner") == SIGNER() THEN GOTO 30 
	20  RETURN 1
	30  STORE("tmpowner",ADDRESS_RAW(newowner))
	40  RETURN 0
	End Function
	
    Function ClaimOwnership() Uint64 
	10  IF LOAD("tmpowner") == SIGNER() THEN GOTO 30 
	20  RETURN 1
	30  STORE("owner",SIGNER()) // ownership claim successful
	40  RETURN 0
	End Function
	
    Function Withdraw( amount Uint64) Uint64 
	10  IF LOAD("owner") == SIGNER() THEN GOTO 30 
	20  RETURN 1
	30  SEND_DERO_TO_ADDRESS(SIGNER(),amount)
	40  RETURN 0
	End Function
	
    Function UpdateCode( code String) Uint64 
	10  IF LOAD("owner") == SIGNER() THEN GOTO 30 
	20  RETURN 1
	30  UPDATE_SC_CODE(code)
	40  RETURN 0
	End Function