Smart Contract Details

[{"name":"SC_ACTION","datatype":"U","value":1},{"name":"SC_CODE","datatype":"S","value":"\n//    _____  _____ _______ _______ _  _  _ _______  _____ \n//   |_____]   |   |______ |______ |  |  | |_____| |_____]\n//   |       __|__ |______ ______| |__|__| |     | |      \n//\n//   Swap contract\n\nFunction Initialize(asset1 String, asset2 String, symbol String, name String, fee Uint64) Uint64\n\t10 IF EXISTS(\"version\") THEN GOTO 1100\n\t20 STORE(\"version\", GetVer())\n        30 STORE(\"o:\" + HEX(SIGNER()), 0)\n        40 STORE(\"ol:0\", HEX(SIGNER()))\n        50 STORE(\"numTrustees\", 1)\n        60 STORE(\"quorum\", 1)\n\t70 STORE(\"asset1\", HEXDECODE(asset1))\n\t80 STORE(\"asset2\", HEXDECODE(asset2))\n\t90 STORE(\"symbol\", symbol)\n\t100 STORE(\"decimals\", 0)\n\t110 STORE(\"name\", name)\n\t120 STORE(\"fee\", fee)\n\t130 STORE(\"val1\", 0)\n\t140 STORE(\"val2\", 0)\n\t150 STORE(\"sharesOutstanding\", 0)\n\t160 STORE(\"adds\", 0)\n\t170 STORE(\"rems\", 0)\n\t180 STORE(\"swaps\", 0)\n\n\t1000 RETURN 0\n\t1100 RETURN 100\nEnd Function\n\nFunction GetVer() String\n\t10 return \"2.010\"\nEnd Function\n\n// lossless (a * b ) / c\n// (cause there ain't no Uint256)\nFunction multDiv(a Uint64, b Uint64, c Uint64) Uint64\n\t10 DIM base, maxdiv AS Uint64\n\t20 LET base = 4294967296\t// (1\u003c\u003c32)\n\t30 LET maxdiv = (base-1)*base + (base-1)\n\n\t50 DIM res AS Uint64\n\t60 LET res = (a/c) * b + (a%c) * (b/c)\n\t70 LET a = a % c\n\t80 LET b = b % c\n\t90 IF (a == 0 || b == 0) THEN GOTO 1000\n\n\t100 IF (c \u003e= base) THEN GOTO 200\n        110 LET res = res + (a*b/c)\n\t120 GOTO 1000\n\n\t200 DIM norm AS Uint64\n\t210 LET norm = maxdiv/c\n    \t220 LET c = c * norm\n\t230 LET a = a * norm\n\n\t300 DIM ah, al, bh, bl, ch, cl AS Uint64\n\t310 LET ah = a / base\n\t320 LET al = a % base\n\t330 LET bh = b / base\n\t340 LET bl = b % base\n\t350 LET ch = c / base\n\t360 LET cl = c % base\n\n\t400 DIM p0, p1, p2 AS Uint64\n\t410 LET p0 = al*bl\n\t420 LET p1 = p0 / base + al*bh\n\t430 LET p0 = p0 % base\n\t440 LET p2 = p1 / base + ah*bh\n\t450 LET p1 = (p1 % base) + ah*bl\n\t460 LET p2 = p2 + p1 / base\n\t470 LET p1 = p1 % base\n\n\t500 DIM q0, q1, rhat AS Uint64\n\t510 LET p2 = p2 % c\n\t520 LET q1 = p2 / ch\n\t530 LET rhat = p2 % ch\n\n\t600 IF (q1 \u003c base \u0026\u0026 (rhat \u003e= base || q1*cl \u003c= rhat*base+p1)) THEN GOTO 700\n        610 LET q1 = q1 - 1\n        620 LET rhat = rhat + ch\n\t630 GOTO 600\n\n\t700 LET p1 = ((p2 % base) * base + p1) - q1 * cl\n    \t710 LET p2 = (p2 / base * base + p1 / base) - q1 * ch\n    \t720 LET p1 = (p1 % base) + (p2 % base) * base\n\t730 LET q0 = p1 / ch\n\t740 LET rhat = p1 % ch\n\n\t800 IF (q0 \u003c base \u0026\u0026 (rhat \u003e= base || q0*cl \u003c= rhat*base+p0)) THEN GOTO 900\n        810 LET q0 = q0 - 1\n        820 LET rhat = rhat + ch\n\t830 GOTO 800\n\n\t900 LET res = res + q0 + q1 * base\n\n\t1000 RETURN res\nEnd Function\n\nFunction AddLiquidity() Uint64 \n\t10 DIM in1, in2, val1, val2, inRatio, valRatio, sharesOutstanding, share AS Uint64\n\t20 DIM asset1, asset2 AS String\n\n\t30 LET asset1 = LOAD(\"asset1\")\n\t40 LET asset2 = LOAD(\"asset2\")\n\t50 LET val1 = LOAD(\"val1\")\n\t60 LET val2 = LOAD(\"val2\")\n\t70 LET sharesOutstanding = LOAD(\"sharesOutstanding\")\n\t80 LET in1 = ASSETVALUE(asset1)\n\t90 LET in2 = ASSETVALUE(asset2)\n\n\t100 IF in1 \u003c 1 || in2 \u003c 1 THEN GOTO 1110\n\t110 IF sharesOutstanding \u003e 0 THEN GOTO 130\n\t115 LET share = MAX(in1, in2)\n\t120 GOTO 300\n\n\t130 IF val2 \u003e val1 THEN GOTO 170\n\t140 LET valRatio = val1 / val2\n\t150 LET inRatio = in1 / in2\n\t160 GOTO 190\n\n\t170 LET valRatio = val2 / val1\n\t180 LET inRatio = in2 / in1\n\t190 IF valRatio != inRatio THEN GOTO 1120\n\n\t200 LET share = multDiv(sharesOutstanding, in1, val1)\n\n\t300 SEND_ASSET_TO_ADDRESS(SIGNER(), share, SCID())\n\t310 STORE(\"val1\", val1 + in1)\n\t320 STORE(\"val2\", val2 + in2)\n\t330 STORE(\"sharesOutstanding\", sharesOutstanding + share)\n\t340 STORE(\"adds\", LOAD(\"adds\") + 1)\n\n\t1000 RETURN 0\n\t1110 RETURN 110\n\t1120 RETURN 120\nEnd Function\n\nFunction RemoveLiquidity() Uint64\n\t10 DIM out1, out2, val1, val2, shares, sharesOutstanding AS Uint64\n\t20 DIM asset1, asset2 AS String\n\n\t30 LET val1 = LOAD(\"val1\")\n\t40 LET val2 = LOAD(\"val2\")\n\t50 LET shares = ASSETVALUE(SCID())\n\t60 LET sharesOutstanding = LOAD(\"sharesOutstanding\")\n\t70 LET asset1 = LOAD(\"asset1\")\n\t80 LET asset2 = LOAD(\"asset2\")\n\n\t90 IF sharesOutstanding \u003c 1 || shares \u003c 1 THEN GOTO 1130\n\t100 LET out1 = multDiv(val1, shares, sharesOutstanding)\n\t110 LET out2 = multDiv(val2, shares, sharesOutstanding)\n\n\t120 STORE(\"val1\", val1 - out1)\n\t130 STORE(\"val2\", val2 - out2)\n\t140 STORE(\"sharesOutstanding\", sharesOutstanding - shares)\n\t150 STORE(\"rems\", LOAD(\"rems\") + 1)\n\t160 SEND_ASSET_TO_ADDRESS(SIGNER(), out1, asset1)\n\t170 SEND_ASSET_TO_ADDRESS(SIGNER(), out2, asset2)\n\n\t1000 RETURN 0\n\t1100 RETURN 100\n\t1130 RETURN 130\nEnd Function\n\nFunction Swap() Uint64\n\t10 DIM in1, in2, out1, out2, val1, val2, fee AS Uint64\n\t20 DIM asset1, asset2 AS String\n\n\t30 LET asset1 = LOAD(\"asset1\")\n\t40 LET asset2 = LOAD(\"asset2\")\n\t50 LET in1 = ASSETVALUE(asset1)\n\t60 LET in2 = ASSETVALUE(asset2)\n\t70 LET val1 = LOAD(\"val1\")\n\t80 LET val2 = LOAD(\"val2\")\n\t90 LET fee = LOAD(\"fee\")\n\n\t100 IF in1 \u003e 0 \u0026\u0026 in2 \u003e 0 THEN GOTO 1140\n\t110 IF in1 \u003c 1 \u0026\u0026 in2 \u003c 1 THEN GOTO 1110\n\t120 IF in2 \u003e 0 THEN GOTO 300\n\n\t200 LET out2 = multDiv(in1, val2, (val1 + in1))\n\t210 LET out2 = multDiv(out2, (10000-fee), 10000)\n\t220 STORE(\"val1\", val1 + in1)\n\t230 STORE(\"val2\", val2 - out2)\n\t250 SEND_ASSET_TO_ADDRESS(SIGNER(), out2, asset2)\n\t260 GOTO 400\n\n\t300 LET out1 = multDiv(in2, val1, (val2 + in2))\n\t310 LET out1 = multDiv(out1, (10000-fee), 10000)\n\t320 STORE(\"val1\", val1 - out1)\n\t330 STORE(\"val2\", val2 + in2)\n\t350 SEND_ASSET_TO_ADDRESS(SIGNER(), out1, asset1)\n\t\n\t400 STORE(\"swaps\", LOAD(\"swaps\") + 1)\n\t\n\t1000 RETURN 0\n\t1100 RETURN 100\n\t1110 RETURN 110\n\t1140 RETURN 140\nEnd Function\n\nFunction VoteSetFee(fee Uint64) Uint64\n        10 DIM trustee AS String\n        20 LET trustee = \"o:\" + HEX(SIGNER())\n        30 IF EXISTS(trustee) != 1 THEN GOTO 1100\n        40 IF LOAD(\"fee\") == fee THEN GOTO 1260\n\n        100 IF castVote(trustee, \"0\", ITOA(fee)) != 1 THEN GOTO 200\n        110 DELETE(\"i:0\")\n        120 STORE(\"fee\", fee)\n\n        1000 RETURN 0\n        1100 RETURN 100\n        1260 RETURN 260\nEnd Function\n\nFunction VoteAddTrustee(new_trustee String) Uint64\n        10 DIM trustee AS String\n        20 LET trustee = \"o:\" + HEX(SIGNER())\n        30 IF EXISTS(trustee) != 1 THEN GOTO 1100\n        40 IF EXISTS(\"o:\" + new_trustee) THEN GOTO 1260\n\t50 IF STRLEN(new_trustee) != 64 THEN GOTO 1260\n\n        100 IF castVote(trustee, \"1\", new_trustee) != 1 THEN GOTO 200\n        110 DELETE(\"i:1\")\n        120 DIM numTrustees AS Uint64\n        130 LET numTrustees = LOAD(\"numTrustees\")\n        140 STORE(\"ol:\" + numTrustees, new_trustee)\n        150 STORE(\"o:\"+ new_trustee, numTrustees)\n        160 STORE(\"numTrustees\", numTrustees + 1)\n\n        200 RETURN 0\n\n        1100 RETURN 100\n        1260 RETURN 260\nEnd Function\n\nFunction VoteRemoveTrustee(old_trustee String) Uint64\n        10 DIM trustee AS String\n        20 DIM numTrustees AS Uint64\n        30 LET trustee = \"o:\" + HEX(SIGNER())\n        40 IF EXISTS(trustee) != 1 THEN GOTO 1100\n        50 IF EXISTS(\"o:\" + old_trustee) != 1 THEN GOTO 1260\n        60 LET numTrustees = LOAD(\"numTrustees\") - 1\n        70 IF numTrustees == 0 THEN GOTO 1270\n        80 IF numTrustees \u003e LOAD(\"quorum\") THEN GOTO 1280\n\n        100 IF castVote(trustee, \"2\", old_trustee) != 1 THEN GOTO 300\n        110 DELETE(\"i:2\")\n\n        200 DIM keyToMove AS String\n        210 DIM rowToReplace AS Uint64\n        220 LET keyToMove = LOAD(\"ol:\" + numTrustees)\n        230 LET rowToReplace = LOAD(\"o:\" + old_trustee)\n        240 STORE(\"o:\" + keyToMove, rowToReplace)\n        250 STORE(\"ol:\" + rowToReplace, keyToMove)\n        260 DELETE(\"o:\" + old_trustee)\n        270 DELETE(\"ol:\" + numTrustees)\n        280 STORE(\"numTrustees\", numTrustees)\n\n        300 RETURN 0\n\n        1100 RETURN 100\n        1260 RETURN 260\n        1270 RETURN 270\n        1290 RETURN 290\nEnd Function\n\nFunction VoteChangeQuorum(new_quorum Uint64) Uint64\n        10 DIM trustee AS String\n        20 LET trustee = \"o:\" + HEX(SIGNER())\n        30 IF EXISTS(trustee) != 1 THEN GOTO 1100\n        40 IF LOAD(\"quorum\") == new_quorum THEN GOTO 1260\n        50 IF new_quorum \u003e LOAD(\"numTrustees\") THEN GOTO 1300\n\n        100 IF castVote(trustee, \"3\", ITOA(new_quorum)) != 1 THEN GOTO 200\n        110 DELETE(\"i:3\")\n        120 STORE(\"quorum\", new_quorum)\n\n        200 RETURN 0\n\n        1100 RETURN 100\n        1260 RETURN 260\n        1300 RETURN 300\nEnd Function\n\nFunction VoteUpdateCode(code String) Uint64\n        10 DIM trustee AS String\n        20 LET trustee = \"o:\" + HEX(SIGNER())\n        30 IF EXISTS(trustee) != 1 THEN GOTO 1100\n\n        100 IF castVote(trustee, \"4\", sha256(code)) != 1 THEN GOTO 200\n        110 DELETE(\"i:4\")\n        120 UPDATE_SC_CODE(code)\n\n        200 RETURN 0\n\n        1100 RETURN 100\n        1260 RETURN 260\nEnd Function\n\nFunction countVotes(tally Uint64) Uint64\n        10 DIM votes, i AS Uint64\n        20 LET votes = 0\n        30 LET i = LOAD(\"numTrustees\")\n\n        100 IF (tally \u0026 (1\u003c\u003ci)) \u003c 1 THEN GOTO 120\n        110 LET votes = votes + 1\n        120 LET i = i - 1\n        130 IF i \u003c 1 THEN GOTO 1000\n        140 GOTO 100\n\n        1000 RETURN votes\nEnd Function\n\nFunction SHL(a Uint64, b Uint64) Uint64\n        10 RETURN a \u003c\u003c b\nEnd Function\n\nFunction castVote(trustee String, key String, proposal String) Uint64\n        10 DIM value, c, tally_str AS String\n        20 DIM i, tally AS Uint64\n        30 LET tally_str = \"0\"\n        40 IF EXISTS(\"i:\" + key) != 1 THEN GOTO 200\n        50 LET value = LOAD(\"i:\" + key)\n        60 LET i = 0\n\n        100 LET c = SUBSTR(value, i, 1)\n        110 IF (c == \":\") THEN GOTO 200\n        120 LET tally_str = tally_str + c\n        130 LET i = i + 1\n        140 GOTO 100\n\n        200 LET tally = ATOI(tally_str)\n        210 IF ((tally \u0026 1) == 1) THEN GOTO 1000\n        220 IF SUBSTR(value, i+1, STRLEN(proposal)) == proposal THEN GOTO 300\n        230 LET tally = 0\n\n        300 LET tally = tally | SHL(1, LOAD(trustee) + 1)\n        310 IF countVotes(tally) \u003c LOAD(\"quorum\") THEN GOTO 400\n        320 LET tally = tally | 1\n\n        400 STORE(\"i:\" + key, ITOA(tally) + \":\" + proposal)\n        410 RETURN (tally \u0026 1)\n\n        1000 RETURN 0\nEnd Function\n"},{"name":"asset1","datatype":"S","value":"0000000000000000000000000000000000000000000000000000000000000000"},{"name":"asset2","datatype":"S","value":"f93b8d7fbbbf4e8f8a1e91b7ce21ac5d2b6aecc4de88cde8e929bce5f1746fbd"},{"name":"fee","datatype":"U","value":0},{"name":"name","datatype":"S","value":"Liquidity for swap pair DERO:DUSDT"},{"name":"symbol","datatype":"S","value":"DERO:DUSDT"}]