tx · 8uUMCLbYTXsGcicgHv11hQM7tf1eWH5YSr7PjFFLQEsD

3NAHVQJhBLJ15oYvpcjMXkbAt2VGtszCUPh:  -0.01000000 Waves

2024.03.19 23:18 [3025379] smart account 3NAHVQJhBLJ15oYvpcjMXkbAt2VGtszCUPh > SELF 0.00000000 Waves

{ "type": 13, "id": "8uUMCLbYTXsGcicgHv11hQM7tf1eWH5YSr7PjFFLQEsD", "fee": 1000000, "feeAssetId": null, "timestamp": 1710879492420, "version": 2, "chainId": 84, "sender": "3NAHVQJhBLJ15oYvpcjMXkbAt2VGtszCUPh", "senderPublicKey": "5ytCnxyRbDV3GAbi14VtXrcJ9JmE3nucr99GhHsbAAKB", "proofs": [ "25sWCxtvjjoXrnhMqP1PyXBN62Ey5eMk3sU27PmGuGBCGZVC1oPaXZcNDjFM35o59xW48RQMv8FGrbuV5SMSPX3V" ], "script": "base64:BgINCAISABIDCgEBEgASAAkABnBldGVJZAEgYSBHarXlNJTTjPmt43nE+nCVPdmowzMaaT3SSieiN2AACXBldGVJZFN0cgIsN1k5NlVUYkJRNDVjaldvSGVGajJFaG5qZGdFdDZpSzJMbkE0ZVRjZnhkb0QABmZvbW9JZAEgYSBHarXlNJTTjPmt43nE+nCVPdmowzMaaT3SSieiN2AAB2ZvbW9TdHICLDdZOTZVVGJCUTQ1Y2pXb0hlRmoyRWhuamRnRXQ2aUsyTG5BNGVUY2Z4ZG9EAAVTY2FsZQCAoJSljR0BDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEQY2xhaW1BbGlhc1Jlc3VsdAIHYWRkcmVzcwphc3NldElkU3RyBAphZGRyZXNzU3RyCQClCAEFB2FkZHJlc3MED2N1cnJlbnRJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAQMc3Rha2VkQW1vdW50CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAQYbGFzdENoZWNrSW50ZXJlc3RJblN0YXRlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QEEWxhc3RDaGVja0ludGVyZXN0AwkAAAIFGGxhc3RDaGVja0ludGVyZXN0SW5TdGF0ZQAAAAAFGGxhc3RDaGVja0ludGVyZXN0SW5TdGF0ZQQGcmV3YXJkCQBrAwkAZQIFD2N1cnJlbnRJbnRlcmVzdAURbGFzdENoZWNrSW50ZXJlc3QFDHN0YWtlZEFtb3VudAUFU2NhbGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFD2N1cnJlbnRJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUKYWRkcmVzc1N0cgIBXwUKYXNzZXRJZFN0cgIIX2NsYWltZWQJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICAV8FCmFzc2V0SWRTdHICCF9jbGFpbWVkBQZyZXdhcmQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUHYWRkcmVzcwUGcmV3YXJkCQDZBAEFCmFzc2V0SWRTdHIFA25pbAELY2xhaW1SZXN1bHQBB2FkZHJlc3MJARBjbGFpbUFsaWFzUmVzdWx0AgUHYWRkcmVzcwUJcGV0ZUlkU3RyBAFpAQVzdGFrZQAEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECmFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBAphc3NldElkU3RyCQDYBAEFBnBldGVJZAQRdG90YWxTdGFrZWRBbW91bnQJAQ10cnlHZXRJbnRlZ2VyAQINZ2xvYmFsX3N0YWtlZAMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUGZm9tb0lkCQACAQIUd3JvbmcgYXNzZXQgYXR0YWNoZWQJAM4IAgkBC2NsYWltUmVzdWx0AQgFAWkGY2FsbGVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1nbG9iYWxfc3Rha2VkCQBkAgURdG90YWxTdGFrZWRBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphZGRyZXNzU3RyAgdfc3Rha2VkCQBkAgkBDXRyeUdldEludGVnZXIBCQCsAgIFCmFkZHJlc3NTdHICB19zdGFrZWQFBmFtb3VudAUDbmlsAWkBB3VuU3Rha2UBBmFtb3VudAQKYWRkcmVzc1N0cgkApQgBCAUBaQZjYWxsZXIEDHN0YWtlZEFtb3VudAkBDXRyeUdldEludGVnZXIBCQCsAgIFCmFkZHJlc3NTdHICB19zdGFrZWQDCQBmAgUGYW1vdW50BQxzdGFrZWRBbW91bnQJAAIBAh95b3UgZG9uJ3QgaGF2ZSB0b2tlbnMgYXZhaWxhYmxlCQDOCAIJAQtjbGFpbVJlc3VsdAEIBQFpBmNhbGxlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphZGRyZXNzU3RyAgdfc3Rha2VkCQBlAgUMc3Rha2VkQW1vdW50BQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQICDWdsb2JhbF9zdGFrZWQJAGUCCQENdHJ5R2V0SW50ZWdlcgECDWdsb2JhbF9zdGFrZWQFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAUGZm9tb0lkBQNuaWwBaQELY2xhaW1SZXdhcmQACQELY2xhaW1SZXN1bHQBCAUBaQZjYWxsZXIBaQELdG9wVXBSZXdhcmQABAhwbXRBc3NldAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAlwbXRBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAZhbW91bnQDCQAAAgUIcG10QXNzZXQFBmZvbW9JZAAAAwkAAAIFCHBtdEFzc2V0BQZwZXRlSWQFCXBtdEFtb3VudAkAAgECGm5vdCBjb3JyZWN0IGFzc2V0IGF0dGFjaGVkAwkAAAIFBmFtb3VudAUGYW1vdW50BA9jdXJyZW50SW50ZXJlc3QJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICEWdsb2JhbF9sYXN0Q2hlY2tfBQlwZXRlSWRTdHICCV9pbnRlcmVzdAQRdG90YWxTdGFrZWRBbW91bnQJAQ10cnlHZXRJbnRlZ2VyAQINZ2xvYmFsX3N0YWtlZAQNaW50ZXJlc3REZWx0YQMJAGYCBRF0b3RhbFN0YWtlZEFtb3VudAAACQBrAwUGYW1vdW50BQVTY2FsZQURdG90YWxTdGFrZWRBbW91bnQAAAMJAQIhPQIFCHBtdEFzc2V0BQZmb21vSWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICB2dsb2JhbF8FCXBldGVJZFN0cgIJX2Vhcm5pbmdzCQBkAgkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIHZ2xvYmFsXwUJcGV0ZUlkU3RyAglfZWFybmluZ3MFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICEWdsb2JhbF9sYXN0Q2hlY2tfBQlwZXRlSWRTdHICCV9pbnRlcmVzdAkAZAIFD2N1cnJlbnRJbnRlcmVzdAUNaW50ZXJlc3REZWx0YQUDbmlsBQZhbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXk3LiC9", "height": 3025379, "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 peteId = base58'7Y96UTbBQ45cjWoHeFj2EhnjdgEt6iK2LnA4eTcfxdoD'
5+
6+let peteIdStr = "7Y96UTbBQ45cjWoHeFj2EhnjdgEt6iK2LnA4eTcfxdoD"
7+
8+let fomoId = base58'7Y96UTbBQ45cjWoHeFj2EhnjdgEt6iK2LnA4eTcfxdoD'
9+
10+let fomoStr = "7Y96UTbBQ45cjWoHeFj2EhnjdgEt6iK2LnA4eTcfxdoD"
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, peteIdStr)
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(peteId)
51+ let totalStakedAmount = tryGetInteger("global_staked")
52+ if ((i.payments[0].assetId != fomoId))
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, fomoId)])
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 == fomoId))
80+ then 0
81+ else if ((pmtAsset == peteId))
82+ then pmtAmount
83+ else throw("not correct asset attached")
84+ if ((amount == amount))
85+ then {
86+ let currentInterest = tryGetInteger((("global_lastCheck_" + peteIdStr) + "_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 != fomoId))
92+ then $Tuple2([IntegerEntry((("global_" + peteIdStr) + "_earnings"), (tryGetInteger((("global_" + peteIdStr) + "_earnings")) + amount)), IntegerEntry((("global_lastCheck_" + peteIdStr) + "_interest"), (currentInterest + interestDelta))], amount)
93+ else nil
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 
12.71 ms