tx · 9dgVmxNtsfMkYsJB5QzDYDTwBojPRNUGJh8ZXCUiThc4

3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb:  -0.00600000 Waves

2023.03.17 23:20 [2494470] smart account 3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9dgVmxNtsfMkYsJB5QzDYDTwBojPRNUGJh8ZXCUiThc4",
    "fee": 600000,
    "feeAssetId": null,
    "timestamp": 1679084498391,
    "version": 2,
    "chainId": 84,
    "sender": "3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb",
    "senderPublicKey": "2VQGRNRWyFAZvjDtkgZwdZcTwZvBJJ61n8zJfYYxm5eK",
    "proofs": [
        "3ktLcSRoksVVs4CBCPBX9ATAR5Ggj5yeBnbTKUcMz1zBmqYB9rwg5bgt6kBZT1Mx3Kdb1snBwbwQFkbpef6UDTay"
    ],
    "script": "base64:BgJTCAISBAoCGBgSBQoDCBgYEgQKAggIEgQKAggIEgQKAggIEgUKAwgICBIDCgECEgMKAQgSBAoCCAgSBQoDCAgIEgQKAggIEgYKBAgBAQESBAoCAQEKAA5jb2xsZWN0aW9uTmFtZQkBEUBleHRyTmF0aXZlKDEwNTgpAQIOY29sbGVjdGlvbk5hbWUABnN5bWJvbAkBEUBleHRyTmF0aXZlKDEwNTgpAQIGc3ltYm9sAAtkZXNjcmlwdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQILZGVzY3JpcHRpb24AC3RvdGFsQW1vdW50CQERQGV4dHJOYXRpdmUoMTA1NSkBAgt0b3RhbEFtb3VudAAIZEFwcEpzb24JAQdBZGRyZXNzAQkA2QQBAiMzTXJHYVpWUmhrbkVHZkhKMTl0dFVQTm5EUm9GcWNIaFZONwAMdG9rZW5QYXltZW50CQEHQWRkcmVzcwEJARFAZXh0ck5hdGl2ZSgxMDU3KQECDHRva2VuUGF5bWVudAEMb25seUludGVybmFsAQZjYWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBQR1bml0CQACAQIST25seSBpbnRlcm5hbCBjYWxsAQ10cmFuc2Zlck9yTm90AgJ0bwdhc3NldElkAwkAAAIFAnRvBQR0aGlzCQELU3RyaW5nRW50cnkCAg7QutC+0YHRgtGL0LvRjAIO0LrQvtGB0YLRi9C70YwJAQ5TY3JpcHRUcmFuc2ZlcgMFAnRvAAEFB2Fzc2V0SWQBDnBhcnNlSWR0b0Fzc2V0AQdhc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQdhc3NldElkAhxDYW4ndCBmaW5kIGFzc2V0IGJ5IGFzc2V0IGlkAQ9jaGVja0Fzc2V0T3duZXICBmNhbGxlcgdhc3NldElkAwkAAAIJAPAHAgUGY2FsbGVyCQDZBAEFB2Fzc2V0SWQAAQUEdW5pdAkAAgECEE9ubHkgYXNzZXQgb3duZXINAWkBEG1ha2VKU09OSW50ZXJuYWwCB2FycktleXMJYXJyVmFsdWVzCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBANyZXMJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIFB2FycktleXMJAMwIAgUJYXJyVmFsdWVzBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARFhZGRUb0pTT05JbnRlcm5hbAMEanNvbgdhcnJLZXlzCWFyclZhbHVlcwkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAglhZGRUb0pTT04JAMwIAgUEanNvbgkAzAgCBQdhcnJLZXlzCQDMCAIFCWFyclZhbHVlcwUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAJQKAgUDbmlsBQNyZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEVcmVhZEJ5SlNPTktleUludGVybmFsAgRqc29uA2tleQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAg1yZWFkQnlKU09OS2V5CQDMCAIFBGpzb24JAMwIAgUDa2V5BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdkZWxldGVCeUpTT05LZXlJbnRlcm5hbAIEanNvbgNrZXkJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIEA3JlcwkA/AcEBQhkQXBwSnNvbgIPZGVsZXRlQnlKU09OS2V5CQDMCAIFBGpzb24JAMwIAgUDa2V5BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARNzdG9yYWdlSnNvbkludGVybmFsAgdqc29uS2V5Cmpzb25TdHJpbmcJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHanNvbktleQUKanNvblN0cmluZwUDbmlsAWkBB3NldFVzZXIDB2Fzc2V0SWQEdXNlcgdleHBpcmVzBANyZXMJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIJAMwIAgIEdXNlcgkAzAgCAgdleHBpcmVzBQNuaWwJAMwIAgkAzAgCBQR1c2VyCQDMCAIFB2V4cGlyZXMFA25pbAUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICB3VzZXJPZi0FB2Fzc2V0SWQKAAFABQNyZXMDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ9zZXRUb2tlblBheW1lbnQBB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC0JpbmFyeUVudHJ5AgIMdG9rZW5QYXltZW50BQdhc3NldElkBQNuaWwBaQEQZGVsZXRlVmFsdWVCeUtleQEDa2V5CQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyCQDMCAIJAQtEZWxldGVFbnRyeQEFA2tleQUDbmlsAWkBCXNldFN0cmluZwIDa2V5BXZhbHVlCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIFA2tleQUFdmFsdWUFA25pbAFpAQRpbml0Aw5jb2xsZWN0aW9uTmFtZQZzeW1ib2wLZGVzY3JpcHRpb24JAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgIOY29sbGVjdGlvbk5hbWUFDmNvbGxlY3Rpb25OYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQICBnN5bWJvbAUGc3ltYm9sCQDMCAIJAQtTdHJpbmdFbnRyeQICC2Rlc2NyaXB0aW9uBQtkZXNjcmlwdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgILdG90YWxBbW91bnQAAAUDbmlsAWkBBG1pbnQCAnRvCHRva2VuVVJJBAd0b2tlbklkCQBkAgULdG90YWxBbW91bnQAAQQHcHJlTmFtZQkArAICCQCsAgIFBnN5bWJvbAIBIwkApAMBBQd0b2tlbklkBARuYW1lAwkAZwIAEAkAsQIBBQdwcmVOYW1lBQdwcmVOYW1lCQCkAwEFB3Rva2VuSWQEBGpzb24KAAFACQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICCHRva2VuVVJJBQNuaWwJAMwIAgkAzAgCBQh0b2tlblVSSQUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcEBWFzc2V0CQDDCAcFBG5hbWUFBGpzb24AAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAl0b0FkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQJ0bwQIdHJhbnNmZXIJAQ10cmFuc2Zlck9yTm90AgUJdG9BZGRyZXNzBQdhc3NldElkAwkAAAIFCHRyYW5zZmVyBQh0cmFuc2ZlcgkAzAgCBQVhc3NldAkAzAgCBQh0cmFuc2ZlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgILdG90YWxBbW91bnQFB3Rva2VuSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUEbmFtZQUIdG9rZW5VUkkFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhpbml0TGVuZAQHYXNzZXRJZA90aW1lVW5pdFNlY29uZHMNdGltZVVuaXRQcmljZQ10aW1lVW5pdENvdW50CQELdmFsdWVPckVsc2UCCQEPY2hlY2tBc3NldE93bmVyAggFAWkGY2FsbGVyBQdhc3NldElkBAVhc3NldAkBDnBhcnNlSWR0b0Fzc2V0AQUHYXNzZXRJZAQIdG9rZW5VUkkKAAFACQD8BwQFCGRBcHBKc29uAg1yZWFkQnlKU09OS2V5CQDMCAIIBQVhc3NldAtkZXNjcmlwdGlvbgkAzAgCAgh0b2tlblVSSQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nAwkAAAIFCHRva2VuVVJJBQh0b2tlblVSSQQFbGVuZHMJARFAZXh0ck5hdGl2ZSgxMDU4KQECBUxlbmRzBAZkZWxldGUKAAFACQD8BwQFCGRBcHBKc29uAg9kZWxldGVCeUpTT05LZXkJAMwIAgUFbGVuZHMJAMwIAgIJbGVuZENvdW50BQNuaWwFA25pbAMJAAECBQFAAhAoU3RyaW5nLCBTdHJpbmcpBQFACQACAQkArAICCQADAQUBQAIlIGNvdWxkbid0IGJlIGNhc3QgdG8gKFN0cmluZywgU3RyaW5nKQMJAAACBQZkZWxldGUFBmRlbGV0ZQQGbGVuZElkCAUGZGVsZXRlAl8xBAhuZXdDb3VudAkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBBQZsZW5kSWQAAQQEbWFrZQoAAUAJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIJAMwIAgISc3VwcG9ydGVkSW50ZXJmYWNlCQDMCAICCGFzc2V0ZElkCQDMCAICCHRva2VuVVJJCQDMCAICBW93bmVyCQDMCAICD3RpbWVVbml0U2Vjb25kcwkAzAgCAg10aW1lVW5pdFByaWNlCQDMCAICDXRpbWVVbml0Q291bnQJAMwIAgIOc3RhcnRUaW1lc3RhbXAJAMwIAgIMZW5kVGltZXN0YW1wCQDMCAICB2RlcG9zaXQJAMwIAgIHY2xhaW1lZAkAzAgCAgVyZW50cwUDbmlsCQDMCAIJAMwIAgIBMAkAzAgCBQdhc3NldElkCQDMCAIFCHRva2VuVVJJCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAKQDAQUPdGltZVVuaXRTZWNvbmRzCQDMCAIJAKQDAQUNdGltZVVuaXRQcmljZQkAzAgCCQCkAwEFDXRpbWVVbml0Q291bnQJAMwIAgkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQCkAwEJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAaAIFD3RpbWVVbml0U2Vjb25kcwUNdGltZVVuaXRDb3VudAkAzAgCAgEwCQDMCAICATAJAMwIAgIgeyJuYW1lIjoiUmVudHMiLCJyZW50Q291bnQiOiIwIn0FA25pbAUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nAwkAAAIFBG1ha2UFBG1ha2UEBmluc2VydAoAAUAJAPwHBAUIZEFwcEpzb24CCWFkZFRvSlNPTgkAzAgCCAUGZGVsZXRlAl8yCQDMCAIJAMwIAgUGbGVuZElkCQDMCAICCWxlbmRDb3VudAUDbmlsCQDMCAIJAMwIAgUEbWFrZQkAzAgCBQhuZXdDb3VudAUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUGaW5zZXJ0BQZpbnNlcnQJAMwIAgkBC1N0cmluZ0VudHJ5AgIFTGVuZHMFBmluc2VydAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGluaXRSZW50AgZsZW5kSWQNdGltZVVuaXRDb3VudAQMbGVuZElkU3RyaW5nCQCkAwEFBmxlbmRJZAQFbGVuZHMJARFAZXh0ck5hdGl2ZSgxMDU4KQECBUxlbmRzBA9kZWxldGVMZW5kQ291bnQKAAFACQD8BwQFCGRBcHBKc29uAg9kZWxldGVCeUpTT05LZXkJAMwIAgUFbGVuZHMJAMwIAgIJbGVuZENvdW50BQNuaWwFA25pbAMJAAECBQFAAhAoU3RyaW5nLCBTdHJpbmcpBQFACQACAQkArAICCQADAQUBQAIlIGNvdWxkbid0IGJlIGNhc3QgdG8gKFN0cmluZywgU3RyaW5nKQMJAAACBQ9kZWxldGVMZW5kQ291bnQFD2RlbGV0ZUxlbmRDb3VudAQKZGVsZXRlTGVuZAoAAUAJAPwHBAUIZEFwcEpzb24CD2RlbGV0ZUJ5SlNPTktleQkAzAgCCAUPZGVsZXRlTGVuZENvdW50Al8yCQDMCAIFDGxlbmRJZFN0cmluZwUDbmlsBQNuaWwDCQABAgUBQAIQKFN0cmluZywgU3RyaW5nKQUBQAkAAgEJAKwCAgkAAwEFAUACJSBjb3VsZG4ndCBiZSBjYXN0IHRvIChTdHJpbmcsIFN0cmluZykDCQAAAgUKZGVsZXRlTGVuZAUKZGVsZXRlTGVuZAkAzAgCCQELU3RyaW5nRW50cnkCAgVEZWJ1ZwgFCmRlbGV0ZUxlbmQCXzEFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgDtr697",
    "height": 2494470,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CTp9jQcjm1vPrpEWqJcR3pfM3WCRmssqjPAFWFd9Fa14
