tx · 4CewQQxuuCbWqQdYYexGFzoVG1LKo87c36XPchL3xk57

3Mza5Ao6wJgpw1JG3jxRY1xigD44zgfhdK6:  -0.04000000 Waves

2021.11.05 16:57 [1777770] smart account 3Mza5Ao6wJgpw1JG3jxRY1xigD44zgfhdK6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4CewQQxuuCbWqQdYYexGFzoVG1LKo87c36XPchL3xk57",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1636120679381,
    "version": 2,
    "chainId": 84,
    "sender": "3Mza5Ao6wJgpw1JG3jxRY1xigD44zgfhdK6",
    "senderPublicKey": "Gud7Z17wiZEMZiHRbn48k2D9H13jmLEDZZ8b7NCfjRJL",
    "proofs": [
        "2assdDeBCVPCHG57RQb46fTd3JBMgKajgQa4MMCfisvYS3jjwj5uXZtqcKo7Eov6grf6e6XBDzvq5hE4j6PCEsBB"
    ],
    "script": "base64:AAIFAAAAAAAAAA8IAhIAEgMKAQESBAoCAQgAAAADAAAAAAZPUkFDTEUCAAAAIzNNczN2RmtyVGFYdllOdzlWbmE4dmdUbUh6RWhXQ0JrQm1UAQAAABBnZXRPcmFjbGVBZGRyZXNzAAAAAAkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEFAAAABk9SQUNMRQEAAAATZ2V0U3RhdHVzRnJvbU9yYWNsZQAAAAEAAAAHYWRkcmVzcwkABB0AAAACCQEAAAAQZ2V0T3JhY2xlQWRkcmVzcwAAAAAJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAAGc3RhdHVzAAAAAwAAAAFpAQAAAAdkZXBvc2l0AAAAAAQAAAADcG10AwkAAAAAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAACQAAAgAAAAECAAAAHEF0dGFjaGVkIHBheW1lbnQgaXMgcmVxdWlyZWQEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAVd29ya3Mgd2l0aCB3YXZlcyBvbmx5AwkAAAAAAAACCQEAAAATZ2V0U3RhdHVzRnJvbU9yYWNsZQAAAAEFAAAACmN1cnJlbnRLZXkCAAAACHZlcmlmaWVkCQAAAgAAAAECAAAACU5vIEFjY2VzcwQAAAANY3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAApjdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAkABRQAAAACCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAApjdXJyZW50S2V5BQAAAAluZXdBbW91bnQFAAAAA25pbAUAAAAEdW5pdAAAAAFpAQAAAAh3aXRoZHJhdwAAAAEAAAAGYW1vdW50BAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAANY3VycmVudEFtb3VudAUAAAAGYW1vdW50AwkAAGcAAAACAAAAAAAAAAAABQAAAAZhbW91bnQJAAACAAAAAQIAAAAdQW1vdW50IG11c3QgYmUgZ3JlYXRlciB0aGFuIDADCQAAZgAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAABJOb3QgZW5vdWdoIGJhbGFuY2UJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAKY3VycmVudEtleQUAAAAJbmV3QW1vdW50CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAGYW1vdW50BQAAAAR1bml0BQAAAANuaWwFAAAABHVuaXQAAAABaQEAAAAIdHJhbnNmZXIAAAACAAAABmFtb3VudAAAAAlyZWNpcGllbnQEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANY3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAApjdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAACW5ld0Ftb3VudAkAAGUAAAACBQAAAA1jdXJyZW50QW1vdW50BQAAAAZhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAAB1BbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAMJAABmAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAEk5vdCBlbm91Z2ggYmFsYW5jZQQAAAAGcmVjS2V5CQACWAAAAAEICQEAAAAHQWRkcmVzcwAAAAEJAAJZAAAAAQUAAAAJcmVjaXBpZW50AAAABWJ5dGVzBAAAAAlyZWNBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAGcmVjS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAKY3VycmVudEtleQUAAAAJbmV3QW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAZyZWNLZXkJAABkAAAAAgUAAAAJcmVjQW1vdW50BQAAAAZhbW91bnQFAAAAA25pbAUAAAAEdW5pdAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAB3NtYXJ0UEsBAAAAIOxaVsoym81WX7f/0c3rXD+lUf0YBPZj/BFAChhL20JdBAAAAAhzZWNvbmRQSwEAAAAgsYI0XJ/6UoSZVLCk1HJwaDhWvEG0ktQGwKp2ht0aQEIEAAAABXNtYXJ0CQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAAHc21hcnRQSwQAAAAGc2Vjb25kCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAAIc2Vjb25kUEsEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAD0RhdGFUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAF0ludm9rZVNjcmlwdFRyYW5zYWN0aW9uBAAAAAF0BQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAMFAAAABXNtYXJ0BgUAAAAGc2Vjb25kBy8HNIw=",
    "height": 1777770,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: GBhXADtPKoS4CpCVewbi4PsMLYemj3cpy2LzXXcDf5xH
