tx · 42gY3RtuQJvDHNQwaPDAQkqS5MWd9yBnxHFZMNXSNGy9

3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr:  -0.00500000 Waves

2024.09.24 20:51 [3298003] smart account 3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "42gY3RtuQJvDHNQwaPDAQkqS5MWd9yBnxHFZMNXSNGy9",
    "fee": 500000,
    "feeAssetId": null,
    "timestamp": 1727200287768,
    "version": 2,
    "chainId": 84,
    "sender": "3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr",
    "senderPublicKey": "jXCTQV8PjX2uC9UHBFveupYy9cjhY7stHbzE9cptymw",
    "proofs": [
        "5xLQ46dNEuyVCk1VsEoTkGHbbGhhrtuJnXVSuBoAa6U5r5MZmQkSGoxoXWDzpwb7LzekPWNJju16aqtGvGfxAHNi"
    ],
    "script": "base64:BwITCAISAwoBCBIECgICGBIECgICGCAACXNlcGFyYXRvcgICX18AC3dhdmVzU3RyaW5nAgVXQVZFUwAQY29udHJhY3RGaWxlbmFtZQIXbWVtZV9pbV9jYWxjdWxhdG9yLnJpZGUABW11bHQ4AIDC1y8BB3dyYXBFcnIBAXMJAKwCAgkArAICBRBjb250cmFjdEZpbGVuYW1lAgI6IAUBcwEIdGhyb3dFcnIBAXMJAAIBCQEHd3JhcEVycgEFAXMBD3ZhbGlkYXRlQWRkcmVzcwEHYWRkcmVzcwkBCWlzRGVmaW5lZAEJAKYIAQUHYWRkcmVzcwAMU1RBVFVTX0VNUFRZAAAADFNUQVRVU19SRUFEWQABAAlrU2h1dGRvd24CDCVzX19zaHV0ZG93bgALa1ByaWNlQXNzZXQCDHByaWNlX19hc3NldAAOa0xpc3RpbmdWb2x1bWUCDmxpc3Rpbmdfdm9sdW1lABFrUG9vbENvbnRyYWN0SGFzaAIScG9vbF9jb250cmFjdF9oYXNoABNrTGFzdEVtcHR5UG9vbEluZGV4AhdsYXN0X19lbXB0eV9wb29sX19pbmRleAAUa0ZpcnN0RW1wdHlQb29sSW5kZXgCGWZpcnN0X19lbXB0eV9fcG9vbF9faW5kZXgBFWtQb29sQWRkcmVzc0Zyb21JbmRleAEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAIJAKQDAQUFaW5kZXgFA25pbAUJc2VwYXJhdG9yARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBB2FkZHJlc3MJALkJAgkAzAgCAgRwb29sCQDMCAIJAKUIAQUHYWRkcmVzcwUDbmlsBQlzZXBhcmF0b3IBCmtQb29sQXNzZXQBB2FkZHJlc3MJALkJAgkAzAgCAgVhc3NldAkAzAgCCQClCAEFB2FkZHJlc3MFA25pbAUJc2VwYXJhdG9yAQtrUG9vbFN0YXR1cwEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAICBnN0YXR1cwkAzAgCCQCkAwEFBWluZGV4BQNuaWwFCXNlcGFyYXRvcgAPa0ZhY3RvcnlBZGRyZXNzAhIlc19fZmFjdG9yeUFkZHJlc3MAFGZhY3RvcnlBZGRyZXNzT3B0aW9uBAckbWF0Y2gwCQCdCAIFBHRoaXMFD2tGYWN0b3J5QWRkcmVzcwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IADmZhY3RvcnlBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIFFGZhY3RvcnlBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECF2ludmFsaWQgZmFjdG9yeSBhZGRyZXNzAAhzaHV0ZG93bgkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ5mYWN0b3J5QWRkcmVzcwUJa1NodXRkb3duBwAObGFzdEVtcHR5SW5kZXgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOZmFjdG9yeUFkZHJlc3MFE2tMYXN0RW1wdHlQb29sSW5kZXgAAAAPZmlyc3RFbXB0eUluZGV4CQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBRRrRmlyc3RFbXB0eVBvb2xJbmRleAAAAA1saXN0aW5nVm9sdW1lCQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBQ5rTGlzdGluZ1ZvbHVtZQAAAQxwYXJzZUFzc2V0SWQBBWlucHV0AwkAAAIFBWlucHV0BQt3YXZlc1N0cmluZwUEdW5pdAkA2QQBBQVpbnB1dAEPYXNzZXRJZFRvU3RyaW5nAQVpbnB1dAMJAAACBQVpbnB1dAUEdW5pdAULd2F2ZXNTdHJpbmcJANgEAQkBBXZhbHVlAQUFaW5wdXQBC211c3RBZGRyZXNzAgZjYWxsZXIHYWRkcmVzcwMJAAACBQZjYWxsZXIFB2FkZHJlc3MGCQEIdGhyb3dFcnIBAhFwZXJtaXNzaW9uIGRlbmllZAEIbXVzdFRoaXMBBmNhbGxlcgkBC211c3RBZGRyZXNzAgUGY2FsbGVyBQR0aGlzAQttdXN0RmFjdG9yeQEGY2FsbGVyCQELbXVzdEFkZHJlc3MCBQZjYWxsZXIFDmZhY3RvcnlBZGRyZXNzARBwb29sQ29udHJhY3RIYXNoAAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFDmZhY3RvcnlBZGRyZXNzBRFrUG9vbENvbnRyYWN0SGFzaAkBB3dyYXBFcnIBAiRwb29sIGNvbnRyYWN0IHNjcmlwdCBoYXNoIGlzIG5vdCBzZXQDAWkBBGluaXQBDmZhY3RvcnlBZGRyZXNzBAtjaGVja0NhbGxlcgkBCG11c3RUaGlzAQgFAWkGY2FsbGVyAwkAAAIFC2NoZWNrQ2FsbGVyBQtjaGVja0NhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCBQ9rRmFjdG9yeUFkZHJlc3MFDmZhY3RvcnlBZGRyZXNzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEMYWRkRW1wdHlQb29sAg9jYWxsZXJQdWJsaWNLZXkEYXJncwQObmV3UG9vbEFkZHJlc3MJAKcIAQUPY2FsbGVyUHVibGljS2V5BAxuZXdQb29sSW5kZXgJAGQCBQ5sYXN0RW1wdHlJbmRleAABBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgUTa0xhc3RFbXB0eVBvb2xJbmRleAkAzAgCBQxuZXdQb29sSW5kZXgFA25pbAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCC3N0cmluZ0VudHJ5CQDMCAIJARVrUG9vbEFkZHJlc3NGcm9tSW5kZXgBBQxuZXdQb29sSW5kZXgJAMwIAgkApQgBBQ5uZXdQb29sQWRkcmVzcwUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBBQ5uZXdQb29sQWRkcmVzcwkAzAgCBQxuZXdQb29sSW5kZXgFA25pbAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCDGludGVnZXJFbnRyeQkAzAgCCQELa1Bvb2xTdGF0dXMBBQxuZXdQb29sSW5kZXgJAMwIAgUMU1RBVFVTX0VNUFRZBQNuaWwFA25pbAUDbmlsCQCUCgIFA25pbAUOZmFjdG9yeUFjdGlvbnMBaQEKY3JlYXRlUG9vbAIPY2FsbGVyUHVibGljS2V5BGFyZ3MEBmNoZWNrcwkAzAgCAwkBASEBBQhzaHV0ZG93bgYJAQh0aHJvd0VycgECFm5vdCBhbGxvd2VkIChzaHV0ZG93bikJAMwIAgkBC211c3RGYWN0b3J5AQgFAWkGY2FsbGVyCQDMCAIDCQBmAgkAZQIFDmxhc3RFbXB0eUluZGV4BQ9maXJzdEVtcHR5SW5kZXgAAAYJAQh0aHJvd0VycgECGG5vIGVtcHR5IHBvb2xzIGF2YWlsYWJsZQkAzAgCAwkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUEdW5pdAYJAQh0aHJvd0VycgECG3ByaWNlIGFzc2V0IHNob3VsZCBiZSBXQVZFUwkAzAgCAwkAZgIICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BQ1saXN0aW5nVm9sdW1lBgkBCHRocm93RXJyAQI3cGF5bWVudFsxXSBhbW91bnQgc2hvdWxkIGJlIGdyZWF0ZXIgdGhhbiBsaXN0aW5nIHZvbHVtZQkAzAgCAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0BgkBCHRocm93RXJyAQIcYW1vdW50IGFzc2V0IGNhbm5vdCBiZSBXQVZFUwkAzAgCAwkAZgIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAGCQEIdGhyb3dFcnIBAipwYXltZW50WzBdIGFtb3VudCBzaG91bGQgYmUgZ3JlYXRlciB0aGFuIDAFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwQNYW1vdW50QXNzZXRJZAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBBNhbW91bnRBc3NldElkU3RyaW5nCQEPYXNzZXRJZFRvU3RyaW5nAQUNYW1vdW50QXNzZXRJZAQJcG9vbEluZGV4CQBkAgUPZmlyc3RFbXB0eUluZGV4AAEEEXBvb2xBZGRyZXNzU3RyaW5nCQERQGV4dHJOYXRpdmUoMTA1MykCBQ5mYWN0b3J5QWRkcmVzcwkBFWtQb29sQWRkcmVzc0Zyb21JbmRleAEFCXBvb2xJbmRleAQLcG9vbEFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEXBvb2xBZGRyZXNzU3RyaW5nBAdhY3Rpb25zCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3Bvb2xBZGRyZXNzCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3Bvb2xBZGRyZXNzCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAQdhc3NldElkBQNuaWwEDmZhY3RvcnlBY3Rpb25zCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCC3N0cmluZ0VudHJ5CQDMCAIJAQprUG9vbEFzc2V0AQULcG9vbEFkZHJlc3MJAMwIAgUTYW1vdW50QXNzZXRJZFN0cmluZwUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIFFGtGaXJzdEVtcHR5UG9vbEluZGV4CQDMCAIFCXBvb2xJbmRleAUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJAQtrUG9vbFN0YXR1cwEFCXBvb2xJbmRleAkAzAgCBQxTVEFUVVNfUkVBRFkFA25pbAUDbmlsBQNuaWwJAJQKAgUHYWN0aW9ucwUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AZyUPRA==",
    "height": 3298003,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: sTiEhi8Rsjez3i71cow48R9VLVG5112NopvMH38XLeh