Next: CXd5K5d2okxiagrheUKZAJMR6Voz2MRwB6uHF3zSbLjH

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let a = "jsonRes"
4
+
let a = getStringValue("collectionName")
5
5
 
6
-
let b = toUtf8String(base58'b')
6
+
let b = getStringValue("symbol")
7
7
 
8
-
func c (d) = if (false)
9
-
    then (((((b + d._1) + b) + ":") + d._2) + ",")
10
-
    else (((((((b + d._1) + b) + ":") + b) + d._2) + b) + ",")
8
+
let c = getStringValue("description")
11
9
 
10
+
let d = getIntegerValue("totalAmount")
12
11
 
13
-
func e (f,d) = (f + c(d))
12
+
let e = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
14
13
 
14
+
let f = Address(getBinaryValue("tokenPayment"))
15
15
 
16
-
func g (h,i,j) = if ((j == 0))
17
-
    then throw("Empty  params")
18
-
    else if ((j == 1))
19
-
        then {
20
-
            let k = h
21
-
            let l = size(k)
22
-
            let m = i
23
-
            func n (o,p) =             if ((p >= l))
24
-
                then o
25
-
                else e(o, k[p])
26
-
27
-
            func q (o,p) =             if ((p >= l))
28
-
                then o
29
-
                else throw("List size exceeds 1")
30
-
31
-
            q(n(m, 0), 1)
32
-
            }
