tx · CNm6PsJGTfca5VHvPPmyuy2paPBc7xcd9JDMCT5M9ZBs

3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW:  -0.01000000 Waves

2022.04.01 22:57 [1989971] smart account 3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CNm6PsJGTfca5VHvPPmyuy2paPBc7xcd9JDMCT5M9ZBs",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1648843055492,
    "version": 2,
    "chainId": 84,
    "sender": "3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW",
    "senderPublicKey": "3JY9vAw1X3RjuU83Lkd7Yq6JhZPkbNeuXbuE2pyvEnB3",
    "proofs": [
        "3vK2H1hnojTqzJUqXKvZih3NZa2vHpLBBL68SyxKTnTKV29ffS6yiBppEjQ2HRUyCBgNqQt92mxqU3mpmi9avz7M"
    ],
    "script": "base64:AAIFAAAAAAAAAAQIAhIAAAAAAQAAAAAEdXNkTgEAAAAgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQAAAABAAAAAWkBAAAABXN0YWtlAAAAAAMJAQAAAAIhPQAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQFAAAABHVzZE4JAAACAAAAAQIAAAAQdW5leHBlY3RlZCBhc3NldAQAAAAQY3VycmVudExpcXVpZGl0eQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzCQAEJQAAAAEIBQAAAAFpAAAADG9yaWdpbkNhbGxlcgAAAAAAAAAAAAQAAAAMbmV3TGlxdWlkaXR5CQAAZAAAAAIFAAAAEGN1cnJlbnRMaXF1aWRpdHkICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAkABRQAAAACCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQAEJQAAAAEIBQAAAAFpAAAADG9yaWdpbkNhbGxlcgUAAAAMbmV3TGlxdWlkaXR5BQAAAANuaWwFAAAADG5ld0xpcXVpZGl0eQAAAABXtF8K",
    "height": 1989971,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DbVP2cPsh6EWpsU2o9XbWjLxjWmKieewrLeoRFHWuzFx
Next: FS3q5sRWRu8czYhAFKeeZuJMFGCwdRXHTSxLevybYx6z

Diff: 
Old
New
Differences
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'
5
5
 
6
-
let b = Address(base58'3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW')
7
-
8
-
let c = Address(base58'3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW')
9
-
10
-
let d = base58'496Ep8DDZwru81HjT5YAj7vUvYUi4zxyrHCgkD9GXmwe'
11
-
12
-
@Callable(e)
13
-
func addLiquidity () = if (if ((e.payments[0].assetId != unit))
14
-
    then true
15
-
    else (e.payments[1].assetId != a))
16
-
    then throw("unexpected assets")
6
+
@Callable(b)
7
+
func stake () = if ((b.payments[0].assetId != a))
8
+
    then throw("unexpected asset")
17
9
 
    else {
18
-
        let f = invoke(b, "stake", nil, [e.payments[1]])
19
-
        if ((f == f))
20
-
            then {
21
-
                let g = {
22
-
                    let h = f
23
-
                    if ($isInstanceOf(h, "Int"))
24
-
                        then {
25
-
                            let i = h
26
-
                            i
27
-
                            }
28
-
                        else throw("unexpected result type from the staker")
29
-
                    }
30
-
                let j = ("STAKING_AMOUNT_" + toString(e.caller))
31
-
                let k = ("LEASE_AMOUNT_" + toString(e.caller))
32
-
                let l = ("ID_" + toString(e.caller))
33
-
                let m = valueOrElse(getInteger(this, k), 0)
34
-
                let n = getString(this, l)
35
-
                let o = Lease(c, (m + e.payments[0].amount))
36
-
                let p = calculateLeaseId(o)
37
-
                let q = {
38
-
                    let h = n
39
-
                    if ($isInstanceOf(h, "String"))
40
-
                        then {
41
-
                            let r = h
42
-
[LeaseCancel(fromBase58String(r))]
43
-
                            }
44
-
                        else [StringEntry(l, toBase58String(p))]
45
-
                    }
46
-
                (q ++ [o, ScriptTransfer(e.caller, 1, d), IntegerEntry(k, (m + e.payments[0].amount)), IntegerEntry(j, g)])
47
-
                }
48
-
            else throw("Strict value is not equal to itself.")
10
+
        let c = valueOrElse(getInteger(this, toString(b.originCaller)), 0)
11
+
        let d = (c + b.payments[0].amount)
12
+
        $Tuple2([IntegerEntry(toString(b.originCaller), d)], d)
49
13
 
        }
50
14
 
51
15
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'
5
5
 
6
-
let b = Address(base58'3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW')
7
-
8
-
let c = Address(base58'3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW')
9
-
10
-
let d = base58'496Ep8DDZwru81HjT5YAj7vUvYUi4zxyrHCgkD9GXmwe'
11
-
12
-
@Callable(e)
13
-
func addLiquidity () = if (if ((e.payments[0].assetId != unit))
14
-
    then true
15
-
    else (e.payments[1].assetId != a))
16
-
    then throw("unexpected assets")
6
+
@Callable(b)
7
+
func stake () = if ((b.payments[0].assetId != a))
8
+
    then throw("unexpected asset")
17
9
 
    else {
18
-
        let f = invoke(b, "stake", nil, [e.payments[1]])
19
-
        if ((f == f))
20
-
            then {
21
-
                let g = {
22
-
                    let h = f
23
-
                    if ($isInstanceOf(h, "Int"))
24
-
                        then {
25
-
                            let i = h
26
-
                            i
27
-
                            }
28
-
                        else throw("unexpected result type from the staker")
29
-
                    }
30
-
                let j = ("STAKING_AMOUNT_" + toString(e.caller))
31
-
                let k = ("LEASE_AMOUNT_" + toString(e.caller))
32
-
                let l = ("ID_" + toString(e.caller))
33
-
                let m = valueOrElse(getInteger(this, k), 0)
34
-
                let n = getString(this, l)
35
-
                let o = Lease(c, (m + e.payments[0].amount))
36
-
                let p = calculateLeaseId(o)
37
-
                let q = {
38
-
                    let h = n
39
-
                    if ($isInstanceOf(h, "String"))
40
-
                        then {
41
-
                            let r = h
42
-
[LeaseCancel(fromBase58String(r))]
43
-
                            }
44
-
                        else [StringEntry(l, toBase58String(p))]
45
-
                    }
46
-
                (q ++ [o, ScriptTransfer(e.caller, 1, d), IntegerEntry(k, (m + e.payments[0].amount)), IntegerEntry(j, g)])
47
-
                }
48
-
            else throw("Strict value is not equal to itself.")
10
+
        let c = valueOrElse(getInteger(this, toString(b.originCaller)), 0)
11
+
        let d = (c + b.payments[0].amount)
12
+
        $Tuple2([IntegerEntry(toString(b.originCaller), d)], d)
49
13
 
        }
50
14
 
51
15
 

github/deemru/w8io/169f3d6 
35.30 ms ◑