w8 · tx · JEF···d5k

tx · JEFwwZT4fVoMmHv4gjiWJ4y4wSdtqpHXfjxGHyop9d5k

3MxVYj6ScMArhAamy7nB6b342kh1Pso1LTn:  -0.00800000 Waves

2023.03.22 19:01 [2501425] smart account 3MxVYj6ScMArhAamy7nB6b342kh1Pso1LTn > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "JEFwwZT4fVoMmHv4gjiWJ4y4wSdtqpHXfjxGHyop9d5k",
    "fee": 800000,
    "feeAssetId": null,
    "timestamp": 1679500910488,
    "version": 2,
    "chainId": 84,
    "sender": "3MxVYj6ScMArhAamy7nB6b342kh1Pso1LTn",
    "senderPublicKey": "CZeucjRLCKrkiP9zuj9KbLe23Wv9DywFzHBqNDnte51B",
    "proofs": [
        "E7vNudjL2sWNKSz8ScauKi3crZiKJUsSfbncvpETwj26A6TmhJ7QHEru64WsAPy4fAeh3rVapcpuP3mAz5skGLC"
    ],
    "script": "base64:BgJKCAISBAoCCAgSBAoCCAESAwoBCBIGCgQICAgIEgUKAwgICBIDCgECEgQKAggBEgMKAQgSBgoECAEBARIECgIBARIDCgEBEgMKAQEWAA5jb2xsZWN0aW9uTmFtZQkBEUBleHRyTmF0aXZlKDEwNTgpAQIOY29sbGVjdGlvbk5hbWUABnN5bWJvbAkBEUBleHRyTmF0aXZlKDEwNTgpAQIGc3ltYm9sAAtkZXNjcmlwdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQILZGVzY3JpcHRpb24AC3RvdGFsQW1vdW50CQERQGV4dHJOYXRpdmUoMTA1NSkBAgt0b3RhbEFtb3VudAAHYmFzZVVSSQkBEUBleHRyTmF0aXZlKDEwNTgpAQIHYmFzZVVSSQAIZEFwcEpzb24JAQdBZGRyZXNzAQkA2QQBAiMzTXJHYVpWUmhrbkVHZkhKMTl0dFVQTm5EUm9GcWNIaFZONwAMdG9rZW5QYXltZW50CQERQGV4dHJOYXRpdmUoMTA1NykBAgx0b2tlblBheW1lbnQAEXRva2VuUGF5bWVudEFzc2V0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkBEUBleHRyTmF0aXZlKDEwNTcpAQIMdG9rZW5QYXltZW50AiN0b2tlbiBwYXltZW50IGFzc2V0IGRvZXNuJ3QgY29ubmVjdAAJbGVuZENvdW50CQERQGV4dHJOYXRpdmUoMTA1NSkBAglsZW5kQ291bnQAEGxlbmRDdXJyZW50Q291bnQJARFAZXh0ck5hdGl2ZSgxMDU1KQECEGxlbmRDdXJyZW50Q291bnQBDnBhcnNlSWR0b0Fzc2V0AQdhc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQdhc3NldElkAhxDYW4ndCBmaW5kIGFzc2V0IGJ5IGFzc2V0IGlkAQ10cmFuc2Zlck9yTm90AwJ0bwZhbW91bnQHYXNzZXRJZAMJAAACBQJ0bwUEdGhpcwkBC1N0cmluZ0VudHJ5AgIEc210aAIEc210aAkBDlNjcmlwdFRyYW5zZmVyAwUCdG8FBmFtb3VudAUHYXNzZXRJZAELZ2V0TGVuZEpzb24BBmxlbmRJZAQMbGVuZElkU3RyaW5nCQCkAwEFBmxlbmRJZAkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICAgVsZW5kLQUMbGVuZElkU3RyaW5nAQZnZXRLZXkCCGxlbmRKc29uA2tleQQPdGltZVVuaXRTZWNvbmRzCgABQAkA/AcEBQhkQXBwSnNvbgINcmVhZEJ5SlNPTktleQkAzAgCBQhsZW5kSnNvbgkAzAgCBQNrZXkFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwMJAAACBQ90aW1lVW5pdFNlY29uZHMFD3RpbWVVbml0U2Vjb25kcwUPdGltZVVuaXRTZWNvbmRzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQxnZXRSZW50Q291bnQBBmxlbmRJZAQMbGVuZElkU3RyaW5nCQCkAwEFBmxlbmRJZAkBEUBleHRyTmF0aXZlKDEwNTUpAQkArAICAg9sZW5kLXJlbnRDb3VudC0FDGxlbmRJZFN0cmluZwEMY2FsY0xlbmRDb3N0AgZsZW5kSWQPdGltZVVuaXRTZWNvbmRzBAhsZW5kSnNvbgkBC2dldExlbmRKc29uAQUGbGVuZElkBBN0aW1lVW5pdFByaWNlU3RyaW5nCQEGZ2V0S2V5AgUIbGVuZEpzb24CDXRpbWVVbml0UHJpY2UDCQAAAgUTdGltZVVuaXRQcmljZVN0cmluZwUTdGltZVVuaXRQcmljZVN0cmluZwQNdGltZVVuaXRQcmljZQkBDXBhcnNlSW50VmFsdWUBBRN0aW1lVW5pdFByaWNlU3RyaW5nCQBoAgUPdGltZVVuaXRTZWNvbmRzBQ10aW1lVW5pdFByaWNlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQtnZXRMZW5kQ29zdAEGbGVuZElkCQELdmFsdWVPckVsc2UCCQERQGV4dHJOYXRpdmUoMTA1NSkBCQCsAgICCmxlbmQtY29zdC0JAKQDAQUGbGVuZElkAAABDG9ubHlJbnRlcm5hbAEGY2FsbGVyAwkAAAIFBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECEk9ubHkgaW50ZXJuYWwgY2FsbAEPY2hlY2tBc3NldE93bmVyAgZjYWxsZXIHYXNzZXRJZAMJAAACCQDwBwIFBmNhbGxlcgkA2QQBBQdhc3NldElkAAEFBHVuaXQJAAIBAhBPbmx5IGFzc2V0IG93bmVyAQxjaGVja1BheW1lbnQCCHBheW1lbnRzBmFtb3VudAMJAGcCCAkAkQMCBQhwYXltZW50cwAABmFtb3VudAUGYW1vdW50BQR1bml0CQACAQIVYW1vdW50IGxlc3MgdGhlbiBuZWVkARBjaGVja0Fzc2V0RXhpc3RzAQdhc3NldElkAwkBC3ZhbHVlT3JFbHNlAgkAoAgBBQdhc3NldElkBwkAAgECFnRoaXMgdG9rZW4gYWxyZWFkeSB1c2UFBHVuaXQBDmNoZWNrTGVuZE93bmVyAgZjYWxsZXIGbGVuZElkAwkBAiE9AgkBBmdldEtleQIJAQtnZXRMZW5kSnNvbgEFBmxlbmRJZAIFb3duZXIJAKUIAQUGY2FsbGVyCQACAQIReW91IGhhdmVuJ3QgcGVybXMFBHVuaXQMAWkBCXNldFN0cmluZwIEX2tleQZfdmFsdWUJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUEX2tleQUGX3ZhbHVlBQNuaWwBaQEGc2V0SW50AgRfa2V5Bl92YWx1ZQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgUEX2tleQUGX3ZhbHVlBQNuaWwBaQELZGVsZXRlRW50cnkBBF9rZXkJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC0RlbGV0ZUVudHJ5AQUEX2tleQUDbmlsAWkBBGluaXQED19jb2xsZWN0aW9uTmFtZQdfc3ltYm9sDF9kZXNjcmlwdGlvbghfYmFzZVVSSQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCAg5jb2xsZWN0aW9uTmFtZQUPX2NvbGxlY3Rpb25OYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQICBnN5bWJvbAUHX3N5bWJvbAkAzAgCCQELU3RyaW5nRW50cnkCAgtkZXNjcmlwdGlvbgUMX2Rlc2NyaXB0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgt0b3RhbEFtb3VudAAACQDMCAIJAQtTdHJpbmdFbnRyeQICB2Jhc2VVUkkFCF9iYXNlVVJJBQNuaWwBaQEHc2V0VXNlcgMHYXNzZXRJZAR1c2VyB2V4cGlyZXMEA3JlcwkA/AcEBQhkQXBwSnNvbgIIbWFrZUpTT04JAMwIAgkAzAgCAgR1c2VyCQDMCAICB2V4cGlyZXMFA25pbAkAzAgCCQDMCAIFBHVzZXIJAMwIAgUHZXhwaXJlcwUDbmlsBQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIHdXNlck9mLQUHYXNzZXRJZAoAAUAFA3JlcwMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcFA25pbAUDcmVzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBD3NldFRva2VuUGF5bWVudAELYXNzZXRCaW5hcnkJAQt2YWx1ZU9yRWxzZQIJAQxvbmx5SW50ZXJuYWwBCAUBaQZjYWxsZXIJAMwIAgkBC0JpbmFyeUVudHJ5AgIMdG9rZW5QYXltZW50BQthc3NldEJpbmFyeQUDbmlsAWkBCm1pbnRUb2tlbnMCAnRvBmFtb3VudAQGcmVpc3VlCQEHUmVpc3N1ZQMFDHRva2VuUGF5bWVudAUGYW1vdW50BgQIdHJhbnNmZXIJAQ10cmFuc2Zlck9yTm90AwgFAWkGY2FsbGVyBQZhbW91bnQFDHRva2VuUGF5bWVudAMJAAACBQh0cmFuc2ZlcgUIdHJhbnNmZXIJAMwIAgUIdHJhbnNmZXIJAMwIAgUGcmVpc3VlBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEHbWludE5GVAECdG8EB3Rva2VuSWQJAGQCBQt0b3RhbEFtb3VudAABBA10b2tlbklkU3RyaW5nCQCkAwEFB3Rva2VuSWQEB3ByZU5hbWUJAKwCAgkArAICBQZzeW1ib2wCASMFDXRva2VuSWRTdHJpbmcEBG5hbWUDCQBnAgAQCQCxAgEFB3ByZU5hbWUFB3ByZU5hbWUFDXRva2VuSWRTdHJpbmcECHRva2VuVVJJCQCsAgIFB2Jhc2VVUkkFDXRva2VuSWRTdHJpbmcEBGpzb24KAAFACQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICCHRva2VuVVJJBQNuaWwJAMwIAgkAzAgCBQh0b2tlblVSSQUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcEBWFzc2V0CQDDCAcFBG5hbWUFBGpzb24AAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAl0b0FkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQJ0bwQIdHJhbnNmZXIJAQ10cmFuc2Zlck9yTm90AwUJdG9BZGRyZXNzAAEFB2Fzc2V0SWQDCQAAAgUIdHJhbnNmZXIFCHRyYW5zZmVyCQDMCAIFBWFzc2V0CQDMCAIFCHRyYW5zZmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgt0b3RhbEFtb3VudAUHdG9rZW5JZAkAzAgCCQELU3RyaW5nRW50cnkCBQRuYW1lBQh0b2tlblVSSQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGluaXRMZW5kBAdhc3NldElkD3RpbWVVbml0U2Vjb25kcw10aW1lVW5pdFByaWNlDXRpbWVVbml0Q291bnQJAQt2YWx1ZU9yRWxzZQIJAQ9jaGVja0Fzc2V0T3duZXICCAUBaQZjYWxsZXIFB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJARBjaGVja0Fzc2V0RXhpc3RzAQUHYXNzZXRJZAQFYXNzZXQJAQ5wYXJzZUlkdG9Bc3NldAEFB2Fzc2V0SWQECHRva2VuVVJJCgABQAkA/AcEBQhkQXBwSnNvbgINcmVhZEJ5SlNPTktleQkAzAgCCAUFYXNzZXQLZGVzY3JpcHRpb24JAMwIAgIIdG9rZW5VUkkFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwMJAAACBQh0b2tlblVSSQUIdG9rZW5VUkkECGxlbmRKc29uCgABQAkA/AcEBQhkQXBwSnNvbgIIbWFrZUpTT04JAMwIAgkAzAgCAhJzdXBwb3J0ZWRJbnRlcmZhY2UJAMwIAgIIYXNzZXRkSWQJAMwIAgIIdG9rZW5VUkkJAMwIAgIFb3duZXIJAMwIAgIPdGltZVVuaXRTZWNvbmRzCQDMCAICDXRpbWVVbml0UHJpY2UJAMwIAgINdGltZVVuaXRDb3VudAkAzAgCAg5zdGFydFRpbWVzdGFtcAkAzAgCAgxlbmRUaW1lc3RhbXAJAMwIAgIHZGVwb3NpdAkAzAgCAgdjbGFpbWVkBQNuaWwJAMwIAgkAzAgCAgEwCQDMCAIFB2Fzc2V0SWQJAMwIAgUIdG9rZW5VUkkJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgkApAMBBQ90aW1lVW5pdFNlY29uZHMJAMwIAgkApAMBBQ10aW1lVW5pdFByaWNlCQDMCAIJAKQDAQUNdGltZVVuaXRDb3VudAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAKQDAQkAZAIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQBoAgUPdGltZVVuaXRTZWNvbmRzBQ10aW1lVW5pdENvdW50CQDMCAICATAJAMwIAgIBMAUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUIbGVuZEpzb24FCGxlbmRKc29uBAxsZW5kSWRTdHJpbmcJAKQDAQUJbGVuZENvdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCAglsZW5kQ291bnQJAGQCBQlsZW5kQ291bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQbGVuZEN1cnJlbnRDb3VudAkAZAIFEGxlbmRDdXJyZW50Q291bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAg9sZW5kLXJlbnRDb3VudC0FDGxlbmRJZFN0cmluZwAACQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIFbGVuZC0FDGxlbmRJZFN0cmluZwUIbGVuZEpzb24JAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2Fzc2V0SWQGBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIaW5pdFJlbnQCBmxlbmRJZA10aW1lVW5pdENvdW50CQELdmFsdWVPckVsc2UCCQEMY2hlY2tQYXltZW50AggFAWkIcGF5bWVudHMJAQxjYWxjTGVuZENvc3QCBQZsZW5kSWQFDXRpbWVVbml0Q291bnQEDGxlbmRJZFN0cmluZwkApAMBBQZsZW5kSWQECGxlbmRKc29uCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgICBWxlbmQtBQxsZW5kSWRTdHJpbmcEBnJlbnRJZAkBDGdldFJlbnRDb3VudAEFBmxlbmRJZAQMcmVudElkU3RyaW5nCQCkAwEFBnJlbnRJZAQPdGltZVVuaXRTZWNvbmRzCgABQAkA/AcEBQhkQXBwSnNvbgINcmVhZEJ5SlNPTktleQkAzAgCBQhsZW5kSnNvbgkAzAgCAg90aW1lVW5pdFNlY29uZHMFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwMJAAACBQ90aW1lVW5pdFNlY29uZHMFD3RpbWVVbml0U2Vjb25kcwQSdGltZVVuaXRTZWNvbmRzSW50CQENcGFyc2VJbnRWYWx1ZQEFD3RpbWVVbml0U2Vjb25kcwMJAAACBRJ0aW1lVW5pdFNlY29uZHNJbnQFEnRpbWVVbml0U2Vjb25kc0ludAQIcmVudEpzb24KAAFACQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICCGN1c3RvbWVyCQDMCAICDXRpbWVVbml0Q291bnQJAMwIAgIOc3RhcnRUaW1lc3RhbXAJAMwIAgIMZW5kVGltZXN0YW1wCQDMCAICBmNsb3NlZAUDbmlsCQDMCAIJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgkApAMBBQ10aW1lVW5pdENvdW50CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBCQBkAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAGgCBRJ0aW1lVW5pdFNlY29uZHNJbnQFDXRpbWVVbml0Q291bnQJAMwIAgIBMAUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUIcmVudEpzb24FCHJlbnRKc29uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICD2xlbmQtcmVudENvdW50LQUMbGVuZElkU3RyaW5nCQBkAgUGcmVudElkAAEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgIKbGVuZC1yZW50LQUMbGVuZElkU3RyaW5nAgEtBQxyZW50SWRTdHJpbmcFCHJlbnRKc29uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCmxlbmQtY29zdC0FDGxlbmRJZFN0cmluZwkAZAIJAQxjYWxjTGVuZENvc3QCBQZsZW5kSWQFDXRpbWVVbml0Q291bnQJAQtnZXRMZW5kQ29zdAEFBmxlbmRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCWNsb3NlTGVuZAEGbGVuZElkCQELdmFsdWVPckVsc2UCCQEOY2hlY2tMZW5kT3duZXICCAUBaQZjYWxsZXIFBmxlbmRJZAQMbGVuZElkU3RyaW5nCQCkAwEFBmxlbmRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgICBWxlbmQtBQxsZW5kSWRTdHJpbmcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICAg9sZW5kLXJlbnRDb3VudC0FDGxlbmRJZFN0cmluZwkAzAgCCQEMSW50ZWdlckVudHJ5AgIQbGVuZEN1cnJlbnRDb3VudAkAZQIFEGxlbmRDdXJyZW50Q291bnQAAQkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgICCmxlbmQtY29zdC0FDGxlbmRJZFN0cmluZwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAQtnZXRMZW5kQ29zdAEFBmxlbmRJZAUMdG9rZW5QYXltZW50BQNuaWwBaQEEdGVzdAEGbGVuZElkCQDMCAIJAQtTdHJpbmdFbnRyeQICBURlYnVnCQEGZ2V0S2V5AgkBC2dldExlbmRKc29uAQUGbGVuZElkAgVvd25lcgUDbmlsAGmgafM=",
    "height": 2501425,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Hoj3MygE6WA8z5r5zCeE5Agm1KMYykuCbKaT8kGP3jpN
