tx · 6nxtdQchehT4fEjJLP4yLT9i4ahXB2sqXQKjKbSGoWQX

3N8yxw7oNyi2XqSPcsshR4F27Epq9u2uuEf:  -0.01000000 Waves

2023.09.25 15:38 [2770948] smart account 3N8yxw7oNyi2XqSPcsshR4F27Epq9u2uuEf > SELF 0.00000000 Waves

{ "type": 13, "id": "6nxtdQchehT4fEjJLP4yLT9i4ahXB2sqXQKjKbSGoWQX", "fee": 1000000, "feeAssetId": null, "timestamp": 1695645555764, "version": 2, "chainId": 84, "sender": "3N8yxw7oNyi2XqSPcsshR4F27Epq9u2uuEf", "senderPublicKey": "9mPGJ2QMz7yrJpQgNijB5pwFSNCkJHEJ9p3XFyoGsrmY", "proofs": [ "d8E3RA4JJV8t9CAsgF2Q1ENzC3f4oBpn9ReJj6gujTSSezF3t3rjiJQ4Z86LUF2UQujDB18VZPS355mcfPRCHSh" ], "script": "base64:BgINCAISABIDCgEBEgASAAkABnVzZG5JZAEgbySjyqsw3FIpmOgsYVruWn8jTcItdbvpnapU4NLQB8EACXVzZG5JZFN0cgIsOFVyZkRWZDVHcmVlVXdtN3VQazdlWXoxZU12Mzc2a3pSNTJDNnNBTlBrd1MACHB1enpsZUlkASBhIEdqteU0lNOM+a3jecT6cJU92ajDMxppPdJKJ6I3YAALcHV6emxlSWRTdHICLDdZOTZVVGJCUTQ1Y2pXb0hlRmoyRWhuamRnRXQ2aUsyTG5BNGVUY2Z4ZG9EAAVTY2FsZQCAoJSljR0BDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEQY2xhaW1BbGlhc1Jlc3VsdAIHYWRkcmVzcwphc3NldElkU3RyBAphZGRyZXNzU3RyCQClCAEFB2FkZHJlc3MED2N1cnJlbnRJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCmFzc2V0SWRTdHICCV9pbnRlcmVzdAQMc3Rha2VkQW1vdW50CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAQYbGFzdENoZWNrSW50ZXJlc3RJblN0YXRlCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QEEWxhc3RDaGVja0ludGVyZXN0AwkAAAIFGGxhc3RDaGVja0ludGVyZXN0SW5TdGF0ZQAAAAAFGGxhc3RDaGVja0ludGVyZXN0SW5TdGF0ZQQGcmV3YXJkCQBrAwkAZQIFD2N1cnJlbnRJbnRlcmVzdAURbGFzdENoZWNrSW50ZXJlc3QFDHN0YWtlZEFtb3VudAUFU2NhbGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICC19sYXN0Q2hlY2tfBQphc3NldElkU3RyAglfaW50ZXJlc3QFD2N1cnJlbnRJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUKYWRkcmVzc1N0cgIBXwUKYXNzZXRJZFN0cgIIX2NsYWltZWQJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICCQCsAgIFCmFkZHJlc3NTdHICAV8FCmFzc2V0SWRTdHICCF9jbGFpbWVkBQZyZXdhcmQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUHYWRkcmVzcwUGcmV3YXJkCQDZBAEFCmFzc2V0SWRTdHIFA25pbAELY2xhaW1SZXN1bHQBB2FkZHJlc3MJAM4IAgkBEGNsYWltQWxpYXNSZXN1bHQCBQdhZGRyZXNzBQl1c2RuSWRTdHIJARBjbGFpbUFsaWFzUmVzdWx0AgUHYWRkcmVzcwULcHV6emxlSWRTdHIEAWkBBXN0YWtlAAQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQKYWRkcmVzc1N0cgkApQgBCAUBaQZjYWxsZXIECmFzc2V0SWRTdHIJANgEAQUGdXNkbklkBBF0b3RhbFN0YWtlZEFtb3VudAkBDXRyeUdldEludGVnZXIBAg1nbG9iYWxfc3Rha2VkAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQhwdXp6bGVJZAkAAgECFHdyb25nIGFzc2V0IGF0dGFjaGVkCQDOCAIJAQtjbGFpbVJlc3VsdAEIBQFpBmNhbGxlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFEXRvdGFsU3Rha2VkQW1vdW50BQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgdfc3Rha2VkBQZhbW91bnQFA25pbAFpAQd1blN0YWtlAQZhbW91bnQECmFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBAxzdGFrZWRBbW91bnQJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphZGRyZXNzU3RyAgdfc3Rha2VkAwkAZgIFBmFtb3VudAUMc3Rha2VkQW1vdW50CQACAQIfeW91IGRvbid0IGhhdmUgdG9rZW5zIGF2YWlsYWJsZQkAzggCCQELY2xhaW1SZXN1bHQBCAUBaQZjYWxsZXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYWRkcmVzc1N0cgIHX3N0YWtlZAkAZQIFDHN0YWtlZEFtb3VudAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1nbG9iYWxfc3Rha2VkCQBlAgkBDXRyeUdldEludGVnZXIBAg1nbG9iYWxfc3Rha2VkBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQZhbW91bnQFCHB1enpsZUlkBQNuaWwBaQELY2xhaW1SZXdhcmQACQELY2xhaW1SZXN1bHQBCAUBaQZjYWxsZXIBaQELdG9wVXBSZXdhcmQABAhwbXRBc3NldAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAlwbXRBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAZhbW91bnQDCQAAAgUIcG10QXNzZXQFCHB1enpsZUlkAAADCQAAAgUIcG10QXNzZXQFBnVzZG5JZAUJcG10QW1vdW50CQACAQIabm90IGNvcnJlY3QgYXNzZXQgYXR0YWNoZWQDCQAAAgUGYW1vdW50BQZhbW91bnQED2N1cnJlbnRJbnRlcmVzdAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIRZ2xvYmFsX2xhc3RDaGVja18FCXVzZG5JZFN0cgIJX2ludGVyZXN0BBF0b3RhbFN0YWtlZEFtb3VudAkBDXRyeUdldEludGVnZXIBAg1nbG9iYWxfc3Rha2VkBA1pbnRlcmVzdERlbHRhAwkAZgIFEXRvdGFsU3Rha2VkQW1vdW50AAAJAGsDBQZhbW91bnQFBVNjYWxlBRF0b3RhbFN0YWtlZEFtb3VudAAAAwkBAiE9AgUIcG10QXNzZXQFCHB1enpsZUlkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgdnbG9iYWxfBQl1c2RuSWRTdHICCV9lYXJuaW5ncwkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICB2dsb2JhbF8FCXVzZG5JZFN0cgIJX2Vhcm5pbmdzBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAhFnbG9iYWxfbGFzdENoZWNrXwUJdXNkbklkU3RyAglfaW50ZXJlc3QJAGQCBQ9jdXJyZW50SW50ZXJlc3QFDWludGVyZXN0RGVsdGEFA25pbAUGYW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5zPf1VQ==", "height": 2770948, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: 6hYaqk9NjopMq9CfeQezn9z9kmHc4rxqGYN4tA2xTtqU Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let usdnId = base58'8UrfDVd5GreeUwm7uPk7eYz1eMv376kzR52C6sANPkwS'
5+
6+let usdnIdStr = "8UrfDVd5GreeUwm7uPk7eYz1eMv376kzR52C6sANPkwS"
7+
8+let puzzleId = base58'7Y96UTbBQ45cjWoHeFj2EhnjdgEt6iK2LnA4eTcfxdoD'
9+
10+let puzzleIdStr = "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, 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 == puzzleId))
80+ then 0
81+ else if ((pmtAsset == usdnId))
82+ then pmtAmount
83+ else throw("not correct asset attached")
84+ if ((amount == amount))
85+ then {
86+ let currentInterest = tryGetInteger((("global_lastCheck_" + usdnIdStr) + "_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_" + usdnIdStr) + "_earnings"), (tryGetInteger((("global_" + usdnIdStr) + "_earnings")) + amount)), IntegerEntry((("global_lastCheck_" + usdnIdStr) + "_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/169f3d6 
18.01 ms