33
-
        else if ((j == 2))
34
-
            then {
35
-
                let k = h
36
-
                let l = size(k)
37
-
                let m = i
38
-
                func n (o,p) =                 if ((p >= l))
39
-
                    then o
40
-
                    else e(o, k[p])
41
-
42
-
                func q (o,p) =                 if ((p >= l))
43
-
                    then o
44
-
                    else throw("List size exceeds 2")
45
-
46
-
                q(n(n(m, 0), 1), 2)
47
-
                }
48
-
            else if ((j == 3))
49
-
                then {
50
-
                    let k = h
51
-
                    let l = size(k)
52
-
                    let m = i
53
-
                    func n (o,p) =                     if ((p >= l))
54
-
                        then o
55
-
                        else e(o, k[p])
56
-
57
-
                    func q (o,p) =                     if ((p >= l))
58
-
                        then o
59
-
                        else throw("List size exceeds 3")
60
-
61
-
                    q(n(n(n(m, 0), 1), 2), 3)
62
-
                    }
63
-
                else if ((j == 4))
64
-
                    then {
65
-
                        let k = h
66
-
                        let l = size(k)
67
-
                        let m = i
68
-
                        func n (o,p) =                         if ((p >= l))
69
-
                            then o
70
-
                            else e(o, k[p])
71
-
72
-
                        func q (o,p) =                         if ((p >= l))
73
-
                            then o
74
-
                            else throw("List size exceeds 4")
75
-
76
-
                        q(n(n(n(n(m, 0), 1), 2), 3), 4)
77
-
                        }
