tx · nFQDaWhtovzdNVeEfUQtJAJvpPvGWpYQqV3jrxHPYpU

3MzQMaPKMso833WMyawZkLLU9aiTBodj3EJ:  -0.05000000 Waves

2023.03.29 14:40 [2511181] smart account 3MzQMaPKMso833WMyawZkLLU9aiTBodj3EJ > SELF 0.00000000 Waves

{ "type": 13, "id": "nFQDaWhtovzdNVeEfUQtJAJvpPvGWpYQqV3jrxHPYpU", "fee": 5000000, "feeAssetId": null, "timestamp": 1680090019088, "version": 2, "chainId": 84, "sender": "3MzQMaPKMso833WMyawZkLLU9aiTBodj3EJ", "senderPublicKey": "8jQBuu4aTpy9qeV8UyrDijd71FH5NTDGjGUAxH2PtD5g", "proofs": [ "51effZxS4J6yWdD83n5GMq3osPJUdyjiU8aZuTWoeuA2NjuJHvJYGowACGZLN3WZq23jkZjjSQwq6X5zNNjtXiZi" ], "script": "base64:BgIICAISBAoCCAgJAANTRVACAl9fARVrZXlTV2F2ZXNQcm94eUFkZHJlc3MAAhYlc19fc1dhdmVzUHJveHlBZGRyZXNzARBrZXlTV2F2ZXNBc3NldElkAAIRJXNfX3NXYXZlc0Fzc2V0SWQBF2tleVN0YWtpbmdQcm9maXRBZGRyZXNzAAIYJXNfX3N0YWtpbmdQcm9maXRBZGRyZXNzAQ5rZXlMZWFzZWRSYXRpbwILcG9vbEFkZHJlc3MHYXNzZXRJZAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgtsZWFzZWRSYXRpbwkAzAgCBQtwb29sQWRkcmVzcwkAzAgCBQdhc3NldElkBQNuaWwFA1NFUAEVa2V5TGVhc2VkUmF0aW9EZWZhdWx0AQdhc3NldElkCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgtsZWFzZWRSYXRpbwkAzAgCBQdhc3NldElkBQNuaWwFA1NFUAEXa2V5TGVhc2VkUmF0aW9Ub2xlcmFuY2UCC3Bvb2xBZGRyZXNzB2Fzc2V0SWQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIUbGVhc2VkUmF0aW9Ub2xlcmFuY2UJAMwIAgULcG9vbEFkZHJlc3MJAMwIAgUHYXNzZXRJZAUDbmlsBQNTRVABDWtleU1pbkJhbGFuY2UCC3Bvb2xBZGRyZXNzB2Fzc2V0SWQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIKbWluQmFsYW5jZQkAzAgCBQtwb29sQWRkcmVzcwkAzAgCBQdhc3NldElkBQNuaWwFA1NFUAEUa2V5TWluQmFsYW5jZURlZmF1bHQBB2Fzc2V0SWQJALkJAgkAzAgCAgQlcyVzCQDMCAICEW1pbkJhbGFuY2VEZWZhdWx0CQDMCAIFB2Fzc2V0SWQFA25pbAUDU0VQAQFpARpnZXRQb29sTGVhc2VDb25maWdSRUFET05MWQILcG9vbEFkZHJlc3MHYXNzZXRJZAQKJHQwOTg0MTI3OAQHJG1hdGNoMAkAnwgBCQEOa2V5TGVhc2VkUmF0aW8CBQtwb29sQWRkcmVzcwUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgNJbnQEAXIFByRtYXRjaDAJAJQKAgYJAJcDAQkAzAgCAGQJAMwIAgkAlgMBCQDMCAIAAAkAzAgCBQFyBQNuaWwFA25pbAQHJG1hdGNoMQkAnwgBCQEVa2V5TGVhc2VkUmF0aW9EZWZhdWx0AQUHYXNzZXRJZAMJAAECBQckbWF0Y2gxAgNJbnQEAnJkBQckbWF0Y2gxCQCUCgIGCQCXAwEJAMwIAgBkCQDMCAIJAJYDAQkAzAgCAAAJAMwIAgUCcmQFA25pbAUDbmlsCQCUCgIHAAAECmlzTGVhc2FibGUIBQokdDA5ODQxMjc4Al8xBAtsZWFzZWRSYXRpbwgFCiR0MDk4NDEyNzgCXzIECm1pbkJhbGFuY2UEByRtYXRjaDAJAJ8IAQkBDWtleU1pbkJhbGFuY2UCBQtwb29sQWRkcmVzcwUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAJAJYDAQkAzAgCAAAJAMwIAgUBYgUDbmlsBAckbWF0Y2gxCQCfCAEJARRrZXlNaW5CYWxhbmNlRGVmYXVsdAEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMQIDSW50BAJiZAUHJG1hdGNoMQkAlgMBCQDMCAIAAAkAzAgCBQJiZAUDbmlsAAAECyR0MDE1MzQxNzMzAwkAAAIFB2Fzc2V0SWQCBVdBVkVTCQCUCgIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBFWtleVNXYXZlc1Byb3h5QWRkcmVzcwACAAkAnQgCBQR0aGlzCQELdmFsdWVPckVsc2UCCQEQa2V5U1dhdmVzQXNzZXRJZAACAAkAlAoCAgACAAQMcHJveHlBZGRyZXNzCAULJHQwMTUzNDE3MzMCXzEEDHByb3h5QXNzZXRJZAgFCyR0MDE1MzQxNzMzAl8yBBRzdGFraW5nUHJvZml0QWRkcmVzcwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEXa2V5U3Rha2luZ1Byb2ZpdEFkZHJlc3MAAgAJAJQKAgUDbmlsCQCYCgYFCmlzTGVhc2FibGUFC2xlYXNlZFJhdGlvBQptaW5CYWxhbmNlBQxwcm94eUFkZHJlc3MFDHByb3h5QXNzZXRJZAUUc3Rha2luZ1Byb2ZpdEFkZHJlc3MAdChdFQ==", "height": 2511181, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 6etXNuXkj4swZp2jyC7oKwB4FQ6xnGPJgkLV2XT8cPoF Next: 7ZuL8CJhFp3XTxfPUoAGPoN8akwDKme74GnArhQ2nNzb Full:
OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4+let SEP = "__"
5+
6+func keySWavesProxyAddress () = "%s__sWavesProxyAddress"
7+
8+
9+func keySWavesAssetId () = "%s__sWavesAssetId"
10+
11+
12+func keyStakingProfitAddress () = "%s__stakingProfitAddress"
13+
14+
15+func keyLeasedRatio (poolAddress,assetId) = makeString(["%s%s%s", "leasedRatio", poolAddress, assetId], SEP)
16+
17+
18+func keyLeasedRatioDefault (assetId) = makeString(["%s%s", "leasedRatio", assetId], SEP)
19+
20+
21+func keyLeasedRatioTolerance (poolAddress,assetId) = makeString(["%s%s%s", "leasedRatioTolerance", poolAddress, assetId], SEP)
22+
23+
24+func keyMinBalance (poolAddress,assetId) = makeString(["%s%s%s", "minBalance", poolAddress, assetId], SEP)
25+
26+
27+func keyMinBalanceDefault (assetId) = makeString(["%s%s", "minBalanceDefault", assetId], SEP)
428
529
630 @Callable(i)
7-func lease (poolAddress) = {
8- let payment = i.payments[0]
9- let lease = Lease(Address(fromBase58String(poolAddress)), payment.amount)
10- let id = calculateLeaseId(lease)
11-[lease, BinaryEntry("lease", id)]
31+func getPoolLeaseConfigREADONLY (poolAddress,assetId) = {
32+ let $t09841278 = match getInteger(keyLeasedRatio(poolAddress, assetId)) {
33+ case r: Int =>
34+ $Tuple2(true, min([100, max([0, r])]))
35+ case _ =>
36+ match getInteger(keyLeasedRatioDefault(assetId)) {
37+ case rd: Int =>
38+ $Tuple2(true, min([100, max([0, rd])]))
39+ case _ =>
40+ $Tuple2(false, 0)
41+ }
1242 }
13-
14-
15-
16-@Callable(i)
17-func leaseCancel (leaseTx) = [LeaseCancel(fromBase58String(leaseTx))]
43+ let isLeasable = $t09841278._1
44+ let leasedRatio = $t09841278._2
45+ let minBalance = match getInteger(keyMinBalance(poolAddress, assetId)) {
46+ case b: Int =>
47+ max([0, b])
48+ case _ =>
49+ match getInteger(keyMinBalanceDefault(assetId)) {
50+ case bd: Int =>
51+ max([0, bd])
52+ case _ =>
53+ 0
54+ }
55+ }
56+ let $t015341733 = if ((assetId == "WAVES"))
57+ then $Tuple2(valueOrElse(getString(this, keySWavesProxyAddress()), ""), getString(this, valueOrElse(keySWavesAssetId(), "")))
58+ else $Tuple2("", "")
59+ let proxyAddress = $t015341733._1
60+ let proxyAssetId = $t015341733._2
61+ let stakingProfitAddress = valueOrElse(getString(this, keyStakingProfitAddress()), "")
62+ $Tuple2(nil, $Tuple6(isLeasable, leasedRatio, minBalance, proxyAddress, proxyAssetId, stakingProfitAddress))
63+ }
1864
1965

github/deemru/w8io/3ef1775 
28.63 ms