Next: CfkyJcb6xH9p9VRwqPKcLhfkoBsyqZRsFWRqF6VaZZJE

Diff: 
Old New Differences
24 24  func k (l) = valueOrErrorMessage(assetInfo(fromBase58String(l)), "Can't find asset by asset id")
25 25  
26 26  
27 - func m (n,l) = if ((n == this))
27 + func m (n,o,l) = if ((n == this))
28 28      then StringEntry("smth", "smth")
29 -     else ScriptTransfer(n, 1, l)
29 +     else ScriptTransfer(n, o, l)
30 30  
31 31  
32 - func o (p) = {
33 -     let q = toString(p)
34 -     getStringValue(("lend-" + q))
32 + func p (q) = {
33 +     let r = toString(q)
34 +     getStringValue(("lend-" + r))
35 35      }
36 36  
37 37  
38 - func r (s,t) = {
39 -     let u = {
40 -         let v = invoke(f, "readByJSONKey", [s, t], nil)
41 -         if ($isInstanceOf(v, "String"))
42 -             then v
43 -             else throw(($getType(v) + " couldn't be cast to String"))
38 + func s (t,u) = {
39 +     let v = {
40 +         let w = invoke(f, "readByJSONKey", [t, u], nil)
41 +         if ($isInstanceOf(w, "String"))
42 +             then w
43 +             else throw(($getType(w) + " couldn't be cast to String"))
44 44          }
45 -     if ((u == u))
46 -         then u
45 +     if ((v == v))
46 +         then v
47 47          else throw("Strict value is not equal to itself.")
48 48      }
49 49  
50 50  
51 - func w (p) = {
52 -     let q = toString(p)
53 -     getIntegerValue(("lend-rentCount-" + q))
51 + func x (q) = {
52 +     let r = toString(q)
53 +     getIntegerValue(("lend-rentCount-" + r))
54 54      }
55 55  
56 56  
57 - func x (p,u) = {
58 -     let s = o(p)
59 -     let y = r(s, "timeUnitPrice")
60 -     if ((y == y))
57 + func y (q,v) = {
58 +     let t = p(q)
59 +     let z = s(t, "timeUnitPrice")
60 +     if ((z == z))
61 61          then {
62 -             let z = parseIntValue(y)
63 -             (u * z)
62 +             let A = parseIntValue(z)
63 +             (v * A)
64 64              }
65 65          else throw("Strict value is not equal to itself.")
66 66      }
67 67  
68 68  
69 - func A (p) = valueOrElse(getIntegerValue(("lend-cost-" + toString(p))), 0)
69 + func B (q) = valueOrElse(getIntegerValue(("lend-cost-" + toString(q))), 0)
70 70  
71 71  
72 - func B (C) = if ((C == this))
72 + func C (D) = if ((D == this))
73 73      then unit
74 74      else throw("Only internal call")
75 75  
76 76  
77 - func D (C,l) = if ((assetBalance(C, fromBase58String(l)) == 1))
77 + func E (D,l) = if ((assetBalance(D, fromBase58String(l)) == 1))
78 78      then unit
79 79      else throw("Only asset owner")
80 80  
81 81  
82 - func E (F,G) = if ((F[0].amount >= G))
82 + func F (G,o) = if ((G[0].amount >= o))
83 83      then unit
84 84      else throw("amount less then need")
85 85  
89 89      else unit
90 90  
91 91  
92 - func I (C,p) = if ((r(o(p), "owner") != toString(C)))
92 + func I (D,q) = if ((s(p(q), "owner") != toString(D)))
93 93      then throw("you haven't perms")
94 94      else unit
95 95  
96 96  
97 97  @Callable(J)
98 - func setString (K,L) = valueOrElse(B(J.caller), [StringEntry(K, L)])
98 + func setString (K,L) = valueOrElse(C(J.caller), [StringEntry(K, L)])
99 99  
100 100  
101 101  
102 102  @Callable(J)
103 - func setInt (K,L) = valueOrElse(B(J.caller), [IntegerEntry(K, L)])
103 + func setInt (K,L) = valueOrElse(C(J.caller), [IntegerEntry(K, L)])
104 104  
105 105  
106 106  
107 107  @Callable(J)
108 - func deleteEntry (K) = valueOrElse(B(J.caller), [DeleteEntry(K)])
108 + func deleteEntry (K) = valueOrElse(C(J.caller), [DeleteEntry(K)])
109 109  
110 110  
111 111  
112 112  @Callable(J)
113 - func init (M,N,O,P) = valueOrElse(B(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
113 + func init (M,N,O,P) = valueOrElse(C(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
114 114  
115 115  
116 116  
119 119      let S = invoke(f, "makeJSON", [["user", "expires"], [Q, R]], nil)
120 120      if ((S == S))
121 121          then $Tuple2([StringEntry(("userOf-" + l), {
122 -             let v = S
123 -             if ($isInstanceOf(v, "String"))
124 -                 then v
125 -                 else throw(($getType(v) + " couldn't be cast to String"))
122 +             let w = S
123 +             if ($isInstanceOf(w, "String"))
124 +                 then w
125 +                 else throw(($getType(w) + " couldn't be cast to String"))
126 126              })], S)
127 127          else throw("Strict value is not equal to itself.")
128 128      }
130 130  
131 131  
132 132  @Callable(J)
133 - func setTokenPayment (T) = valueOrElse(B(J.caller), [BinaryEntry("tokenPayment", T)])
133 + func setTokenPayment (T) = valueOrElse(C(J.caller), [BinaryEntry("tokenPayment", T)])
134 134  
135 135  
136 136  
137 137  @Callable(J)
138 - func mint (n) = {
139 -     let U = (d + 1)
140 -     let V = toString(U)
141 -     let W = ((b + "#") + V)
142 -     let X = if ((16 >= size(W)))
143 -         then W
144 -         else V
145 -     let Y = (e + V)
146 -     let Z = {
147 -         let v = invoke(f, "makeJSON", [["tokenURI"], [Y]], nil)
148 -         if ($isInstanceOf(v, "String"))
149 -             then v
150 -             else throw(($getType(v) + " couldn't be cast to String"))
151 -         }
152 -     let aa = Issue(X, Z, 1, 0, false, unit, height)
153 -     let l = calculateAssetId(aa)
154 -     let ab = Address(fromBase58String(n))
155 -     let ac = m(ab, l)
156 -     if ((ac == ac))
157 -         then [aa, ac, IntegerEntry("totalAmount", U), StringEntry(X, Y)]
138 + func mintTokens (n,o) = {
139 +     let U = Reissue(g, o, true)
140 +     let V = m(J.caller, o, g)
141 +     if ((V == V))
142 +         then [V, U]
158 143          else throw("Strict value is not equal to itself.")
159 144      }
160 145  
161 146  
162 147  
163 148  @Callable(J)
164 - func initLend (l,u,z,ad) = valueOrElse(D(J.caller, l), valueOrElse(H(l), {
165 -     let aa = k(l)
166 -     let Y = {
167 -         let v = invoke(f, "readByJSONKey", [aa.description, "tokenURI"], nil)
168 -         if ($isInstanceOf(v, "String"))
169 -             then v
170 -             else throw(($getType(v) + " couldn't be cast to String"))
149 + func mintNFT (n) = {
150 +     let W = (d + 1)
151 +     let X = toString(W)
152 +     let Y = ((b + "#") + X)
153 +     let Z = if ((16 >= size(Y)))
154 +         then Y
155 +         else X
156 +     let aa = (e + X)
157 +     let ab = {
158 +         let w = invoke(f, "makeJSON", [["tokenURI"], [aa]], nil)
159 +         if ($isInstanceOf(w, "String"))
160 +             then w
161 +             else throw(($getType(w) + " couldn't be cast to String"))
171 162          }
172 -     if ((Y == Y))
163 +     let ac = Issue(Z, ab, 1, 0, false, unit, height)
164 +     let l = calculateAssetId(ac)
165 +     let ad = Address(fromBase58String(n))
166 +     let V = m(ad, 1, l)
167 +     if ((V == V))
168 +         then [ac, V, IntegerEntry("totalAmount", W), StringEntry(Z, aa)]
169 +         else throw("Strict value is not equal to itself.")
170 +     }
171 + 
172 + 
173 + 
174 + @Callable(J)
175 + func initLend (l,v,A,ae) = valueOrElse(E(J.caller, l), valueOrElse(H(l), {
176 +     let ac = k(l)
177 +     let aa = {
178 +         let w = invoke(f, "readByJSONKey", [ac.description, "tokenURI"], nil)
179 +         if ($isInstanceOf(w, "String"))
180 +             then w
181 +             else throw(($getType(w) + " couldn't be cast to String"))
182 +         }
183 +     if ((aa == aa))
173 184          then {
174 -             let s = {
175 -                 let v = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, Y, toString(J.caller), toString(u), toString(z), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (u * ad))), "0", "0"]], nil)
176 -                 if ($isInstanceOf(v, "String"))
177 -                     then v
178 -                     else throw(($getType(v) + " couldn't be cast to String"))
185 +             let t = {
186 +                 let w = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, aa, toString(J.caller), toString(v), toString(A), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (v * ae))), "0", "0"]], nil)
187 +                 if ($isInstanceOf(w, "String"))
188 +                     then w
189 +                     else throw(($getType(w) + " couldn't be cast to String"))
179 190                  }
180 -             if ((s == s))
191 +             if ((t == t))
181 192                  then {
182 -                     let q = toString(i)
183 - [IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + q), 0), StringEntry(("lend-" + q), s), BooleanEntry(l, true)]
193 +                     let r = toString(i)
194 + [IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + r), 0), StringEntry(("lend-" + r), t), BooleanEntry(l, true)]
184 195                      }
185 196                  else throw("Strict value is not equal to itself.")
186 197              }
190 201  
191 202  
192 203  @Callable(J)
193 - func initRent (p,ad) = valueOrElse(E(J.payments, x(p, ad)), {
194 -     let q = toString(p)
195 -     let s = getStringValue(("lend-" + q))
196 -     let ae = w(p)
197 -     let af = toString(ae)
198 -     let u = {
199 -         let v = invoke(f, "readByJSONKey", [s, "timeUnitSeconds"], nil)
200 -         if ($isInstanceOf(v, "String"))
201 -             then v
202 -             else throw(($getType(v) + " couldn't be cast to String"))
204 + func initRent (q,ae) = valueOrElse(F(J.payments, y(q, ae)), {
205 +     let r = toString(q)
206 +     let t = getStringValue(("lend-" + r))
207 +     let af = x(q)
208 +     let ag = toString(af)
209 +     let v = {
210 +         let w = invoke(f, "readByJSONKey", [t, "timeUnitSeconds"], nil)
211 +         if ($isInstanceOf(w, "String"))
212 +             then w
213 +             else throw(($getType(w) + " couldn't be cast to String"))
203 214          }
204 -     if ((u == u))
215 +     if ((v == v))
205 216          then {
206 -             let ag = parseIntValue(u)
207 -             if ((ag == ag))
217 +             let ah = parseIntValue(v)
218 +             if ((ah == ah))
208 219                  then {
209 -                     let ah = {
210 -                         let v = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ag * ad))), "0"]], nil)
211 -                         if ($isInstanceOf(v, "String"))
212 -                             then v
213 -                             else throw(($getType(v) + " couldn't be cast to String"))
220 +                     let ai = {
221 +                         let w = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ah * ae))), "0"]], nil)
222 +                         if ($isInstanceOf(w, "String"))
223 +                             then w
224 +                             else throw(($getType(w) + " couldn't be cast to String"))
214 225                          }
215 -                     if ((ah == ah))
216 -                         then [IntegerEntry(("lend-rentCount-" + q), (ae + 1)), StringEntry(((("lend-rent-" + q) + "-") + af), ah), IntegerEntry(("lend-cost-" + q), (x(p, ad) + A(p)))]
226 +                     if ((ai == ai))
227 +                         then [IntegerEntry(("lend-rentCount-" + r), (af + 1)), StringEntry(((("lend-rent-" + r) + "-") + ag), ai), IntegerEntry(("lend-cost-" + r), (y(q, ae) + B(q)))]
217 228                          else throw("Strict value is not equal to itself.")
218 229                      }
219 230                  else throw("Strict value is not equal to itself.")
224 235  
225 236  
226 237  @Callable(J)
227 - func closeLend (p) = valueOrElse(I(J.caller, p), {
228 -     let q = toString(p)
229 - [DeleteEntry(("lend-" + q)), DeleteEntry(("lend-rentCount-" + q)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + q)), ScriptTransfer(J.caller, A(p), g)]
238 + func closeLend (q) = valueOrElse(I(J.caller, q), {
239 +     let r = toString(q)
240 + [DeleteEntry(("lend-" + r)), DeleteEntry(("lend-rentCount-" + r)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + r)), ScriptTransfer(J.caller, B(q), g)]
230 241      })
231 242  
232 243  
233 244  
234 245  @Callable(J)
235 - func test (p) = [StringEntry("Debug", r(o(p), "owner"))]
246 + func test (q) = [StringEntry("Debug", s(p(q), "owner"))]
236 247  
237 248  
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 = getStringValue("baseURI")
13 13  
14 14  let f = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
15 15  
16 16  let g = getBinaryValue("tokenPayment")
17 17  
18 18  let h = valueOrErrorMessage(assetInfo(getBinaryValue("tokenPayment")), "token payment asset doesn't connect")
19 19  
20 20  let i = getIntegerValue("lendCount")
21 21  
22 22  let j = getIntegerValue("lendCurrentCount")
23 23  
24 24  func k (l) = valueOrErrorMessage(assetInfo(fromBase58String(l)), "Can't find asset by asset id")
25 25  
26 26  
27 - func m (n,l) = if ((n == this))
27 + func m (n,o,l) = if ((n == this))
28 28      then StringEntry("smth", "smth")
29 -     else ScriptTransfer(n, 1, l)
29 +     else ScriptTransfer(n, o, l)
30 30  
31 31  
32 - func o (p) = {
33 -     let q = toString(p)
34 -     getStringValue(("lend-" + q))
32 + func p (q) = {
33 +     let r = toString(q)
34 +     getStringValue(("lend-" + r))
35 35      }
36 36  
37 37  
38 - func r (s,t) = {
39 -     let u = {
40 -         let v = invoke(f, "readByJSONKey", [s, t], nil)
41 -         if ($isInstanceOf(v, "String"))
42 -             then v
43 -             else throw(($getType(v) + " couldn't be cast to String"))
38 + func s (t,u) = {
39 +     let v = {
40 +         let w = invoke(f, "readByJSONKey", [t, u], nil)
41 +         if ($isInstanceOf(w, "String"))
42 +             then w
43 +             else throw(($getType(w) + " couldn't be cast to String"))
44 44          }
45 -     if ((u == u))
46 -         then u
45 +     if ((v == v))
46 +         then v
47 47          else throw("Strict value is not equal to itself.")
48 48      }
49 49  
50 50  
51 - func w (p) = {
52 -     let q = toString(p)
53 -     getIntegerValue(("lend-rentCount-" + q))
51 + func x (q) = {
52 +     let r = toString(q)
53 +     getIntegerValue(("lend-rentCount-" + r))
54 54      }
55 55  
56 56  
57 - func x (p,u) = {
58 -     let s = o(p)
59 -     let y = r(s, "timeUnitPrice")
60 -     if ((y == y))
57 + func y (q,v) = {
58 +     let t = p(q)
59 +     let z = s(t, "timeUnitPrice")
60 +     if ((z == z))
61 61          then {
62 -             let z = parseIntValue(y)
63 -             (u * z)
62 +             let A = parseIntValue(z)
63 +             (v * A)
64 64              }
65 65          else throw("Strict value is not equal to itself.")
66 66      }
67 67  
68 68  
69 - func A (p) = valueOrElse(getIntegerValue(("lend-cost-" + toString(p))), 0)
69 + func B (q) = valueOrElse(getIntegerValue(("lend-cost-" + toString(q))), 0)
70 70  
71 71  
72 - func B (C) = if ((C == this))
72 + func C (D) = if ((D == this))
73 73      then unit
74 74      else throw("Only internal call")
75 75  
76 76  
77 - func D (C,l) = if ((assetBalance(C, fromBase58String(l)) == 1))
77 + func E (D,l) = if ((assetBalance(D, fromBase58String(l)) == 1))
78 78      then unit
79 79      else throw("Only asset owner")
80 80  
81 81  
82 - func E (F,G) = if ((F[0].amount >= G))
82 + func F (G,o) = if ((G[0].amount >= o))
83 83      then unit
84 84      else throw("amount less then need")
85 85  
86 86  
87 87  func H (l) = if (valueOrElse(getBoolean(l), false))
88 88      then throw("this token already use")
89 89      else unit
90 90  
91 91  
92 - func I (C,p) = if ((r(o(p), "owner") != toString(C)))
92 + func I (D,q) = if ((s(p(q), "owner") != toString(D)))
93 93      then throw("you haven't perms")
94 94      else unit
95 95  
96 96  
97 97  @Callable(J)
98 - func setString (K,L) = valueOrElse(B(J.caller), [StringEntry(K, L)])
98 + func setString (K,L) = valueOrElse(C(J.caller), [StringEntry(K, L)])
99 99  
100 100  
101 101  
102 102  @Callable(J)
103 - func setInt (K,L) = valueOrElse(B(J.caller), [IntegerEntry(K, L)])
103 + func setInt (K,L) = valueOrElse(C(J.caller), [IntegerEntry(K, L)])
104 104  
105 105  
106 106  
107 107  @Callable(J)
108 - func deleteEntry (K) = valueOrElse(B(J.caller), [DeleteEntry(K)])
108 + func deleteEntry (K) = valueOrElse(C(J.caller), [DeleteEntry(K)])
109 109  
110 110  
111 111  
112 112  @Callable(J)
113 - func init (M,N,O,P) = valueOrElse(B(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
113 + func init (M,N,O,P) = valueOrElse(C(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
114 114  
115 115  
116 116  
117 117  @Callable(J)
118 118  func setUser (l,Q,R) = {
119 119      let S = invoke(f, "makeJSON", [["user", "expires"], [Q, R]], nil)
120 120      if ((S == S))
121 121          then $Tuple2([StringEntry(("userOf-" + l), {
122 -             let v = S
123 -             if ($isInstanceOf(v, "String"))
124 -                 then v
125 -                 else throw(($getType(v) + " couldn't be cast to String"))
122 +             let w = S
123 +             if ($isInstanceOf(w, "String"))
124 +                 then w
125 +                 else throw(($getType(w) + " couldn't be cast to String"))
126 126              })], S)
127 127          else throw("Strict value is not equal to itself.")
128 128      }
129 129  
130 130  
131 131  
132 132  @Callable(J)
133 - func setTokenPayment (T) = valueOrElse(B(J.caller), [BinaryEntry("tokenPayment", T)])
133 + func setTokenPayment (T) = valueOrElse(C(J.caller), [BinaryEntry("tokenPayment", T)])
134 134  
135 135  
136 136  
137 137  @Callable(J)
138 - func mint (n) = {
139 -     let U = (d + 1)
140 -     let V = toString(U)
141 -     let W = ((b + "#") + V)
142 -     let X = if ((16 >= size(W)))
143 -         then W
144 -         else V
145 -     let Y = (e + V)
146 -     let Z = {
147 -         let v = invoke(f, "makeJSON", [["tokenURI"], [Y]], nil)
148 -         if ($isInstanceOf(v, "String"))
149 -             then v
150 -             else throw(($getType(v) + " couldn't be cast to String"))
151 -         }
152 -     let aa = Issue(X, Z, 1, 0, false, unit, height)
153 -     let l = calculateAssetId(aa)
154 -     let ab = Address(fromBase58String(n))
155 -     let ac = m(ab, l)
156 -     if ((ac == ac))
157 -         then [aa, ac, IntegerEntry("totalAmount", U), StringEntry(X, Y)]
138 + func mintTokens (n,o) = {
139 +     let U = Reissue(g, o, true)
140 +     let V = m(J.caller, o, g)
141 +     if ((V == V))
142 +         then [V, U]
158 143          else throw("Strict value is not equal to itself.")
159 144      }
160 145  
161 146  
162 147  
163 148  @Callable(J)
164 - func initLend (l,u,z,ad) = valueOrElse(D(J.caller, l), valueOrElse(H(l), {
165 -     let aa = k(l)
166 -     let Y = {
167 -         let v = invoke(f, "readByJSONKey", [aa.description, "tokenURI"], nil)
168 -         if ($isInstanceOf(v, "String"))
169 -             then v
170 -             else throw(($getType(v) + " couldn't be cast to String"))
149 + func mintNFT (n) = {
150 +     let W = (d + 1)
151 +     let X = toString(W)
152 +     let Y = ((b + "#") + X)
153 +     let Z = if ((16 >= size(Y)))
154 +         then Y
155 +         else X
156 +     let aa = (e + X)
157 +     let ab = {
158 +         let w = invoke(f, "makeJSON", [["tokenURI"], [aa]], nil)
159 +         if ($isInstanceOf(w, "String"))
160 +             then w
161 +             else throw(($getType(w) + " couldn't be cast to String"))
171 162          }
172 -     if ((Y == Y))
163 +     let ac = Issue(Z, ab, 1, 0, false, unit, height)
164 +     let l = calculateAssetId(ac)
165 +     let ad = Address(fromBase58String(n))
166 +     let V = m(ad, 1, l)
167 +     if ((V == V))
168 +         then [ac, V, IntegerEntry("totalAmount", W), StringEntry(Z, aa)]
169 +         else throw("Strict value is not equal to itself.")
170 +     }
171 + 
172 + 
173 + 
174 + @Callable(J)
175 + func initLend (l,v,A,ae) = valueOrElse(E(J.caller, l), valueOrElse(H(l), {
176 +     let ac = k(l)
177 +     let aa = {
178 +         let w = invoke(f, "readByJSONKey", [ac.description, "tokenURI"], nil)
179 +         if ($isInstanceOf(w, "String"))
180 +             then w
181 +             else throw(($getType(w) + " couldn't be cast to String"))
182 +         }
183 +     if ((aa == aa))
173 184          then {
174 -             let s = {
175 -                 let v = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, Y, toString(J.caller), toString(u), toString(z), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (u * ad))), "0", "0"]], nil)
176 -                 if ($isInstanceOf(v, "String"))
177 -                     then v
178 -                     else throw(($getType(v) + " couldn't be cast to String"))
185 +             let t = {
186 +                 let w = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, aa, toString(J.caller), toString(v), toString(A), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (v * ae))), "0", "0"]], nil)
187 +                 if ($isInstanceOf(w, "String"))
188 +                     then w
189 +                     else throw(($getType(w) + " couldn't be cast to String"))
179 190                  }
180 -             if ((s == s))
191 +             if ((t == t))
181 192                  then {
182 -                     let q = toString(i)
183 - [IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + q), 0), StringEntry(("lend-" + q), s), BooleanEntry(l, true)]
193 +                     let r = toString(i)
194 + [IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + r), 0), StringEntry(("lend-" + r), t), BooleanEntry(l, true)]
184 195                      }
185 196                  else throw("Strict value is not equal to itself.")
186 197              }
187 198          else throw("Strict value is not equal to itself.")
188 199      }))
189 200  
190 201  
191 202  
192 203  @Callable(J)
193 - func initRent (p,ad) = valueOrElse(E(J.payments, x(p, ad)), {
194 -     let q = toString(p)
195 -     let s = getStringValue(("lend-" + q))
196 -     let ae = w(p)
197 -     let af = toString(ae)
198 -     let u = {
199 -         let v = invoke(f, "readByJSONKey", [s, "timeUnitSeconds"], nil)
200 -         if ($isInstanceOf(v, "String"))
201 -             then v
202 -             else throw(($getType(v) + " couldn't be cast to String"))
204 + func initRent (q,ae) = valueOrElse(F(J.payments, y(q, ae)), {
205 +     let r = toString(q)
206 +     let t = getStringValue(("lend-" + r))
207 +     let af = x(q)
208 +     let ag = toString(af)
209 +     let v = {
210 +         let w = invoke(f, "readByJSONKey", [t, "timeUnitSeconds"], nil)
211 +         if ($isInstanceOf(w, "String"))
212 +             then w
213 +             else throw(($getType(w) + " couldn't be cast to String"))
203 214          }
204 -     if ((u == u))
215 +     if ((v == v))
205 216          then {
206 -             let ag = parseIntValue(u)
207 -             if ((ag == ag))
217 +             let ah = parseIntValue(v)
218 +             if ((ah == ah))
208 219                  then {
209 -                     let ah = {
210 -                         let v = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ag * ad))), "0"]], nil)
211 -                         if ($isInstanceOf(v, "String"))
212 -                             then v
213 -                             else throw(($getType(v) + " couldn't be cast to String"))
220 +                     let ai = {
221 +                         let w = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ah * ae))), "0"]], nil)
222 +                         if ($isInstanceOf(w, "String"))
223 +                             then w
224 +                             else throw(($getType(w) + " couldn't be cast to String"))
214 225                          }
215 -                     if ((ah == ah))
216 -                         then [IntegerEntry(("lend-rentCount-" + q), (ae + 1)), StringEntry(((("lend-rent-" + q) + "-") + af), ah), IntegerEntry(("lend-cost-" + q), (x(p, ad) + A(p)))]
226 +                     if ((ai == ai))
227 +                         then [IntegerEntry(("lend-rentCount-" + r), (af + 1)), StringEntry(((("lend-rent-" + r) + "-") + ag), ai), IntegerEntry(("lend-cost-" + r), (y(q, ae) + B(q)))]
217 228                          else throw("Strict value is not equal to itself.")
218 229                      }
219 230                  else throw("Strict value is not equal to itself.")
220 231              }
221 232          else throw("Strict value is not equal to itself.")
222 233      })
223 234  
224 235  
225 236  
226 237  @Callable(J)
227 - func closeLend (p) = valueOrElse(I(J.caller, p), {
228 -     let q = toString(p)
229 - [DeleteEntry(("lend-" + q)), DeleteEntry(("lend-rentCount-" + q)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + q)), ScriptTransfer(J.caller, A(p), g)]
238 + func closeLend (q) = valueOrElse(I(J.caller, q), {
239 +     let r = toString(q)
240 + [DeleteEntry(("lend-" + r)), DeleteEntry(("lend-rentCount-" + r)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + r)), ScriptTransfer(J.caller, B(q), g)]
230 241      })
231 242  
232 243  
233 244  
234 245  @Callable(J)
235 - func test (p) = [StringEntry("Debug", r(o(p), "owner"))]
246 + func test (q) = [StringEntry("Debug", s(p(q), "owner"))]
236 247  
237 248

