tx · Hc5NxFAYykVAm27kKY7w7DS2j7HxHbS1vmksieSEwRUH

3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb:  -0.00300000 Waves

2023.03.16 00:04 [2491655] smart account 3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb > SELF 0.00000000 Waves

{ "type": 13, "id": "Hc5NxFAYykVAm27kKY7w7DS2j7HxHbS1vmksieSEwRUH", "fee": 300000, "feeAssetId": null, "timestamp": 1678914257839, "version": 2, "chainId": 84, "sender": "3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb", "senderPublicKey": "2VQGRNRWyFAZvjDtkgZwdZcTwZvBJJ61n8zJfYYxm5eK", "proofs": [ "2xuMPJc2u7SDJaKJzgZPAkGYp4p685tZJspLeTWfNJN2up7b2jyTcToiKKofvim92XNJ3PMJ73PjD83cgceB19J9" ], "script": "base64:BgI3CAISBAoCGBgSBAoCGBgSAwoBCBIDCgEIEgQKAggIEgUKAwgICBIDCgECEgUKAwgICBIECgIICAgADmNvbGxlY3Rpb25OYW1lCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAg5jb2xsZWN0aW9uTmFtZQAGc3ltYm9sCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAgZzeW1ib2wAC2Rlc2NyaXB0aW9uCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAgtkZXNjcmlwdGlvbgALdG90YWxBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMCC3RvdGFsQW1vdW50AAhkQXBwSnNvbgkBB0FkZHJlc3MBCQDZBAECIzNNckdhWlZSaGtuRUdmSEoxOXR0VVBObkRSb0ZxY0hoVk43AAx0b2tlblBheW1lbnQJAQdBZGRyZXNzAQkBEUBleHRyTmF0aXZlKDEwNTIpAgUEdGhpcwIMdG9rZW5QYXltZW50AQxvbmx5SW50ZXJuYWwBBmNhbGxlcgMJAAACBQZjYWxsZXIFBHRoaXMFBHVuaXQJAAIBAhJPbmx5IGludGVybmFsIGNhbGwBDXRyYW5zZmVyT3JOb3QCAnRvB2Fzc2V0SWQDCQAAAgUCdG8FBHRoaXMJAQtTdHJpbmdFbnRyeQICDtC60L7RgdGC0YvQu9GMAg7QutC+0YHRgtGL0LvRjAkBDlNjcmlwdFRyYW5zZmVyAwUCdG8AAQUHYXNzZXRJZAkBaQEQbWFrZUpTT05JbnRlcm5hbAIHYXJyS2V5cwlhcnJWYWx1ZXMJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIEA3JlcwkA/AcEBQhkQXBwSnNvbgIIbWFrZUpTT04JAMwIAgUHYXJyS2V5cwkAzAgCBQlhcnJWYWx1ZXMFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzCQCUCgIFA25pbAUDcmVzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEWFkZFRvSlNPTkludGVybmFsAgdhcnJLZXlzCWFyclZhbHVlcwkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAglhZGRUb0pTT04JAMwIAgUHYXJyS2V5cwkAzAgCBQlhcnJWYWx1ZXMFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzCQCUCgIFA25pbAUDcmVzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBFXJlYWRCeUpTT05LZXlJbnRlcm5hbAEDa2V5CQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBANyZXMJAPwHBAUIZEFwcEpzb24CDXJlYWRCeUpTT05LZXkJAMwIAgUDa2V5BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdkZWxldGVCeUpTT05LZXlJbnRlcm5hbAEDa2V5CQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBANyZXMJAPwHBAUIZEFwcEpzb24CD2RlbGV0ZUJ5SlNPTktleQkAzAgCBQNrZXkFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzCQCUCgIFA25pbAUDcmVzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBE3N0b3JhZ2VKc29uSW50ZXJuYWwCB2pzb25LZXkKanNvblN0cmluZwkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCBQdqc29uS2V5BQpqc29uU3RyaW5nBQNuaWwBaQEHc2V0VXNlcgMHYXNzZXRJZAR1c2VyB2V4cGlyZXMJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIEA3JlcwkA/AcEBQhkQXBwSnNvbgIIbWFrZUpTT04JAMwIAgkAzAgCAgR1c2VyCQDMCAICB2V4cGlyZXMFA25pbAkAzAgCCQDMCAIFBHVzZXIJAMwIAgUHZXhwaXJlcwUDbmlsBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIHdXNlck9mLQUHYXNzZXRJZAoAAUAFA3JlcwMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcFA25pbAUDcmVzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBD3NldFRva2VuUGF5bWVudAEHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELQmluYXJ5RW50cnkCAgx0b2tlblBheW1lbnQFB2Fzc2V0SWQFA25pbAFpAQRpbml0Aw5jb2xsZWN0aW9uTmFtZQZzeW1ib2wLZGVzY3JpcHRpb24JAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgIOY29sbGVjdGlvbk5hbWUFDmNvbGxlY3Rpb25OYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQICBnN5bWJvbAUGc3ltYm9sCQDMCAIJAQtTdHJpbmdFbnRyeQICC2Rlc2NyaXB0aW9uBQtkZXNjcmlwdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgILdG90YWxBbW91bnQAAAUDbmlsAWkBBG1pbnQCAnRvCHRva2VuVVJJCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBAd0b2tlbklkCQBkAgULdG90YWxBbW91bnQAAQQHcHJlTmFtZQkArAICCQCsAgIFBnN5bWJvbAIBIwkApAMBBQd0b2tlbklkBARuYW1lAwkAZwIAEAkAsQIBBQdwcmVOYW1lBQdwcmVOYW1lCQCkAwEFB3Rva2VuSWQEBWFzc2V0CQDDCAcFBG5hbWUJAKwCAgkArAICAgZ7dXJpOiIFCHRva2VuVVJJAgIifQABAAAHBQR1bml0BQZoZWlnaHQEB2Fzc2V0SWQJALgIAQUFYXNzZXQECXRvQWRkcmVzcwkBB0FkZHJlc3MBCQDZBAEFAnRvBAh0cmFuc2ZlcgkBDXRyYW5zZmVyT3JOb3QCBQl0b0FkZHJlc3MFB2Fzc2V0SWQDCQAAAgUIdHJhbnNmZXIFCHRyYW5zZmVyCQDMCAIFBWFzc2V0CQDMCAIFCHRyYW5zZmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgt0b3RhbEFtb3VudAUHdG9rZW5JZAkAzAgCCQELU3RyaW5nRW50cnkCBQRuYW1lBQh0b2tlblVSSQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAMC1zqE=", "height": 2491655, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: CuwEoXYFkyPsDt3j2pBgkVsD9PUQQg6UF5p1bJW1UVuw Next: BsCrNyVKeMHgGDJcaeAF4GMprBkgQ72cvqucJ1g9ftAC Diff:
OldNewDifferences
1111
1212 let e = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
1313
14-func f (g) = if ((g == this))
14+let f = Address(getBinaryValue(this, "tokenPayment"))
15+
16+func g (h) = if ((h == this))
1517 then unit
1618 else throw("Only internal call")
1719
1820
19-func h (i,j) = if ((i == this))
21+func i (j,k) = if ((j == this))
2022 then StringEntry("костыль", "костыль")
21- else ScriptTransfer(i, 1, j)
23+ else ScriptTransfer(j, 1, k)
2224
2325
24-@Callable(k)
25-func makeJSONInternal (l,m) = valueOrElse(f(k.caller), {
26- let n = invoke(e, "makeJSON", [l, m], nil)
27- if ((n == n))
28- then $Tuple2(nil, n)
26+@Callable(l)
27+func makeJSONInternal (m,n) = valueOrElse(g(l.caller), {
28+ let o = invoke(e, "makeJSON", [m, n], nil)
29+ if ((o == o))
30+ then $Tuple2(nil, o)
2931 else throw("Strict value is not equal to itself.")
3032 })
3133
3234
3335
34-@Callable(k)
35-func addToJSONInternal (l,m) = valueOrElse(f(k.caller), {
36- let n = invoke(e, "addToJSON", [l, m], nil)
37- if ((n == n))
38- then $Tuple2(nil, n)
36+@Callable(l)
37+func addToJSONInternal (m,n) = valueOrElse(g(l.caller), {
38+ let o = invoke(e, "addToJSON", [m, n], nil)
39+ if ((o == o))
40+ then $Tuple2(nil, o)
3941 else throw("Strict value is not equal to itself.")
4042 })
4143
4244
4345
44-@Callable(k)
45-func readByJSONKeyInternal (o) = valueOrElse(f(k.caller), {
46- let n = invoke(e, "readByJSONKey", [o], nil)
47- if ((n == n))
48- then $Tuple2(nil, n)
46+@Callable(l)
47+func readByJSONKeyInternal (p) = valueOrElse(g(l.caller), {
48+ let o = invoke(e, "readByJSONKey", [p], nil)
49+ if ((o == o))
50+ then $Tuple2(nil, o)
4951 else throw("Strict value is not equal to itself.")
5052 })
5153
5254
5355
54-@Callable(k)
55-func deleteByJSONKeyInternal (o) = valueOrElse(f(k.caller), {
56- let n = invoke(e, "deleteByJSONKey", [o], nil)
57- if ((n == n))
58- then $Tuple2(nil, n)
56+@Callable(l)
57+func deleteByJSONKeyInternal (p) = valueOrElse(g(l.caller), {
58+ let o = invoke(e, "deleteByJSONKey", [p], nil)
59+ if ((o == o))
60+ then $Tuple2(nil, o)
5961 else throw("Strict value is not equal to itself.")
6062 })
6163
6264
6365
64-@Callable(k)
65-func storageJsonInternal (p,q) = valueOrElse(f(k.caller), [StringEntry(p, q)])
66+@Callable(l)
67+func storageJsonInternal (q,r) = valueOrElse(g(l.caller), [StringEntry(q, r)])
6668
6769
6870
69-@Callable(k)
70-func setUser (j,r,s) = valueOrElse(f(k.caller), {
71- let n = invoke(e, "makeJSON", [["user", "expires"], [r, s]], nil)
72- if ((n == n))
73- then $Tuple2([StringEntry(("userOf-" + j), {
74- let t = n
75- if ($isInstanceOf(t, "String"))
76- then t
77- else throw(($getType(t) + " couldn't be cast to String"))
78- })], n)
71+@Callable(l)
72+func setUser (k,s,t) = valueOrElse(g(l.caller), {
73+ let o = invoke(e, "makeJSON", [["user", "expires"], [s, t]], nil)
74+ if ((o == o))
75+ then $Tuple2([StringEntry(("userOf-" + k), {
76+ let u = o
77+ if ($isInstanceOf(u, "String"))
78+ then u
79+ else throw(($getType(u) + " couldn't be cast to String"))
80+ })], o)
7981 else throw("Strict value is not equal to itself.")
8082 })
8183
8284
8385
84-@Callable(k)
85-func init (a,b,c) = valueOrElse(f(k.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
86+@Callable(l)
87+func setTokenPayment (k) = valueOrElse(g(l.caller), [BinaryEntry("tokenPayment", k)])
8688
8789
8890
89-@Callable(k)
90-func mint (i,u) = valueOrElse(f(k.caller), {
91- let v = (d + 1)
92- let w = ((b + "#") + toString(v))
93- let x = if ((16 >= size(w)))
94- then w
95- else toString(v)
96- let y = Issue(x, (("{uri:\"" + u) + "\"}"), 1, 0, false, unit, height)
97- let j = calculateAssetId(y)
98- let z = Address(fromBase58String(i))
99- let A = h(z, j)
100- if ((A == A))
101- then [y, A, IntegerEntry("totalAmount", v), StringEntry(x, u)]
91+@Callable(l)
92+func init (a,b,c) = valueOrElse(g(l.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
93+
94+
95+
96+@Callable(l)
97+func mint (j,v) = valueOrElse(g(l.caller), {
98+ let w = (d + 1)
99+ let x = ((b + "#") + toString(w))
100+ let y = if ((16 >= size(x)))
101+ then x
102+ else toString(w)
103+ let z = Issue(y, (("{uri:\"" + v) + "\"}"), 1, 0, false, unit, height)
104+ let k = calculateAssetId(z)
105+ let A = Address(fromBase58String(j))
106+ let B = i(A, k)
107+ if ((B == B))
108+ then [z, B, IntegerEntry("totalAmount", w), StringEntry(y, v)]
102109 else throw("Strict value is not equal to itself.")
103110 })
104111
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = getStringValue(this, "collectionName")
55
66 let b = getStringValue(this, "symbol")
77
88 let c = getStringValue(this, "description")
99
1010 let d = getIntegerValue(this, "totalAmount")
1111
1212 let e = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
1313
14-func f (g) = if ((g == this))
14+let f = Address(getBinaryValue(this, "tokenPayment"))
15+
16+func g (h) = if ((h == this))
1517 then unit
1618 else throw("Only internal call")
1719
1820
19-func h (i,j) = if ((i == this))
21+func i (j,k) = if ((j == this))
2022 then StringEntry("костыль", "костыль")
21- else ScriptTransfer(i, 1, j)
23+ else ScriptTransfer(j, 1, k)
2224
2325
24-@Callable(k)
25-func makeJSONInternal (l,m) = valueOrElse(f(k.caller), {
26- let n = invoke(e, "makeJSON", [l, m], nil)
27- if ((n == n))
28- then $Tuple2(nil, n)
26+@Callable(l)
27+func makeJSONInternal (m,n) = valueOrElse(g(l.caller), {
28+ let o = invoke(e, "makeJSON", [m, n], nil)
29+ if ((o == o))
30+ then $Tuple2(nil, o)
2931 else throw("Strict value is not equal to itself.")
3032 })
3133
3234
3335
34-@Callable(k)
35-func addToJSONInternal (l,m) = valueOrElse(f(k.caller), {
36- let n = invoke(e, "addToJSON", [l, m], nil)
37- if ((n == n))
38- then $Tuple2(nil, n)
36+@Callable(l)
37+func addToJSONInternal (m,n) = valueOrElse(g(l.caller), {
38+ let o = invoke(e, "addToJSON", [m, n], nil)
39+ if ((o == o))
40+ then $Tuple2(nil, o)
3941 else throw("Strict value is not equal to itself.")
4042 })
4143
4244
4345
44-@Callable(k)
45-func readByJSONKeyInternal (o) = valueOrElse(f(k.caller), {
46- let n = invoke(e, "readByJSONKey", [o], nil)
47- if ((n == n))
48- then $Tuple2(nil, n)
46+@Callable(l)
47+func readByJSONKeyInternal (p) = valueOrElse(g(l.caller), {
48+ let o = invoke(e, "readByJSONKey", [p], nil)
49+ if ((o == o))
50+ then $Tuple2(nil, o)
4951 else throw("Strict value is not equal to itself.")
5052 })
5153
5254
5355
54-@Callable(k)
55-func deleteByJSONKeyInternal (o) = valueOrElse(f(k.caller), {
56- let n = invoke(e, "deleteByJSONKey", [o], nil)
57- if ((n == n))
58- then $Tuple2(nil, n)
56+@Callable(l)
57+func deleteByJSONKeyInternal (p) = valueOrElse(g(l.caller), {
58+ let o = invoke(e, "deleteByJSONKey", [p], nil)
59+ if ((o == o))
60+ then $Tuple2(nil, o)
5961 else throw("Strict value is not equal to itself.")
6062 })
6163
6264
6365
64-@Callable(k)
65-func storageJsonInternal (p,q) = valueOrElse(f(k.caller), [StringEntry(p, q)])
66+@Callable(l)
67+func storageJsonInternal (q,r) = valueOrElse(g(l.caller), [StringEntry(q, r)])
6668
6769
6870
69-@Callable(k)
70-func setUser (j,r,s) = valueOrElse(f(k.caller), {
71- let n = invoke(e, "makeJSON", [["user", "expires"], [r, s]], nil)
72- if ((n == n))
73- then $Tuple2([StringEntry(("userOf-" + j), {
74- let t = n
75- if ($isInstanceOf(t, "String"))
76- then t
77- else throw(($getType(t) + " couldn't be cast to String"))
78- })], n)
71+@Callable(l)
72+func setUser (k,s,t) = valueOrElse(g(l.caller), {
73+ let o = invoke(e, "makeJSON", [["user", "expires"], [s, t]], nil)
74+ if ((o == o))
75+ then $Tuple2([StringEntry(("userOf-" + k), {
76+ let u = o
77+ if ($isInstanceOf(u, "String"))
78+ then u
79+ else throw(($getType(u) + " couldn't be cast to String"))
80+ })], o)
7981 else throw("Strict value is not equal to itself.")
8082 })
8183
8284
8385
84-@Callable(k)
85-func init (a,b,c) = valueOrElse(f(k.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
86+@Callable(l)
87+func setTokenPayment (k) = valueOrElse(g(l.caller), [BinaryEntry("tokenPayment", k)])
8688
8789
8890
89-@Callable(k)
90-func mint (i,u) = valueOrElse(f(k.caller), {
91- let v = (d + 1)
92- let w = ((b + "#") + toString(v))
93- let x = if ((16 >= size(w)))
94- then w
95- else toString(v)
96- let y = Issue(x, (("{uri:\"" + u) + "\"}"), 1, 0, false, unit, height)
97- let j = calculateAssetId(y)
98- let z = Address(fromBase58String(i))
99- let A = h(z, j)
100- if ((A == A))
101- then [y, A, IntegerEntry("totalAmount", v), StringEntry(x, u)]
91+@Callable(l)
92+func init (a,b,c) = valueOrElse(g(l.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
93+
94+
95+
96+@Callable(l)
97+func mint (j,v) = valueOrElse(g(l.caller), {
98+ let w = (d + 1)
99+ let x = ((b + "#") + toString(w))
100+ let y = if ((16 >= size(x)))
101+ then x
102+ else toString(w)
103+ let z = Issue(y, (("{uri:\"" + v) + "\"}"), 1, 0, false, unit, height)
104+ let k = calculateAssetId(z)
105+ let A = Address(fromBase58String(j))
106+ let B = i(A, k)
107+ if ((B == B))
108+ then [z, B, IntegerEntry("totalAmount", w), StringEntry(y, v)]
102109 else throw("Strict value is not equal to itself.")
103110 })
104111
105112

github/deemru/w8io/026f985 
36.50 ms