w8 · tx · FPB···pH7

tx · FPBzgffkGQ1rKofmHEYJN6Doemkoomk6r6Gdh9e72pH7

3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb:  -0.00600000 Waves

2023.03.17 20:15 [2494291] smart account 3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FPBzgffkGQ1rKofmHEYJN6Doemkoomk6r6Gdh9e72pH7",
    "fee": 600000,
    "feeAssetId": null,
    "timestamp": 1679073361357,
    "version": 2,
    "chainId": 84,
    "sender": "3MrQ4g9YCsAN2Wr4QUXiWAPhNPv7DGdQNWb",
    "senderPublicKey": "2VQGRNRWyFAZvjDtkgZwdZcTwZvBJJ61n8zJfYYxm5eK",
    "proofs": [
        "4aHSuugL5H63r58pEPPRYuVk3pmPLCjeJ5ZgLTkrLfLhmG35n4W6XsgjbZKtds8EejL41YeRJbTe78GGVj8NNhqJ"
    ],
    "script": "base64:BgJTCAISBAoCGBgSBQoDCBgYEgQKAggIEgQKAggIEgQKAggIEgUKAwgICBIDCgECEgMKAQgSBAoCCAgSBQoDCAgIEgQKAggIEgYKBAgBAQESBAoCAQEKAA5jb2xsZWN0aW9uTmFtZQkBEUBleHRyTmF0aXZlKDEwNTgpAQIOY29sbGVjdGlvbk5hbWUABnN5bWJvbAkBEUBleHRyTmF0aXZlKDEwNTgpAQIGc3ltYm9sAAtkZXNjcmlwdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQILZGVzY3JpcHRpb24AC3RvdGFsQW1vdW50CQERQGV4dHJOYXRpdmUoMTA1NSkBAgt0b3RhbEFtb3VudAAIZEFwcEpzb24JAQdBZGRyZXNzAQkA2QQBAiMzTXJHYVpWUmhrbkVHZkhKMTl0dFVQTm5EUm9GcWNIaFZONwAMdG9rZW5QYXltZW50CQEHQWRkcmVzcwEJARFAZXh0ck5hdGl2ZSgxMDU3KQECDHRva2VuUGF5bWVudAEMb25seUludGVybmFsAQZjYWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBQR1bml0CQACAQIST25seSBpbnRlcm5hbCBjYWxsAQ10cmFuc2Zlck9yTm90AgJ0bwdhc3NldElkAwkAAAIFAnRvBQR0aGlzCQELU3RyaW5nRW50cnkCAg7QutC+0YHRgtGL0LvRjAIO0LrQvtGB0YLRi9C70YwJAQ5TY3JpcHRUcmFuc2ZlcgMFAnRvAAEFB2Fzc2V0SWQBDnBhcnNlSWR0b0Fzc2V0AQdhc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQdhc3NldElkAhxDYW4ndCBmaW5kIGFzc2V0IGJ5IGFzc2V0IGlkAQ9jaGVja0Fzc2V0T3duZXICBmNhbGxlcgdhc3NldElkAwkAAAIJAPAHAgUGY2FsbGVyCQDZBAEFB2Fzc2V0SWQAAQUEdW5pdAkAAgECEE9ubHkgYXNzZXQgb3duZXINAWkBEG1ha2VKU09OSW50ZXJuYWwCB2FycktleXMJYXJyVmFsdWVzCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyBANyZXMJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIFB2FycktleXMJAMwIAgUJYXJyVmFsdWVzBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARFhZGRUb0pTT05JbnRlcm5hbAMEanNvbgdhcnJLZXlzCWFyclZhbHVlcwkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAglhZGRUb0pTT04JAMwIAgUEanNvbgkAzAgCBQdhcnJLZXlzCQDMCAIFCWFyclZhbHVlcwUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAJQKAgUDbmlsBQNyZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEVcmVhZEJ5SlNPTktleUludGVybmFsAgRqc29uA2tleQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQFCGRBcHBKc29uAg1yZWFkQnlKU09OS2V5CQDMCAIFBGpzb24JAMwIAgUDa2V5BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdkZWxldGVCeUpTT05LZXlJbnRlcm5hbAIEanNvbgNrZXkJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIEA3JlcwkA/AcEBQhkQXBwSnNvbgIPZGVsZXRlQnlKU09OS2V5CQDMCAIFBGpzb24JAMwIAgUDa2V5BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARNzdG9yYWdlSnNvbkludGVybmFsAgdqc29uS2V5Cmpzb25TdHJpbmcJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHanNvbktleQUKanNvblN0cmluZwUDbmlsAWkBB3NldFVzZXIDB2Fzc2V0SWQEdXNlcgdleHBpcmVzBANyZXMJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIJAMwIAgIEdXNlcgkAzAgCAgdleHBpcmVzBQNuaWwJAMwIAgkAzAgCBQR1c2VyCQDMCAIFB2V4cGlyZXMFA25pbAUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICB3VzZXJPZi0FB2Fzc2V0SWQKAAFABQNyZXMDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ9zZXRUb2tlblBheW1lbnQBB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC0JpbmFyeUVudHJ5AgIMdG9rZW5QYXltZW50BQdhc3NldElkBQNuaWwBaQEQZGVsZXRlVmFsdWVCeUtleQEDa2V5CQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyCQDMCAIJAQtEZWxldGVFbnRyeQEFA2tleQUDbmlsAWkBCXNldFN0cmluZwIDa2V5BXZhbHVlCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIFA2tleQUFdmFsdWUFA25pbAFpAQRpbml0Aw5jb2xsZWN0aW9uTmFtZQZzeW1ib2wLZGVzY3JpcHRpb24JAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgIOY29sbGVjdGlvbk5hbWUFDmNvbGxlY3Rpb25OYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQICBnN5bWJvbAUGc3ltYm9sCQDMCAIJAQtTdHJpbmdFbnRyeQICC2Rlc2NyaXB0aW9uBQtkZXNjcmlwdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgILdG90YWxBbW91bnQAAAUDbmlsAWkBBG1pbnQCAnRvCHRva2VuVVJJBAd0b2tlbklkCQBkAgULdG90YWxBbW91bnQAAQQHcHJlTmFtZQkArAICCQCsAgIFBnN5bWJvbAIBIwkApAMBBQd0b2tlbklkBARuYW1lAwkAZwIAEAkAsQIBBQdwcmVOYW1lBQdwcmVOYW1lCQCkAwEFB3Rva2VuSWQEBGpzb24KAAFACQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICCHRva2VuVVJJBQNuaWwJAMwIAgkAzAgCBQh0b2tlblVSSQUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcEBWFzc2V0CQDDCAcFBG5hbWUFBGpzb24AAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAl0b0FkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQJ0bwQIdHJhbnNmZXIJAQ10cmFuc2Zlck9yTm90AgUJdG9BZGRyZXNzBQdhc3NldElkAwkAAAIFCHRyYW5zZmVyBQh0cmFuc2ZlcgkAzAgCBQVhc3NldAkAzAgCBQh0cmFuc2ZlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgILdG90YWxBbW91bnQFB3Rva2VuSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUEbmFtZQUIdG9rZW5VUkkFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhpbml0TGVuZAQHYXNzZXRJZA90aW1lVW5pdFNlY29uZHMNdGltZVVuaXRQcmljZQ10aW1lVW5pdENvdW50CQELdmFsdWVPckVsc2UCCQEPY2hlY2tBc3NldE93bmVyAggFAWkGY2FsbGVyBQdhc3NldElkBAVhc3NldAkBDnBhcnNlSWR0b0Fzc2V0AQUHYXNzZXRJZAQIdG9rZW5VUkkKAAFACQD8BwQFCGRBcHBKc29uAg1yZWFkQnlKU09OS2V5CQDMCAIIBQVhc3NldAtkZXNjcmlwdGlvbgkAzAgCAgh0b2tlblVSSQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nAwkAAAIFCHRva2VuVVJJBQh0b2tlblVSSQQFbGVuZHMJARFAZXh0ck5hdGl2ZSgxMDU4KQECBUxlbmRzBAZkZWxldGUKAAFACQD8BwQFCGRBcHBKc29uAg9kZWxldGVCeUpTT05LZXkJAMwIAgUFbGVuZHMJAMwIAgIJbGVuZENvdW50BQNuaWwFA25pbAMJAAECBQFAAhAoU3RyaW5nLCBTdHJpbmcpBQFACQACAQkArAICCQADAQUBQAIlIGNvdWxkbid0IGJlIGNhc3QgdG8gKFN0cmluZywgU3RyaW5nKQMJAAACBQZkZWxldGUFBmRlbGV0ZQQGbGVuZElkCAUGZGVsZXRlAl8xBAhuZXdDb3VudAkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBBQZsZW5kSWQAAQQEbWFrZQoAAUAJAPwHBAUIZEFwcEpzb24CCG1ha2VKU09OCQDMCAIJAMwIAgISc3VwcG9ydGVkSW50ZXJmYWNlCQDMCAICCGFzc2V0ZElkCQDMCAICCHRva2VuVVJJCQDMCAICBW93bmVyCQDMCAICD3RpbWVVbml0U2Vjb25kcwkAzAgCAg10aW1lVW5pdFByaWNlCQDMCAICDXRpbWVVbml0Q291bnQJAMwIAgIOc3RhcnRUaW1lc3RhbXAJAMwIAgIMZW5kVGltZXN0YW1wCQDMCAICB2RlcG9zaXQJAMwIAgIHY2xhaW1lZAkAzAgCAgVyZW50cwUDbmlsCQDMCAIJAMwIAgIBMAkAzAgCBQdhc3NldElkCQDMCAIFCHRva2VuVVJJCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAKQDAQUPdGltZVVuaXRTZWNvbmRzCQDMCAIJAKQDAQUNdGltZVVuaXRQcmljZQkAzAgCCQCkAwEFDXRpbWVVbml0Q291bnQJAMwIAgkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQCkAwEJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAaAIFD3RpbWVVbml0U2Vjb25kcwUNdGltZVVuaXRDb3VudAkAzAgCAgEwCQDMCAICATAJAMwIAgIReyJyZW50Q291bnQiOiIwIn0FA25pbAUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nAwkAAAIFBG1ha2UFBG1ha2UEBmluc2VydAoAAUAJAPwHBAUIZEFwcEpzb24CCWFkZFRvSlNPTgkAzAgCCAUGZGVsZXRlAl8yCQDMCAIJAMwIAgUGbGVuZElkCQDMCAICCWxlbmRDb3VudAUDbmlsCQDMCAIJAMwIAgUEbWFrZQkAzAgCBQhuZXdDb3VudAUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUGaW5zZXJ0BQZpbnNlcnQJAMwIAgkBC1N0cmluZ0VudHJ5AgIFTGVuZHMFBmluc2VydAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGluaXRSZW50AgZsZW5kSWQNdGltZVVuaXRDb3VudAQMbGVuZElkU3RyaW5nCQCkAwEFBmxlbmRJZAQFbGVuZHMJARFAZXh0ck5hdGl2ZSgxMDU4KQECBUxlbmRzBA9kZWxldGVMZW5kQ291bnQKAAFACQD8BwQFCGRBcHBKc29uAg9kZWxldGVCeUpTT05LZXkJAMwIAgUFbGVuZHMJAMwIAgIJbGVuZENvdW50BQNuaWwFA25pbAMJAAECBQFAAhAoU3RyaW5nLCBTdHJpbmcpBQFACQACAQkArAICCQADAQUBQAIlIGNvdWxkbid0IGJlIGNhc3QgdG8gKFN0cmluZywgU3RyaW5nKQMJAAACBQ9kZWxldGVMZW5kQ291bnQFD2RlbGV0ZUxlbmRDb3VudAQKZGVsZXRlTGVuZAoAAUAJAPwHBAUIZEFwcEpzb24CD2RlbGV0ZUJ5SlNPTktleQkAzAgCCAUPZGVsZXRlTGVuZENvdW50Al8yCQDMCAIFDGxlbmRJZFN0cmluZwUDbmlsBQNuaWwDCQABAgUBQAIQKFN0cmluZywgU3RyaW5nKQUBQAkAAgEJAKwCAgkAAwEFAUACJSBjb3VsZG4ndCBiZSBjYXN0IHRvIChTdHJpbmcsIFN0cmluZykDCQAAAgUKZGVsZXRlTGVuZAUKZGVsZXRlTGVuZAQLZGVsZXRlUmVudHMKAAFACQD8BwQFCGRBcHBKc29uAg9kZWxldGVCeUpTT05LZXkJAMwIAggFCmRlbGV0ZUxlbmQCXzEJAMwIAgIFcmVudHMFA25pbAUDbmlsAwkAAQIFAUACEChTdHJpbmcsIFN0cmluZykFAUAJAAIBCQCsAgIJAAMBBQFAAiUgY291bGRuJ3QgYmUgY2FzdCB0byAoU3RyaW5nLCBTdHJpbmcpAwkAAAIFC2RlbGV0ZVJlbnRzBQtkZWxldGVSZW50cwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAejTHc=",
    "height": 2494291,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BKArPNHH6ueYkbVQmH36vNk5Ui5atDLTBxVtesRrVbgW