Next: AMgCQBh6n5pc6hT6CyhVmnPm2C3N9QuB4382oqYwt365

Diff: 
Old
New
Differences
95
95
 
96
96
 
97
97
 
@Callable(M)
98
-
func addEmptyPool (N,O) = {
99
-
    let P = addressFromPublicKey(N)
100
-
    let Q = (B + 1)
101
-
    let R = [invoke(z, "integerEntry", [p, Q], nil), invoke(z, "stringEntry", [r(Q), toString(P)], nil), invoke(z, "integerEntry", [t(P), Q], nil), invoke(z, "integerEntry", [v(Q), j], nil)]
102
-
    $Tuple2(nil, R)
98
+
func init (z) = {
99
+
    let N = J(M.caller)
100
+
    if ((N == N))
101
+
        then [StringEntry(w, z)]
102
+
        else throw("Strict value is not equal to itself.")
103
103
 
    }
104
104
 
105
105
 
106
106
 
107
107
 
@Callable(M)
108
-
func createPool (N,O) = {
109
-
    let S = [if (!(A))
108
+
func addEmptyPool (O,P) = {
109
+
    let Q = addressFromPublicKey(O)
110
+
    let R = (B + 1)
111
+
    let S = [invoke(z, "integerEntry", [p, R], nil), invoke(z, "stringEntry", [r(R), toString(Q)], nil), invoke(z, "integerEntry", [t(Q), R], nil), invoke(z, "integerEntry", [v(R), j], nil)]
112
+
    $Tuple2(nil, S)
113
+
    }
114
+
115
+
116
+
117
+
@Callable(M)
118
+
func createPool (O,P) = {
119
+
    let T = [if (!(A))
110
120
 
        then true
111
121
 
        else g("not allowed (shutdown)"), K(M.caller), if (((B - C) > 0))
112
122
 
        then true
119
129
 
        else g("amount asset cannot be WAVES"), if ((M.payments[0].amount > 0))
120
130
 
        then true
121
131
 
        else g("payment[0] amount should be greater than 0")]
122
-
    if ((S == S))
132
+
    if ((T == T))
123
133
 
        then {
124
-
            let T = M.payments[0].assetId
125
-
            let U = G(T)
126
-
            let V = (C + 1)
127
-
            let W = getStringValue(z, r(V))
128
-
            let X = addressFromStringValue(W)
129
-
            let Y = [ScriptTransfer(X, M.payments[0].amount, M.payments[0].assetId), ScriptTransfer(X, M.payments[1].amount, M.payments[1].assetId)]
130
-
            let R = [invoke(z, "stringEntry", [u(X), U], nil), invoke(z, "integerEntry", [q, V], nil), invoke(z, "integerEntry", [v(V), k], nil)]
131
-
            $Tuple2(Y, R)
134
+
            let U = M.payments[0].assetId
135
+
            let V = G(U)
136
+
            let W = (C + 1)
137
+
            let X = getStringValue(z, r(W))
138
+
            let Y = addressFromStringValue(X)
139
+
            let Z = [ScriptTransfer(Y, M.payments[0].amount, M.payments[0].assetId), ScriptTransfer(Y, M.payments[1].amount, M.payments[1].assetId)]
140
+
            let S = [invoke(z, "stringEntry", [u(Y), V], nil), invoke(z, "integerEntry", [q, W], nil), invoke(z, "integerEntry", [v(W), k], nil)]
141
+
            $Tuple2(Z, S)
132
142
 
            }
133
143
 
        else throw("Strict value is not equal to itself.")
134
144
 
    }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 7 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = "__"
5
5
 
6
6
 
let b = "WAVES"
7
7
 
8
8
 
let c = "meme_im_calculator.ride"
9
9
 
10
10
 
let d = 100000000
11
11
 
12
12
 
func e (f) = ((c + ": ") + f)
13
13
 
14
14
 
15
15
 
func g (f) = throw(e(f))
16
16
 
17
17
 
18
18
 
func h (i) = isDefined(addressFromString(i))
19
19
 
20
20
 
21
21
 
let j = 0
22
22
 
23
23
 
let k = 1
24
24
 
25
25
 
let l = "%s__shutdown"
26
26
 
27
27
 
let m = "price__asset"
28
28
 
29
29
 
let n = "listing_volume"
30
30
 
31
31
 
let o = "pool_contract_hash"
32
32
 
33
33
 
let p = "last__empty_pool__index"
34
34
 
35
35
 
let q = "first__empty__pool__index"
36
36
 
37
37
 
func r (s) = makeString(["pool", toString(s)], a)
38
38
 
39
39
 
40
40
 
func t (i) = makeString(["pool", toString(i)], a)
41
41
 
42
42
 
43
43
 
func u (i) = makeString(["asset", toString(i)], a)
44
44
 
45
45
 
46
46
 
func v (s) = makeString(["pool", "status", toString(s)], a)
47
47
 
48
48
 
49
49
 
let w = "%s__factoryAddress"
50
50
 
51
51
 
let x = {
52
52
 
    let y = getString(this, w)
53
53
 
    if ($isInstanceOf(y, "String"))
54
54
 
        then {
55
55
 
            let f = y
56
56
 
            addressFromString(f)
57
57
 
            }
58
58
 
        else if ($isInstanceOf(y, "Unit"))
59
59
 
            then unit
60
60
 
            else throw("Match error")
61
61
 
    }
62
62
 
63
63
 
let z = valueOrErrorMessage(x, e("invalid factory address"))
64
64
 
65
65
 
let A = valueOrElse(getBoolean(z, l), false)
66
66
 
67
67
 
let B = valueOrElse(getInteger(z, p), 0)
68
68
 
69
69
 
let C = valueOrElse(getInteger(z, q), 0)
70
70
 
71
71
 
let D = valueOrElse(getInteger(z, n), 0)
72
72
 
73
73
 
func E (F) = if ((F == b))
74
74
 
    then unit
75
75
 
    else fromBase58String(F)
76
76
 
77
77
 
78
78
 
func G (F) = if ((F == unit))
79
79
 
    then b
80
80
 
    else toBase58String(value(F))
81
81
 
82
82
 
83
83
 
func H (I,i) = if ((I == i))
84
84
 
    then true
85
85
 
    else g("permission denied")
86
86
 
87
87
 
88
88
 
func J (I) = H(I, this)
89
89
 
90
90
 
91
91
 
func K (I) = H(I, z)
92
92
 
93
93
 
94
94
 
func L () = valueOrErrorMessage(getBinary(z, o), e("pool contract script hash is not set"))
95
95
 
96
96
 
97
97
 
@Callable(M)
98
-
func addEmptyPool (N,O) = {
99
-
    let P = addressFromPublicKey(N)
100
-
    let Q = (B + 1)
101
-
    let R = [invoke(z, "integerEntry", [p, Q], nil), invoke(z, "stringEntry", [r(Q), toString(P)], nil), invoke(z, "integerEntry", [t(P), Q], nil), invoke(z, "integerEntry", [v(Q), j], nil)]
102
-
    $Tuple2(nil, R)
98
+
func init (z) = {
99
+
    let N = J(M.caller)
100
+
    if ((N == N))
101
+
        then [StringEntry(w, z)]
102
+
        else throw("Strict value is not equal to itself.")
103
103
 
    }
104
104
 
105
105
 
106
106
 
107
107
 
@Callable(M)
108
-
func createPool (N,O) = {
109
-
    let S = [if (!(A))
108
+
func addEmptyPool (O,P) = {
109
+
    let Q = addressFromPublicKey(O)
110
+
    let R = (B + 1)
111
+
    let S = [invoke(z, "integerEntry", [p, R], nil), invoke(z, "stringEntry", [r(R), toString(Q)], nil), invoke(z, "integerEntry", [t(Q), R], nil), invoke(z, "integerEntry", [v(R), j], nil)]
112
+
    $Tuple2(nil, S)
113
+
    }
114
+
115
+
116
+
117
+
@Callable(M)
118
+
func createPool (O,P) = {
119
+
    let T = [if (!(A))
110
120
 
        then true
111
121
 
        else g("not allowed (shutdown)"), K(M.caller), if (((B - C) > 0))
112
122
 
        then true
113
123
 
        else g("no empty pools available"), if ((M.payments[1].assetId == unit))
114
124
 
        then true
115
125
 
        else g("price asset should be WAVES"), if ((M.payments[1].amount > D))
116
126
 
        then true
117
127
 
        else g("payment[1] amount should be greater than listing volume"), if ((M.payments[0].assetId != unit))
118
128
 
        then true
119
129
 
        else g("amount asset cannot be WAVES"), if ((M.payments[0].amount > 0))
120
130
 
        then true
121
131
 
        else g("payment[0] amount should be greater than 0")]
122
-
    if ((S == S))
132
+
    if ((T == T))
123
133
 
        then {
124
-
            let T = M.payments[0].assetId
125
-
            let U = G(T)
126
-
            let V = (C + 1)
127
-
            let W = getStringValue(z, r(V))
128
-
            let X = addressFromStringValue(W)
129
-
            let Y = [ScriptTransfer(X, M.payments[0].amount, M.payments[0].assetId), ScriptTransfer(X, M.payments[1].amount, M.payments[1].assetId)]
130
-
            let R = [invoke(z, "stringEntry", [u(X), U], nil), invoke(z, "integerEntry", [q, V], nil), invoke(z, "integerEntry", [v(V), k], nil)]
131
-
            $Tuple2(Y, R)
134
+
            let U = M.payments[0].assetId
135
+
            let V = G(U)
136
+
            let W = (C + 1)
137
+
            let X = getStringValue(z, r(W))
138
+
            let Y = addressFromStringValue(X)
139
+
            let Z = [ScriptTransfer(Y, M.payments[0].amount, M.payments[0].assetId), ScriptTransfer(Y, M.payments[1].amount, M.payments[1].assetId)]
140
+
            let S = [invoke(z, "stringEntry", [u(Y), V], nil), invoke(z, "integerEntry", [q, W], nil), invoke(z, "integerEntry", [v(W), k], nil)]
141
+
            $Tuple2(Z, S)
132
142
 
            }
133
143
 
        else throw("Strict value is not equal to itself.")
134
144
 
    }
135
145
 
136
146
 

github/deemru/w8io/c3f4982 
27.66 ms ◑