tx · 32tXatg2WK2ghkUCLQKfH8jsfn3a2sUBwraKYXmZb1CX

3MyNtNaUpXUhUnrrebTTMtez8gjR68G5ZXZ:  -0.01000000 Waves

2023.09.21 11:35 [2764908] smart account 3MyNtNaUpXUhUnrrebTTMtez8gjR68G5ZXZ > SELF 0.00000000 Waves

{ "type": 13, "id": "32tXatg2WK2ghkUCLQKfH8jsfn3a2sUBwraKYXmZb1CX", "fee": 1000000, "feeAssetId": null, "timestamp": 1695285218067, "version": 2, "chainId": 84, "sender": "3MyNtNaUpXUhUnrrebTTMtez8gjR68G5ZXZ", "senderPublicKey": "BKqibw8SSGuuMGSzbqvEU3EQy98znGV6NbQ16tX5CoMf", "proofs": [ "2cPHXQEoWTQnKDZ1iZFiKsETd2WaHuG3gvesSWZuVumUmrWkCxCgwyFerd2T4TJitHt8cyEMp4X9TieF31SKgLxB" ], "script": "base64:BgIKCAISABIAEgASAA4ACXd4QXNzZXRJZAEgM1Kp0g5+advMxKQnvIKrDTRAE/WbFcGgKo+DMmTBTQkABk1VTFQxMACAyK+gJQADU0VQAgJfXwAGcG9vbElkAAEAEnBvb2xMUFRva2VuQWRkcmVzcwEgM1Kp0g5+advMxKQnvIKrDTRAE/WbFcGgKo+DMmTBTQkAF3N0YWtlYm9vc3RlclJvb3RBZGRyZXNzARoBVIjFcN5G9OJsOhwdJuqY/GjHC7IJwkxSPQAMYWRtaW5BZGRyZXNzARoBVIxhil+sdwu2jS1p0aM0qMpq9rr6QP5z7QAUdG90YWxQb29sTFBTdGFrZWRLZXkCFHRvdGFsX3Bvb2xfbHBfc3Rha2VkABJ0b3RhbFBvb2xFYXJuZWRLZXkCEXRvdGFsX3Bvb2xfZWFybmVkABVwb29sQ3VycmVudENsYWltSWRLZXkCFXBvb2xfY3VycmVudF9jbGFpbV9pZAEJYXNQYXltZW50AQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACD0F0dGFjaGVkUGF5bWVudAQBcAUHJG1hdGNoMAUBcAkAAgECIWZhaWwgdG8gY2FzdCBpbnRvIEF0dGFjaGVkUGF5bWVudAEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCGFzU3RyaW5nAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcECXZhbFN0cmluZwUHJG1hdGNoMAUJdmFsU3RyaW5nCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nARppc1VzZXJIYXZlVW5jbGFpbWVkUmV3YXJkcwEHYWRkcmVzcwMJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQUHYWRkcmVzcwcEEmN1cnJlbnRQb29sQ2xhaW1JZAkBEUBleHRyTmF0aXZlKDEwNTUpAQUVcG9vbEN1cnJlbnRDbGFpbUlkS2V5BAh1c2VyRGF0YQkAtQkCCQERQGV4dHJOYXRpdmUoMTA1OCkBBQdhZGRyZXNzBQNTRVAEI3VzZXJMYXN0Q2xhaW1lZFJld2FyZHNBdFBvb2xDbGFpbUlkCQEFYXNJbnQBCQC2CQEJAJEDAgUIdXNlckRhdGEAAgkAZgIFEmN1cnJlbnRQb29sQ2xhaW1JZAUjdXNlckxhc3RDbGFpbWVkUmV3YXJkc0F0UG9vbENsYWltSWQEAWkBB3N0YWtlTFAAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIUT25lIFBheW1lbnQgZXhwZWN0ZWQEDWNhbGxlckFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQHcGF5bWVudAkBCWFzUGF5bWVudAEJAJEDAggFAWkIcGF5bWVudHMAAAMJARppc1VzZXJIYXZlVW5jbGFpbWVkUmV3YXJkcwEFDWNhbGxlckFkZHJlc3MJAAIBAjhZb3UgaGF2ZSB1bmNsYWltZWQgcmV3YXJkcyBvbiBjb250cmFjdCwgY2xhaW0gdGhlbSBmaXJzdAQXY3VycmVudFRvdGFsUG9vbENsYWltSWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUVcG9vbEN1cnJlbnRDbGFpbUlkS2V5AAAEGGN1cnJlbnRUb3RhbFBvb2xMUFN0YWtlZAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRR0b3RhbFBvb2xMUFN0YWtlZEtleQAABBZjdXJyZW50VG90YWxQb29sRWFybmVkCQELdmFsdWVPckVsc2UCCQCfCAEFEnRvdGFsUG9vbEVhcm5lZEtleQAABAZyZXN1bHQJAPwHBAkBB0FkZHJlc3MBBRdzdGFrZWJvb3N0ZXJSb290QWRkcmVzcwIMc3Rha2VQb29sTHBzCQDMCAIFBnBvb2xJZAUDbmlsCQDMCAIFB3BheW1lbnQFA25pbAMJAAACBQZyZXN1bHQFBnJlc3VsdAQLdXNlckRhdGFPcHQJAKIIAQUNY2FsbGVyQWRkcmVzcwQIdXNlckRhdGEDCQEJaXNEZWZpbmVkAQULdXNlckRhdGFPcHQECHVzZXJEYXRhCQC1CQIJAQhhc1N0cmluZwEFC3VzZXJEYXRhT3B0BQNTRVAEFXVzZXJUb3RhbFN0YWtlZEFtb3VudAkBBWFzSW50AQkAtgkBCQCRAwIFCHVzZXJEYXRhAAAEC25ld1VzZXJEYXRhCQDMCAIJAKQDAQkAZAIFFXVzZXJUb3RhbFN0YWtlZEFtb3VudAgFB3BheW1lbnQGYW1vdW50CQDRCAIFCHVzZXJEYXRhAAAJALkJAgULbmV3VXNlckRhdGEFA1NFUAkAuQkCCQDMCAIJAKQDAQgFB3BheW1lbnQGYW1vdW50CQDMCAICATAJAMwIAgkApAMBBRdjdXJyZW50VG90YWxQb29sQ2xhaW1JZAkAzAgCCQCkAwEFFmN1cnJlbnRUb3RhbFBvb2xFYXJuZWQFA25pbAUDU0VQCQDMCAIJAQtTdHJpbmdFbnRyeQIFDWNhbGxlckFkZHJlc3MFCHVzZXJEYXRhCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVwb29sQ3VycmVudENsYWltSWRLZXkFF2N1cnJlbnRUb3RhbFBvb2xDbGFpbUlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJ0b3RhbFBvb2xFYXJuZWRLZXkFFmN1cnJlbnRUb3RhbFBvb2xFYXJuZWQJAMwIAgkBDEludGVnZXJFbnRyeQIFFHRvdGFsUG9vbExQU3Rha2VkS2V5CQBkAgUYY3VycmVudFRvdGFsUG9vbExQU3Rha2VkCAUHcGF5bWVudAZhbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQp3aXRoZHJhd0xQAAQNY2FsbGVyQWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzAwkBGmlzVXNlckhhdmVVbmNsYWltZWRSZXdhcmRzAQUNY2FsbGVyQWRkcmVzcwkAAgECOFlvdSBoYXZlIHVuY2xhaW1lZCByZXdhcmRzIG9uIGNvbnRyYWN0LCBjbGFpbSB0aGVtIGZpcnN0BQNuaWwBaQEMY2xhaW1SZXdhcmRzAAQNY2FsbGVyQWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzAwkBASEBCQEaaXNVc2VySGF2ZVVuY2xhaW1lZFJld2FyZHMBBQ1jYWxsZXJBZGRyZXNzCQACAQJOTm90aGluZyB0byBjbGFpbSwgd2FpdCBmb3IgYSB3aGlsZSwgcG9vbCB3aWxsIGNvbGxlY3QgdGhlIHJld2FyZHMgZnJvbSBXWCBzb29uBBJwb29sQ3VycmVudENsYWltSWQJARFAZXh0ck5hdGl2ZSgxMDU1KQEFFXBvb2xDdXJyZW50Q2xhaW1JZEtleQQPdG90YWxQb29sRWFybmVkCQERQGV4dHJOYXRpdmUoMTA1NSkBBRJ0b3RhbFBvb2xFYXJuZWRLZXkECHVzZXJEYXRhCQC1CQIJARFAZXh0ck5hdGl2ZSgxMDU4KQEFDWNhbGxlckFkZHJlc3MFA1NFUAQRdXNlclRvdGFsTFBTdGFrZWQJAQVhc0ludAEJALYJAQkAkQMCBQh1c2VyRGF0YQAABBd1c2VyVG90YWxSZXdhcmRzQ2xhaW1lZAkBBWFzSW50AQkAtgkBCQCRAwIFCHVzZXJEYXRhAAEEGHVzZXJMYXN0Q2xhaW1Qb29sQ2xhaW1JZAkBBWFzSW50AQkAtgkBCQCRAwIFCHVzZXJEYXRhAAIEGXBvb2xFYXJuZWRSZXdhcmRzV2l0aFVzZXIJAQVhc0ludAEJALYJAQkAkQMCBQh1c2VyRGF0YQADBBl0b3RhbFBvb2xFYXJuaW5nc1dpdGhVc2VyCQBlAgUPdG90YWxQb29sRWFybmVkBRlwb29sRWFybmVkUmV3YXJkc1dpdGhVc2VyBAl1c2VyQ2xhaW0JAGsDBRl0b3RhbFBvb2xFYXJuaW5nc1dpdGhVc2VyBRF1c2VyVG90YWxMUFN0YWtlZAUGTVVMVDEwBBRjdXJyZW50RWFybmVkUmV3YXJkcwkAawMFCXVzZXJDbGFpbQUGTVVMVDEwBRF1c2VyVG90YWxMUFN0YWtlZAQLbmV3VXNlckRhdGEJALkJAgkAzAgCCQCRAwIFCHVzZXJEYXRhAAAJAMwIAgkApAMBCQBkAgUXdXNlclRvdGFsUmV3YXJkc0NsYWltZWQFCXVzZXJDbGFpbQkAzAgCCQCkAwEFEnBvb2xDdXJyZW50Q2xhaW1JZAkAzAgCCQCkAwEJAGQCBRlwb29sRWFybmVkUmV3YXJkc1dpdGhVc2VyBRRjdXJyZW50RWFybmVkUmV3YXJkcwUDbmlsBQNTRVAJAMwIAgkBC1N0cmluZ0VudHJ5AgUNY2FsbGVyQWRkcmVzcwULbmV3VXNlckRhdGEJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQl1c2VyQ2xhaW0FCXd4QXNzZXRJZAUDbmlsAWkBEGNsYWltUG9vbFJld2FyZHMAAwkBAiE9AggIBQFpBmNhbGxlcgVieXRlcwUMYWRtaW5BZGRyZXNzCQACAQIKQWRtaW4gb25seQQRdG90YWxQb29sTFBTdGFrZWQJARFAZXh0ck5hdGl2ZSgxMDU1KQEFFHRvdGFsUG9vbExQU3Rha2VkS2V5BA90b3RhbFBvb2xFYXJuZWQJARFAZXh0ck5hdGl2ZSgxMDU1KQEFEnRvdGFsUG9vbEVhcm5lZEtleQQScG9vbEN1cnJlbnRDbGFpbUlkCQERQGV4dHJOYXRpdmUoMTA1NSkBBRVwb29sQ3VycmVudENsYWltSWRLZXkEE2N1cnJlbnRXeE9uQ29udHJhY3QJAPAHAgUEdGhpcwUJd3hBc3NldElkAwkAAAIFE2N1cnJlbnRXeE9uQ29udHJhY3QFE2N1cnJlbnRXeE9uQ29udHJhY3QEBnJlc3VsdAkA/AcECQEHQWRkcmVzcwEFF3N0YWtlYm9vc3RlclJvb3RBZGRyZXNzAhBjbGFpbVBvb2xSZXdhcmRzCQDMCAIFBnBvb2xJZAUDbmlsBQNuaWwDCQAAAgUGcmVzdWx0BQZyZXN1bHQED25ld1d4T25Db250cmFjdAkA8AcCBQR0aGlzBQl3eEFzc2V0SWQED2NsYWltZWRXeEFtb3VudAkAZQIFD25ld1d4T25Db250cmFjdAUTY3VycmVudFd4T25Db250cmFjdAQWY3VycmVudENsYWltSWRFYXJuaW5ncwkAawMFD2NsYWltZWRXeEFtb3VudAUGTVVMVDEwBRF0b3RhbFBvb2xMUFN0YWtlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIWQ1VSUkVOVF9XWF9PTl9DT05UUkFDVAUTY3VycmVudFd4T25Db250cmFjdAkAzAgCCQEMSW50ZWdlckVudHJ5AgISTkVXX1dYX09OX0NPTlRSQUNUBQ9uZXdXeE9uQ29udHJhY3QJAMwIAgkBDEludGVnZXJFbnRyeQIFFXBvb2xDdXJyZW50Q2xhaW1JZEtleQkAZAIFEnBvb2xDdXJyZW50Q2xhaW1JZAABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJ0b3RhbFBvb2xFYXJuZWRLZXkJAGQCBQ90b3RhbFBvb2xFYXJuZWQFFmN1cnJlbnRDbGFpbUlkRWFybmluZ3MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXn57HA1", "height": 2764908, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: none Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let wxAssetId = base58'4TLuEDo8QjPsxUGjfRPyqqvAk4JtnYMXK1ypGo8uKrb2'
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 (isUserHaveUnclaimedRewards(callerAddress))
65+ then throw("You have unclaimed rewards on contract, claim them first")
66+ else {
67+ let currentTotalPoolClaimId = valueOrElse(getInteger(poolCurrentClaimIdKey), 0)
68+ let currentTotalPoolLPStaked = valueOrElse(getInteger(totalPoolLPStakedKey), 0)
69+ let currentTotalPoolEarned = valueOrElse(getInteger(totalPoolEarnedKey), 0)
70+ let result = invoke(Address(stakeboosterRootAddress), "stakePoolLps", [poolId], [payment])
71+ if ((result == result))
72+ then {
73+ let userDataOpt = getString(callerAddress)
74+ let userData = if (isDefined(userDataOpt))
75+ then {
76+ let userData = split(asString(userDataOpt), SEP)
77+ let userTotalStakedAmount = asInt(parseInt(userData[0]))
78+ let newUserData = [toString((userTotalStakedAmount + payment.amount)), removeByIndex(userData, 0)]
79+ makeString(newUserData, SEP)
80+ }
81+ else makeString([toString(payment.amount), "0", toString(currentTotalPoolClaimId), toString(currentTotalPoolEarned)], SEP)
82+[StringEntry(callerAddress, userData), IntegerEntry(poolCurrentClaimIdKey, currentTotalPoolClaimId), IntegerEntry(totalPoolEarnedKey, currentTotalPoolEarned), IntegerEntry(totalPoolLPStakedKey, (currentTotalPoolLPStaked + payment.amount))]
83+ }
84+ else throw("Strict value is not equal to itself.")
85+ }
86+ }
87+
88+
89+
90+@Callable(i)
91+func withdrawLP () = {
92+ let callerAddress = toBase58String(i.caller.bytes)
93+ if (isUserHaveUnclaimedRewards(callerAddress))
94+ then throw("You have unclaimed rewards on contract, claim them first")
95+ else nil
96+ }
97+
98+
99+
100+@Callable(i)
101+func claimRewards () = {
102+ let callerAddress = toBase58String(i.caller.bytes)
103+ if (!(isUserHaveUnclaimedRewards(callerAddress)))
104+ then throw("Nothing to claim, wait for a while, pool will collect the rewards from WX soon")
105+ else {
106+ let poolCurrentClaimId = getIntegerValue(poolCurrentClaimIdKey)
107+ let totalPoolEarned = getIntegerValue(totalPoolEarnedKey)
108+ let userData = split(getStringValue(callerAddress), SEP)
109+ let userTotalLPStaked = asInt(parseInt(userData[0]))
110+ let userTotalRewardsClaimed = asInt(parseInt(userData[1]))
111+ let userLastClaimPoolClaimId = asInt(parseInt(userData[2]))
112+ let poolEarnedRewardsWithUser = asInt(parseInt(userData[3]))
113+ let totalPoolEarningsWithUser = (totalPoolEarned - poolEarnedRewardsWithUser)
114+ let userClaim = fraction(totalPoolEarningsWithUser, userTotalLPStaked, MULT10)
115+ let currentEarnedRewards = fraction(userClaim, MULT10, userTotalLPStaked)
116+ let newUserData = makeString([userData[0], toString((userTotalRewardsClaimed + userClaim)), toString(poolCurrentClaimId), toString((poolEarnedRewardsWithUser + currentEarnedRewards))], SEP)
117+[StringEntry(callerAddress, newUserData), ScriptTransfer(i.caller, userClaim, wxAssetId)]
118+ }
119+ }
120+
121+
122+
123+@Callable(i)
124+func claimPoolRewards () = if ((i.caller.bytes != adminAddress))
125+ then throw("Admin only")
126+ else {
127+ let totalPoolLPStaked = getIntegerValue(totalPoolLPStakedKey)
128+ let totalPoolEarned = getIntegerValue(totalPoolEarnedKey)
129+ let poolCurrentClaimId = getIntegerValue(poolCurrentClaimIdKey)
130+ let currentWxOnContract = assetBalance(this, wxAssetId)
131+ if ((currentWxOnContract == currentWxOnContract))
132+ then {
133+ let result = invoke(Address(stakeboosterRootAddress), "claimPoolRewards", [poolId], nil)
134+ if ((result == result))
135+ then {
136+ let newWxOnContract = assetBalance(this, wxAssetId)
137+ let claimedWxAmount = (newWxOnContract - currentWxOnContract)
138+ let currentClaimIdEarnings = fraction(claimedWxAmount, MULT10, totalPoolLPStaked)
139+[IntegerEntry("CURRENT_WX_ON_CONTRACT", currentWxOnContract), IntegerEntry("NEW_WX_ON_CONTRACT", newWxOnContract), IntegerEntry(poolCurrentClaimIdKey, (poolCurrentClaimId + 1)), IntegerEntry(totalPoolEarnedKey, (totalPoolEarned + currentClaimIdEarnings))]
140+ }
141+ else throw("Strict value is not equal to itself.")
142+ }
143+ else throw("Strict value is not equal to itself.")
144+ }
145+
146+
147+@Verifier(tx)
148+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
149+

github/deemru/w8io/026f985 
29.37 ms