tx · CQkYnqzadwS3gXS8PtokDHfb6iYYGgtffTH5fKV81C2R

3MzcHAM4DcpYKt1ZAMibQmqU69pKQ6qz3i4:  -0.00300000 Waves

2023.03.26 00:22 [2506055] smart account 3MzcHAM4DcpYKt1ZAMibQmqU69pKQ6qz3i4 > SELF 0.00000000 Waves

{ "type": 13, "id": "CQkYnqzadwS3gXS8PtokDHfb6iYYGgtffTH5fKV81C2R", "fee": 300000, "feeAssetId": null, "timestamp": 1679779347971, "version": 2, "chainId": 84, "sender": "3MzcHAM4DcpYKt1ZAMibQmqU69pKQ6qz3i4", "senderPublicKey": "DoAid1WtwHRuonKq6xKkbxijk1QQhXG75vdyuUM7n7NN", "proofs": [ "46oX2ygbgqgJV7C7kRdqmEapg4ofabtPuvtnDWibu8gdAxD7C7k3RDEXzH3Dna3vgaeVnuJpKxtJ7ov9i1qtVkbv" ], "script": "base64:BgIOCAISBAoCCAgSABIAEgASAAZhZG1pbjECLEYxeWpEZGhvV2N0R1A5eW1HckJrVGROSG1FZlBxdk10aUNGWG1ON2lYTmdyAAZhZG1pbjICAAAKcHV6emxlTWludAIjM1BGUWpqRE1pWktRWmR1NUpxVEhEN0h3Z1NYeXA5Unc5QnkAFmtleV9mYXJtTmZ0X25leHROdW1iZXICEmZhcm1OZnRfbmV4dE51bWJlcgAQa2V5X2Zhcm1OZnRfbmFtZQIMZmFybU5mdF9uYW1lABdrZXlfZmFybU5mdF9kZXNjcmlwdGlvbgITZmFybU5mdF9kZXNjcmlwdGlvbgAWa2V5X2Zhcm1OZnRfY29sbGVjdGlvbgISZmFybU5mdF9jb2xsZWN0aW9uABFrZXlfZmFybU5mdF9pbWFnZQINZmFybU5mdF9pbWFnZQAPa2V5X2Nvd05mdF9uYW1lAgtjb3dOZnRfbmFtZQAWa2V5X2Nvd05mdF9kZXNjcmlwdGlvbgISY293TmZ0X2Rlc2NyaXB0aW9uABVrZXlfY293TmZ0X2NvbGxlY3Rpb24CEWNvd05mdF9jb2xsZWN0aW9uABBrZXlfY293TmZ0X2ltYWdlAgxjb3dOZnRfaW1hZ2UABGxpdmUCBkFDVElWRQAEZGVhZAIISU5BQ1RJVkUABmZhdHRlbgIGRkFUVEVOAQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcBA2tleQQHJG1hdGNoMAkAnQgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgABBWFsbG93AQljYWxsZXJQYmsDAwkAAAIFCWNhbGxlclBiawUGYWRtaW4xBgkAAAIFCWNhbGxlclBiawUGYWRtaW4yBgcEAWkBDHJlZ2lzdGVyRmFybQIHYWRkcmVzcwZwYXJhbXMECWNhbGxlclBiawkA2AQBCAUBaQ9jYWxsZXJQdWJsaWNLZXkDCQEFYWxsb3cBBQljYWxsZXJQYmsECXJlY2lwaWVudAkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwQFcF9hcnIJALwJAgUGcGFyYW1zAgF8BAskdDAxNzQ0MTc5NQkAlAoCCQCRAwIFBXBfYXJyAAAJAJEDAgUFcF9hcnIAAQQIZmFybU5hbWUIBQskdDAxNzQ0MTc5NQJfMQQMZmFybUxvY2F0aW9uCAULJHQwMTc0NDE3OTUCXzIEB25leHROdW0JAQ10cnlHZXRJbnRlZ2VyAQUWa2V5X2Zhcm1OZnRfbmV4dE51bWJlcgMJAAACBQduZXh0TnVtBQduZXh0TnVtBAtmYXJtTmZ0TmFtZQkArAICCQEMdHJ5R2V0U3RyaW5nAQUQa2V5X2Zhcm1OZnRfbmFtZQkApAMBBQduZXh0TnVtBBJmYXJtTmZ0RGVzY3JpcHRpb24JAQx0cnlHZXRTdHJpbmcBBRdrZXlfZmFybU5mdF9kZXNjcmlwdGlvbgQRZmFybU5mdENvbGxlY3Rpb24JAQx0cnlHZXRTdHJpbmcBBRZrZXlfZmFybU5mdF9jb2xsZWN0aW9uBAxmYXJtTmZ0SW1hZ2UJAQx0cnlHZXRTdHJpbmcBBRFrZXlfZmFybU5mdF9pbWFnZQQHYXNzZXRJZAoAAUAJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUKcHV6emxlTWludAIEbWludAkAzAgCBQtmYXJtTmZ0TmFtZQkAzAgCBRJmYXJtTmZ0RGVzY3JpcHRpb24JAMwIAgURZmFybU5mdENvbGxlY3Rpb24JAMwIAgUMZmFybU5mdEltYWdlCQDMCAIFDGZhcm1OZnRJbWFnZQkAzAgCAAEJAMwIAgIACQDMCAICAAkAzAgCAgAFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwMJAAACBQdhc3NldElkBQdhc3NldElkCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJcmVjaXBpZW50AAEJANkEAQUHYXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUWa2V5X2Zhcm1OZnRfbmV4dE51bWJlcgkAZAIFB25leHROdW0AAQkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICCQCsAgICBWZhcm1fBQdhZGRyZXNzAgdfc3RhdHVzBgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgIFZmFybV8FB2FkZHJlc3MCBV9uYW1lBQhmYXJtTmFtZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgIFZmFybV8FB2FkZHJlc3MCCV9sb2NhdGlvbgUMZmFybUxvY2F0aW9uBQNuaWwJAJUKAwUHbmV4dE51bQUIZmFybU5hbWUFDGZhcm1Mb2NhdGlvbgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECEk5vdCBhbGxvd2VkIGNhbGxlcgFpAQR0ZXN0AAQBcgoAAUAJAPwHBAUEdGhpcwIEbWludAUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nAwkAAAIFAXIFAXIDBgkAAgEFAXIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQRtaW50AAkAlAoCBQNuaWwAKgFpAQRpbml0AAQJY2FsbGVyUGJrCQDYBAEIBQFpD2NhbGxlclB1YmxpY0tleQMJAQVhbGxvdwEFCWNhbGxlclBiawQHbmV4dE51bQkBDXRyeUdldEludGVnZXIBBRZrZXlfZmFybU5mdF9uZXh0TnVtYmVyAwkBAiE9AgUHbmV4dE51bQAACQACAQIfQ29udHJhY3QgaXMgYWxyZWFkeSBpbml0aWFsaXplZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUWa2V5X2Zhcm1OZnRfbmV4dE51bWJlcgABBQNuaWwJAAIBAhJOb3QgYWxsb3dlZCBjYWxsZXIAP3t+hQ==", "height": 2506055, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: CKFKmjvtTnEe31yRSn5H1SzxAjxBzit113sNyGDSD2VB Next: 6VwaZBNge2Ak9cAyudwShLrkKDHLhDhWW9kkpma6qomA Diff:
OldNewDifferences
55
66 let b = ""
77
8-let c = "farmNft_nextNumber"
8+let c = "3PFQjjDMiZKQZdu5JqTHD7HwgSXyp9Rw9By"
99
10-let d = "Cattle NFT "
10+let d = "farmNft_nextNumber"
1111
12-let e = "Cow NFT"
12+let e = "farmNft_name"
1313
14-let f = "{\"description\": \"NFT for assotiated cattle\", \"image\": \""
14+let f = "farmNft_description"
1515
16-let g = "ACTIVE"
16+let g = "farmNft_collection"
1717
18-let h = "INACTIVE"
18+let h = "farmNft_image"
1919
20-let i = "FATTEN"
20+let i = "cowNft_name"
2121
22-func j (k) = {
23- let l = getInteger(this, k)
24- if ($isInstanceOf(l, "Int"))
22+let j = "cowNft_description"
23+
24+let k = "cowNft_collection"
25+
26+let l = "cowNft_image"
27+
28+let m = "ACTIVE"
29+
30+let n = "INACTIVE"
31+
32+let o = "FATTEN"
33+
34+func p (q) = {
35+ let r = getInteger(this, q)
36+ if ($isInstanceOf(r, "Int"))
2537 then {
26- let m = l
27- m
38+ let s = r
39+ s
2840 }
2941 else 0
3042 }
3143
3244
33-func n (k) = {
34- let l = getString(this, k)
35- if ($isInstanceOf(l, "String"))
45+func t (q) = {
46+ let r = getString(this, q)
47+ if ($isInstanceOf(r, "String"))
3648 then {
37- let o = l
38- o
49+ let u = r
50+ u
3951 }
4052 else ""
4153 }
4254
4355
44-func p (q) = if (if ((q == a))
56+func v (w) = if (if ((w == a))
4557 then true
46- else (q == b))
58+ else (w == b))
4759 then true
4860 else false
4961
5062
51-@Callable(r)
52-func registerFarm (s,t) = {
53- let q = toBase58String(r.callerPublicKey)
54- if (p(q))
63+@Callable(x)
64+func registerFarm (y,z) = {
65+ let w = toBase58String(x.callerPublicKey)
66+ if (v(w))
5567 then {
56- let u = addressFromStringValue(s)
57- let v = split_4C(t, "|")
58- let w = $Tuple3(v[0], v[1], v[2])
59- let x = w._1
60- let y = w._2
61- let z = w._3
62- let A = j(c)
63- if ((A == A))
68+ let A = addressFromStringValue(y)
69+ let B = split_4C(z, "|")
70+ let C = $Tuple2(B[0], B[1])
71+ let D = C._1
72+ let E = C._2
73+ let F = p(d)
74+ if ((F == F))
6475 then {
65- let B = Issue((d + toString(A)), ((f + z) + "\"}"), 1, 0, false)
66- let C = calculateAssetId(B)
67- $Tuple2([B, ScriptTransfer(u, 1, C), IntegerEntry(c, (A + 1)), BooleanEntry((("farm_" + s) + "_status"), true), StringEntry((("farm_" + s) + "_name"), x), StringEntry((("farm_" + s) + "_location"), y)], $Tuple4(A, x, y, z))
76+ let G = (t(e) + toString(F))
77+ let H = t(f)
78+ let I = t(g)
79+ let J = t(h)
80+ let K = {
81+ let L = invoke(addressFromStringValue(c), "mint", [G, H, I, J, J, 1, "", "", ""], nil)
82+ if ($isInstanceOf(L, "String"))
83+ then L
84+ else throw(($getType(L) + " couldn't be cast to String"))
85+ }
86+ if ((K == K))
87+ then $Tuple2([ScriptTransfer(A, 1, fromBase58String(K)), IntegerEntry(d, (F + 1)), BooleanEntry((("farm_" + y) + "_status"), true), StringEntry((("farm_" + y) + "_name"), D), StringEntry((("farm_" + y) + "_location"), E)], $Tuple3(F, D, E))
88+ else throw("Strict value is not equal to itself.")
6889 }
6990 else throw("Strict value is not equal to itself.")
7091 }
7394
7495
7596
76-@Callable(r)
77-func registerCow (s,t) = {
78- let q = toBase58String(r.callerPublicKey)
79- if (p(q))
80- then {
81- let u = addressFromStringValue(s)
82- let v = split_4C(t, t)
83- let D = $Tuple7(v[0], v[1], v[2], v[3], v[4], v[5], v[6])
84- let E = D._1
85- let F = D._2
86- let G = D._3
87- let H = D._4
88- let I = D._5
89- let J = D._6
90- let z = D._7
91- let K = (((((((((((((("{\"cowCode\": \"" + E) + "\", \"bornedFarmAddress\": \"") + F) + "\", \"genes\": \"") + G) + "\", \"motherId\": \"") + H) + "\", \"fatherId\": \"") + I) + "\", \"type\": \"") + J) + "\", \"imageLink\": \"") + z) + "\"")
92- let B = Issue(e, ((K + z) + "\"}"), 1, 0, false)
93- let C = calculateAssetId(B)
94-[B, ScriptTransfer(u, 1, C), StringEntry((((("farm_" + s) + "_cow_") + toBase58String(C)) + "_status"), g), StringEntry((("cow_" + toBase58String(C)) + "_owner"), s)]
95- }
96- else throw("Not allowed caller")
97+@Callable(x)
98+func test () = {
99+ let M = {
100+ let L = invoke(this, "mint", nil, nil)
101+ if ($isInstanceOf(L, "String"))
102+ then L
103+ else throw(($getType(L) + " couldn't be cast to String"))
104+ }
105+ if ((M == M))
106+ then if (true)
107+ then throw(M)
108+ else nil
109+ else throw("Strict value is not equal to itself.")
97110 }
98111
99112
100113
101-@Callable(r)
114+@Callable(x)
115+func mint () = $Tuple2(nil, 42)
116+
117+
118+
119+@Callable(x)
102120 func init () = {
103- let q = toBase58String(r.callerPublicKey)
104- if (p(q))
121+ let w = toBase58String(x.callerPublicKey)
122+ if (v(w))
105123 then {
106- let A = j(c)
107- if ((A != 0))
124+ let F = p(d)
125+ if ((F != 0))
108126 then throw("Contract is already initialized")
109- else [IntegerEntry(c, 1)]
127+ else [IntegerEntry(d, 1)]
110128 }
111129 else throw("Not allowed caller")
112130 }
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = "F1yjDdhoWctGP9ymGrBkTdNHmEfPqvMtiCFXmN7iXNgr"
55
66 let b = ""
77
8-let c = "farmNft_nextNumber"
8+let c = "3PFQjjDMiZKQZdu5JqTHD7HwgSXyp9Rw9By"
99
10-let d = "Cattle NFT "
10+let d = "farmNft_nextNumber"
1111
12-let e = "Cow NFT"
12+let e = "farmNft_name"
1313
14-let f = "{\"description\": \"NFT for assotiated cattle\", \"image\": \""
14+let f = "farmNft_description"
1515
16-let g = "ACTIVE"
16+let g = "farmNft_collection"
1717
18-let h = "INACTIVE"
18+let h = "farmNft_image"
1919
20-let i = "FATTEN"
20+let i = "cowNft_name"
2121
22-func j (k) = {
23- let l = getInteger(this, k)
24- if ($isInstanceOf(l, "Int"))
22+let j = "cowNft_description"
23+
24+let k = "cowNft_collection"
25+
26+let l = "cowNft_image"
27+
28+let m = "ACTIVE"
29+
30+let n = "INACTIVE"
31+
32+let o = "FATTEN"
33+
34+func p (q) = {
35+ let r = getInteger(this, q)
36+ if ($isInstanceOf(r, "Int"))
2537 then {
26- let m = l
27- m
38+ let s = r
39+ s
2840 }
2941 else 0
3042 }
3143
3244
33-func n (k) = {
34- let l = getString(this, k)
35- if ($isInstanceOf(l, "String"))
45+func t (q) = {
46+ let r = getString(this, q)
47+ if ($isInstanceOf(r, "String"))
3648 then {
37- let o = l
38- o
49+ let u = r
50+ u
3951 }
4052 else ""
4153 }
4254
4355
44-func p (q) = if (if ((q == a))
56+func v (w) = if (if ((w == a))
4557 then true
46- else (q == b))
58+ else (w == b))
4759 then true
4860 else false
4961
5062
51-@Callable(r)
52-func registerFarm (s,t) = {
53- let q = toBase58String(r.callerPublicKey)
54- if (p(q))
63+@Callable(x)
64+func registerFarm (y,z) = {
65+ let w = toBase58String(x.callerPublicKey)
66+ if (v(w))
5567 then {
56- let u = addressFromStringValue(s)
57- let v = split_4C(t, "|")
58- let w = $Tuple3(v[0], v[1], v[2])
59- let x = w._1
60- let y = w._2
61- let z = w._3
62- let A = j(c)
63- if ((A == A))
68+ let A = addressFromStringValue(y)
69+ let B = split_4C(z, "|")
70+ let C = $Tuple2(B[0], B[1])
71+ let D = C._1
72+ let E = C._2
73+ let F = p(d)
74+ if ((F == F))
6475 then {
65- let B = Issue((d + toString(A)), ((f + z) + "\"}"), 1, 0, false)
66- let C = calculateAssetId(B)
67- $Tuple2([B, ScriptTransfer(u, 1, C), IntegerEntry(c, (A + 1)), BooleanEntry((("farm_" + s) + "_status"), true), StringEntry((("farm_" + s) + "_name"), x), StringEntry((("farm_" + s) + "_location"), y)], $Tuple4(A, x, y, z))
76+ let G = (t(e) + toString(F))
77+ let H = t(f)
78+ let I = t(g)
79+ let J = t(h)
80+ let K = {
81+ let L = invoke(addressFromStringValue(c), "mint", [G, H, I, J, J, 1, "", "", ""], nil)
82+ if ($isInstanceOf(L, "String"))
83+ then L
84+ else throw(($getType(L) + " couldn't be cast to String"))
85+ }
86+ if ((K == K))
87+ then $Tuple2([ScriptTransfer(A, 1, fromBase58String(K)), IntegerEntry(d, (F + 1)), BooleanEntry((("farm_" + y) + "_status"), true), StringEntry((("farm_" + y) + "_name"), D), StringEntry((("farm_" + y) + "_location"), E)], $Tuple3(F, D, E))
88+ else throw("Strict value is not equal to itself.")
6889 }
6990 else throw("Strict value is not equal to itself.")
7091 }
7192 else throw("Not allowed caller")
7293 }
7394
7495
7596
76-@Callable(r)
77-func registerCow (s,t) = {
78- let q = toBase58String(r.callerPublicKey)
79- if (p(q))
80- then {
81- let u = addressFromStringValue(s)
82- let v = split_4C(t, t)
83- let D = $Tuple7(v[0], v[1], v[2], v[3], v[4], v[5], v[6])
84- let E = D._1
85- let F = D._2
86- let G = D._3
87- let H = D._4
88- let I = D._5
89- let J = D._6
90- let z = D._7
91- let K = (((((((((((((("{\"cowCode\": \"" + E) + "\", \"bornedFarmAddress\": \"") + F) + "\", \"genes\": \"") + G) + "\", \"motherId\": \"") + H) + "\", \"fatherId\": \"") + I) + "\", \"type\": \"") + J) + "\", \"imageLink\": \"") + z) + "\"")
92- let B = Issue(e, ((K + z) + "\"}"), 1, 0, false)
93- let C = calculateAssetId(B)
94-[B, ScriptTransfer(u, 1, C), StringEntry((((("farm_" + s) + "_cow_") + toBase58String(C)) + "_status"), g), StringEntry((("cow_" + toBase58String(C)) + "_owner"), s)]
95- }
96- else throw("Not allowed caller")
97+@Callable(x)
98+func test () = {
99+ let M = {
100+ let L = invoke(this, "mint", nil, nil)
101+ if ($isInstanceOf(L, "String"))
102+ then L
103+ else throw(($getType(L) + " couldn't be cast to String"))
104+ }
105+ if ((M == M))
106+ then if (true)
107+ then throw(M)
108+ else nil
109+ else throw("Strict value is not equal to itself.")
97110 }
98111
99112
100113
101-@Callable(r)
114+@Callable(x)
115+func mint () = $Tuple2(nil, 42)
116+
117+
118+
119+@Callable(x)
102120 func init () = {
103- let q = toBase58String(r.callerPublicKey)
104- if (p(q))
121+ let w = toBase58String(x.callerPublicKey)
122+ if (v(w))
105123 then {
106- let A = j(c)
107- if ((A != 0))
124+ let F = p(d)
125+ if ((F != 0))
108126 then throw("Contract is already initialized")
109- else [IntegerEntry(c, 1)]
127+ else [IntegerEntry(d, 1)]
110128 }
111129 else throw("Not allowed caller")
112130 }
113131
114132

github/deemru/w8io/169f3d6 
74.27 ms