Next: CDdcr8KCL3Pq5HWPuYfkALndHHxVrZzLPH3rJGJLcooM

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let ORACLE = "3Ms3vFkrTaXvYNw9Vna8vgTmHzEhWCBkBmT"
5
+
6
+
func getOracleAddress () = Address(fromBase58String(ORACLE))
7
+
8
+
9
+
func getStatusFromOracle (address) = getString(getOracleAddress(), (address + "status"))
4
10
 
5
11
 
6
12
 
@Callable(i)
8
14
 
    let pmt = if ((size(i.payments) == 1))
9
15
 
        then i.payments[0]
10
16
 
        else throw("Attached payment is required")
17
+
    let currentKey = toBase58String(i.caller.bytes)
11
18
 
    if (isDefined(pmt.assetId))
12
19
 
        then throw("works with waves only")
13
-
        else {
14
-
            let currentKey = toBase58String(i.caller.bytes)
15
-
            let currentAmount =             match getInteger(this, currentKey) {
16
-
                case a: Int => 
17
-
                    a
18
-
                case _ => 
19
-
                    0
20
-
            }
21
-
            let newAmount = (currentAmount + pmt.amount)
22
-
            $Tuple2([IntegerEntry(currentKey, newAmount)], unit)
23
-
            }
20
+
        else if ((getStatusFromOracle(currentKey) == "verified"))
21
+
            then throw("No Access")
22
+
            else {
23
+
                let currentAmount =                 match getInteger(this, currentKey) {
24
+
                    case a: Int => 
25
+
                        a
26
+
                    case _ => 
27
+
                        0
28
+
                }
29
+
                let newAmount = (currentAmount + pmt.amount)
30
+
                $Tuple2([IntegerEntry(currentKey, newAmount)], unit)
31
+
                }
24
32
 
    }
25
33
 
26
34
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let ORACLE = "3Ms3vFkrTaXvYNw9Vna8vgTmHzEhWCBkBmT"
5
+
6
+
func getOracleAddress () = Address(fromBase58String(ORACLE))
7
+
8
+
9
+
func getStatusFromOracle (address) = getString(getOracleAddress(), (address + "status"))
4
10
 
5
11
 
6
12
 
@Callable(i)
7
13
 
