tx · DaAdLE1piJi4mhdZybbk3vALHm1owdBuyLEW5d9mh1V7

3MzcHAM4DcpYKt1ZAMibQmqU69pKQ6qz3i4:  -0.00200000 Waves

2023.03.26 00:39 [2506075] smart account 3MzcHAM4DcpYKt1ZAMibQmqU69pKQ6qz3i4 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DaAdLE1piJi4mhdZybbk3vALHm1owdBuyLEW5d9mh1V7",
    "fee": 200000,
    "feeAssetId": null,
    "timestamp": 1679780393154,
    "version": 2,
    "chainId": 84,
    "sender": "3MzcHAM4DcpYKt1ZAMibQmqU69pKQ6qz3i4",
    "senderPublicKey": "DoAid1WtwHRuonKq6xKkbxijk1QQhXG75vdyuUM7n7NN",
    "proofs": [
        "2pqEzAnT2YuAN3os7hbeTeFnNGdoWJnLANJ1ZUAjFMJSjaZjTcWFy1bWH2CgVrChgFNiuPGHUu9PuTUfikb68FhT"
    ],
    "script": "base64:BgIKCAISBAoCCAgSABIABmFkbWluMQIsRjF5akRkaG9XY3RHUDl5bUdyQmtUZE5IbUVmUHF2TXRpQ0ZYbU43aVhOZ3IABmFkbWluMgIAAApwdXp6bGVNaW50AiMzUEZRampETWlaS1FaZHU1SnFUSEQ3SHdnU1h5cDlSdzlCeQAWa2V5X2Zhcm1OZnRfbmV4dE51bWJlcgISZmFybU5mdF9uZXh0TnVtYmVyABBrZXlfZmFybU5mdF9uYW1lAgxmYXJtTmZ0X25hbWUAF2tleV9mYXJtTmZ0X2Rlc2NyaXB0aW9uAhNmYXJtTmZ0X2Rlc2NyaXB0aW9uABZrZXlfZmFybU5mdF9jb2xsZWN0aW9uAhJmYXJtTmZ0X2NvbGxlY3Rpb24AEWtleV9mYXJtTmZ0X2ltYWdlAg1mYXJtTmZ0X2ltYWdlAA9rZXlfY293TmZ0X25hbWUCC2Nvd05mdF9uYW1lABZrZXlfY293TmZ0X2Rlc2NyaXB0aW9uAhJjb3dOZnRfZGVzY3JpcHRpb24AFWtleV9jb3dOZnRfY29sbGVjdGlvbgIRY293TmZ0X2NvbGxlY3Rpb24AEGtleV9jb3dOZnRfaW1hZ2UCDGNvd05mdF9pbWFnZQAEbGl2ZQIGQUNUSVZFAARkZWFkAghJTkFDVElWRQAGZmF0dGVuAgZGQVRURU4BDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEFYWxsb3cBCWNhbGxlclBiawMDCQAAAgUJY2FsbGVyUGJrBQZhZG1pbjEGCQAAAgUJY2FsbGVyUGJrBQZhZG1pbjIGBwIBaQEMcmVnaXN0ZXJGYXJtAgdhZGRyZXNzBnBhcmFtcwQJY2FsbGVyUGJrCQDYBAEIBQFpD2NhbGxlclB1YmxpY0tleQMJAQVhbGxvdwEFCWNhbGxlclBiawQJcmVjaXBpZW50CQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzBAVwX2FycgkAvAkCBQZwYXJhbXMCAXwECyR0MDE3NDQxNzk1CQCUCgIJAJEDAgUFcF9hcnIAAAkAkQMCBQVwX2FycgABBAhmYXJtTmFtZQgFCyR0MDE3NDQxNzk1Al8xBAxmYXJtTG9jYXRpb24IBQskdDAxNzQ0MTc5NQJfMgQHbmV4dE51bQkBDXRyeUdldEludGVnZXIBBRZrZXlfZmFybU5mdF9uZXh0TnVtYmVyAwkAAAIFB25leHROdW0FB25leHROdW0EC2Zhcm1OZnROYW1lCQCsAgIJAQx0cnlHZXRTdHJpbmcBBRBrZXlfZmFybU5mdF9uYW1lCQCkAwEFB25leHROdW0EEmZhcm1OZnREZXNjcmlwdGlvbgkBDHRyeUdldFN0cmluZwEFF2tleV9mYXJtTmZ0X2Rlc2NyaXB0aW9uBAVpc3N1ZQkAwggFBQtmYXJtTmZ0TmFtZQUSZmFybU5mdERlc2NyaXB0aW9uAAEAAAcEAmlkCQC4CAEFBWlzc3VlCQCUCgIJAMwIAgUFaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJcmVjaXBpZW50AAEFAmlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRZrZXlfZmFybU5mdF9uZXh0TnVtYmVyCQBkAgUHbmV4dE51bQABCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIJAKwCAgIFZmFybV8FB2FkZHJlc3MCB19zdGF0dXMGCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICAgVmYXJtXwUHYWRkcmVzcwIFX25hbWUFCGZhcm1OYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICAgVmYXJtXwUHYWRkcmVzcwIJX2xvY2F0aW9uBQxmYXJtTG9jYXRpb24FA25pbAkAlQoDBQduZXh0TnVtBQhmYXJtTmFtZQUMZmFybUxvY2F0aW9uCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQISTm90IGFsbG93ZWQgY2FsbGVyAWkBBGluaXQABAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5AwkBBWFsbG93AQUJY2FsbGVyUGJrBAduZXh0TnVtCQENdHJ5R2V0SW50ZWdlcgEFFmtleV9mYXJtTmZ0X25leHROdW1iZXIDCQECIT0CBQduZXh0TnVtAAAJAAIBAh9Db250cmFjdCBpcyBhbHJlYWR5IGluaXRpYWxpemVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRZrZXlfZmFybU5mdF9uZXh0TnVtYmVyAAEFA25pbAkAAgECEk5vdCBhbGxvd2VkIGNhbGxlcgBqy5tG",
    "height": 2506075,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6VwaZBNge2Ak9cAyudwShLrkKDHLhDhWW9kkpma6qomA
