tx · dqBZQvkQ9sCzsLZonYiykQHig7LqZm9M2qT16cxjNi1

3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7:  -0.00300000 Waves

2023.03.15 21:45 [2491514] smart account 3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "dqBZQvkQ9sCzsLZonYiykQHig7LqZm9M2qT16cxjNi1",
    "fee": 300000,
    "feeAssetId": null,
    "timestamp": 1678905986067,
    "version": 2,
    "chainId": 84,
    "sender": "3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7",
    "senderPublicKey": "CrHxACS7bWTh8cgmgqstvybmgMqR9KtDryGFt5svZhBW",
    "proofs": [
        "2F72djSndaznKCcYHjkTcYGxacN2zftVE6e5jwYGtAnLQn8un8zK2Tdu2cE4JKrvxJKAFZ7GCBk4GdkaKbDHMvVR"
    ],
    "script": "base64:BgIxCAISBAoCGBgSBAoCGBgSAwoBCBIDCgEIEgUKAwgICBIECgIICBIDCgEIEgUKAwgYGAgADmNvbGxlY3Rpb25OYW1lCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAg5jb2xsZWN0aW9uTmFtZQAGc3ltYm9sCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAgZzeW1ib2wAC2Rlc2NyaXB0aW9uCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzAgtkZXNjcmlwdGlvbgALdG90YWxBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMCC3RvdGFsQW1vdW50AAhkQXBwSnNvbgkBB0FkZHJlc3MBCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMCCGRBcHBKc29uAQxvbmx5SW50ZXJuYWwBBmNhbGxlcgMJAAACBQZjYWxsZXIFBHRoaXMFBHVuaXQJAAIBAhJPbmx5IGludGVybmFsIGNhbGwBDXRyYW5zZmVyT3JOb3QCAnRvB2Fzc2V0SWQDCQAAAgUCdG8FBHRoaXMJAQtTdHJpbmdFbnRyeQICDtC60L7RgdGC0YvQu9GMAg7QutC+0YHRgtGL0LvRjAkBDlNjcmlwdFRyYW5zZmVyAwUCdG8AAQUHYXNzZXRJZAEHc2V0VXNlcgMHYXNzZXRJZAR1c2VyB2V4cGlyZXMJAQV0aHJvdwAIAWkBEG1ha2VKU09OSW50ZXJuYWwCB2FycktleXMJYXJyVmFsdWVzCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBANyZXMJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIFB2FycktleXMJAMwIAgUJYXJyVmFsdWVzBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARFhZGRUb0pTT05JbnRlcm5hbAIHYXJyS2V5cwlhcnJWYWx1ZXMJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIEA3JlcwkA/AcEBQhkQXBwSnNvbgIJYWRkVG9KU09OCQDMCAIFB2FycktleXMJAMwIAgUJYXJyVmFsdWVzBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARVyZWFkQnlKU09OS2V5SW50ZXJuYWwBA2tleQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAg1yZWFkQnlKU09OS2V5CQDMCAIFA2tleQUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAJQKAgUDbmlsBQNyZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEXZGVsZXRlQnlKU09OS2V5SW50ZXJuYWwBA2tleQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAg9kZWxldGVCeUpTT05LZXkJAMwIAgUDa2V5BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQRpbml0Aw5jb2xsZWN0aW9uTmFtZQZzeW1ib2wLZGVzY3JpcHRpb24JAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgIOY29sbGVjdGlvbk5hbWUFDmNvbGxlY3Rpb25OYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQICBnN5bWJvbAUGc3ltYm9sCQDMCAIJAQtTdHJpbmdFbnRyeQICC2Rlc2NyaXB0aW9uBQtkZXNjcmlwdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgILdG90YWxBbW91bnQAAAUDbmlsAWkBBG1pbnQCAnRvCHRva2VuVVJJCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBAd0b2tlbklkCQBkAgULdG90YWxBbW91bnQAAQQHcHJlTmFtZQkArAICCQCsAgIFBnN5bWJvbAIBIwkApAMBBQd0b2tlbklkBARuYW1lAwkAZwIAEAkAsQIBBQdwcmVOYW1lBQdwcmVOYW1lCQCkAwEFB3Rva2VuSWQEBWFzc2V0CQDDCAcFBG5hbWUJAKwCAgkArAICAgZ7dXJpOiIFCHRva2VuVVJJAgIifQABAAAHBQR1bml0BQZoZWlnaHQEB2Fzc2V0SWQJALgIAQUFYXNzZXQECXRvQWRkcmVzcwkBB0FkZHJlc3MBCQDZBAEFAnRvBAh0cmFuc2ZlcgkBDXRyYW5zZmVyT3JOb3QCBQl0b0FkZHJlc3MFB2Fzc2V0SWQDCQAAAgUIdHJhbnNmZXIFCHRyYW5zZmVyCQDMCAIFBWFzc2V0CQDMCAIFCHRyYW5zZmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgt0b3RhbEFtb3VudAUHdG9rZW5JZAkAzAgCCQELU3RyaW5nRW50cnkCBQRuYW1lBQh0b2tlblVSSQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC3NldERBcHBKc29uAQtkQXBwQWRkcmVzcwkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCAghkQXBwSnNvbgULZEFwcEFkZHJlc3MFA25pbAFpAQ90ZXN0U3RvcmFnZUpzb24DB2pzb25LZXkHYXJyS2V5cwlhcnJWYWx1ZXMEA3JlcwkA/AcEBQR0aGlzAhBtYWtlSlNPTkludGVybmFsCQDMCAIFB2FycktleXMJAMwIAgUJYXJyVmFsdWVzBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFB2pzb25LZXkKAAFABQNyZXMDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgC72APk",
    "height": 2491514,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: GxqSoMK8fhRd7xy9Xj5vkyCesk4sEhB7u43E8kXT8AC3
