2022.09.23 17:17 [3307312] smart account 3PDs3ewniAQCp4LfXPMEqb2xRECgtZu2AR5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HtEYb2NGweXguKZPX92e1UwzpnVvt2oKFD4GK9CXSxs8",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1663942659070,
    "version": 2,
    "chainId": 87,
    "sender": "3PDs3ewniAQCp4LfXPMEqb2xRECgtZu2AR5",
    "senderPublicKey": "D2oFRSwLr9uimTCnnv7K7DUe1Ahtu17JDmRVCXR9kKV6",
    "proofs": [
        "5TBRzEG56wXQBF3RY7FXmKYE5itisXKcr92aMYa3wM7mTD1FRECkuaJbh3ERgD2LCdEmaLvMhNp62pLGp38itec5"
    ],
    "script": "base64:BgIICAISBAoCCAgdAAtrZXlNQWNjUEtleQIJbWFzdGVyX3BrAA1rZXlCYWNrdXBQS2V5AgdiYWNrX3BrAAh3YXJzUEtleQIHd2Fyc19wawEGZ2V0U3RyAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAA5tQWNjUEtleVN0cmluZwkBBmdldFN0cgEFC2tleU1BY2NQS2V5ABBiYWNrdXBQS2V5U3RyaW5nCQEGZ2V0U3RyAQUNa2V5QmFja3VwUEtleQEMZ2V0QmFja3VwS2V5AAMJAAACBRBiYWNrdXBQS2V5U3RyaW5nAgAIBQR0aGlzBWJ5dGVzCQDZBAEFEGJhY2t1cFBLZXlTdHJpbmcACG1BY2NQS2V5CQDZBAEFDm1BY2NQS2V5U3RyaW5nAAhtQWNjQWRkcgkApwgBBQhtQWNjUEtleQAKZmVlUGVyY2VudAkBEUBleHRyTmF0aXZlKDEwNTApAgUIbUFjY0FkZHIJAKwCAgkArAICAgJmXwkApQgBBQR0aGlzAgRfZmVlAA5zdGFraW5nQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCG1BY2NBZGRyCQCsAgIJAKwCAgICZl8JAKUIAQUEdGhpcwIOX3N0YWtlX2FkZHJlc3MJAKwCAgkArAICAgJmXwkApQgBBQR0aGlzAhpfc3Rha2VfYWRkcmVzcyBub3QgZGVmaW5lZAAId0FjY1BLZXkJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCG1BY2NBZGRyBQh3YXJzUEtleQkArAICBQh3YXJzUEtleQIMIG5vdCBkZWZpbmVkAA9rVG90YWxMaXF1aWRpdHkCD3RvdGFsX2xpcXVpZGl0eQAMa0luaXRpYWxpemVkAgtJTklUSUFMSVpFRAATa0xpcXVpZGl0eVRocmVzaG9sZAITTElRVUlESVRZX1RIUkVTSE9MRAATa1RvdGFsRmFybWluZ1Jld2FyZAIUdG90YWxfZmFybWluZ19yZXdhcmQADWtTaGFyZUFzc2V0SWQCDlNIQVJFX0FTU0VUX0lEAA5rSW5jdWJhdG9yRGFwcAIOSU5DVUJBVE9SX0RBUFAADGtCcmVlZGVyRGFwcAIMQlJFRURFUl9EQVBQAAxrRmFybWluZ0RhcHACDEZBUk1JTkdfREFQUAAQa01hcmtldFByb3h5RGFwcAIWTUFSS0VUUExBQ0VfUFJPWFlfREFQUAAMa0F1Y3Rpb25EYXBwAgxBVUNUSU9OX0RBUFAAB2tMb2NrZWQCBkxPQ0tFRAAQa0Nlb0NvbGxlY3RlZEZlZQIRY2VvX2NvbGxlY3RlZF9mZWUAF2tDZW9Db2xsZWN0ZWRGZWVPdmVyYWxsAg9jZW9fZmVlX292ZXJhbGwAEmtMb2NrZWRJbnZlc3RtZW50cwISbG9ja2VkX2ludmVzdG1lbnRzABBrZXlUb3RhbENvbXBvdW5kAg50b3RhbF9jb21wb3VuZAAPa2V5R2xvYmFsU3Rha2VkAg1nbG9iYWxfc3Rha2VkAQdnZXRTdHJBAgFhAWsEByRtYXRjaDAJAJ0IAgUBYQUBawMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAEBaQEQY2FsbFVuc3Rha2VQcm94eQIIZnVuY3Rpb24DaWRzAwMJAQIhPQIFCGZ1bmN0aW9uAgp1bnN0YWtlTkZUCQECIT0CBQhmdW5jdGlvbgIOdW5zdGFrZUphY2twb3QHCQACAQIRQmFkIGZ1bmN0aW9uIG5hbWUDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAiFDYW4gYmUgY2FsbGVkIG9ubHkgYnkgdGhlIGFjY291bnQEEmZhcm1pbmdEYXBwQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBB2dldFN0ckECBQhtQWNjQWRkcgIMRkFSTUlOR19EQVBQCgELdW5zdGFrZUR1Y2sCBWFjY3VtBW5mdElkBAZpbnZSZXMJAPwHBAUSZmFybWluZ0RhcHBBZGRyZXNzBQhmdW5jdGlvbgkAzAgCBQVuZnRJZAUDbmlsBQNuaWwDCQAAAgUGaW52UmVzBQZpbnZSZXMEBnJld2FyZAQHJG1hdGNoMAUGaW52UmVzAwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAhZFcnJvciBkdXJpbmcgdW5zdGFraW5nCQBkAgUFYWNjdW0FBnJld2FyZAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQGbmZ0SWRzCQC1CQIFA2lkcwIBOwQKZm9sZFJlc3VsdAoAAiRsBQZuZnRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC3Vuc3Rha2VEdWNrAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBA1jbGFpbWVkUmV3YXJkBAckbWF0Y2gwBQpmb2xkUmVzdWx0AwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAgJfNgkAzAgCCQEMSW50ZWdlckVudHJ5AgIFREVCVUcFDWNsYWltZWRSZXdhcmQFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFCG1BY2NQS2V5O0zG0Q==",
    "height": 3307312,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CJt3VxvYoMTRdMCgE3KqG1wTy8nKtwBAeMFo3R3XhM1h