Old	New		Differences
24	24		func k (l) = valueOrErrorMessage(assetInfo(fromBase58String(l)), "Can't find asset by asset id")
25	25
26	26
27		-	func m (n,l) = if ((n == this))
	27	+	func m (n,o,l) = if ((n == this))
28	28		then StringEntry("smth", "smth")
29		-	else ScriptTransfer(n, 1, l)
	29	+	else ScriptTransfer(n, o, l)
30	30
31	31
32		-	func o (p) = {
33		-	let q = toString(p)
34		-	getStringValue(("lend-" + q))
	32	+	func p (q) = {
	33	+	let r = toString(q)
	34	+	getStringValue(("lend-" + r))
35	35		}
36	36
37	37
38		-	func r (s,t) = {
39		-	let u = {
40		-	let v = invoke(f, "readByJSONKey", [s, t], nil)
41		-	if ($isInstanceOf(v, "String"))
42		-	then v
43		-	else throw(($getType(v) + " couldn't be cast to String"))
	38	+	func s (t,u) = {
	39	+	let v = {
	40	+	let w = invoke(f, "readByJSONKey", [t, u], nil)
	41	+	if ($isInstanceOf(w, "String"))
	42	+	then w
	43	+	else throw(($getType(w) + " couldn't be cast to String"))
44	44		}
45		-	if ((u == u))
46		-	then u
	45	+	if ((v == v))
	46	+	then v
47	47		else throw("Strict value is not equal to itself.")
48	48		}
49	49
50	50
51		-	func w (p) = {
52		-	let q = toString(p)
53		-	getIntegerValue(("lend-rentCount-" + q))
	51	+	func x (q) = {
	52	+	let r = toString(q)
	53	+	getIntegerValue(("lend-rentCount-" + r))
54	54		}
55	55
56	56
57		-	func x (p,u) = {
58		-	let s = o(p)
59		-	let y = r(s, "timeUnitPrice")
60		-	if ((y == y))
	57	+	func y (q,v) = {
	58	+	let t = p(q)
	59	+	let z = s(t, "timeUnitPrice")
	60	+	if ((z == z))
61	61		then {
62		-	let z = parseIntValue(y)
63		-	(u * z)
	62	+	let A = parseIntValue(z)
	63	+	(v * A)
64	64		}
65	65		else throw("Strict value is not equal to itself.")
66	66		}
67	67
68	68
69		-	func A (p) = valueOrElse(getIntegerValue(("lend-cost-" + toString(p))), 0)
	69	+	func B (q) = valueOrElse(getIntegerValue(("lend-cost-" + toString(q))), 0)
70	70
71	71
72		-	func B (C) = if ((C == this))
	72	+	func C (D) = if ((D == this))
73	73		then unit
74	74		else throw("Only internal call")
75	75
76	76
77		-	func D (C,l) = if ((assetBalance(C, fromBase58String(l)) == 1))
	77	+	func E (D,l) = if ((assetBalance(D, fromBase58String(l)) == 1))
78	78		then unit
79	79		else throw("Only asset owner")
80	80
81	81
82		-	func E (F,G) = if ((F[0].amount >= G))
	82	+	func F (G,o) = if ((G[0].amount >= o))
83	83		then unit
84	84		else throw("amount less then need")
85	85

89	89		else unit
90	90
91	91
92		-	func I (C,p) = if ((~~r(o~~(p), "owner") != toString(C)))
	92	+	func I (D,q) = if ((s(p(q), "owner") != toString(D)))
93	93		then throw("you haven't perms")
94	94		else unit
95	95
96	96
97	97		@Callable(J)
98		-	func setString (K,L) = valueOrElse(B(J.caller), [StringEntry(K, L)])
	98	+	func setString (K,L) = valueOrElse(C(J.caller), [StringEntry(K, L)])
99	99
100	100
101	101
102	102		@Callable(J)
103		-	func setInt (K,L) = valueOrElse(B(J.caller), [IntegerEntry(K, L)])
	103	+	func setInt (K,L) = valueOrElse(C(J.caller), [IntegerEntry(K, L)])
104	104
105	105
106	106
107	107		@Callable(J)
108		-	func deleteEntry (K) = valueOrElse(B(J.caller), [DeleteEntry(K)])
	108	+	func deleteEntry (K) = valueOrElse(C(J.caller), [DeleteEntry(K)])
109	109
110	110
111	111
112	112		@Callable(J)
113		-	func init (M,N,O,P) = valueOrElse(B(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
	113	+	func init (M,N,O,P) = valueOrElse(C(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
114	114
115	115
116	116

119	119		let S = invoke(f, "makeJSON", [["user", "expires"], [Q, R]], nil)
120	120		if ((S == S))
121	121		then $Tuple2([StringEntry(("userOf-" + l), {
122		-	let v = S
123		-	if ($isInstanceOf(v, "String"))
124		-	then v
125		-	else throw(($getType(v) + " couldn't be cast to String"))
	122	+	let w = S
	123	+	if ($isInstanceOf(w, "String"))
	124	+	then w
	125	+	else throw(($getType(w) + " couldn't be cast to String"))
126	126		})], S)
127	127		else throw("Strict value is not equal to itself.")
128	128		}

130	130
131	131
132	132		@Callable(J)
133		-	func setTokenPayment (T) = valueOrElse(B(J.caller), [BinaryEntry("tokenPayment", T)])
	133	+	func setTokenPayment (T) = valueOrElse(C(J.caller), [BinaryEntry("tokenPayment", T)])
134	134
135	135
136	136
137	137		@Callable(J)
138		-	func mint (n) = {
139		-	let U = (d + 1)
140		-	let V = toString(U)
141		-	let W = ((b + "#") + V)
142		-	let X = if ((16 >= size(W)))
143		-	then W
144		-	else V
145		-	let Y = (e + V)
146		-	let Z = {
147		-	let v = invoke(f, "makeJSON", [["tokenURI"], [Y]], nil)
148		-	if ($isInstanceOf(v, "String"))
149		-	then v
150		-	else throw(($getType(v) + " couldn't be cast to String"))
151		-	}
152		-	let aa = Issue(X, Z, 1, 0, false, unit, height)
153		-	let l = calculateAssetId(aa)
154		-	let ab = Address(fromBase58String(n))
155		-	let ac = m(ab, l)
156		-	if ((ac == ac))
157		-	then [aa, ac, IntegerEntry("totalAmount", U), StringEntry(X, Y)]
	138	+	func mintTokens (n,o) = {
	139	+	let U = Reissue(g, o, true)
	140	+	let V = m(J.caller, o, g)
	141	+	if ((V == V))
	142	+	then [V, U]
158	143		else throw("Strict value is not equal to itself.")
159	144		}
160	145
161	146
162	147
163	148		@Callable(J)
164		-	func initLend (l,u,z,ad) = valueOrElse(D(J.caller, l), valueOrElse(H(l), {
165		-	let aa = k(l)
166		-	let Y = {
167		-	let v = invoke(f, "readByJSONKey", [aa.description, "tokenURI"], nil)
168		-	if ($isInstanceOf(v, "String"))
169		-	then v
170		-	else throw(($getType(v) + " couldn't be cast to String"))
	149	+	func mintNFT (n) = {
	150	+	let W = (d + 1)
	151	+	let X = toString(W)
	152	+	let Y = ((b + "#") + X)
	153	+	let Z = if ((16 >= size(Y)))
	154	+	then Y
	155	+	else X
	156	+	let aa = (e + X)
	157	+	let ab = {
	158	+	let w = invoke(f, "makeJSON", [["tokenURI"], [aa]], nil)
	159	+	if ($isInstanceOf(w, "String"))
	160	+	then w
	161	+	else throw(($getType(w) + " couldn't be cast to String"))
171	162		}
172		-	if ((Y == Y))
	163	+	let ac = Issue(Z, ab, 1, 0, false, unit, height)
	164	+	let l = calculateAssetId(ac)
	165	+	let ad = Address(fromBase58String(n))
	166	+	let V = m(ad, 1, l)
	167	+	if ((V == V))
	168	+	then [ac, V, IntegerEntry("totalAmount", W), StringEntry(Z, aa)]
	169	+	else throw("Strict value is not equal to itself.")
	170	+	}
	171	+
	172	+
	173	+
	174	+	@Callable(J)
	175	+	func initLend (l,v,A,ae) = valueOrElse(E(J.caller, l), valueOrElse(H(l), {
	176	+	let ac = k(l)
	177	+	let aa = {
	178	+	let w = invoke(f, "readByJSONKey", [ac.description, "tokenURI"], nil)
	179	+	if ($isInstanceOf(w, "String"))
	180	+	then w
	181	+	else throw(($getType(w) + " couldn't be cast to String"))
	182	+	}
	183	+	if ((aa == aa))
173	184		then {
174		-	let s = {
175		-	let v = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, Y, toString(J.caller), toString(u), toString(z), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (u * ad))), "0", "0"]], nil)
176		-	if ($isInstanceOf(v, "String"))
177		-	then v
178		-	else throw(($getType(v) + " couldn't be cast to String"))
	185	+	let t = {
	186	+	let w = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, aa, toString(J.caller), toString(v), toString(A), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (v * ae))), "0", "0"]], nil)
	187	+	if ($isInstanceOf(w, "String"))
	188	+	then w
	189	+	else throw(($getType(w) + " couldn't be cast to String"))
179	190		}
180		-	if ((s == s))
	191	+	if ((t == t))
181	192		then {
182		-	let q = toString(i)
183		-	[IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + q), 0), StringEntry(("lend-" + q), s), BooleanEntry(l, true)]
	193	+	let r = toString(i)
	194	+	[IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + r), 0), StringEntry(("lend-" + r), t), BooleanEntry(l, true)]
184	195		}
185	196		else throw("Strict value is not equal to itself.")
186	197		}

190	201
191	202
192	203		@Callable(J)
193		-	func initRent (p,ad) = valueOrElse(E(J.payments, x(p, ad)), {
194		-	let q = toString(p)
195		-	let s = getStringValue(("lend-" + q))
196		-	let ae = w(p)
197		-	let af = toString(ae)
198		-	let u = {
199		-	let v = invoke(f, "readByJSONKey", [s, "timeUnitSeconds"], nil)
200		-	if ($isInstanceOf(v, "String"))
201		-	then v
202		-	else throw(($getType(v) + " couldn't be cast to String"))
	204	+	func initRent (q,ae) = valueOrElse(F(J.payments, y(q, ae)), {
	205	+	let r = toString(q)
	206	+	let t = getStringValue(("lend-" + r))
	207	+	let af = x(q)
	208	+	let ag = toString(af)
	209	+	let v = {
	210	+	let w = invoke(f, "readByJSONKey", [t, "timeUnitSeconds"], nil)
	211	+	if ($isInstanceOf(w, "String"))
	212	+	then w
	213	+	else throw(($getType(w) + " couldn't be cast to String"))
203	214		}
204		-	if ((u == u))
	215	+	if ((v == v))
205	216		then {
206		-	let ag = parseIntValue(u)
207		-	if ((ag == ag))
	217	+	let ah = parseIntValue(v)
	218	+	if ((ah == ah))
208	219		then {
209		-	let ah = {
210		-	let v = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ag * ad))), "0"]], nil)
211		-	if ($isInstanceOf(v, "String"))
212		-	then v
213		-	else throw(($getType(v) + " couldn't be cast to String"))
	220	+	let ai = {
	221	+	let w = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ah * ae))), "0"]], nil)
	222	+	if ($isInstanceOf(w, "String"))
	223	+	then w
	224	+	else throw(($getType(w) + " couldn't be cast to String"))