Next: 6a9NqpunTKbXZnTSBbGbjyhrKdwkauVEHEGZism5dtH8

Diff: 
Old New Differences
211 211                              else throw(($getType(x) + " couldn't be cast to (String, String)"))
212 212                          }
213 213                      if ((S == S))
214 -                         then [StringEntry("Debug", S._1)]
214 +                         then nil
215 215                          else throw("Strict value is not equal to itself.")
216 216                      }
217 217                  else throw("Strict value is not equal to itself.")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = getStringValue("collectionName")
5 5  
6 6  let b = getStringValue("symbol")
7 7  
8 8  let c = getStringValue("description")
9 9  
10 10  let d = getIntegerValue("totalAmount")
11 11  
12 12  let e = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
13 13  
14 14  let f = Address(getBinaryValue("tokenPayment"))
15 15  
16 16  func g (h) = if ((h == this))
17 17      then unit
18 18      else throw("Only internal call")
19 19  
20 20  
21 21  func i (j,k) = if ((j == this))
22 22      then StringEntry("костыль", "костыль")
23 23      else ScriptTransfer(j, 1, k)
24 24  
25 25  
26 26  func l (k) = valueOrErrorMessage(assetInfo(fromBase58String(k)), "Can't find asset by asset id")
27 27  
28 28  
29 29  func m (h,k) = if ((assetBalance(h, fromBase58String(k)) == 1))
30 30      then unit
31 31      else throw("Only asset owner")
32 32  
33 33  
34 34  @Callable(n)
35 35  func makeJSONInternal (o,p) = valueOrElse(g(n.caller), {
36 36      let q = invoke(e, "makeJSON", [o, p], nil)
37 37      if ((q == q))
38 38          then $Tuple2(nil, q)
39 39          else throw("Strict value is not equal to itself.")
40 40      })
41 41  
42 42  
43 43  
44 44  @Callable(n)
45 45  func addToJSONInternal (r,o,p) = valueOrElse(g(n.caller), {
46 46      let q = invoke(e, "addToJSON", [r, o, p], nil)
47 47      if ((q == q))
48 48          then $Tuple2(nil, q)
49 49          else throw("Strict value is not equal to itself.")
50 50      })
51 51  
52 52  
53 53  
54 54  @Callable(n)
55 55  func readByJSONKeyInternal (r,s) = valueOrElse(g(n.caller), {
56 56      let q = invoke(e, "readByJSONKey", [r, s], nil)
57 57      if ((q == q))
58 58          then $Tuple2(nil, q)
59 59          else throw("Strict value is not equal to itself.")
60 60      })
61 61  
62 62  
63 63  
64 64  @Callable(n)
65 65  func deleteByJSONKeyInternal (r,s) = valueOrElse(g(n.caller), {
66 66      let q = invoke(e, "deleteByJSONKey", [r, s], nil)
67 67      if ((q == q))
68 68          then $Tuple2(nil, q)
69 69          else throw("Strict value is not equal to itself.")
70 70      })
71 71  
72 72  
73 73  
74 74  @Callable(n)
75 75  func storageJsonInternal (t,u) = valueOrElse(g(n.caller), [StringEntry(t, u)])
76 76  
77 77  
78 78  
79 79  @Callable(n)
80 80  func setUser (k,v,w) = {
81 81      let q = invoke(e, "makeJSON", [["user", "expires"], [v, w]], nil)
82 82      if ((q == q))
83 83          then $Tuple2([StringEntry(("userOf-" + k), {
84 84              let x = q
85 85              if ($isInstanceOf(x, "String"))
86 86                  then x
87 87                  else throw(($getType(x) + " couldn't be cast to String"))
88 88              })], q)
89 89          else throw("Strict value is not equal to itself.")
90 90      }
91 91  
92 92  
93 93  
94 94  @Callable(n)
95 95  func setTokenPayment (k) = valueOrElse(g(n.caller), [BinaryEntry("tokenPayment", k)])
96 96  
97 97  
98 98  
99 99  @Callable(n)
100 100  func deleteValueByKey (s) = valueOrElse(g(n.caller), [DeleteEntry(s)])
101 101  
102 102  
103 103  
104 104  @Callable(n)
105 105  func setString (s,y) = valueOrElse(g(n.caller), [StringEntry(s, y)])
106 106  
107 107  
108 108  
109 109  @Callable(n)
110 110  func init (a,b,c) = valueOrElse(g(n.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
111 111  
112 112  
113 113  
114 114  @Callable(n)
115 115  func mint (j,z) = {
116 116      let A = (d + 1)
117 117      let B = ((b + "#") + toString(A))
118 118      let C = if ((16 >= size(B)))
119 119          then B
120 120          else toString(A)
121 121      let r = {
122 122          let x = invoke(e, "makeJSON", [["tokenURI"], [z]], nil)
123 123          if ($isInstanceOf(x, "String"))
124 124              then x
125 125              else throw(($getType(x) + " couldn't be cast to String"))
126 126          }
127 127      let D = Issue(C, r, 1, 0, false, unit, height)
128 128      let k = calculateAssetId(D)
129 129      let E = Address(fromBase58String(j))
130 130      let F = i(E, k)
131 131      if ((F == F))
132 132          then [D, F, IntegerEntry("totalAmount", A), StringEntry(C, z)]
133 133          else throw("Strict value is not equal to itself.")
134 134      }
135 135  
136 136  
137 137  
138 138  @Callable(n)
139 139  func initLend (k,G,H,I) = valueOrElse(m(n.caller, k), {
140 140      let D = l(k)
141 141      let z = {
142 142          let x = invoke(e, "readByJSONKey", [D.description, "tokenURI"], nil)
143 143          if ($isInstanceOf(x, "String"))
144 144              then x
145 145              else throw(($getType(x) + " couldn't be cast to String"))
146 146          }
147 147      if ((z == z))
148 148          then {
149 149              let J = getStringValue("Lends")
150 150              let K = {
151 151                  let x = invoke(e, "deleteByJSONKey", [J, "lendCount"], nil)
152 152                  if ($isInstanceOf(x, "(String, String)"))
153 153                      then x
154 154                      else throw(($getType(x) + " couldn't be cast to (String, String)"))
155 155                  }
156 156              if ((K == K))
157 157                  then {
158 158                      let L = K._1
159 159                      let M = toString((parseIntValue(L) + 1))
160 160                      let N = {
161 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", "{\"rentCount\":\"0\"}"]], nil)
162 162                          if ($isInstanceOf(x, "String"))
163 163                              then x
164 164                              else throw(($getType(x) + " couldn't be cast to String"))
165 165                          }
166 166                      if ((N == N))
167 167                          then {
168 168                              let O = {
169 169                                  let x = invoke(e, "addToJSON", [K._2, [L, "lendCount"], [N, M]], nil)
170 170                                  if ($isInstanceOf(x, "String"))
171 171                                      then x
172 172                                      else throw(($getType(x) + " couldn't be cast to String"))
173 173                                  }
174 174                              if ((O == O))
175 175                                  then [StringEntry("Lends", O)]
176 176                                  else throw("Strict value is not equal to itself.")
177 177                              }
178 178                          else throw("Strict value is not equal to itself.")
179 179                      }
180 180                  else throw("Strict value is not equal to itself.")
181 181              }
182 182          else throw("Strict value is not equal to itself.")
183 183      })
184 184  
185 185  
186 186  
187 187  @Callable(n)
188 188  func initRent (L,I) = {
189 189      let P = toString(L)
190 190      let J = getStringValue("Lends")
191 191      let Q = {
192 192          let x = invoke(e, "deleteByJSONKey", [J, "lendCount"], nil)
193 193          if ($isInstanceOf(x, "(String, String)"))
194 194              then x
195 195              else throw(($getType(x) + " couldn't be cast to (String, String)"))
196 196          }
197 197      if ((Q == Q))
198 198          then {
199 199              let R = {
200 200                  let x = invoke(e, "deleteByJSONKey", [Q._2, P], nil)
201 201                  if ($isInstanceOf(x, "(String, String)"))
202 202                      then x
203 203                      else throw(($getType(x) + " couldn't be cast to (String, String)"))
204 204                  }
205 205              if ((R == R))
206 206                  then {
207 207                      let S = {
208 208                          let x = invoke(e, "deleteByJSONKey", [R._1, "rents"], nil)
209 209                          if ($isInstanceOf(x, "(String, String)"))
210 210                              then x
211 211                              else throw(($getType(x) + " couldn't be cast to (String, String)"))
212 212                          }
213 213                      if ((S == S))
214 -                         then [StringEntry("Debug", S._1)]
214 +                         then nil
215 215                          else throw("Strict value is not equal to itself.")
216 216                      }
217 217                  else throw("Strict value is not equal to itself.")
218 218              }
219 219          else throw("Strict value is not equal to itself.")
220 220      }
221 221  
222 222