Next: none

Diff: 
Old
New
Differences
86
86
 
            func unstakeDuck (accum,nftId) =             {
87
87
 
                let invRes = invoke(farmingDappAddress, function, [nftId], nil)
88
88
 
                if ((invRes == invRes))
89
-
                    then nil
89
+
                    then {
90
+
                        let reward =                         match invRes {
91
+
                            case int: Int => 
92
+
                                int
93
+
                            case _ => 
94
+
                                throw("Error during unstaking")
95
+
                        }
96
+
                        (accum + reward)
97
+
                        }
90
98
 
                    else throw("Strict value is not equal to itself.")
91
99
 
                }
92
100
 
105
113
 
106
114
 
                $f0_2($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)
107
115
 
                }
108
-
            nil
116
+
            let claimedReward =             match foldResult {
117
+
                case int: Int => 
118
+
                    int
119
+
                case _ => 
120
+
                    throw("_6")
121
+
            }
122
+
[IntegerEntry("DEBUG", claimedReward)]
109
123
 
            }
110
124
 
111
125
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let keyMAccPKey = "master_pk"
5
5
 
6
6
 
let keyBackupPKey = "back_pk"
7
7
 
8
8
 
let warsPKey = "wars_pk"
9
9
 
10
10
 
func getStr (key) = match getString(this, key) {
11
11
 
    case b: String => 
12
12
 
        b
13
13
 
    case _ => 
14
14
 
        ""
15
15
 
}
16
16
 
17
17
 
18
18
 
let mAccPKeyString = getStr(keyMAccPKey)
19
19
 
20
20
 
let backupPKeyString = getStr(keyBackupPKey)
21
21
 
22
22
 
func getBackupKey () = if ((backupPKeyString == ""))
23
23
 
    then this.bytes
24
24
 
    else fromBase58String(backupPKeyString)
25
25
 
26
26
 
27
27
 
let mAccPKey = fromBase58String(mAccPKeyString)
28
28
 
29
29
 
let mAccAddr = addressFromPublicKey(mAccPKey)
30
30
 
31
31
 