Next: AKVeJyeRsFfgvXFP4BJfTK1pUAjsvTYpg5HQps8ecDxG

Diff: 
Old
New
Differences
9
9
 
10
10
 
let totalAmount = getIntegerValue(this, "totalAmount")
11
11
 
12
-
let dAppJson = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
12
+
let dAppJson = Address(fromBase58String(getStringValue(this, "dAppJson")))
13
13
 
14
14
 
func onlyInternal (caller) = if ((caller == this))
15
15
 
    then unit
65
65
 
66
66
 
67
67
 
@Callable(i)
68
-
func init (collectionName,symbol,description) = if ((i.caller == this))
69
-
    then [StringEntry("collectionName", collectionName), StringEntry("symbol", symbol), StringEntry("description", description), IntegerEntry("totalAmount", 0)]
70
-
    else throw("only dApp")
68
+
func init (collectionName,symbol,description) = valueOrElse(onlyInternal(i.caller), [StringEntry("collectionName", collectionName), StringEntry("symbol", symbol), StringEntry("description", description), IntegerEntry("totalAmount", 0)])
71
69
 
72
70
 
73
71
 
74
72
 
@Callable(i)
75
-
func mint (to,tokenURI) = if ((i.caller == this))
76
-
    then {
77
-
        let tokenId = (totalAmount + 1)
78
-
        let preName = ((symbol + "#") + toString(tokenId))
79
-
        let name = if ((16 >= size(preName)))
80
-
            then preName
81
-
            else toString(tokenId)
82
-
        let asset = Issue(name, (("{uri:\"" + tokenURI) + "\"}"), 1, 0, false, unit, height)
83
-
        let assetId = calculateAssetId(asset)
84
-
        let toAddress = Address(fromBase58String(to))
85
-
        let transfer = transferOrNot(toAddress, assetId)
86
-
        if ((transfer == transfer))
87
-
            then [asset, transfer, IntegerEntry("totalAmount", tokenId), StringEntry(name, tokenURI)]
88
-
            else throw("Strict value is not equal to itself.")
89
-
        }
90
-
    else throw("only dApp")