Old	New		Differences
211	211		else throw(($getType(x) + " couldn't be cast to (String, String)"))
212	212		}
213	213		if ((S == S))
214		-	then ~~[StringEntry("Debug", S._1)]~~
	214	+	then nil
215	215		else throw("Strict value is not equal to itself.")
216	216		}
217	217		else throw("Strict value is not equal to itself.")

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = getStringValue("collectionName")
5	5
6	6		let b = getStringValue("symbol")
7	7
8	8		let c = getStringValue("description")
9	9
10	10		let d = getIntegerValue("totalAmount")
11	11
12	12		let e = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
13	13
14	14		let f = Address(getBinaryValue("tokenPayment"))
15	15
16	16		func g (h) = if ((h == this))
17	17		then unit
18	18		else throw("Only internal call")
19	19
20	20
21	21		func i (j,k) = if ((j == this))
22	22		then StringEntry("костыль", "костыль")
23	23		else ScriptTransfer(j, 1, k)
24	24
25	25
26	26		func l (k) = valueOrErrorMessage(assetInfo(fromBase58String(k)), "Can't find asset by asset id")
27	27
28	28
29	29		func m (h,k) = if ((assetBalance(h, fromBase58String(k)) == 1))
30	30		then unit
31	31		else throw("Only asset owner")
32	32
33	33
34	34		@Callable(n)
35	35		func makeJSONInternal (o,p) = valueOrElse(g(n.caller), {
36	36		let q = invoke(e, "makeJSON", [o, p], nil)
37	37		if ((q == q))
38	38		then $Tuple2(nil, q)
39	39		else throw("Strict value is not equal to itself.")
40	40		})
41	41
42	42
43	43
44	44		@Callable(n)
45	45		func addToJSONInternal (r,o,p) = valueOrElse(g(n.caller), {
46	46		let q = invoke(e, "addToJSON", [r, o, p], nil)
47	47		if ((q == q))
48	48		then $Tuple2(nil, q)
49	49		else throw("Strict value is not equal to itself.")
50	50		})
51	51
52	52
53	53
54	54		@Callable(n)
55	55		func readByJSONKeyInternal (r,s) = valueOrElse(g(n.caller), {
56	56		let q = invoke(e, "readByJSONKey", [r, s], nil)
57	57		if ((q == q))
58	58		then $Tuple2(nil, q)
59	59		else throw("Strict value is not equal to itself.")
60	60		})
61	61
62	62
63	63
64	64		@Callable(n)
65	65		func deleteByJSONKeyInternal (r,s) = valueOrElse(g(n.caller), {
66	66		let q = invoke(e, "deleteByJSONKey", [r, s], nil)
67	67		if ((q == q))
68	68		then $Tuple2(nil, q)
69	69		else throw("Strict value is not equal to itself.")
70	70		})
71	71
72	72
73	73
74	74		@Callable(n)
75	75		func storageJsonInternal (t,u) = valueOrElse(g(n.caller), [StringEntry(t, u)])
76	76
77	77
78	78
79	79		@Callable(n)
80	80		func setUser (k,v,w) = {
81	81		let q = invoke(e, "makeJSON", [["user", "expires"], [v, w]], nil)
82	82		if ((q == q))
83	83		then $Tuple2([StringEntry(("userOf-" + k), {
84	84		let x = q
85	85		if ($isInstanceOf(x, "String"))
86	86		then x
87	87		else throw(($getType(x) + " couldn't be cast to String"))
88	88		})], q)
89	89		else throw("Strict value is not equal to itself.")
90	90		}
91	91
92	92
93	93
94	94		@Callable(n)
95	95		func setTokenPayment (k) = valueOrElse(g(n.caller), [BinaryEntry("tokenPayment", k)])
96	96
97	97
98	98
99	99		@Callable(n)
100	100		func deleteValueByKey (s) = valueOrElse(g(n.caller), [DeleteEntry(s)])
101	101
102	102
103	103
104	104		@Callable(n)
105	105		func setString (s,y) = valueOrElse(g(n.caller), [StringEntry(s, y)])
106	106
107	107
108	108
109	109		@Callable(n)
110	110		func init (a,b,c) = valueOrElse(g(n.caller), [StringEntry("collectionName", a), StringEntry("symbol", b), StringEntry("description", c), IntegerEntry("totalAmount", 0)])
111	111
112	112
113	113
114	114		@Callable(n)
115	115		func mint (j,z) = {
116	116		let A = (d + 1)
117	117		let B = ((b + "#") + toString(A))
118	118		let C = if ((16 >= size(B)))
119	119		then B
120	120		else toString(A)
121	121		let r = {
122	122		let x = invoke(e, "makeJSON", [["tokenURI"], [z]], nil)
123	123		if ($isInstanceOf(x, "String"))
124	124		then x
125	125		else throw(($getType(x) + " couldn't be cast to String"))
126	126		}
127	127		let D = Issue(C, r, 1, 0, false, unit, height)
128	128		let k = calculateAssetId(D)
129	129		let E = Address(fromBase58String(j))
130	130		let F = i(E, k)
131	131		if ((F == F))
132	132		then [D, F, IntegerEntry("totalAmount", A), StringEntry(C, z)]
133	133		else throw("Strict value is not equal to itself.")
134	134		}
135	135
136	136
137	137
138	138		@Callable(n)
139	139		func initLend (k,G,H,I) = valueOrElse(m(n.caller, k), {
140	140		let D = l(k)
141	141		let z = {
142	142		let x = invoke(e, "readByJSONKey", [D.description, "tokenURI"], nil)
143	143		if ($isInstanceOf(x, "String"))
144	144		then x
145	145		else throw(($getType(x) + " couldn't be cast to String"))
146	146		}
147	147		if ((z == z))
148	148		then {
149	149		let J = getStringValue("Lends")
150	150		let K = {
151	151		let x = invoke(e, "deleteByJSONKey", [J, "lendCount"], nil)
152	152		if ($isInstanceOf(x, "(String, String)"))
153	153		then x
154	154		else throw(($getType(x) + " couldn't be cast to (String, String)"))
155	155		}
156	156		if ((K == K))
157	157		then {
158	158		let L = K._1
159	159		let M = toString((parseIntValue(L) + 1))
160	160		let N = {
161	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", "{\"rentCount\":\"0\"}"]], nil)
162	162		if ($isInstanceOf(x, "String"))
163	163		then x
164	164		else throw(($getType(x) + " couldn't be cast to String"))
165	165		}
166	166		if ((N == N))
167	167		then {
168	168		let O = {
169	169		let x = invoke(e, "addToJSON", [K._2, [L, "lendCount"], [N, M]], nil)
170	170		if ($isInstanceOf(x, "String"))
171	171		then x
172	172		else throw(($getType(x) + " couldn't be cast to String"))
173	173		}
174	174		if ((O == O))
175	175		then [StringEntry("Lends", O)]
176	176		else throw("Strict value is not equal to itself.")
177	177		}
178	178		else throw("Strict value is not equal to itself.")
179	179		}
180	180		else throw("Strict value is not equal to itself.")
181	181		}
182	182		else throw("Strict value is not equal to itself.")
183	183		})
184	184
185	185
186	186
187	187		@Callable(n)
188	188		func initRent (L,I) = {
189	189		let P = toString(L)
190	190		let J = getStringValue("Lends")
191	191		let Q = {
192	192		let x = invoke(e, "deleteByJSONKey", [J, "lendCount"], nil)
193	193		if ($isInstanceOf(x, "(String, String)"))
194	194		then x
195	195		else throw(($getType(x) + " couldn't be cast to (String, String)"))
196	196		}
197	197		if ((Q == Q))
198	198		then {
199	199		let R = {
200	200		let x = invoke(e, "deleteByJSONKey", [Q._2, P], nil)
201	201		if ($isInstanceOf(x, "(String, String)"))
202	202		then x
203	203		else throw(($getType(x) + " couldn't be cast to (String, String)"))
204	204		}
205	205		if ((R == R))
206	206		then {
207	207		let S = {
208	208		let x = invoke(e, "deleteByJSONKey", [R._1, "rents"], nil)
209	209		if ($isInstanceOf(x, "(String, String)"))
210	210		then x
211	211		else throw(($getType(x) + " couldn't be cast to (String, String)"))
212	212		}
213	213		if ((S == S))
214		-	then ~~[StringEntry("Debug", S._1)]~~
	214	+	then nil
215	215		else throw("Strict value is not equal to itself.")
216	216		}
217	217		else throw("Strict value is not equal to itself.")
218	218		}
219	219		else throw("Strict value is not equal to itself.")
220	220		}
221	221
222	222

github/deemru/w8io/026f985 
35.31 ms ◑