78
-
                    else if ((j == 5))
79
-
                        then {
80
-
                            let k = h
81
-
                            let l = size(k)
82
-
                            let m = i
83
-
                            func n (o,p) =                             if ((p >= l))
84
-
                                then o
85
-
                                else e(o, k[p])
86
-
87
-
                            func q (o,p) =                             if ((p >= l))
88
-
                                then o
89
-
                                else throw("List size exceeds 5")
90
-
91
-
                            q(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5)
92
-
                            }
93
-
                        else if ((j == 6))
94
-
                            then {
95
-
                                let k = h
96
-
                                let l = size(k)
97
-
                                let m = i
98
-
                                func n (o,p) =                                 if ((p >= l))
99
-
                                    then o
100
-
                                    else e(o, k[p])
101
-
102
-
                                func q (o,p) =                                 if ((p >= l))
103
-
                                    then o
104
-
                                    else throw("List size exceeds 6")
105
-
106
-
                                q(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6)
107
-
                                }
108
-
                            else if ((j == 7))
109
-
                                then {
110
-
                                    let k = h
111
-
                                    let l = size(k)
112
-
                                    let m = i
113
-
                                    func n (o,p) =                                     if ((p >= l))
114
-
                                        then o
115
-
                                        else e(o, k[p])
116
-
117
-
                                    func q (o,p) =                                     if ((p >= l))
118
-
                                        then o
119
-
                                        else throw("List size exceeds 7")
120
-
121
-
                                    q(n(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6), 7)
122
-
                                    }
123
-
                                else if ((j == 8))
124
-
                                    then {
125
-
                                        let k = h
126
-
                                        let l = size(k)
127
-
                                        let m = i
128
-
                                        func n (o,p) =                                         if ((p >= l))
129
-
                                            then o
130
-
                                            else e(o, k[p])
131
-
132
-
                                        func q (o,p) =                                         if ((p >= l))
133
-
                                            then o
134
-
                                            else throw("List size exceeds 8")
135
-
136
-
                                        q(n(n(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6), 7), 8)
137
-
                                        }
138
-
                                    else if ((j == 9))