let feePercent = getIntegerValue(mAccAddr, (("f_" + toString(this)) + "_fee"))
32
32
 
33
33
 
let stakingAddress = addressFromStringValue(valueOrErrorMessage(getString(mAccAddr, (("f_" + toString(this)) + "_stake_address")), (("f_" + toString(this)) + "_stake_address not defined")))
34
34
 
35
35
 
let wAccPKey = fromBase58String(valueOrErrorMessage(getString(mAccAddr, warsPKey), (warsPKey + " not defined")))
36
36
 
37
37
 
let kTotalLiquidity = "total_liquidity"
38
38
 
39
39
 
let kInitialized = "INITIALIZED"
40
40
 
41
41
 
let kLiquidityThreshold = "LIQUIDITY_THRESHOLD"
42
42
 
43
43
 
let kTotalFarmingReward = "total_farming_reward"
44
44
 
45
45
 
let kShareAssetId = "SHARE_ASSET_ID"
46
46
 
47
47
 
let kIncubatorDapp = "INCUBATOR_DAPP"
48
48
 
49
49
 
let kBreederDapp = "BREEDER_DAPP"
50
50
 
51
51
 
let kFarmingDapp = "FARMING_DAPP"
52
52
 
53
53
 
let kMarketProxyDapp = "MARKETPLACE_PROXY_DAPP"
54
54
 
55
55
 
let kAuctionDapp = "AUCTION_DAPP"
56
56
 
57
57
 
let kLocked = "LOCKED"
58
58
 
59
59
 
let kCeoCollectedFee = "ceo_collected_fee"
60
60
 
61
61
 
let kCeoCollectedFeeOverall = "ceo_fee_overall"
62
62
 
63
63
 
let kLockedInvestments = "locked_investments"
64
64
 
65
65
 
let keyTotalCompound = "total_compound"
66
66
 
67
67
 
let keyGlobalStaked = "global_staked"
68
68
 
69
69
 
func getStrA (a,k) = match getString(a, k) {
70
70
 
    case b: String => 
71
71
 
        b
72
72
 
    case _ => 
73
73
 
        ""
74
74
 
}
75
75
 
76
76
 
77
77
 
@Callable(i)
78
78
 
func callUnstakeProxy (function,ids) = if (if ((function != "unstakeNFT"))
79
79
 
    then (function != "unstakeJackpot")
80
80
 
    else false)
81
81
 
    then throw("Bad function name")
82
82
 
    else if ((i.caller != this))
83
83
 
        then throw("Can be called only by the account")
84
84
 
        else {
85
85
 
            let farmingDappAddress = addressFromStringValue(getStrA(mAccAddr, "FARMING_DAPP"))
86
86
 
            func unstakeDuck (accum,nftId) =             {
87
87
 
                let invRes = invoke(farmingDappAddress, function, [nftId], nil)
88
88
 
                if ((invRes == invRes))
89
-
                    then nil
89
+
                    then {
90
+
                        let reward =                         match invRes {
91
+
                            case int: Int => 
92
+
                                int
93
+
                            case _ => 
94
+
                                throw("Error during unstaking")
95
+
                        }
96
+
                        (accum + reward)
97
+
                        }
90
98
 
                    else throw("Strict value is not equal to itself.")
91
99
 
                }
92
100
 
93
101
 
            let nftIds = split(ids, ";")
94
102
 
            let foldResult = {
95
103
 
                let $l = nftIds
96
104
 
                let $s = size($l)
97
105
 
                let $acc0 = 0
98
106
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
99
107
 
                    then $a
100
108
 
                    else unstakeDuck($a, $l[$i])
101
109
 
102
110
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
103
111
 
                    then $a
104
112
 
                    else throw("List size exceeds 10")
105
113
 
106
114
 
                $f0_2($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)
107
115
 
                }
108
-
            nil
116
+
            let claimedReward =             match foldResult {
117
+
                case int: Int => 
118
+
                    int
119
+
                case _ => 
120
+
                    throw("_6")
121
+
            }
122
+
[IntegerEntry("DEBUG", claimedReward)]
109
123
 
            }
110
124
 
111
125
 
112
126
 
@Verifier(tx)
113
127
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], mAccPKey)
114
128
 

github/deemru/w8io/786bc32 
44.86 ms ◑