tx · 6eC7XpinLjD7ZWisd4M5TyHy41mSk9PgvHEUDHHc5UMq

3MsU428UzSefm85q7jvBsRV66Du7E72xEkL:  -0.01000000 Waves

2022.06.10 10:18 [2089982] smart account 3MsU428UzSefm85q7jvBsRV66Du7E72xEkL > SELF 0.00000000 Waves

{ "type": 13, "id": "6eC7XpinLjD7ZWisd4M5TyHy41mSk9PgvHEUDHHc5UMq", "fee": 1000000, "feeAssetId": null, "timestamp": 1654845447444, "version": 2, "chainId": 84, "sender": "3MsU428UzSefm85q7jvBsRV66Du7E72xEkL", "senderPublicKey": "58FFoU7LCj1DKboVntQXuE3KQDpf92NouXncN5b4vY8U", "proofs": [ "uUvgCLpCEegbnR9eXKbq5p7kuwpPENVmvFuXvjxFvDZYfVATQchLxZiTZkjcpcNeWzTc7Yg9R9BXMXDLHJs2tur" ], "script": "base64:AAIFAAAAAAAAAAsIAhIAEgMKAQESAAAAAAgAAAAACkRJU0NMQUlNRVICAAAARXRlc3RpbmcgUFVaWkxFIHN0YWtpbmcgc21hcnQgY29udHJhY3Qgd2l0aCByZXdhcmRzIGluIG11bHRpcGxlIGFzc2V0cwAAAAAFc2NhbGUAAAAAAAX14QAAAAAACHB1enpsZUlkAQAAACAtNxOB0yQ3XZ/hb3bT0Q+T7yws9N2JrVxKVuh8yQFyGwAAAAAMZWFybmVkQXNzZXRzCQAETAAAAAIBAAAAIK2dSBaFkXln78NKeoaZ0d1Q6QVJPOT+QERHjOGDxML0BQAAAANuaWwAAAAAEmVhcm5lZEFzc2V0c0Ftb3VudAkAAZAAAAABBQAAAAxlYXJuZWRBc3NldHMBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAdY2FsY3VsYXRlQ3VycmVudEFzc2V0SW50ZXJlc3QAAAACAAAAB2Fzc2V0SWQAAAAKYXNzZXRJZFN0cgQAAAALdG90YWxTdGFrZWQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAATZ2xvYmFsX3B1enpsZVN0YWtlZAQAAAAVdG9rZW5CYWxhbmNlTGFzdENoZWNrCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABFnbG9iYWxfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2Vhcm5pbmdzBAAAABRjdXJyZW50VG9rZW5FYXJuaW5ncwkAAZYAAAABCQAETAAAAAIFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawkABEwAAAACCQAD8AAAAAIFAAAABHRoaXMFAAAAB2Fzc2V0SWQFAAAAA25pbAQAAAALbmV3RWFybmluZ3MJAABlAAAAAgUAAAAUY3VycmVudFRva2VuRWFybmluZ3MFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawQAAAALbmV3SW50ZXJlc3QDCQAAAAAAAAIFAAAAC3RvdGFsU3Rha2VkAAAAAAAAAAAAAAAAAAAAAAAACQAAawAAAAMFAAAAC25ld0Vhcm5pbmdzBQAAAAVzY2FsZQUAAAALdG90YWxTdGFrZWQEAAAAEWxhc3RDaGVja0ludGVyZXN0CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABFnbG9iYWxfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0CQAAZAAAAAIFAAAAEWxhc3RDaGVja0ludGVyZXN0BQAAAAtuZXdJbnRlcmVzdAEAAAALY2xhaW1SZXN1bHQAAAABAAAAB2FkZHJlc3MEAAAACmFkZHJlc3NTdHIJAAQlAAAAAQUAAAAHYWRkcmVzcwQAAAAMcHV6emxlQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAANX3B1enpsZVN0YWtlZAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAB2Fzc2V0SWQEAAAACmFzc2V0SWRTdHIJAAJYAAAAAQUAAAAHYXNzZXRJZAQAAAAUY3VycmVudFRva2VuSW50ZXJlc3QJAQAAAB1jYWxjdWxhdGVDdXJyZW50QXNzZXRJbnRlcmVzdAAAAAIFAAAAB2Fzc2V0SWQFAAAACmFzc2V0SWRTdHIEAAAAFGN1cnJlbnRUb2tlbkVhcm5pbmdzCQABlgAAAAEJAARMAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAARZ2xvYmFsX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9lYXJuaW5ncwkABEwAAAACCQAD8AAAAAIFAAAABHRoaXMFAAAAB2Fzc2V0SWQFAAAAA25pbAQAAAAMcmV3YXJkQW1vdW50CQAAawAAAAMFAAAADHB1enpsZUFtb3VudAkAAGUAAAACBQAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAtfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0BQAAAAVzY2FsZQMJAAAAAAAAAgUAAAAMcmV3YXJkQW1vdW50AAAAAAAAAAAABQAAAAVhY2N1bQkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfZWFybmluZ3MJAABlAAAAAgUAAAAUY3VycmVudFRva2VuRWFybmluZ3MFAAAADHJld2FyZEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfaW50ZXJlc3QFAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAtfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0BQAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAdhZGRyZXNzBQAAAAxyZXdhcmRBbW91bnQFAAAAB2Fzc2V0SWQFAAAAA25pbAoAAAAAAiRsBQAAAAxlYXJuZWRBc3NldHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDE3CQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgAAAAAAAAAACwAAAAAAAAAADAAAAAAAAAAADQAAAAAAAAAADgAAAAAAAAAADwAAAAAAAAAAEAAAAAAAAAAAEQAAAAMAAAABaQEAAAAFc3Rha2UAAAAABAAAAAphZGRyZXNzU3RyCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAgkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBQAAAAhwdXp6bGVJZAkAAAIAAAABAgAAABR3cm9uZyBhc3NldCBhdHRhY2hlZAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAB2Fzc2V0SWQEAAAACmFzc2V0SWRTdHIJAAJYAAAAAQUAAAAHYXNzZXRJZAQAAAAUY3VycmVudFRva2VuSW50ZXJlc3QJAQAAAB1jYWxjdWxhdGVDdXJyZW50QXNzZXRJbnRlcmVzdAAAAAIFAAAAB2Fzc2V0SWQFAAAACmFzc2V0SWRTdHIJAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAABFnbG9iYWxfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2Vhcm5pbmdzCQAD8AAAAAIFAAAABHRoaXMFAAAAB2Fzc2V0SWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAABFnbG9iYWxfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0BQAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAALX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9pbnRlcmVzdAUAAAAUY3VycmVudFRva2VuSW50ZXJlc3QFAAAAA25pbAQAAAACbGkKAAAAAAIkbAUAAAAMZWFybmVkQXNzZXRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxNwkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoAAAAAAAAAAAsAAAAAAAAAAAwAAAAAAAAAAA0AAAAAAAAAAA4AAAAAAAAAAA8AAAAAAAAAABAAAAAAAAAAABEJAAROAAAAAgUAAAACbGkJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAANX3B1enpsZVN0YWtlZAkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAANX3B1enpsZVN0YWtlZAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAE2dsb2JhbF9wdXp6bGVTdGFrZWQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABNnbG9iYWxfcHV6emxlU3Rha2VkCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsAAAAAWkBAAAAB3Vuc3Rha2UAAAABAAAADHB1enpsZUFtb3VudAQAAAAKYWRkcmVzc1N0cgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAAD3B1enpsZUF2YWlsYWJsZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADV9wdXp6bGVTdGFrZWQDCQAAZgAAAAIFAAAADHB1enpsZUFtb3VudAUAAAAPcHV6emxlQXZhaWxhYmxlCQAAAgAAAAECAAAAH3lvdSBkb24ndCBoYXZlIFBVWlpMRSBhdmFpbGFibGUJAAROAAAAAgkBAAAAC2NsYWltUmVzdWx0AAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADV9wdXp6bGVTdGFrZWQJAABlAAAAAgUAAAAPcHV6emxlQXZhaWxhYmxlBQAAAAxwdXp6bGVBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAE2dsb2JhbF9wdXp6bGVTdGFrZWQJAABlAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABNnbG9iYWxfcHV6emxlU3Rha2VkBQAAAAxwdXp6bGVBbW91bnQFAAAAA25pbAAAAAFpAQAAAAVjbGFpbQAAAAAJAQAAAAtjbGFpbVJlc3VsdAAAAAEIBQAAAAFpAAAABmNhbGxlcgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V54dH/UQ==", "height": 2089982, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 5dtNnjNdnoHmk49iqqVGkQRRGL9J2FenuXy7GKyLfkxN Next: HX2qcsRGvSQgnaxXsFFtksiF2352Mj4QzarSYFrTa4XA Diff:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let ASSET = base58'43W4FcqA1rEpSmUGHoGiXvpSLfhadws9LS5j3SJsKxxS'
4+let DISCLAIMER = "testing PUZZLE staking smart contract with rewards in multiple assets"
55
6-let STAKE_ASSET = base58'CgidgEMbCKXXErgJXVyZCFRaK8SBNA73Jg8mNXALtVKh'
6+let scale = 100000000
77
8-let REWARD_AMOUNT = 100000000000
8+let puzzleId = base58'43W4FcqA1rEpSmUGHoGiXvpSLfhadws9LS5j3SJsKxxS'
9+
10+let earnedAssets = [base58'CgidgEMbCKXXErgJXVyZCFRaK8SBNA73Jg8mNXALtVKh']
11+
12+let earnedAssetsAmount = size(earnedAssets)
13+
14+func tryGetInteger (key) = match getInteger(this, key) {
15+ case b: Int =>
16+ b
17+ case _ =>
18+ 0
19+}
20+
21+
22+func calculateCurrentAssetInterest (assetId,assetIdStr) = {
23+ let totalStaked = tryGetInteger("global_puzzleStaked")
24+ let tokenBalanceLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
25+ let currentTokenEarnings = max([tokenBalanceLastCheck, assetBalance(this, assetId)])
26+ let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
27+ let newInterest = if ((totalStaked == 0))
28+ then 0
29+ else fraction(newEarnings, scale, totalStaked)
30+ let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
31+ (lastCheckInterest + newInterest)
32+ }
33+
34+
35+func claimResult (address) = {
36+ let addressStr = toString(address)
37+ let puzzleAmount = tryGetInteger((addressStr + "_puzzleStaked"))
38+ func handler (accum,assetId) = {
39+ let assetIdStr = toBase58String(assetId)
40+ let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr)
41+ let currentTokenEarnings = max([tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings")), assetBalance(this, assetId)])
42+ let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), scale)
43+ if ((rewardAmount == 0))
44+ then accum
45+ else (accum ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), (currentTokenEarnings - rewardAmount)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest), ScriptTransfer(address, rewardAmount, assetId)])
46+ }
47+
48+ let $l = earnedAssets
49+ let $s = size($l)
50+ let $acc0 = nil
51+ func $f0_1 ($a,$i) = if (($i >= $s))
52+ then $a
53+ else handler($a, $l[$i])
54+
55+ func $f0_2 ($a,$i) = if (($i >= $s))
56+ then $a
57+ else throw("List size exceeds 17")
58+
59+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17)
60+ }
61+
962
1063 @Callable(i)
1164 func stake () = {
12- let $t0297372 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
13- let pmtAmount = $t0297372._1
14- let pmtAssetId = $t0297372._2
15- if (if (if ((size(i.payments) == 0))
16- then (pmtAssetId != STAKE_ASSET)
17- else false)
18- then (0 >= pmtAmount)
19- else false)
20- then throw("send token to stake")
65+ let addressStr = toString(i.caller)
66+ let pmt = i.payments[0]
67+ if ((value(pmt.assetId) != puzzleId))
68+ then throw("wrong asset attached")
2169 else {
22- let currentKey = toBase58String(i.caller.bytes)
23- let getStakedAmount = valueOrElse(getInteger(this, (currentKey + "_staked")), 0)
24- let totalAmount = valueOrElse(getInteger(this, "total"), 0)
25- let totalStaked = (getStakedAmount + pmtAmount)
26-[IntegerEntry((((currentKey + "_") + toString(height)) + "_staked"), totalStaked), IntegerEntry("total", (totalAmount + totalStaked))]
70+ func handler (accum,assetId) = {
71+ let assetIdStr = toBase58String(assetId)
72+ let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr)
73+ (accum ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), assetBalance(this, assetId)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest)])
74+ }
75+
76+ let li = {
77+ let $l = earnedAssets
78+ let $s = size($l)
79+ let $acc0 = nil
80+ func $f0_1 ($a,$i) = if (($i >= $s))
81+ then $a
82+ else handler($a, $l[$i])
83+
84+ func $f0_2 ($a,$i) = if (($i >= $s))
85+ then $a
86+ else throw("List size exceeds 17")
87+
88+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17)
89+ }
90+ (li ++ [IntegerEntry((addressStr + "_puzzleStaked"), (tryGetInteger((addressStr + "_puzzleStaked")) + pmt.amount)), IntegerEntry("global_puzzleStaked", (tryGetInteger("global_puzzleStaked") + pmt.amount))])
2791 }
2892 }
2993
3094
3195
3296 @Callable(i)
33-func withdraw () = throw("test")
97+func unstake (puzzleAmount) = {
98+ let addressStr = toString(i.caller)
99+ let puzzleAvailable = tryGetInteger((addressStr + "_puzzleStaked"))
100+ if ((puzzleAmount > puzzleAvailable))
101+ then throw("you don't have PUZZLE available")
102+ else (claimResult(i.caller) ++ [IntegerEntry((addressStr + "_puzzleStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_puzzleStaked", (tryGetInteger("global_puzzleStaked") - puzzleAmount))])
103+ }
34104
35105
36106
37107 @Callable(i)
38-func claimReward () = throw("test")
39-
40-
41-
42-@Callable(i)
43-func del (key) = [DeleteEntry(key)]
108+func claim () = claimResult(i.caller)
44109
45110
46111 @Verifier(tx)
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let ASSET = base58'43W4FcqA1rEpSmUGHoGiXvpSLfhadws9LS5j3SJsKxxS'
4+let DISCLAIMER = "testing PUZZLE staking smart contract with rewards in multiple assets"
55
6-let STAKE_ASSET = base58'CgidgEMbCKXXErgJXVyZCFRaK8SBNA73Jg8mNXALtVKh'
6+let scale = 100000000
77
8-let REWARD_AMOUNT = 100000000000
8+let puzzleId = base58'43W4FcqA1rEpSmUGHoGiXvpSLfhadws9LS5j3SJsKxxS'
9+
10+let earnedAssets = [base58'CgidgEMbCKXXErgJXVyZCFRaK8SBNA73Jg8mNXALtVKh']
11+
12+let earnedAssetsAmount = size(earnedAssets)
13+
14+func tryGetInteger (key) = match getInteger(this, key) {
15+ case b: Int =>
16+ b
17+ case _ =>
18+ 0
19+}
20+
21+
22+func calculateCurrentAssetInterest (assetId,assetIdStr) = {
23+ let totalStaked = tryGetInteger("global_puzzleStaked")
24+ let tokenBalanceLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
25+ let currentTokenEarnings = max([tokenBalanceLastCheck, assetBalance(this, assetId)])
26+ let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
27+ let newInterest = if ((totalStaked == 0))
28+ then 0
29+ else fraction(newEarnings, scale, totalStaked)
30+ let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
31+ (lastCheckInterest + newInterest)
32+ }
33+
34+
35+func claimResult (address) = {
36+ let addressStr = toString(address)
37+ let puzzleAmount = tryGetInteger((addressStr + "_puzzleStaked"))
38+ func handler (accum,assetId) = {
39+ let assetIdStr = toBase58String(assetId)
40+ let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr)
41+ let currentTokenEarnings = max([tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings")), assetBalance(this, assetId)])
42+ let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), scale)
43+ if ((rewardAmount == 0))
44+ then accum
45+ else (accum ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), (currentTokenEarnings - rewardAmount)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest), ScriptTransfer(address, rewardAmount, assetId)])
46+ }
47+
48+ let $l = earnedAssets
49+ let $s = size($l)
50+ let $acc0 = nil
51+ func $f0_1 ($a,$i) = if (($i >= $s))
52+ then $a
53+ else handler($a, $l[$i])
54+
55+ func $f0_2 ($a,$i) = if (($i >= $s))
56+ then $a
57+ else throw("List size exceeds 17")
58+
59+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17)
60+ }
61+
962
1063 @Callable(i)
1164 func stake () = {
12- let $t0297372 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
13- let pmtAmount = $t0297372._1
14- let pmtAssetId = $t0297372._2
15- if (if (if ((size(i.payments) == 0))
16- then (pmtAssetId != STAKE_ASSET)
17- else false)
18- then (0 >= pmtAmount)
19- else false)
20- then throw("send token to stake")
65+ let addressStr = toString(i.caller)
66+ let pmt = i.payments[0]
67+ if ((value(pmt.assetId) != puzzleId))
68+ then throw("wrong asset attached")
2169 else {
22- let currentKey = toBase58String(i.caller.bytes)
23- let getStakedAmount = valueOrElse(getInteger(this, (currentKey + "_staked")), 0)
24- let totalAmount = valueOrElse(getInteger(this, "total"), 0)
25- let totalStaked = (getStakedAmount + pmtAmount)
26-[IntegerEntry((((currentKey + "_") + toString(height)) + "_staked"), totalStaked), IntegerEntry("total", (totalAmount + totalStaked))]
70+ func handler (accum,assetId) = {
71+ let assetIdStr = toBase58String(assetId)
72+ let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr)
73+ (accum ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), assetBalance(this, assetId)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest)])
74+ }
75+
76+ let li = {
77+ let $l = earnedAssets
78+ let $s = size($l)
79+ let $acc0 = nil
80+ func $f0_1 ($a,$i) = if (($i >= $s))
81+ then $a
82+ else handler($a, $l[$i])
83+
84+ func $f0_2 ($a,$i) = if (($i >= $s))
85+ then $a
86+ else throw("List size exceeds 17")
87+
88+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17)
89+ }
90+ (li ++ [IntegerEntry((addressStr + "_puzzleStaked"), (tryGetInteger((addressStr + "_puzzleStaked")) + pmt.amount)), IntegerEntry("global_puzzleStaked", (tryGetInteger("global_puzzleStaked") + pmt.amount))])
2791 }
2892 }
2993
3094
3195
3296 @Callable(i)
33-func withdraw () = throw("test")
97+func unstake (puzzleAmount) = {
98+ let addressStr = toString(i.caller)
99+ let puzzleAvailable = tryGetInteger((addressStr + "_puzzleStaked"))
100+ if ((puzzleAmount > puzzleAvailable))
101+ then throw("you don't have PUZZLE available")
102+ else (claimResult(i.caller) ++ [IntegerEntry((addressStr + "_puzzleStaked"), (puzzleAvailable - puzzleAmount)), IntegerEntry("global_puzzleStaked", (tryGetInteger("global_puzzleStaked") - puzzleAmount))])
103+ }
34104
35105
36106
37107 @Callable(i)
38-func claimReward () = throw("test")
39-
40-
41-
42-@Callable(i)
43-func del (key) = [DeleteEntry(key)]
108+func claim () = claimResult(i.caller)
44109
45110
46111 @Verifier(tx)
47112 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
48113

github/deemru/w8io/873ac7e 
27.25 ms