139
-
                                        then {
140
-
                                            let k = h
141
-
                                            let l = size(k)
142
-
                                            let m = i
143
-
                                            func n (o,p) =                                             if ((p >= l))
144
-
                                                then o
145
-
                                                else e(o, k[p])
146
-
147
-
                                            func q (o,p) =                                             if ((p >= l))
148
-
                                                then o
149
-
                                                else throw("List size exceeds 9")
150
-
151
-
                                            q(n(n(n(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
152
-
                                            }
153
-
                                        else if ((j == 10))
154
-
                                            then {
155
-
                                                let k = h
156
-
                                                let l = size(k)
157
-
                                                let m = i
158
-
                                                func n (o,p) =                                                 if ((p >= l))
159
-
                                                    then o
160
-
                                                    else e(o, k[p])
161
-
162
-
                                                func q (o,p) =                                                 if ((p >= l))
163
-
                                                    then o
164
-
                                                    else throw("List size exceeds 10")
165
-
166
-
                                                q(n(n(n(n(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
167
-
                                                }
168
-
                                            else throw("The max number of parameters exceeded")
169
-
170
-
171
-
func r (s) = {
172
-
    let t = s[0]
173
-
    let u = s[1]
174
-
    let v = s[2]
175
-
    let w = s[3]
176
-
    let x = s[4]
177
-
    let y = s[5]
178
-
    let z = s[6]
179
-
    let A = s[7]
180
-
    let B = s[8]
181
-
    let C = s[9]
182
-
    let D = removeByIndex(s, 0)
183
-
    let E = removeByIndex(D, 0)
184
-
    let F = removeByIndex(E, 0)
185
-
    let G = removeByIndex(F, 0)
186
-
    let H = removeByIndex(G, 0)
187
-
    let I = removeByIndex(H, 0)
188
-
    let J = removeByIndex(I, 0)
189
-
    let K = removeByIndex(J, 0)
190
-
    let L = removeByIndex(K, 0)
191
-
    let M = removeByIndex(L, 0)
192
-
    $Tuple2([t, u, v, w, x, y, z, A, B, C], M)
193
-
    }
194
-
195
-
196
-
func N (O) = if ((O == this))
16
+
func g (h) = if ((h == this))
197
17
 
    then unit
198
18
 
    else throw("Only internal call")
199
19
 
200
20
 
201
-
func P (s,F) = [$Tuple2(s[0], F[0])]
21
+
func i (j,k) = if ((j == this))
22
+
    then StringEntry("костыль", "костыль")
23
+
    else ScriptTransfer(j, 1, k)
202
24
 
203
25
 
204
-
func Q (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1])]
26
+
func l (k) = valueOrErrorMessage(assetInfo(fromBase58String(k)), "Can't find asset by asset id")
205
27
 
206
28
 
207
-
func R (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2])]
29
+
func m (h,k) = if ((assetBalance(h, fromBase58String(k)) == 1))
30
+
    then unit
31
+
    else throw("Only asset owner")
208
32
 
209
33
 
210
-
func S (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3])]
211
-
212
-
213
-
func T (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3]), $Tuple2(s[4], F[4])]
214
-
215
-
216
-
func U (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3]), $Tuple2(s[4], F[4]), $Tuple2(s[5], F[5])]
217
-
218
-
219
-
func V (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3]), $Tuple2(s[4], F[4]), $Tuple2(s[5], F[5]), $Tuple2(s[6], F[6])]
220
-
221
-
222
-
func W (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3]), $Tuple2(s[4], F[4]), $Tuple2(s[5], F[5]), $Tuple2(s[6], F[6]), $Tuple2(s[7], F[7])]
223
-
224
-
225
-
func X (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3]), $Tuple2(s[4], F[4]), $Tuple2(s[5], F[5]), $Tuple2(s[6], F[6]), $Tuple2(s[7], F[7]), $Tuple2(s[8], F[8])]
226
-
227
-
228
-
func Y (s,F) = [$Tuple2(s[0], F[0]), $Tuple2(s[1], F[1]), $Tuple2(s[2], F[2]), $Tuple2(s[3], F[3]), $Tuple2(s[4], F[4]), $Tuple2(s[5], F[5]), $Tuple2(s[6], F[6]), $Tuple2(s[7], F[7]), $Tuple2(s[8], F[8]), $Tuple2(s[9], F[9])]
229
-
230
-
231
-
func Z (aa,ab,j) = if ((j == 0))
232
-
    then throw("Empty  params")
233
-
    else if ((j == 1))
234
-
        then P(aa, ab)