73
+
func mint (to,tokenURI) = valueOrElse(onlyInternal(i.caller), {
74
+
    let tokenId = (totalAmount + 1)
75
+
    let preName = ((symbol + "#") + toString(tokenId))
76
+
    let name = if ((16 >= size(preName)))
77
+
        then preName
78
+
        else toString(tokenId)
79
+
    let asset = Issue(name, (("{uri:\"" + tokenURI) + "\"}"), 1, 0, false, unit, height)
80
+
    let assetId = calculateAssetId(asset)
81
+
    let toAddress = Address(fromBase58String(to))
82
+
    let transfer = transferOrNot(toAddress, assetId)
83
+
    if ((transfer == transfer))
84
+
        then [asset, transfer, IntegerEntry("totalAmount", tokenId), StringEntry(name, tokenURI)]
85
+
        else throw("Strict value is not equal to itself.")
86
+
    })
87
+
88
+
89
+
90
+
@Callable(i)
91
+
func setDAppJson (dAppAddress) = valueOrElse(onlyInternal(i.caller), [StringEntry("dAppJson", dAppAddress)])
91
92
 
92
93
 
93
94
 
95
96
 
func testStorageJson (jsonKey,arrKeys,arrValues) = {
96
97
 
    let res = invoke(this, "makeJSONInternal", [arrKeys, arrValues], nil)
97
98
 
    if ((res == res))
98
-
        then $Tuple2(nil, res)
99
+
        then $Tuple2([StringEntry(jsonKey, {
100
+
            let @ = res
101
+
            if ($isInstanceOf(@, "String"))
102
+
                then @
103
+
                else throw(($getType(@) + " couldn't be cast to String"))
104
+
            })], res)
99
105
 
        else throw("Strict value is not equal to itself.")
100
106
 
    }
101
107
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let collectionName = getStringValue(this, "collectionName")
5
5
 
6
6
 
let symbol = getStringValue(this, "symbol")
7
7
 
8
8
 
let description = getStringValue(this, "description")
9
9
 
10
10
 
let totalAmount = getIntegerValue(this, "totalAmount")
11
11
 
12
-
let dAppJson = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
12
+
let dAppJson = Address(fromBase58String(getStringValue(this, "dAppJson")))
13
13
 
14
14
 
func onlyInternal (caller) = if ((caller == this))
15
15
 
    then unit
16
16
 
    else throw("Only internal call")
17
17
 
18
18
 
19
19
 
func transferOrNot (to,assetId) = if ((to == this))
20
20
 
    then StringEntry("костыль", "костыль")
21
21
 
    else ScriptTransfer(to, 1, assetId)
22
22
 
23
23
 
24
24
 
func setUser (assetId,user,expires) = throw()
25
25
 
26
26
 
27
27
 
@Callable(i)
28
28
 
func makeJSONInternal (arrKeys,arrValues) = valueOrElse(onlyInternal(i.caller), {
29
29
 
    let res = invoke(dAppJson, "makeJSON", [arrKeys, arrValues], nil)
30
30
 
    if ((res == res))
31
31
 
        then $Tuple2(nil, res)
32
32
 
        else throw("Strict value is not equal to itself.")
33
33
 
    })
34
34
 
35
35
 
36
36
 
37
37
 
@Callable(i)
38
38
 
func addToJSONInternal (arrKeys,arrValues) = valueOrElse(onlyInternal(i.caller), {
39
39
 
    let res = invoke(dAppJson, "addToJSON", [arrKeys, arrValues], nil)
40
40
 
    if ((res == res))
41
41
 
        then $Tuple2(nil, res)
42
42
 
        else throw("Strict value is not equal to itself.")
43
43
 
    })
44
44
 
45
45
 
46
46
 
47
47
 
@Callable(i)
48
48
 
func readByJSONKeyInternal (key) = valueOrElse(onlyInternal(i.caller), {
49
49
 
    let res = invoke(dAppJson, "readByJSONKey", [key], nil)
50
50
 
    if ((res == res))
51
51
 
        then $Tuple2(nil, res)
52
52
 
        else throw("Strict value is not equal to itself.")
53
53
 
    })