func deposit () = {
8
14
 
    let pmt = if ((size(i.payments) == 1))
9
15
 
        then i.payments[0]
10
16
 
        else throw("Attached payment is required")
17
+
    let currentKey = toBase58String(i.caller.bytes)
11
18
 
    if (isDefined(pmt.assetId))
12
19
 
        then throw("works with waves only")
13
-
        else {
14
-
            let currentKey = toBase58String(i.caller.bytes)
15
-
            let currentAmount =             match getInteger(this, currentKey) {
16
-
                case a: Int => 
17
-
                    a
18
-
                case _ => 
19
-
                    0
20
-
            }
21
-
            let newAmount = (currentAmount + pmt.amount)
22
-
            $Tuple2([IntegerEntry(currentKey, newAmount)], unit)
23
-
            }
20
+
        else if ((getStatusFromOracle(currentKey) == "verified"))
21
+
            then throw("No Access")
22
+
            else {
23
+
                let currentAmount =                 match getInteger(this, currentKey) {
24
+
                    case a: Int => 
25
+
                        a
26
+
                    case _ => 
27
+
                        0
28
+
                }
29
+
                let newAmount = (currentAmount + pmt.amount)
30
+
                $Tuple2([IntegerEntry(currentKey, newAmount)], unit)
31
+
                }
24
32
 
    }
25
33
 
26
34
 
27
35
 
28
36
 
@Callable(i)
29
37
 
func withdraw (amount) = {
30
38
 
    let currentKey = toBase58String(i.caller.bytes)
31
39
 
    let currentAmount =     match getInteger(this, currentKey) {
32
40
 
        case a: Int => 
33
41
 
            a
34
42
 
        case _ => 
35
43
 
            0
36
44
 
    }
37
45
 
    let newAmount = (currentAmount - amount)
38
46
 
    if ((0 >= amount))
39
47
 
        then throw("Amount must be greater than 0")
40
48
 
        else if ((0 > newAmount))
41
49
 
            then throw("Not enough balance")
42
50
 
            else $Tuple2([IntegerEntry(currentKey, newAmount), ScriptTransfer(i.caller, amount, unit)], unit)
43
51
 
    }
44
52
 
45
53
 
46
54
 
47
55
 
@Callable(i)
48
56
 
func transfer (amount,recipient) = {
49
57
 
    let currentKey = toBase58String(i.caller.bytes)
50
58
 
    let currentAmount =     match getInteger(this, currentKey) {
51
59
 
        case a: Int => 
52
60
 
            a
53
61
 
        case _ => 
54
62
 
            0
55
63
 
    }
56
64
 
    let newAmount = (currentAmount - amount)
57
65
 
    if ((0 >= amount))
58
66
 
        then throw("Amount must be greater than 0")
59
67
 
        else if ((0 > newAmount))
60
68
 
            then throw("Not enough balance")
61
69
 
            else {
62
70
 
                let recKey = toBase58String(Address(fromBase58String(recipient)).bytes)
63
71
 
                let recAmount =                 match getInteger(this, recKey) {
64
72
 
                    case a: Int => 
65
73
 
                        a
66
74
 
                    case _ => 
67
75
 
                        0
68
76
 
                }
69
77
 
                $Tuple2([IntegerEntry(currentKey, newAmount), IntegerEntry(recKey, (recAmount + amount))], unit)
70
78
 
                }
71
79
 
    }
72
80
 
73
81
 
74
82
 
@Verifier(tx)
75
83
 
func verify () = {
76
84
 
    let smartPK = base58'Gud7Z17wiZEMZiHRbn48k2D9H13jmLEDZZ8b7NCfjRJL'
77
85
 
    let secondPK = base58'CwvKLDcXt3Wd2MEyEemVKawiD7gaCV68wh2GcnJRHFqB'
78
86
 
    let smart = sigVerify(tx.bodyBytes, tx.proofs[0], smartPK)
79
87
 
    let second = sigVerify(tx.bodyBytes, tx.proofs[0], secondPK)
80
88
 
    match tx {
81
89
 
        case t: SetScriptTransaction => 
82
90
 
            true
83
91
 
        case t: DataTransaction => 
84
92
 
            true
85
93
 
        case t: InvokeScriptTransaction => 
86
94
 
            true
87
95
 
        case t: TransferTransaction => 
88
96
 
            if (smart)
89
97
 
                then true
90
98
 
                else second
91
99
 
        case _ => 
92
100
 
            false
93
101
 
    }
94
102
 
    }
95
103
 

github/deemru/w8io/873ac7e 
27.68 ms ◑