235
-
        else if ((j == 2))
236
-
            then Q(aa, ab)
237
-
            else if ((j == 3))
238
-
                then R(aa, ab)
239
-
                else if ((j == 4))
240
-
                    then S(aa, ab)
241
-
                    else if ((j == 5))
242
-
                        then T(aa, ab)
243
-
                        else if ((j == 6))
244
-
                            then U(aa, ab)
245
-
                            else if ((j == 7))
246
-
                                then V(aa, ab)
247
-
                                else if ((j == 8))
248
-
                                    then W(aa, ab)
249
-
                                    else if ((j == 9))
250
-
                                        then X(aa, ab)
251
-
                                        else if ((j == 10))
252
-
                                            then Y(aa, ab)
253
-
                                            else throw("Max number of parameters exceeded")
254
-
255
-
256
-
func ac (ad,ae) = {
257
-
    let af = size(ae)
258
-
    let ag = value(indexOf(ad, ae))
259
-
    let ah = valueOrElse(indexOf(ad, ",", ag), value(indexOf(ad, "}", ag)))
260
-
    $Tuple3(af, ag, ah)
261
-
    }
262
-
263
-
264
-
func ai (f,aj) = {
265
-
    let ak = f
266
-
    let al = ak._1
267
-
    let am = ak._2
268
-
    let an = ak._3
269
-
    let ao = ak._4
270
-
    $Tuple4((al + aj), am, an, true)
271
-
    }
272
-
273
-
274
-
func ap (ad,ae) = {
275
-
    let aq = ac(ad, ae)
276
-
    let af = aq._1
277
-
    let ag = aq._2
278
-
    let ah = aq._3
279
-
    drop(take(ad, (ah - 1)), ((ag + af) + 3))
280
-
    }
