tx · 3kHjWBX9qUrK8faXuKvSmSQzEWpq8iWQgGfJiDL8S47C

3Mu7VHAWmzFuC8CC1jL66egwWdzMmU3GMdN:  -0.00400000 Waves

2024.04.28 21:41 [3083081] smart account 3Mu7VHAWmzFuC8CC1jL66egwWdzMmU3GMdN > SELF 0.00000000 Waves

{ "type": 13, "id": "3kHjWBX9qUrK8faXuKvSmSQzEWpq8iWQgGfJiDL8S47C", "fee": 400000, "feeAssetId": null, "timestamp": 1714329691609, "version": 1, "sender": "3Mu7VHAWmzFuC8CC1jL66egwWdzMmU3GMdN", "senderPublicKey": "E7bwWH9QduGf4jj1GVqERL7CXjAYaaj9YifNq5o7A5ZM", "proofs": [ "3QwhTvNZd1zXjuYVjeEAqPcAmoM2P7irN5qAogFKBRDMssky2VHD39dMGKxZUhGCLRLenYeG8HfSbzmr4Dk27yUm" ], "script": "base64:BgINCAISABIDCgEBEgASAAkABnVzZG5JZAEgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQACXVzZG5JZFN0cgIsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQACHB1enpsZUlkASDxGv4l/vaZOPRpKsTf4RLWR7LGyg66Nwmvd20fjqLlYwALcHV6emxlSWRTdHICLEhFQjhRYXc5eHJXcFdzOHRIc2lBVFlHQldEQnRQMlM3a2NQQUxyTXU0M0FTAAVTY2FsZQCAoJSljR0BDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEQY2xhaW1BbGlhc1Jlc3VsdAIHYWRkcmVzcwphc3NldElkU3RyBAphZGRyZXNzU3RyCQClCAEFB2FkZHJlc3MED2N1cnJlbnRJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAQMc3Rha2VkQW1vdW50CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAQYbGFzdENoZWNrSW50ZXJlc3RJblN0YXRlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QEEWxhc3RDaGVja0ludGVyZXN0AwkAAAIFGGxhc3RDaGVja0ludGVyZXN0SW5TdGF0ZQAAAAAFGGxhc3RDaGVja0ludGVyZXN0SW5TdGF0ZQQGcmV3YXJkCQBrAwkAZQIFD2N1cnJlbnRJbnRlcmVzdAURbGFzdENoZWNrSW50ZXJlc3QFDHN0YWtlZEFtb3VudAUFU2NhbGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFD2N1cnJlbnRJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUKYWRkcmVzc1N0cgIBXwUKYXNzZXRJZFN0cgIIX2NsYWltZWQJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICAV8FCmFzc2V0SWRTdHICCF9jbGFpbWVkBQZyZXdhcmQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUHYWRkcmVzcwUGcmV3YXJkCQDZBAEFCmFzc2V0SWRTdHIFA25pbAELY2xhaW1SZXN1bHQBB2FkZHJlc3MJAM4IAgkBEGNsYWltQWxpYXNSZXN1bHQCBQdhZGRyZXNzBQl1c2RuSWRTdHIJARBjbGFpbUFsaWFzUmVzdWx0AgUHYWRkcmVzcwULcHV6emxlSWRTdHIEAWkBBXN0YWtlAAQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQKYWRkcmVzc1N0cgkApQgBCAUBaQZjYWxsZXIECmFzc2V0SWRTdHIJANgEAQUGdXNkbklkBBF0b3RhbFN0YWtlZEFtb3VudAkBDXRyeUdldEludGVnZXIBAg1nbG9iYWxfc3Rha2VkAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQhwdXp6bGVJZAkAAgECFHdyb25nIGFzc2V0IGF0dGFjaGVkCQDOCAIJAQtjbGFpbVJlc3VsdAEIBQFpBmNhbGxlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFEXRvdGFsU3Rha2VkQW1vdW50BQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgdfc3Rha2VkBQZhbW91bnQFA25pbAFpAQd1blN0YWtlAQZhbW91bnQECmFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBAxzdGFrZWRBbW91bnQJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgdfc3Rha2VkAwkAZgIFBmFtb3VudAUMc3Rha2VkQW1vdW50CQACAQIfeW91IGRvbid0IGhhdmUgdG9rZW5zIGF2YWlsYWJsZQkAzggCCQELY2xhaW1SZXN1bHQBCAUBaQZjYWxsZXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAkAZQIFDHN0YWtlZEFtb3VudAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1nbG9iYWxfc3Rha2VkCQBlAgkBDXRyeUdldEludGVnZXIBAg1nbG9iYWxfc3Rha2VkBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQZhbW91bnQFCHB1enpsZUlkBQNuaWwBaQELY2xhaW1SZXdhcmQACQELY2xhaW1SZXN1bHQBCAUBaQZjYWxsZXIBaQELdG9wVXBSZXdhcmQABAhwbXRBc3NldAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAlwbXRBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAZhbW91bnQDCQAAAgUIcG10QXNzZXQFBnVzZG5JZAAAAwkAAAIFCHBtdEFzc2V0BQhwdXp6bGVJZAUJcG10QW1vdW50CQACAQIabm90IGNvcnJlY3QgYXNzZXQgYXR0YWNoZWQDCQAAAgUGYW1vdW50BQZhbW91bnQED2N1cnJlbnRJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FC3B1enpsZUlkU3RyAglfaW50ZXJlc3QEEXRvdGFsU3Rha2VkQW1vdW50CQENdHJ5R2V0SW50ZWdlcgECDWdsb2JhbF9zdGFrZWQEDWludGVyZXN0RGVsdGEDCQBmAgURdG90YWxTdGFrZWRBbW91bnQAAAkAawMFBmFtb3VudAUFU2NhbGUFEXRvdGFsU3Rha2VkQW1vdW50AAADCQAAAgUIcG10QXNzZXQFCHB1enpsZUlkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfBQtwdXp6bGVJZFN0cgIJX2Vhcm5pbmdzCQBkAgkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwULcHV6emxlSWRTdHICCV9lYXJuaW5ncwUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FC3B1enpsZUlkU3RyAglfaW50ZXJlc3QJAGQCBQ9jdXJyZW50SW50ZXJlc3QFDWludGVyZXN0RGVsdGEFA25pbAUGYW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQEaAVSbLsJROE5UFJ7qeA0vzhO5KVNfK7DweWkFCXBtdEFtb3VudAUIcG10QXNzZXQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXk4L0Db", "chainId": 84, "height": 3083081, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: vWdrnJjG8dxVuBSkJnQg2efiimA6DdXyghgPnG67APd Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let usdnId = base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'
5+
6+let usdnIdStr = "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"
7+
8+let puzzleId = base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS'
9+
10+let puzzleIdStr = "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS"
11+
12+let Scale = 1000000000000
13+
14+func tryGetInteger (key) = match getInteger(this, key) {
15+ case b: Int =>
16+ b
17+ case _ =>
18+ 0
19+}
20+
21+
22+func tryGetString (key) = match getString(this, key) {
23+ case a: String =>
24+ a
25+ case _ =>
26+ ""
27+}
28+
29+
30+func claimAliasResult (address,assetIdStr) = {
31+ let addressStr = toString(address)
32+ let currentInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
33+ let stakedAmount = tryGetInteger((addressStr + "_staked"))
34+ let lastCheckInterestInState = tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))
35+ let lastCheckInterest = if ((lastCheckInterestInState == 0))
36+ then 0
37+ else lastCheckInterestInState
38+ let reward = fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
39+[IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentInterest), IntegerEntry((((addressStr + "_") + assetIdStr) + "_claimed"), (tryGetInteger((((addressStr + "_") + assetIdStr) + "_claimed")) + reward)), ScriptTransfer(address, reward, fromBase58String(assetIdStr))]
40+ }
41+
42+
43+func claimResult (address) = (claimAliasResult(address, usdnIdStr) ++ claimAliasResult(address, puzzleIdStr))
44+
45+
46+@Callable(i)
47+func stake () = {
48+ let amount = i.payments[0].amount
49+ let addressStr = toString(i.caller)
50+ let assetIdStr = toBase58String(usdnId)
51+ let totalStakedAmount = tryGetInteger("global_staked")
52+ if ((i.payments[0].assetId != puzzleId))
53+ then throw("wrong asset attached")
54+ else (claimResult(i.caller) ++ [IntegerEntry("global_staked", (totalStakedAmount + amount)), IntegerEntry((addressStr + "_staked"), (tryGetInteger((addressStr + "_staked")) + amount))])
55+ }
56+
57+
58+
59+@Callable(i)
60+func unStake (amount) = {
61+ let addressStr = toString(i.caller)
62+ let stakedAmount = tryGetInteger((addressStr + "_staked"))
63+ if ((amount > stakedAmount))
64+ then throw("you don't have tokens available")
65+ else (claimResult(i.caller) ++ [IntegerEntry((addressStr + "_staked"), (stakedAmount - amount)), IntegerEntry("global_staked", (tryGetInteger("global_staked") - amount)), ScriptTransfer(i.caller, amount, puzzleId)])
66+ }
67+
68+
69+
70+@Callable(i)
71+func claimReward () = claimResult(i.caller)
72+
73+
74+
75+@Callable(i)
76+func topUpReward () = {
77+ let pmtAsset = value(i.payments[0].assetId)
78+ let pmtAmount = i.payments[0].amount
79+ let amount = if ((pmtAsset == usdnId))
80+ then 0
81+ else if ((pmtAsset == puzzleId))
82+ then pmtAmount
83+ else throw("not correct asset attached")
84+ if ((amount == amount))
85+ then {
86+ let currentInterest = tryGetInteger((("global_lastCheck_" + puzzleIdStr) + "_interest"))
87+ let totalStakedAmount = tryGetInteger("global_staked")
88+ let interestDelta = if ((totalStakedAmount > 0))
89+ then fraction(amount, Scale, totalStakedAmount)
90+ else 0
91+ if ((pmtAsset == puzzleId))
92+ then $Tuple2([IntegerEntry((("global_" + puzzleIdStr) + "_earnings"), (tryGetInteger((("global_" + puzzleIdStr) + "_earnings")) + amount)), IntegerEntry((("global_lastCheck_" + puzzleIdStr) + "_interest"), (currentInterest + interestDelta))], amount)
93+ else [ScriptTransfer(Address(base58'3N44cXXhd7Xk7hr7JkLa3mTStLQnFpUfKgC'), pmtAmount, pmtAsset)]
94+ }
95+ else throw("Strict value is not equal to itself.")
96+ }
97+
98+
99+@Verifier(tx)
100+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
101+

github/deemru/w8io/026f985 
16.32 ms