214	225		}
215		-	if ((ah == ah))
216		-	then [IntegerEntry(("lend-rentCount-" + q), (ae + 1)), StringEntry(((("lend-rent-" + q) + "-") + af), ah), IntegerEntry(("lend-cost-" + q), (x(p, ad) + A(p)))]
	226	+	if ((ai == ai))
	227	+	then [IntegerEntry(("lend-rentCount-" + r), (af + 1)), StringEntry(((("lend-rent-" + r) + "-") + ag), ai), IntegerEntry(("lend-cost-" + r), (y(q, ae) + B(q)))]
217	228		else throw("Strict value is not equal to itself.")
218	229		}
219	230		else throw("Strict value is not equal to itself.")

224	235
225	236
226	237		@Callable(J)
227		-	func closeLend (p) = valueOrElse(I(J.caller, p), {
228		-	let q = toString(p)
229		-	[DeleteEntry(("lend-" + q)), DeleteEntry(("lend-rentCount-" + q)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + q)), ScriptTransfer(J.caller, A(p), g)]
	238	+	func closeLend (q) = valueOrElse(I(J.caller, q), {
	239	+	let r = toString(q)
	240	+	[DeleteEntry(("lend-" + r)), DeleteEntry(("lend-rentCount-" + r)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + r)), ScriptTransfer(J.caller, B(q), g)]
230	241		})
231	242
232	243
233	244
234	245		@Callable(J)
235		-	func test (p) = [StringEntry("Debug", ~~r(o~~(p), "owner"))]
	246	+	func test (q) = [StringEntry("Debug", s(p(q), "owner"))]
