tx · DbVP2cPsh6EWpsU2o9XbWjLxjWmKieewrLeoRFHWuzFx

3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW:  -0.01000000 Waves

2022.04.01 22:50 [1989962] smart account 3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DbVP2cPsh6EWpsU2o9XbWjLxjWmKieewrLeoRFHWuzFx",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1648842604074,
    "version": 2,
    "chainId": 84,
    "sender": "3MtgeA4XXgXJ8JUcFnX7U4X5GFzisbnoZcW",
    "senderPublicKey": "3JY9vAw1X3RjuU83Lkd7Yq6JhZPkbNeuXbuE2pyvEnB3",
    "proofs": [
        "27ocQyJ6fL8qwgumtUssJmmr1v4M7r3GGGCQx3AjRnkasPq6tFifo1VBAYyVXoVsBx31bDC5LoLe7p4MJYLBMz5z"
    ],
    "script": "base64:AAIFAAAAAAAAAAQIAhIAAAAABAAAAAAEdXNkTgEAAAAgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQAAAAABnN0YWtlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVDRN1hxurYPxlZgKuniaPP5OOF3+bmEyywAAAAAJbGVhc2VQb29sCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUNE3WHG6tg/GVmAq6eJo8/k44Xf5uYTLLAAAAAApzaGFyZVRva2VuAQAAACAupaFKeRVSncUgrvmuFwheLwyjBPMrU8dCt5b8udYrsQAAAAEAAAABaQEAAAAMYWRkTGlxdWlkaXR5AAAAAAMDCQEAAAACIT0AAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBQAAAAR1bml0BgkBAAAAAiE9AAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEAAAAHYXNzZXRJZAUAAAAEdXNkTgkAAAIAAAABAgAAABF1bmV4cGVjdGVkIGFzc2V0cwQAAAABcgkAA/wAAAAEBQAAAAZzdGFrZXICAAAABXN0YWtlBQAAAANuaWwJAARMAAAAAgkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQUAAAADbmlsAwkAAAAAAAACBQAAAAFyBQAAAAFyBAAAAA1zdGFraW5nQW1vdW50BAAAAAckbWF0Y2gwBQAAAAFyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEJAAACAAAAAQIAAAAmdW5leHBlY3RlZCByZXN1bHQgdHlwZSBmcm9tIHRoZSBzdGFrZXIEAAAAEHN0YWtpbmdBbW91bnRLZXkJAAEsAAAAAgIAAAAPU1RBS0lOR19BTU9VTlRfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAObGVhc2VBbW91bnRLZXkJAAEsAAAAAgIAAAANTEVBU0VfQU1PVU5UXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAABWlkS2V5CQABLAAAAAICAAAAA0lEXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAADGxlYXNlZEFtb3VudAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAA5sZWFzZUFtb3VudEtleQAAAAAAAAAAAAQAAAAHbGVhc2VJZAkABB0AAAACBQAAAAR0aGlzBQAAAAVpZEtleQQAAAAIbmV3TGVhc2UJAAREAAAAAgUAAAAJbGVhc2VQb29sCQAAZAAAAAIFAAAADGxlYXNlZEFtb3VudAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BAAAAApuZXdMZWFzZUlkCQAEOQAAAAEFAAAACG5ld0xlYXNlBAAAAAZjYW5jZWwEAAAAByRtYXRjaDAFAAAAB2xlYXNlSWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAACaWQFAAAAByRtYXRjaDAJAARMAAAAAgkBAAAAC0xlYXNlQ2FuY2VsAAAAAQkAAlkAAAABBQAAAAJpZAUAAAADbmlsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAABWlkS2V5CQACWAAAAAEFAAAACm5ld0xlYXNlSWQFAAAAA25pbAkABE4AAAACBQAAAAZjYW5jZWwJAARMAAAAAgUAAAAIbmV3TGVhc2UJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyAAAAAAAAAAABBQAAAApzaGFyZVRva2VuCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA5sZWFzZUFtb3VudEtleQkAAGQAAAACBQAAAAxsZWFzZWRBbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAQc3Rha2luZ0Ftb3VudEtleQUAAAANc3Rha2luZ0Ftb3VudAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAABB3T0n",
    "height": 1989962,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7uouXWNjPXskm2GAdmV9ykMndJT9yCrfjmCeRiVhGKwh
Next: CNm6PsJGTfca5VHvPPmyuy2paPBc7xcd9JDMCT5M9ZBs

Diff: 
Old
New
Differences
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'
5
5
 
6
-
@Callable(b)
7
-
func stake () = if ((b.payments[0].assetId != a))
8
-
    then throw("unexpected asset")
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")
9
17
 
    else {
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)
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.")
13
49
 
        }
14
50
 
15
51
 

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
-
@Callable(b)
7
-
func stake () = if ((b.payments[0].assetId != a))
8
-
    then throw("unexpected asset")
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")
9
17
 
    else {
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)
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.")
13
49
 
        }
14
50
 
15
51
 

github/deemru/w8io/873ac7e 
31.24 ms ◑