281
-
282
-
283
-
func ar (ad,ae) = {
284
-
    let as = ac(ad, ae)
285
-
    let af = as._1
286
-
    let ag = as._2
287
-
    let ah = as._3
288
-
    let at = drop(take(ad, (ah - 1)), ((ag + af) + 3))
289
-
    let au = split(ad, ",")
290
-
    let av = if (contains(at, "{"))
291
-
        then (        let k = au
292
-
        let l = size(k)
293
-
        let m = $Tuple4("", 0, 0, false)
294
-
        func n (o,p) =         if ((p >= l))
295
-
            then o
296
-
            else ai(o, k[p])
297
-
298
-
        func q (o,p) =         if ((p >= l))
299
-
            then o
300
-
            else throw("List size exceeds 10")
301
-
302
-
        q(n(n(n(n(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10))._1
303
-
        else at
304
-
    let aw = if (((size(ad) - ah) == 1))
305
-
        then (take(ad, (ag - 2)) + drop(ad, ah))
306
-
        else (take(ad, (ag - 1)) + drop(ad, (ah + 1)))
307
-
    $Tuple2(av, aw)
308
-
    }
309
-
310
-
311
-
@Callable(ax)
312
-
func makeJSONInternal (ay,az,aA,aB,i) = valueOrElse(N(ax.caller), if ((aA > 0))
313
-
    then {
314
-
        let aC = r(ay)
315
-
        let aa = aC._1
316
-
        let aD = aC._2
317
-
        let aE = r(az)
318
-
        let ab = aE._1
319
-
        let aF = aE._2
320
-
        let h = Z(aa, ab, 10)
321
-
        let aG = g(h, i, 10)
322
-
        let al = invoke(this, "makeJSONInternal", [aD, aF, (aA - 1), aB, aG], nil)
323
-
        if ((al == al))
324
-
            then $Tuple2(nil, al)
325
-
            else throw("Strict value is not equal to itself.")
326
-
        }
327
-
    else if ((aB != 0))
328
-
        then {
329
-
            let h = Z(ay, az, aB)
330
-
            let aG = g(h, i, aB)
331
-
            $Tuple2(nil, (("{" + dropRight(aG, 1)) + "}"))
332
-
            }
333
-
        else $Tuple2(nil, (("{" + dropRight(i, 1)) + "}")))
34
+
@Callable(n)
35
+
func makeJSONInternal (o,p) = valueOrElse(g(n.caller), {
36
+
    let q = invoke(e, "makeJSON", [o, p], nil)
37
+
    if ((q == q))
38
+
        then $Tuple2(nil, q)
39
+
        else throw("Strict value is not equal to itself.")
40
+
    })
334
41
 
335
42
 
336
43
 
337
-
@Callable(ax)
338
-
func makeJSON (ay,az) = if ((size(ay) != size(az)))
339
-
    then throw("ArrayKeys and ArrayValues length must be equal")
340
-
    else {
341
-
        let aH = size(ay)
342
-
        let aA = fraction(1, aH, 10)
343
-
        let aB = (aH % 10)
344
-
        let i = invoke(this, "makeJSONInternal", [ay, az, aA, aB, ""], nil)
345
-
        if ((i == i))
346
-
            then $Tuple2(nil, i)
347
-
            else throw("Strict value is not equal to itself.")
348
-
        }
44
+
@Callable(n)
45
+
func addToJSONInternal (r,o,p) = valueOrElse(g(n.caller), {
46
+
    let q = invoke(e, "addToJSON", [r, o, p], nil)
47
+
    if ((q == q))
48
+
        then $Tuple2(nil, q)
49
+
        else throw("Strict value is not equal to itself.")
50
+
    })
349
51
 
350
52
 
351
53
 
352
-
@Callable(ax)
353
-
func addToJSON (ad,ay,az) = if ((size(ay) != size(az)))
354
-
    then throw("ArrayKeys and ArrayValues length must be equal")
355
-
    else {
356
-
        let aH = size(ay)
357
-
        let aA = fraction(1, aH, 10)
358
-
        let aB = (aH % 10)
359
-
        let i = invoke(this, "makeJSONInternal", [ay, az, aA, aB, (drop(dropRight(ad, 1), 1) + ",")], nil)
360
-
        if ((i == i))
361
-
            then $Tuple2(nil, i)
362
-
            else throw("Strict value is not equal to itself.")
363
-
        }
54
+
@Callable(n)
55
+
func readByJSONKeyInternal (r,s) = valueOrElse(g(n.caller), {
56
+
    let q = invoke(e, "readByJSONKey", [r, s], nil)
57
+
    if ((q == q))
58
+
        then $Tuple2(nil, q)
59
+
        else throw("Strict value is not equal to itself.")
60
+
    })
364
61
 
365
62
 
366
63
 
367
-
@Callable(ax)
368
-
func readByJSONKey (ad,ae) = {
369
-
    let aI = ap(ad, ae)
370
-
    $Tuple2([StringEntry("valueByKey", aI)], aI)
64
+
@Callable(n)
65
+
func deleteByJSONKeyInternal (r,s) = valueOrElse(g(n.caller), {
66
+
    let q = invoke(e, "deleteByJSONKey", [r, s], nil)
67
+
    if ((q == q))
68
+
        then $Tuple2(nil, q)
69
+
        else throw("Strict value is not equal to itself.")
70
+
    })
71
+
72
+
73
+
74
+
@Callable(n)
75
+
func storageJsonInternal (t,u) = valueOrElse(g(n.caller), [StringEntry(t, u)])
76
+
77
+
78
+
79
+
@Callable(n)
80
+
func setUser (k,v,w) = {
81
+
    let q = invoke(e, "makeJSON", [["user", "expires"], [v, w]], nil)
82
+
    if ((q == q))
83
+
        then $Tuple2([StringEntry(("userOf-" + k), {
84
+
            let x = q
85
+
            if ($isInstanceOf(x, "String"))
86
+
                then x
87
+
                else throw(($getType(x) + " couldn't be cast to String"))
88
+
            })], q)
89
+
        else throw("Strict value is not equal to itself.")
371
90
 
    }
372
91
 
373
92
 
374
93
 
375
-
@Callable(ax)
376
-
func deleteByJSONKey (ad,ae) = {
377
-
    let aJ = ar(ad, ae)
378
-
    let aK = aJ._1
379
-
    let aw = aJ._2
380
-
    $Tuple2([StringEntry("deletedValue", aK), StringEntry(a, aw)], $Tuple2(aK, aw))
94
+
@Callable(n)
95
+
func setTokenPayment (k) = valueOrElse(g(n.caller), [BinaryEntry("tokenPayment", k)])
96
+
97
+
98
+
99
+
@Callable(n)
100
+
func deleteValueByKey (s) = valueOrElse(g(n.caller), [DeleteEntry(s)])
101
+
102
+
103
+
104
+
@Callable(n)
105
+
func setString (s,y) = valueOrElse(g(n.caller), [StringEntry(s, y)])
106
+
107
+
108
+
109
+
@Callable(n)
110
+
func init (a,b,c) = valueOrElse(g(n.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
111
+
112
+
113
+
114
+
@Callable(n)
115
+
func mint (j,z) = {
116
+
    let A = (d + 1)
117
+
    let B = ((b + "#") + toString(A))
118
+
    let C = if ((16 >= size(B)))
119
+
        then B
120
+
        else toString(A)
121
+
    let r = {
122
+
        let x = invoke(e, "makeJSON", [["tokenURI"], [z]], nil)
123
+
        if ($isInstanceOf(x, "String"))
124
+
            then x
125
+
            else throw(($getType(x) + " couldn't be cast to String"))
126
+
        }
127
+
    let D = Issue(C, r, 1, 0, false, unit, height)
128
+
    let k = calculateAssetId(D)
129
+
    let E = Address(fromBase58String(j))
130
+
    let F = i(E, k)
131
+
    if ((F == F))
132
+
        then [D, F, IntegerEntry("totalAmount", A), StringEntry(C, z)]
133
+
        else throw("Strict value is not equal to itself.")
134
+
    }
135
+
136
+
137
+
138
+
@Callable(n)
139
+
func initLend (k,G,H,I) = valueOrElse(m(n.caller, k), {
140
+
    let D = l(k)
141
+
    let z = {
142
+
        let x = invoke(e, "readByJSONKey", [D.description, "tokenURI"], nil)
143
+
        if ($isInstanceOf(x, "String"))
144
+
            then x
145
+
            else throw(($getType(x) + " couldn't be cast to String"))
146
+
        }
147
+
    if ((z == z))
148
+
        then {
149
+
            let J = getStringValue("Lends")
150
+
            let K = {
151
+
                let x = invoke(e, "deleteByJSONKey", [J, "lendCount"], nil)
152
+
                if ($isInstanceOf(x, "(String, String)"))
153
+
                    then x
154
+
                    else throw(($getType(x) + " couldn't be cast to (String, String)"))
155
+
                }
156
+
            if ((K == K))
157
+
                then {
158
+
                    let L = K._1
159
+
                    let M = toString((parseIntValue(L) + 1))
160
+
                    let N = {
161
+
                        let x = invoke(e, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed", "rents"], ["0", k, z, toString(n.caller), toString(G), toString(H), toString(I), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (G * I))), "0", "0", "{\"name\":\"Rents\",\"rentCount\":\"0\"}"]], nil)
162
+
                        if ($isInstanceOf(x, "String"))
163
+
                            then x
164
+
                            else throw(($getType(x) + " couldn't be cast to String"))
165
+
                        }
166
+
                    if ((N == N))
167
+
                        then {
168
+
                            let O = {
169
+
                                let x = invoke(e, "addToJSON", [K._2, [L, "lendCount"], [N, M]], nil)
170
+
                                if ($isInstanceOf(x, "String"))
171
+
                                    then x
172
+
                                    else throw(($getType(x) + " couldn't be cast to String"))
173
+
                                }
174
+
                            if ((O == O))
175
+
                                then [StringEntry("Lends", O)]
176
+
                                else throw("Strict value is not equal to itself.")
177
+
                            }
178
+
                        else throw("Strict value is not equal to itself.")
179
+
                    }
180
+
                else throw("Strict value is not equal to itself.")
181
+
            }
182
+
        else throw("Strict value is not equal to itself.")
183
+
    })
184
+
185
+
186
+
187
+
@Callable(n)
188
+
func initRent (L,I) = {
189
+
    let P = toString(L)
190
+
    let J = getStringValue("Lends")
191
+
    let Q = {
192
+
        let x = invoke(e, "deleteByJSONKey", [J, "lendCount"], nil)
193
+
        if ($isInstanceOf(x, "(String, String)"))
194
+
            then x
195
+
            else throw(($getType(x) + " couldn't be cast to (String, String)"))
196
+
        }
197
+
    if ((Q == Q))
198
+
        then {
199
+
            let R = {
200
+
                let x = invoke(e, "deleteByJSONKey", [Q._2, P], nil)
201
+
                if ($isInstanceOf(x, "(String, String)"))
202
+
                    then x
203
+
                    else throw(($getType(x) + " couldn't be cast to (String, String)"))
204
+
                }
205
+
            if ((R == R))
206
+
                then [StringEntry("Debug", R._1)]
207
+
                else throw("Strict value is not equal to itself.")
208
+
            }
209
+
        else throw("Strict value is not equal to itself.")
381
210
 
    }
382
211
 
383
212
 

github/deemru/w8io/169f3d6 
63.66 ms ◑