236	247
237	248

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 = getStringValue("baseURI")
13	13
14	14		let f = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
15	15
16	16		let g = getBinaryValue("tokenPayment")
17	17
18	18		let h = valueOrErrorMessage(assetInfo(getBinaryValue("tokenPayment")), "token payment asset doesn't connect")
19	19
20	20		let i = getIntegerValue("lendCount")
21	21
22	22		let j = getIntegerValue("lendCurrentCount")
23	23
24	24		func k (l) = valueOrErrorMessage(assetInfo(fromBase58String(l)), "Can't find asset by asset id")
25	25
26	26
27		-	func m (n,l) = if ((n == this))
	27	+	func m (n,o,l) = if ((n == this))
28	28		then StringEntry("smth", "smth")
29		-	else ScriptTransfer(n, 1, l)
	29	+	else ScriptTransfer(n, o, l)
30	30
31	31
32		-	func o (p) = {
33		-	let q = toString(p)
34		-	getStringValue(("lend-" + q))
	32	+	func p (q) = {
	33	+	let r = toString(q)
	34	+	getStringValue(("lend-" + r))
35	35		}
36	36
37	37
38		-	func r (s,t) = {
39		-	let u = {
40		-	let v = invoke(f, "readByJSONKey", [s, t], nil)
41		-	if ($isInstanceOf(v, "String"))
42		-	then v
43		-	else throw(($getType(v) + " couldn't be cast to String"))
	38	+	func s (t,u) = {
	39	+	let v = {
	40	+	let w = invoke(f, "readByJSONKey", [t, u], nil)
	41	+	if ($isInstanceOf(w, "String"))
	42	+	then w
	43	+	else throw(($getType(w) + " couldn't be cast to String"))
44	44		}
45		-	if ((u == u))
46		-	then u
	45	+	if ((v == v))
	46	+	then v
47	47		else throw("Strict value is not equal to itself.")
48	48		}
49	49
50	50
51		-	func w (p) = {
52		-	let q = toString(p)
53		-	getIntegerValue(("lend-rentCount-" + q))
	51	+	func x (q) = {
	52	+	let r = toString(q)
	53	+	getIntegerValue(("lend-rentCount-" + r))
54	54		}
55	55
56	56
57		-	func x (p,u) = {
58		-	let s = o(p)
59		-	let y = r(s, "timeUnitPrice")
60		-	if ((y == y))
	57	+	func y (q,v) = {
	58	+	let t = p(q)
	59	+	let z = s(t, "timeUnitPrice")
	60	+	if ((z == z))
61	61		then {
62		-	let z = parseIntValue(y)
63		-	(u * z)
	62	+	let A = parseIntValue(z)
	63	+	(v * A)
64	64		}
65	65		else throw("Strict value is not equal to itself.")
66	66		}
67	67
68	68
69		-	func A (p) = valueOrElse(getIntegerValue(("lend-cost-" + toString(p))), 0)
	69	+	func B (q) = valueOrElse(getIntegerValue(("lend-cost-" + toString(q))), 0)
70	70
71	71
72		-	func B (C) = if ((C == this))
	72	+	func C (D) = if ((D == this))
73	73		then unit
74	74		else throw("Only internal call")
75	75
76	76
77		-	func D (C,l) = if ((assetBalance(C, fromBase58String(l)) == 1))
	77	+	func E (D,l) = if ((assetBalance(D, fromBase58String(l)) == 1))
78	78		then unit
79	79		else throw("Only asset owner")
80	80
81	81
82		-	func E (F,G) = if ((F[0].amount >= G))
	82	+	func F (G,o) = if ((G[0].amount >= o))
83	83		then unit
84	84		else throw("amount less then need")
85	85
86	86
87	87		func H (l) = if (valueOrElse(getBoolean(l), false))
88	88		then throw("this token already use")
89	89		else unit
90	90
91	91
92		-	func I (C,p) = if ((~~r(o~~(p), "owner") != toString(C)))
	92	+	func I (D,q) = if ((s(p(q), "owner") != toString(D)))
93	93		then throw("you haven't perms")
94	94		else unit
95	95
96	96
97	97		@Callable(J)
98		-	func setString (K,L) = valueOrElse(B(J.caller), [StringEntry(K, L)])
	98	+	func setString (K,L) = valueOrElse(C(J.caller), [StringEntry(K, L)])
99	99
100	100
101	101
102	102		@Callable(J)
103		-	func setInt (K,L) = valueOrElse(B(J.caller), [IntegerEntry(K, L)])
	103	+	func setInt (K,L) = valueOrElse(C(J.caller), [IntegerEntry(K, L)])
104	104
105	105
106	106
107	107		@Callable(J)
108		-	func deleteEntry (K) = valueOrElse(B(J.caller), [DeleteEntry(K)])
	108	+	func deleteEntry (K) = valueOrElse(C(J.caller), [DeleteEntry(K)])
109	109
110	110
111	111
112	112		@Callable(J)
113		-	func init (M,N,O,P) = valueOrElse(B(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
	113	+	func init (M,N,O,P) = valueOrElse(C(J.caller), [StringEntry("collectionName", M), StringEntry("symbol", N), StringEntry("description", O), IntegerEntry("totalAmount", 0), StringEntry("baseURI", P)])
114	114
115	115
116	116
117	117		@Callable(J)
118	118		func setUser (l,Q,R) = {
119	119		let S = invoke(f, "makeJSON", [["user", "expires"], [Q, R]], nil)
120	120		if ((S == S))
121	121		then $Tuple2([StringEntry(("userOf-" + l), {
122		-	let v = S
123		-	if ($isInstanceOf(v, "String"))
124		-	then v
125		-	else throw(($getType(v) + " couldn't be cast to String"))
	122	+	let w = S
	123	+	if ($isInstanceOf(w, "String"))
	124	+	then w
	125	+	else throw(($getType(w) + " couldn't be cast to String"))
126	126		})], S)
127	127		else throw("Strict value is not equal to itself.")
128	128		}
129	129
130	130
131	131
132	132		@Callable(J)
133		-	func setTokenPayment (T) = valueOrElse(B(J.caller), [BinaryEntry("tokenPayment", T)])
	133	+	func setTokenPayment (T) = valueOrElse(C(J.caller), [BinaryEntry("tokenPayment", T)])
134	134
135	135
136	136
137	137		@Callable(J)
138		-	func mint (n) = {
139		-	let U = (d + 1)
140		-	let V = toString(U)
141		-	let W = ((b + "#") + V)
142		-	let X = if ((16 >= size(W)))
143		-	then W
144		-	else V
145		-	let Y = (e + V)
146		-	let Z = {
147		-	let v = invoke(f, "makeJSON", [["tokenURI"], [Y]], nil)
148		-	if ($isInstanceOf(v, "String"))
149		-	then v
150		-	else throw(($getType(v) + " couldn't be cast to String"))
151		-	}
152		-	let aa = Issue(X, Z, 1, 0, false, unit, height)
153		-	let l = calculateAssetId(aa)
154		-	let ab = Address(fromBase58String(n))
155		-	let ac = m(ab, l)
156		-	if ((ac == ac))
157		-	then [aa, ac, IntegerEntry("totalAmount", U), StringEntry(X, Y)]
	138	+	func mintTokens (n,o) = {
	139	+	let U = Reissue(g, o, true)
	140	+	let V = m(J.caller, o, g)
	141	+	if ((V == V))
	142	+	then [V, U]
158	143		else throw("Strict value is not equal to itself.")
159	144		}
160	145
161	146
162	147
163	148		@Callable(J)
164		-	func initLend (l,u,z,ad) = valueOrElse(D(J.caller, l), valueOrElse(H(l), {
165		-	let aa = k(l)
166		-	let Y = {
167		-	let v = invoke(f, "readByJSONKey", [aa.description, "tokenURI"], nil)
168		-	if ($isInstanceOf(v, "String"))
169		-	then v
170		-	else throw(($getType(v) + " couldn't be cast to String"))
	149	+	func mintNFT (n) = {
	150	+	let W = (d + 1)
	151	+	let X = toString(W)
	152	+	let Y = ((b + "#") + X)
	153	+	let Z = if ((16 >= size(Y)))
	154	+	then Y
	155	+	else X
	156	+	let aa = (e + X)
	157	+	let ab = {
	158	+	let w = invoke(f, "makeJSON", [["tokenURI"], [aa]], nil)
	159	+	if ($isInstanceOf(w, "String"))
	160	+	then w
	161	+	else throw(($getType(w) + " couldn't be cast to String"))
171	162		}
172		-	if ((Y == Y))
	163	+	let ac = Issue(Z, ab, 1, 0, false, unit, height)
	164	+	let l = calculateAssetId(ac)
	165	+	let ad = Address(fromBase58String(n))
	166	+	let V = m(ad, 1, l)
	167	+	if ((V == V))
	168	+	then [ac, V, IntegerEntry("totalAmount", W), StringEntry(Z, aa)]
	169	+	else throw("Strict value is not equal to itself.")
	170	+	}
	171	+
	172	+
	173	+
	174	+	@Callable(J)
	175	+	func initLend (l,v,A,ae) = valueOrElse(E(J.caller, l), valueOrElse(H(l), {
	176	+	let ac = k(l)
	177	+	let aa = {
	178	+	let w = invoke(f, "readByJSONKey", [ac.description, "tokenURI"], nil)
	179	+	if ($isInstanceOf(w, "String"))
	180	+	then w
	181	+	else throw(($getType(w) + " couldn't be cast to String"))
	182	+	}
	183	+	if ((aa == aa))
173	184		then {
174		-	let s = {
175		-	let v = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, Y, toString(J.caller), toString(u), toString(z), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (u * ad))), "0", "0"]], nil)
176		-	if ($isInstanceOf(v, "String"))
177		-	then v
178		-	else throw(($getType(v) + " couldn't be cast to String"))
	185	+	let t = {
	186	+	let w = invoke(f, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", l, aa, toString(J.caller), toString(v), toString(A), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (v * ae))), "0", "0"]], nil)
	187	+	if ($isInstanceOf(w, "String"))
	188	+	then w
	189	+	else throw(($getType(w) + " couldn't be cast to String"))
179	190		}
180		-	if ((s == s))
	191	+	if ((t == t))
181	192		then {
182		-	let q = toString(i)
183		-	[IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + q), 0), StringEntry(("lend-" + q), s), BooleanEntry(l, true)]
	193	+	let r = toString(i)
	194	+	[IntegerEntry("lendCount", (i + 1)), IntegerEntry("lendCurrentCount", (j + 1)), IntegerEntry(("lend-rentCount-" + r), 0), StringEntry(("lend-" + r), t), BooleanEntry(l, true)]
184	195		}
185	196		else throw("Strict value is not equal to itself.")
186	197		}
187	198		else throw("Strict value is not equal to itself.")
188	199		}))
189	200
190	201
191	202
192	203		@Callable(J)
193		-	func initRent (p,ad) = valueOrElse(E(J.payments, x(p, ad)), {
194		-	let q = toString(p)
195		-	let s = getStringValue(("lend-" + q))
196		-	let ae = w(p)
197		-	let af = toString(ae)
198		-	let u = {
199		-	let v = invoke(f, "readByJSONKey", [s, "timeUnitSeconds"], nil)
200		-	if ($isInstanceOf(v, "String"))
201		-	then v
202		-	else throw(($getType(v) + " couldn't be cast to String"))
	204	+	func initRent (q,ae) = valueOrElse(F(J.payments, y(q, ae)), {
	205	+	let r = toString(q)
	206	+	let t = getStringValue(("lend-" + r))
	207	+	let af = x(q)
	208	+	let ag = toString(af)
	209	+	let v = {
	210	+	let w = invoke(f, "readByJSONKey", [t, "timeUnitSeconds"], nil)
	211	+	if ($isInstanceOf(w, "String"))
	212	+	then w
	213	+	else throw(($getType(w) + " couldn't be cast to String"))
203	214		}
204		-	if ((u == u))
	215	+	if ((v == v))
205	216		then {
206		-	let ag = parseIntValue(u)
207		-	if ((ag == ag))
	217	+	let ah = parseIntValue(v)
	218	+	if ((ah == ah))
208	219		then {
209		-	let ah = {
210		-	let v = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ad), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ag * ad))), "0"]], nil)
211		-	if ($isInstanceOf(v, "String"))
212		-	then v
213		-	else throw(($getType(v) + " couldn't be cast to String"))
	220	+	let ai = {
	221	+	let w = invoke(f, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(J.caller), toString(ae), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (ah * ae))), "0"]], nil)
	222	+	if ($isInstanceOf(w, "String"))
	223	+	then w
	224	+	else throw(($getType(w) + " couldn't be cast to String"))
214	225		}
215		-	if ((ah == ah))
216		-	then [IntegerEntry(("lend-rentCount-" + q), (ae + 1)), StringEntry(((("lend-rent-" + q) + "-") + af), ah), IntegerEntry(("lend-cost-" + q), (x(p, ad) + A(p)))]
	226	+	if ((ai == ai))
	227	+	then [IntegerEntry(("lend-rentCount-" + r), (af + 1)), StringEntry(((("lend-rent-" + r) + "-") + ag), ai), IntegerEntry(("lend-cost-" + r), (y(q, ae) + B(q)))]
217	228		else throw("Strict value is not equal to itself.")
218	229		}
219	230		else throw("Strict value is not equal to itself.")
220	231		}
221	232		else throw("Strict value is not equal to itself.")
222	233		})
223	234
224	235
225	236
226	237		@Callable(J)
227		-	func closeLend (p) = valueOrElse(I(J.caller, p), {
228		-	let q = toString(p)
229		-	[DeleteEntry(("lend-" + q)), DeleteEntry(("lend-rentCount-" + q)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + q)), ScriptTransfer(J.caller, A(p), g)]
	238	+	func closeLend (q) = valueOrElse(I(J.caller, q), {
	239	+	let r = toString(q)
	240	+	[DeleteEntry(("lend-" + r)), DeleteEntry(("lend-rentCount-" + r)), IntegerEntry("lendCurrentCount", (j - 1)), DeleteEntry(("lend-cost-" + r)), ScriptTransfer(J.caller, B(q), g)]
230	241		})
231	242
232	243
233	244
234	245		@Callable(J)
235		-	func test (p) = [StringEntry("Debug", ~~r(o~~(p), "owner"))]
	246	+	func test (q) = [StringEntry("Debug", s(p(q), "owner"))]
236	247
237	248

github/deemru/w8io/c3f4982 
76.49 ms ◑