Next: 8mvjCJpdqrjTbXqXWgADL3k8PhTEu1FiiHkcPWyUMJk9

Diff: 
Old
New
Differences
59
59
 
    let callerPbk = toBase58String(i.callerPublicKey)
60
60
 
    if (allow(callerPbk))
61
61
 
        then {
62
-
            let recipient = addressFromStringValue("3MwtjV2Q62CNSqKwM3Hzspy6DdwrvxE8P9F")
62
+
            let recipient = addressFromStringValue(address)
63
63
 
            let p_arr = split_4C(params, "|")
64
-
            let $t017741825 = $Tuple2(p_arr[0], p_arr[1])
65
-
            let farmName = $t017741825._1
66
-
            let farmLocation = $t017741825._2
64
+
            let $t017441795 = $Tuple2(p_arr[0], p_arr[1])
65
+
            let farmName = $t017441795._1
66
+
            let farmLocation = $t017441795._2
67
67
 
            let nextNum = tryGetInteger(key_farmNft_nextNumber)
68
68
 
            if ((nextNum == nextNum))
69
69
 
                then {
70
70
 
                    let farmNftName = (tryGetString(key_farmNft_name) + toString(nextNum))
71
71
 
                    let farmNftDescription = tryGetString(key_farmNft_description)
72
-
                    let farmNftCollection = tryGetString(key_farmNft_collection)
73
-
                    let farmNftImage = tryGetString(key_farmNft_image)
74
-
                    let assetId = {
75
-
                        let @ = invoke(addressFromStringValue(puzzleMint), "mint", [farmNftName, farmNftDescription, farmNftCollection, farmNftImage, farmNftImage, 1, "", "", ""], nil)
76
-
                        if ($isInstanceOf(@, "String"))
77
-
                            then @
78
-
                            else throw(($getType(@) + " couldn't be cast to String"))
79
-
                        }
80
-
                    if ((assetId == assetId))
81
-
                        then $Tuple2([ScriptTransfer(recipient, 1, fromBase58String(assetId)), IntegerEntry(key_farmNft_nextNumber, (nextNum + 1)), BooleanEntry((("farm_" + address) + "_status"), true), StringEntry((("farm_" + address) + "_name"), farmName), StringEntry((("farm_" + address) + "_location"), farmLocation)], $Tuple3(nextNum, farmName, farmLocation))
82
-
                        else throw("Strict value is not equal to itself.")
72
+
                    let issue = Issue(farmNftName, farmNftDescription, 1, 0, false)
73
+
                    let id = calculateAssetId(issue)
74
+
                    $Tuple2([issue, ScriptTransfer(recipient, 1, id), IntegerEntry(key_farmNft_nextNumber, (nextNum + 1)), BooleanEntry((("farm_" + address) + "_status"), true), StringEntry((("farm_" + address) + "_name"), farmName), StringEntry((("farm_" + address) + "_location"), farmLocation)], $Tuple3(nextNum, farmName, farmLocation))
83
75
 
                    }
84
76
 
                else throw("Strict value is not equal to itself.")
85
77
 
            }
