tx · C7yqr8xKdNHViuLrzRcnmZoQz4XtXPY3QLfuEqXKcaFA

3MxyHnkvv7y3CD8KHt63zm4yv83C7AJo4ec:  -0.01000000 Waves

2022.04.11 14:58 [2003897] smart account 3MxyHnkvv7y3CD8KHt63zm4yv83C7AJo4ec > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "C7yqr8xKdNHViuLrzRcnmZoQz4XtXPY3QLfuEqXKcaFA",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1649678272759,
    "version": 1,
    "sender": "3MxyHnkvv7y3CD8KHt63zm4yv83C7AJo4ec",
    "senderPublicKey": "3BcftFa3x6i6dPJxLsb9VR83bjp2PGssaqJm4rT4mWPy",
    "proofs": [
        "4cJUbRp3w3nookxCQHoQCwpvicscxhfEe8o3uGQb88Q6o5tNK8WkLRGB4evX5wj12CLiTwE5oNAxWmeSsUQVTN1V"
    ],
    "script": "base64:AAIFAAAAAAAAABIIAhIAEgMKAQESBwoFBAIBCB8AAAAAAAAAAwAAAANjdHgBAAAAB2RlcG9zaXQAAAAABAAAAANwbXQDCQAAZgAAAAIJAAGQAAAAAQgFAAAAA2N0eAAAAAhwYXltZW50cwAAAAAAAAAAAAkAAZEAAAACCAUAAAADY3R4AAAACHBheW1lbnRzAAAAAAAAAAAACQAAAgAAAAECAAAAHUF0IGxlYXN0IG9uZSBwYXltZW50IGV4cGVjdGVkBAAAAAdhc3NldElkAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAG09ubHkgV0FWRVMgcGF5bWVudCBhY2NlcHRlZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkABCUAAAABCAUAAAADY3R4AAAABmNhbGxlcggFAAAAA3BtdAAAAAZhbW91bnQFAAAAA25pbAAAAANjdHgBAAAACHdpdGhkcmF3AAAAAQAAAAZhbW91bnQEAAAAB2FkZHJlc3MJAAQlAAAAAQgFAAAAA2N0eAAAAAZjYWxsZXIEAAAAB2N1cnJlbnQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAAdhZGRyZXNzAgAAABhZb3UgZG9uJ3QgaGF2ZSBhIGRlcG9zaXQEAAAAA2FtdAMDCQAAZgAAAAIFAAAABmFtb3VudAAAAAAAAAAAAAYJAABmAAAAAgUAAAAGYW1vdW50BQAAAAdjdXJyZW50BQAAAAZhbW91bnQJAAACAAAAAQIAAABEQW1vdW50IHRvIHdpdGhkcmF3IG11c3QgYmUgbW9yZSB0aGFuIDAgYW5kIGxlc3MgdGhhbiBjdXJyZW50IGRlcG9zaXQDCQAAAAAAAAIFAAAABmFtb3VudAUAAAAHY3VycmVudAkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAAAdhZGRyZXNzBQAAAANuaWwJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAB2FkZHJlc3MJAABlAAAAAgUAAAAHY3VycmVudAUAAAAGYW1vdW50CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAANjdHgAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAABHVuaXQFAAAAA25pbAAAAANjdHgBAAAAC2FsbEFyZ1R5cGVzAAAABQAAAARib29sAAAAA2JpbgAAAANpbnQAAAADc3RyAAAABGxpc3QEAAAAB2luZGljZXMJAARMAAAAAgAAAAAAAAAAAQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAMJAARMAAAAAgAAAAAAAAAABAkABEwAAAACAAAAAAAAAAAFBQAAAANuaWwKAQAAAAtjb252ZXJ0TGlzdAAAAAIAAAADYWNjAAAABWluZGV4BAAAAANpbmQJAAGkAAAAAQUAAAAFaW5kZXgJAARNAAAAAgUAAAADYWNjBAAAAAckbWF0Y2gwCQABkQAAAAIFAAAABGxpc3QFAAAABWluZGV4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAdCb29sZWFuBAAAAAFiBQAAAAckbWF0Y2gwCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgkAASwAAAACBQAAAANpbmQCAAAABS1ib29sBQAAAAFiAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAFiBQAAAAckbWF0Y2gwCQEAAAALQmluYXJ5RW50cnkAAAACCQABLAAAAAIFAAAAA2luZAIAAAAELWJpbgUAAAABYgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFpBQAAAAckbWF0Y2gwCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAANpbmQCAAAABC1pbnQFAAAAAWkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAANpbmQCAAAABC1zdHIFAAAAAXMJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IJAAROAAAAAgkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgIAAAAEYm9vbAUAAAAEYm9vbAkABEwAAAACCQEAAAALQmluYXJ5RW50cnkAAAACAgAAAANiaW4FAAAAA2JpbgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAADaW50BQAAAANpbnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAADc3RyBQAAAANzdHIFAAAAA25pbAoAAAAAAiRsBQAAAAdpbmRpY2VzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAtjb252ZXJ0TGlzdAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAADssGdg=",
    "chainId": 84,
    "height": 2003897,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6mzaKEC6hN4rMkpt86NfDrVNDzgFgAohHQxPid6ZDQCU
