tx · 97wkt3ChVdKEcMDM9LkPjephHqXjZ8LXvxfTUerwgzhy

3MweDUGicjorwUViyXBcfCM15fQXXEDU3gN:  -0.01000000 Waves

2023.09.21 10:00 [2764822] smart account 3MweDUGicjorwUViyXBcfCM15fQXXEDU3gN > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "97wkt3ChVdKEcMDM9LkPjephHqXjZ8LXvxfTUerwgzhy",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1695279635670,
    "version": 2,
    "chainId": 84,
    "sender": "3MweDUGicjorwUViyXBcfCM15fQXXEDU3gN",
    "senderPublicKey": "DGFm8ntnNPVthPrdcaZNWKYZi1wYzD3vhJETwHnF2emk",
    "proofs": [
        "38QTYqJYVo544HDPeqgeLSRrt6Cubt5ynLwPBXGhEG9rx7x9eMF5i35pir7z5TWEtiFpPNv7QTYZNbJECXpvVxFK"
    ],
    "script": "base64:BgIKCAISABIAEgASAA4ACXd4QXNzZXRJZAEg0orMGhAbXhxUB07utpc0/9DRMB3jxv5hlCuyc6iWIssABk1VTFQxMACAyK+gJQADU0VQAgJfXwAGcG9vbElkAAEAEnBvb2xMUFRva2VuQWRkcmVzcwEgM1Kp0g5+advMxKQnvIKrDTRAE/WbFcGgKo+DMmTBTQkAF3N0YWtlYm9vc3RlclJvb3RBZGRyZXNzARoBVIjFcN5G9OJsOhwdJuqY/GjHC7IJwkxSPQAMYWRtaW5BZGRyZXNzARoBVIxhil+sdwu2jS1p0aM0qMpq9rr6QP5z7QAUdG90YWxQb29sTFBTdGFrZWRLZXkCFHRvdGFsX3Bvb2xfbHBfc3Rha2VkABJ0b3RhbFBvb2xFYXJuZWRLZXkCEXRvdGFsX3Bvb2xfZWFybmVkABVwb29sQ3VycmVudENsYWltSWRLZXkCFXBvb2xfY3VycmVudF9jbGFpbV9pZAEJYXNQYXltZW50AQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACD0F0dGFjaGVkUGF5bWVudAQBcAUHJG1hdGNoMAUBcAkAAgECIWZhaWwgdG8gY2FzdCBpbnRvIEF0dGFjaGVkUGF5bWVudAEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCGFzU3RyaW5nAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcECXZhbFN0cmluZwUHJG1hdGNoMAUJdmFsU3RyaW5nCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nARppc1VzZXJIYXZlVW5jbGFpbWVkUmV3YXJkcwEHYWRkcmVzcwMJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQUHYWRkcmVzcwcEEmN1cnJlbnRQb29sQ2xhaW1JZAkBEUBleHRyTmF0aXZlKDEwNTUpAQUVcG9vbEN1cnJlbnRDbGFpbUlkS2V5BAh1c2VyRGF0YQkAtQkCCQERQGV4dHJOYXRpdmUoMTA1OCkBBQdhZGRyZXNzBQNTRVAEI3VzZXJMYXN0Q2xhaW1lZFJld2FyZHNBdFBvb2xDbGFpbUlkCQEFYXNJbnQBCQC2CQEJAJEDAgUIdXNlckRhdGEAAgkAZgIFEmN1cnJlbnRQb29sQ2xhaW1JZAUjdXNlckxhc3RDbGFpbWVkUmV3YXJkc0F0UG9vbENsYWltSWQEAWkBB3N0YWtlTFAAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIUT25lIFBheW1lbnQgZXhwZWN0ZWQEDWNhbGxlckFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQHcGF5bWVudAkBCWFzUGF5bWVudAEJAJEDAggFAWkIcGF5bWVudHMAAAMDCQECIT0CCAUHcGF5bWVudAdhc3NldElkBRJwb29sTFBUb2tlbkFkZHJlc3MGCQBnAgAACAUHcGF5bWVudAZhbW91bnQJAAIBAiFXcm9uZyBhc3NldCBpZCBvciBuZWdhdGl2ZSBhbW91bnQDCQEaaXNVc2VySGF2ZVVuY2xhaW1lZFJld2FyZHMBBQ1jYWxsZXJBZGRyZXNzCQACAQI4WW91IGhhdmUgdW5jbGFpbWVkIHJld2FyZHMgb24gY29udHJhY3QsIGNsYWltIHRoZW0gZmlyc3QEF2N1cnJlbnRUb3RhbFBvb2xDbGFpbUlkCQELdmFsdWVPckVsc2UCCQCfCAEFFXBvb2xDdXJyZW50Q2xhaW1JZEtleQAABBhjdXJyZW50VG90YWxQb29sTFBTdGFrZWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUUdG90YWxQb29sTFBTdGFrZWRLZXkAAAQWY3VycmVudFRvdGFsUG9vbEVhcm5lZAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJ0b3RhbFBvb2xFYXJuZWRLZXkAAAQGcmVzdWx0CQD8BwQJAQdBZGRyZXNzAQUXc3Rha2Vib29zdGVyUm9vdEFkZHJlc3MCDHN0YWtlUG9vbExwcwkAzAgCBQZwb29sSWQFA25pbAkAzAgCBQdwYXltZW50BQNuaWwDCQAAAgUGcmVzdWx0BQZyZXN1bHQEC3VzZXJEYXRhT3B0CQCiCAEFDWNhbGxlckFkZHJlc3MECHVzZXJEYXRhAwkBCWlzRGVmaW5lZAEFC3VzZXJEYXRhT3B0BAh1c2VyRGF0YQkAtQkCCQEIYXNTdHJpbmcBBQt1c2VyRGF0YU9wdAUDU0VQBBV1c2VyVG90YWxTdGFrZWRBbW91bnQJAQVhc0ludAEJALYJAQkAkQMCBQh1c2VyRGF0YQAABAtuZXdVc2VyRGF0YQkAzAgCCQCkAwEJAGQCBRV1c2VyVG90YWxTdGFrZWRBbW91bnQIBQdwYXltZW50BmFtb3VudAkA0QgCBQh1c2VyRGF0YQAACQC5CQIFC25ld1VzZXJEYXRhBQNTRVAJALkJAgkAzAgCCQCkAwEIBQdwYXltZW50BmFtb3VudAkAzAgCAgEwCQDMCAIJAKQDAQUXY3VycmVudFRvdGFsUG9vbENsYWltSWQJAMwIAgkApAMBBRZjdXJyZW50VG90YWxQb29sRWFybmVkBQNuaWwFA1NFUAkAzAgCCQELU3RyaW5nRW50cnkCBQ1jYWxsZXJBZGRyZXNzBQh1c2VyRGF0YQkAzAgCCQEMSW50ZWdlckVudHJ5AgUVcG9vbEN1cnJlbnRDbGFpbUlkS2V5BRdjdXJyZW50VG90YWxQb29sQ2xhaW1JZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSdG90YWxQb29sRWFybmVkS2V5BRZjdXJyZW50VG90YWxQb29sRWFybmVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRR0b3RhbFBvb2xMUFN0YWtlZEtleQkAZAIFGGN1cnJlbnRUb3RhbFBvb2xMUFN0YWtlZAgFB3BheW1lbnQGYW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKd2l0aGRyYXdMUAAEDWNhbGxlckFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwMJARppc1VzZXJIYXZlVW5jbGFpbWVkUmV3YXJkcwEFDWNhbGxlckFkZHJlc3MJAAIBAjhZb3UgaGF2ZSB1bmNsYWltZWQgcmV3YXJkcyBvbiBjb250cmFjdCwgY2xhaW0gdGhlbSBmaXJzdAUDbmlsAWkBDGNsYWltUmV3YXJkcwAEDWNhbGxlckFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwMJAQEhAQkBGmlzVXNlckhhdmVVbmNsYWltZWRSZXdhcmRzAQUNY2FsbGVyQWRkcmVzcwkAAgECTk5vdGhpbmcgdG8gY2xhaW0sIHdhaXQgZm9yIGEgd2hpbGUsIHBvb2wgd2lsbCBjb2xsZWN0IHRoZSByZXdhcmRzIGZyb20gV1ggc29vbgQScG9vbEN1cnJlbnRDbGFpbUlkCQERQGV4dHJOYXRpdmUoMTA1NSkBBRVwb29sQ3VycmVudENsYWltSWRLZXkED3RvdGFsUG9vbEVhcm5lZAkBEUBleHRyTmF0aXZlKDEwNTUpAQUSdG90YWxQb29sRWFybmVkS2V5BAh1c2VyRGF0YQkAtQkCCQERQGV4dHJOYXRpdmUoMTA1OCkBBQ1jYWxsZXJBZGRyZXNzBQNTRVAEEXVzZXJUb3RhbExQU3Rha2VkCQEFYXNJbnQBCQC2CQEJAJEDAgUIdXNlckRhdGEAAAQXdXNlclRvdGFsUmV3YXJkc0NsYWltZWQJAQVhc0ludAEJALYJAQkAkQMCBQh1c2VyRGF0YQABBBh1c2VyTGFzdENsYWltUG9vbENsYWltSWQJAQVhc0ludAEJALYJAQkAkQMCBQh1c2VyRGF0YQACBBxwb29sRWFybmVkUmV3YXJkc1dpdGhvdXRVc2VyCQEFYXNJbnQBCQC2CQEJAJEDAgUIdXNlckRhdGEAAwQZdG90YWxQb29sRWFybmluZ3NXaXRoVXNlcgkAZQIFD3RvdGFsUG9vbEVhcm5lZAUccG9vbEVhcm5lZFJld2FyZHNXaXRob3V0VXNlcgQQdW5jbGFpbWVkUmV3YXJkcwkAZQIFGXRvdGFsUG9vbEVhcm5pbmdzV2l0aFVzZXIJAGgCBRd1c2VyVG90YWxSZXdhcmRzQ2xhaW1lZAUGTVVMVDEwBBB1c2VyQ3VycmVudENsYWltCQBrAwUQdW5jbGFpbWVkUmV3YXJkcwURdXNlclRvdGFsTFBTdGFrZWQFBk1VTFQxMAQLbmV3VXNlckRhdGEJALkJAgkAzAgCCQCRAwIFCHVzZXJEYXRhAAAJAMwIAgkApAMBCQBkAgUXdXNlclRvdGFsUmV3YXJkc0NsYWltZWQFEHVzZXJDdXJyZW50Q2xhaW0JAMwIAgkApAMBBRJwb29sQ3VycmVudENsYWltSWQJAMwIAgkAkQMCBQh1c2VyRGF0YQADBQNuaWwFA1NFUAkAzAgCCQELU3RyaW5nRW50cnkCBQ1jYWxsZXJBZGRyZXNzBQtuZXdVc2VyRGF0YQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFEHVzZXJDdXJyZW50Q2xhaW0FCXd4QXNzZXRJZAUDbmlsAWkBEGNsYWltUG9vbFJld2FyZHMAAwkBAiE9AggIBQFpBmNhbGxlcgVieXRlcwUMYWRtaW5BZGRyZXNzCQACAQIKQWRtaW4gb25seQQRdG90YWxQb29sTFBTdGFrZWQJARFAZXh0ck5hdGl2ZSgxMDU1KQEFFHRvdGFsUG9vbExQU3Rha2VkS2V5BA90b3RhbFBvb2xFYXJuZWQJARFAZXh0ck5hdGl2ZSgxMDU1KQEFEnRvdGFsUG9vbEVhcm5lZEtleQQScG9vbEN1cnJlbnRDbGFpbUlkCQERQGV4dHJOYXRpdmUoMTA1NSkBBRVwb29sQ3VycmVudENsYWltSWRLZXkEE2N1cnJlbnRXeE9uQ29udHJhY3QJAPAHAgUEdGhpcwUJd3hBc3NldElkAwkAAAIFE2N1cnJlbnRXeE9uQ29udHJhY3QFE2N1cnJlbnRXeE9uQ29udHJhY3QEBnJlc3VsdAkA/AcECQEHQWRkcmVzcwEFF3N0YWtlYm9vc3RlclJvb3RBZGRyZXNzAhBjbGFpbVBvb2xSZXdhcmRzCQDMCAIFBnBvb2xJZAUDbmlsBQNuaWwDCQAAAgUGcmVzdWx0BQZyZXN1bHQED25ld1d4T25Db250cmFjdAkA8AcCBQR0aGlzBQl3eEFzc2V0SWQED2NsYWltZWRXeEFtb3VudAkAZQIFD25ld1d4T25Db250cmFjdAUTY3VycmVudFd4T25Db250cmFjdAQWY3VycmVudENsYWltSWRFYXJuaW5ncwkAawMFD2NsYWltZWRXeEFtb3VudAUGTVVMVDEwBRF0b3RhbFBvb2xMUFN0YWtlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUVcG9vbEN1cnJlbnRDbGFpbUlkS2V5CQBkAgUScG9vbEN1cnJlbnRDbGFpbUlkAAEJAMwIAgkBDEludGVnZXJFbnRyeQIFEnRvdGFsUG9vbEVhcm5lZEtleQkAZAIFD3RvdGFsUG9vbEVhcm5lZAUWY3VycmVudENsYWltSWRFYXJuaW5ncwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleUw1Wsk=",
    "height": 2764822,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: DB4H8wS9QkVjdp7M4izFEubZko9m79FqHZ4uijV6SorH

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let wxAssetId = base58'FAsNS8yGpgcHHpRqRL95cWmE2BjFwGZNcdf6bMzNFcpS'
5+
6+let MULT10 = 10000000000
7+
8+let SEP = "__"
9+
10+let poolId = 1
11+
12+let poolLPTokenAddress = base58'4TLuEDo8QjPsxUGjfRPyqqvAk4JtnYMXK1ypGo8uKrb2'
13+
14+let stakeboosterRootAddress = base58'3N2PGCSexF2nUN9SmgsaLedFix3M67A9reg'
15+
16+let adminAddress = base58'3N2iME1bcpy9zdFi2S1rmQDjPvvN5X8t3qW'
17+
18+let totalPoolLPStakedKey = "total_pool_lp_staked"
19+
20+let totalPoolEarnedKey = "total_pool_earned"
21+
22+let poolCurrentClaimIdKey = "pool_current_claim_id"
23+
24+func asPayment (v) = match v {
25+    case p: AttachedPayment => 
26+        p
27+    case _ => 
28+        throw("fail to cast into AttachedPayment")
29+}
30+
31+
32+func asInt (val) = match val {
33+    case valInt: Int => 
34+        valInt
35+    case _ => 
36+        throw("fail to cast into Int")
37+}
38+
39+
40+func asString (val) = match val {
41+    case valString: String => 
42+        valString
43+    case _ => 
44+        throw("fail to cast into String")
45+}
46+
47+
48+func isUserHaveUnclaimedRewards (address) = if (!(isDefined(getString(address))))
49+    then false
50+    else {
51+        let currentPoolClaimId = getIntegerValue(poolCurrentClaimIdKey)
52+        let userData = split(getStringValue(address), SEP)
53+        let userLastClaimedRewardsAtPoolClaimId = asInt(parseInt(userData[2]))
54+        (currentPoolClaimId > userLastClaimedRewardsAtPoolClaimId)
55+        }
56+
57+
58+@Callable(i)
59+func stakeLP () = if ((size(i.payments) != 1))
60+    then throw("One Payment expected")
61+    else {
62+        let callerAddress = toBase58String(i.caller.bytes)
63+        let payment = asPayment(i.payments[0])
64+        if (if ((payment.assetId != poolLPTokenAddress))
65+            then true
66+            else (0 >= payment.amount))
67+            then throw("Wrong asset id or negative amount")
68+            else if (isUserHaveUnclaimedRewards(callerAddress))
69+                then throw("You have unclaimed rewards on contract, claim them first")
70+                else {
71+                    let currentTotalPoolClaimId = valueOrElse(getInteger(poolCurrentClaimIdKey), 0)
72+                    let currentTotalPoolLPStaked = valueOrElse(getInteger(totalPoolLPStakedKey), 0)
73+                    let currentTotalPoolEarned = valueOrElse(getInteger(totalPoolEarnedKey), 0)
74+                    let result = invoke(Address(stakeboosterRootAddress), "stakePoolLps", [poolId], [payment])
75+                    if ((result == result))
76+                        then {
77+                            let userDataOpt = getString(callerAddress)
78+                            let userData = if (isDefined(userDataOpt))
79+                                then {
80+                                    let userData = split(asString(userDataOpt), SEP)
81+                                    let userTotalStakedAmount = asInt(parseInt(userData[0]))
82+                                    let newUserData = [toString((userTotalStakedAmount + payment.amount)), removeByIndex(userData, 0)]
83+                                    makeString(newUserData, SEP)
84+                                    }
85+                                else makeString([toString(payment.amount), "0", toString(currentTotalPoolClaimId), toString(currentTotalPoolEarned)], SEP)
86+[StringEntry(callerAddress, userData), IntegerEntry(poolCurrentClaimIdKey, currentTotalPoolClaimId), IntegerEntry(totalPoolEarnedKey, currentTotalPoolEarned), IntegerEntry(totalPoolLPStakedKey, (currentTotalPoolLPStaked + payment.amount))]
87+                            }
88+                        else throw("Strict value is not equal to itself.")
89+                    }
90+        }
91+
92+
93+
94+@Callable(i)
95+func withdrawLP () = {
96+    let callerAddress = toBase58String(i.caller.bytes)
97+    if (isUserHaveUnclaimedRewards(callerAddress))
98+        then throw("You have unclaimed rewards on contract, claim them first")
99+        else nil
100+    }
101+
102+
103+
104+@Callable(i)
105+func claimRewards () = {
106+    let callerAddress = toBase58String(i.caller.bytes)
107+    if (!(isUserHaveUnclaimedRewards(callerAddress)))
108+        then throw("Nothing to claim, wait for a while, pool will collect the rewards from WX soon")
109+        else {
110+            let poolCurrentClaimId = getIntegerValue(poolCurrentClaimIdKey)
111+            let totalPoolEarned = getIntegerValue(totalPoolEarnedKey)
112+            let userData = split(getStringValue(callerAddress), SEP)
113+            let userTotalLPStaked = asInt(parseInt(userData[0]))
114+            let userTotalRewardsClaimed = asInt(parseInt(userData[1]))
115+            let userLastClaimPoolClaimId = asInt(parseInt(userData[2]))
116+            let poolEarnedRewardsWithoutUser = asInt(parseInt(userData[3]))
117+            let totalPoolEarningsWithUser = (totalPoolEarned - poolEarnedRewardsWithoutUser)
118+            let unclaimedRewards = (totalPoolEarningsWithUser - (userTotalRewardsClaimed * MULT10))
119+            let userCurrentClaim = fraction(unclaimedRewards, userTotalLPStaked, MULT10)
120+            let newUserData = makeString([userData[0], toString((userTotalRewardsClaimed + userCurrentClaim)), toString(poolCurrentClaimId), userData[3]], SEP)
121+[StringEntry(callerAddress, newUserData), ScriptTransfer(i.caller, userCurrentClaim, wxAssetId)]
122+            }
123+    }
124+
125+
126+
127+@Callable(i)
128+func claimPoolRewards () = if ((i.caller.bytes != adminAddress))
129+    then throw("Admin only")
130+    else {
131+        let totalPoolLPStaked = getIntegerValue(totalPoolLPStakedKey)
132+        let totalPoolEarned = getIntegerValue(totalPoolEarnedKey)
133+        let poolCurrentClaimId = getIntegerValue(poolCurrentClaimIdKey)
134+        let currentWxOnContract = assetBalance(this, wxAssetId)
135+        if ((currentWxOnContract == currentWxOnContract))
136+            then {
137+                let result = invoke(Address(stakeboosterRootAddress), "claimPoolRewards", [poolId], nil)
138+                if ((result == result))
139+                    then {
140+                        let newWxOnContract = assetBalance(this, wxAssetId)
141+                        let claimedWxAmount = (newWxOnContract - currentWxOnContract)
142+                        let currentClaimIdEarnings = fraction(claimedWxAmount, MULT10, totalPoolLPStaked)
143+[IntegerEntry(poolCurrentClaimIdKey, (poolCurrentClaimId + 1)), IntegerEntry(totalPoolEarnedKey, (totalPoolEarned + currentClaimIdEarnings))]
144+                        }
145+                    else throw("Strict value is not equal to itself.")
146+                }
147+            else throw("Strict value is not equal to itself.")
148+        }
149+
150+
151+@Verifier(tx)
152+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
153+
github/deemru/w8io/169f3d6 
24.16 ms ◑