86
78
 
        else throw("Not allowed caller")
87
79
 
    }
88
-
89
-
90
-
91
-
@Callable(i)
92
-
func test () = {
93
-
    let r = {
94
-
        let @ = invoke(this, "mint", nil, nil)
95
-
        if ($isInstanceOf(@, "String"))
96
-
            then @
97
-
            else throw(($getType(@) + " couldn't be cast to String"))
98
-
        }
99
-
    if ((r == r))
100
-
        then if (true)
101
-
            then throw(r)
102
-
            else nil
103
-
        else throw("Strict value is not equal to itself.")
104
-
    }
105
-
106
-
107
-
108
-
@Callable(i)
109
-
func mint () = $Tuple2(nil, 42)
110
80
 
111
81
 
112
82
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let admin1 = "F1yjDdhoWctGP9ymGrBkTdNHmEfPqvMtiCFXmN7iXNgr"
5
5
 
6
6
 
let admin2 = ""
7
7
 
8
8
 
let puzzleMint = "3PFQjjDMiZKQZdu5JqTHD7HwgSXyp9Rw9By"
9
9
 
10
10
 
let key_farmNft_nextNumber = "farmNft_nextNumber"
11
11
 
12
12
 
let key_farmNft_name = "farmNft_name"
13
13
 
14
14
 
let key_farmNft_description = "farmNft_description"
15
15
 
16
16
 
let key_farmNft_collection = "farmNft_collection"
17
17
 
18
18
 
let key_farmNft_image = "farmNft_image"
19
19
 
20
20
 
let key_cowNft_name = "cowNft_name"
21
21
 
22
22
 
let key_cowNft_description = "cowNft_description"
23
23
 
24
24
 
let key_cowNft_collection = "cowNft_collection"
25
25
 
26
26
 
let key_cowNft_image = "cowNft_image"
27
27
 
28
28
 
let live = "ACTIVE"
29
29
 
30
30
 
let dead = "INACTIVE"
31
31
 
32
32
 
let fatten = "FATTEN"
33
33
 
34
34
 
func tryGetInteger (key) = match getInteger(this, key) {
35
35
 
    case b: Int => 
36
36
 
        b
37
37
 
    case _ => 
38
38
 
        0
39
39
 
}
40
40
 
41
41
 
42
42
 
func tryGetString (key) = match getString(this, key) {
43
43
 
    case a: String => 
44
44
 
        a
45
45
 
    case _ => 
46
46
 
        ""
47
47
 
}
48
48
 
49
49
 
50
50
 
func allow (callerPbk) = if (if ((callerPbk == admin1))
51
51
 
    then true
52
52
 
    else (callerPbk == admin2))
53
53
 
    then true
54
54
 
    else false
55
55
 
56
56
 
57
57
 
@Callable(i)
58
58
 