Next: none

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
5
5
 
6
6
 
@Callable(ctx)
7
7
 
func deposit () = {
8
8
 
    let pmt = if ((size(ctx.payments) > 0))
9
9
 
        then ctx.payments[0]
10
10
 
        else throw("At least one payment expected")
11
11
 
    let assetId = if (isDefined(pmt.assetId))
12
12
 
        then value(pmt.assetId)
13
13
 
        else throw("Only WAVES payment accepted")
14
14
 
[IntegerEntry(toString(ctx.caller), pmt.amount)]
15
15
 
    }
16
16
 
17
17
 
18
18
 
19
19
 
@Callable(ctx)
20
20
 
func withdraw (amount) = {
21
21
 
    let address = toString(ctx.caller)
22
22
 
    let current = valueOrErrorMessage(getInteger(this, address), "You don't have a deposit")
23
23
 
    let amt = if (if ((amount > 0))
24
24
 
        then true
25
25
 
        else (amount > current))
26
26
 
        then amount
27
27
 
        else throw("Amount to withdraw must be more than 0 and less than current deposit")
28
28
 
    if ((amount == current))
29
29
 
        then [DeleteEntry(address)]
30
30
 
        else [IntegerEntry(address, (current - amount)), ScriptTransfer(ctx.caller, amount, unit)]
31
31
 
    }
32
32
 
33
33
 
34
34
 
35
35
 
@Callable(ctx)
36
36
 
func allArgTypes (bool,bin,int,str,list) = {
37
37
 
    let indices = [1, 2, 3, 4, 5]
38
38
 
    func convertList (acc,index) =     {
39
39
 
        let ind = toString(index)
40
40
 
        (acc :+         match list[index] {
41
41
 
            case b: Boolean => 
42
42
 
                BooleanEntry((ind + "-bool"), b)
43
43
 
            case b: ByteVector => 
44
44
 
                BinaryEntry((ind + "-bin"), b)
45
45
 
            case i: Int => 
46
46
 
                IntegerEntry((ind + "-int"), i)
47
47
 
            case s: String => 
48
48
 
                StringEntry((ind + "-str"), s)
49
49
 
            case _ => 
50
50
 
                throw("Match error")
51
51
 
        })
52
52
 
        }
53
53
 
54
54
 
    ([BooleanEntry("bool", bool), BinaryEntry("bin", bin), IntegerEntry("int", int), StringEntry("str", str)] ++ {
55
55
 
        let $l = indices
56
56
 
        let $s = size($l)
57
57
 
        let $acc0 = nil
58
58
 
        func 1 ($a,$i) =         if (($i >= $s))
59
59
 
            then $a
60
60
 
            else convertList($a, $l[$i])
61
61
 
62
62
 
        func 2 ($a,$i) =         if (($i >= $s))
63
63
 
            then $a
64
64
 
            else throw("List size exceeds 5")
65
65
 
66
66
 
        2(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5)
67
67
 
        })
68
68
 
    }
69
69
 
70
70
 

github/deemru/w8io/873ac7e 
31.08 ms ◑