54
54
 
55
55
 
56
56
 
57
57
 
@Callable(i)
58
58
 
func deleteByJSONKeyInternal (key) = valueOrElse(onlyInternal(i.caller), {
59
59
 
    let res = invoke(dAppJson, "deleteByJSONKey", [key], nil)
60
60
 
    if ((res == res))
61
61
 
        then $Tuple2(nil, res)
62
62
 
        else throw("Strict value is not equal to itself.")
63
63
 
    })
64
64
 
65
65
 
66
66
 
67
67
 
@Callable(i)
68
-
func init (collectionName,symbol,description) = if ((i.caller == this))
69
-
    then [StringEntry("collectionName", collectionName), StringEntry("symbol", symbol), StringEntry("description", description), IntegerEntry("totalAmount", 0)]
70
-
    else throw("only dApp")
68
+
func init (collectionName,symbol,description) = valueOrElse(onlyInternal(i.caller), [StringEntry("collectionName", collectionName), StringEntry("symbol", symbol), StringEntry("description", description), IntegerEntry("totalAmount", 0)])
71
69
 
72
70
 
73
71
 
74
72
 
@Callable(i)
75
-
func mint (to,tokenURI) = if ((i.caller == this))
76
-
    then {
77
-
        let tokenId = (totalAmount + 1)
78
-
        let preName = ((symbol + "#") + toString(tokenId))
79
-
        let name = if ((16 >= size(preName)))
80
-
            then preName
81
-
            else toString(tokenId)
82
-
        let asset = Issue(name, (("{uri:\"" + tokenURI) + "\"}"), 1, 0, false, unit, height)
83
-
        let assetId = calculateAssetId(asset)
84
-
        let toAddress = Address(fromBase58String(to))
85
-
        let transfer = transferOrNot(toAddress, assetId)
86
-
        if ((transfer == transfer))
87
-
            then [asset, transfer, IntegerEntry("totalAmount", tokenId), StringEntry(name, tokenURI)]
88
-
            else throw("Strict value is not equal to itself.")
89
-
        }
90
-
    else throw("only dApp")
73
+
func mint (to,tokenURI) = valueOrElse(onlyInternal(i.caller), {
74
+
    let tokenId = (totalAmount + 1)
75
+
    let preName = ((symbol + "#") + toString(tokenId))
76
+
    let name = if ((16 >= size(preName)))
77
+
        then preName
78
+
        else toString(tokenId)
79
+
    let asset = Issue(name, (("{uri:\"" + tokenURI) + "\"}"), 1, 0, false, unit, height)
80
+
    let assetId = calculateAssetId(asset)
81
+
    let toAddress = Address(fromBase58String(to))
82
+
    let transfer = transferOrNot(toAddress, assetId)
83
+
    if ((transfer == transfer))
84
+
        then [asset, transfer, IntegerEntry("totalAmount", tokenId), StringEntry(name, tokenURI)]
85
+
        else throw("Strict value is not equal to itself.")
86
+
    })
87
+
88
+
89
+
90
+
@Callable(i)
91
+
func setDAppJson (dAppAddress) = valueOrElse(onlyInternal(i.caller), [StringEntry("dAppJson", dAppAddress)])
91
92
 
92
93
 
93
94
 
94
95
 
@Callable(i)
95
96
 
func testStorageJson (jsonKey,arrKeys,arrValues) = {
96
97
 
    let res = invoke(this, "makeJSONInternal", [arrKeys, arrValues], nil)
97
98
 
    if ((res == res))
98
-
        then $Tuple2(nil, res)
99
+
        then $Tuple2([StringEntry(jsonKey, {
100
+
            let @ = res
101
+
            if ($isInstanceOf(@, "String"))
102
+
                then @
103
+
                else throw(($getType(@) + " couldn't be cast to String"))
104
+
            })], res)
99
105
 
        else throw("Strict value is not equal to itself.")
100
106
 
    }
101
107
 
102
108
 

github/deemru/w8io/169f3d6 
29.03 ms ◑