func registerFarm (address,params) = {
59
59
 
    let callerPbk = toBase58String(i.callerPublicKey)
60
60
 
    if (allow(callerPbk))
61
61
 
        then {
62
-
            let recipient = addressFromStringValue("3MwtjV2Q62CNSqKwM3Hzspy6DdwrvxE8P9F")
62
+
            let recipient = addressFromStringValue(address)
63
63
 
            let p_arr = split_4C(params, "|")
64
-
            let $t017741825 = $Tuple2(p_arr[0], p_arr[1])
65
-
            let farmName = $t017741825._1
66
-
            let farmLocation = $t017741825._2
64
+
            let $t017441795 = $Tuple2(p_arr[0], p_arr[1])
65
+
            let farmName = $t017441795._1
66
+
            let farmLocation = $t017441795._2
67
67
 
            let nextNum = tryGetInteger(key_farmNft_nextNumber)
68
68
 
            if ((nextNum == nextNum))
69
69
 
                then {
70
70
 
                    let farmNftName = (tryGetString(key_farmNft_name) + toString(nextNum))
71
71
 
                    let farmNftDescription = tryGetString(key_farmNft_description)
72
-
                    let farmNftCollection = tryGetString(key_farmNft_collection)
73
-
                    let farmNftImage = tryGetString(key_farmNft_image)
74
-
                    let assetId = {
75
-
                        let @ = invoke(addressFromStringValue(puzzleMint), "mint", [farmNftName, farmNftDescription, farmNftCollection, farmNftImage, farmNftImage, 1, "", "", ""], nil)
76
-
                        if ($isInstanceOf(@, "String"))
77
-
                            then @
78
-
                            else throw(($getType(@) + " couldn't be cast to String"))
79
-
                        }
80
-
                    if ((assetId == assetId))
81
-
                        then $Tuple2([ScriptTransfer(recipient, 1, fromBase58String(assetId)), IntegerEntry(key_farmNft_nextNumber, (nextNum + 1)), BooleanEntry((("farm_" + address) + "_status"), true), StringEntry((("farm_" + address) + "_name"), farmName), StringEntry((("farm_" + address) + "_location"), farmLocation)], $Tuple3(nextNum, farmName, farmLocation))
82
-
                        else throw("Strict value is not equal to itself.")
72
+
                    let issue = Issue(farmNftName, farmNftDescription, 1, 0, false)
73
+
                    let id = calculateAssetId(issue)
74
+
                    $Tuple2([issue, ScriptTransfer(recipient, 1, id), IntegerEntry(key_farmNft_nextNumber, (nextNum + 1)), BooleanEntry((("farm_" + address) + "_status"), true), StringEntry((("farm_" + address) + "_name"), farmName), StringEntry((("farm_" + address) + "_location"), farmLocation)], $Tuple3(nextNum, farmName, farmLocation))
83
75
 
                    }
84
76
 
                else throw("Strict value is not equal to itself.")
85
77
 
            }
86
78
 
        else throw("Not allowed caller")
87
79
 
    }
88
-
89
-
90
-
91
-
@Callable(i)
92
-
func test () = {
93
-
    let r = {
94
-
        let @ = invoke(this, "mint", nil, nil)
95
-
        if ($isInstanceOf(@, "String"))
96
-
            then @
97
-
            else throw(($getType(@) + " couldn't be cast to String"))
98
-
        }
99
-
    if ((r == r))
100
-
        then if (true)
101
-
            then throw(r)
102
-
            else nil
103
-
        else throw("Strict value is not equal to itself.")
104
-
    }
105
-
106
-
107
-
108
-
@Callable(i)
109
-
func mint () = $Tuple2(nil, 42)
110
80
 
111
81
 
112
82
 
113
83
 
@Callable(i)
114
84
 
func init () = {
115
85
 
    let callerPbk = toBase58String(i.callerPublicKey)
116
86
 
    if (allow(callerPbk))
117
87
 
        then {
118
88
 
            let nextNum = tryGetInteger(key_farmNft_nextNumber)
119
89
 
            if ((nextNum != 0))
120
90
 
                then throw("Contract is already initialized")
121
91
 
                else [IntegerEntry(key_farmNft_nextNumber, 1)]
122
92
 
            }
123
93
 
        else throw("Not allowed caller")
124
94
 
    }
125
95
 
126
96
 

github/deemru/w8io/026f985 
26.28 ms ◑