tx · GwRxPzfr7S8MpH9T5bcesRGxAakVrdXLZZH5V67yjtYe

3MxVYj6ScMArhAamy7nB6b342kh1Pso1LTn:  -0.01400000 Waves

2023.03.22 20:55 [2501545] smart account 3MxVYj6ScMArhAamy7nB6b342kh1Pso1LTn > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GwRxPzfr7S8MpH9T5bcesRGxAakVrdXLZZH5V67yjtYe",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1679507704130,
    "version": 2,
    "chainId": 84,
    "sender": "3MxVYj6ScMArhAamy7nB6b342kh1Pso1LTn",
    "senderPublicKey": "CZeucjRLCKrkiP9zuj9KbLe23Wv9DywFzHBqNDnte51B",
    "proofs": [
        "5cGGXXUziczBnnrykywwHi9TdSgNZF52fbfh3mzsdnvKFvp9KcbygfphCGiDUtnUhvM6DgEfN4mepsjov2STBVTj"
    ],
    "script": "base64:BgJHCAISBAoCCAgSBAoCCAESAwoBCBIGCgQICAgIEgUKAwgICBIDCgECEgQKAggBEgMKAQgSBgoECAEBARIECgIBARIDCgEBEgAcAA5jb2xsZWN0aW9uTmFtZQkBEUBleHRyTmF0aXZlKDEwNTgpAQIOY29sbGVjdGlvbk5hbWUABnN5bWJvbAkBEUBleHRyTmF0aXZlKDEwNTgpAQIGc3ltYm9sAAtkZXNjcmlwdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQILZGVzY3JpcHRpb24AC3RvdGFsQW1vdW50CQERQGV4dHJOYXRpdmUoMTA1NSkBAgt0b3RhbEFtb3VudAAHYmFzZVVSSQkBEUBleHRyTmF0aXZlKDEwNTgpAQIHYmFzZVVSSQAIZEFwcEpzb24JAQdBZGRyZXNzAQkA2QQBAiMzTXJHYVpWUmhrbkVHZkhKMTl0dFVQTm5EUm9GcWNIaFZONwAMdG9rZW5QYXltZW50CQERQGV4dHJOYXRpdmUoMTA1NykBAgx0b2tlblBheW1lbnQAEXRva2VuUGF5bWVudEFzc2V0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkBEUBleHRyTmF0aXZlKDEwNTcpAQIMdG9rZW5QYXltZW50AiN0b2tlbiBwYXltZW50IGFzc2V0IGRvZXNuJ3QgY29ubmVjdAAJbGVuZENvdW50CQERQGV4dHJOYXRpdmUoMTA1NSkBAglsZW5kQ291bnQAEGxlbmRDdXJyZW50Q291bnQJARFAZXh0ck5hdGl2ZSgxMDU1KQECEGxlbmRDdXJyZW50Q291bnQAC2h1bmRyZWRMaXN0CQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAkAzAgCAgAJAMwIAgIACQDMCAICAAUDbmlsAQ5wYXJzZUlkdG9Bc3NldAEHYXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUHYXNzZXRJZAIcQ2FuJ3QgZmluZCBhc3NldCBieSBhc3NldCBpZAENdHJhbnNmZXJPck5vdAMCdG8GYW1vdW50B2Fzc2V0SWQDCQAAAgUCdG8FBHRoaXMJAQtTdHJpbmdFbnRyeQICBHNtdGgCBHNtdGgJAQ5TY3JpcHRUcmFuc2ZlcgMFAnRvBQZhbW91bnQFB2Fzc2V0SWQBC2dldExlbmRKc29uAQZsZW5kSWQEDGxlbmRJZFN0cmluZwkApAMBBQZsZW5kSWQJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgIFbGVuZC0FDGxlbmRJZFN0cmluZwEGZ2V0S2V5AghsZW5kSnNvbgNrZXkED3RpbWVVbml0U2Vjb25kcwoAAUAJAPwHBAUIZEFwcEpzb24CDXJlYWRCeUpTT05LZXkJAMwIAgUIbGVuZEpzb24JAMwIAgUDa2V5BQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUPdGltZVVuaXRTZWNvbmRzBQ90aW1lVW5pdFNlY29uZHMFD3RpbWVVbml0U2Vjb25kcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEMZ2V0UmVudENvdW50AQZsZW5kSWQEDGxlbmRJZFN0cmluZwkApAMBBQZsZW5kSWQJARFAZXh0ck5hdGl2ZSgxMDU1KQEJAKwCAgIPbGVuZC1yZW50Q291bnQtBQxsZW5kSWRTdHJpbmcBDGNhbGNMZW5kQ29zdAIGbGVuZElkD3RpbWVVbml0U2Vjb25kcwQIbGVuZEpzb24JAQtnZXRMZW5kSnNvbgEFBmxlbmRJZAQTdGltZVVuaXRQcmljZVN0cmluZwkBBmdldEtleQIFCGxlbmRKc29uAg10aW1lVW5pdFByaWNlAwkAAAIFE3RpbWVVbml0UHJpY2VTdHJpbmcFE3RpbWVVbml0UHJpY2VTdHJpbmcEDXRpbWVVbml0UHJpY2UJAQ1wYXJzZUludFZhbHVlAQUTdGltZVVuaXRQcmljZVN0cmluZwkAaAIFD3RpbWVVbml0U2Vjb25kcwUNdGltZVVuaXRQcmljZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELZ2V0TGVuZENvc3QBBmxlbmRJZAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQCsAgICCmxlbmQtY29zdC0JAKQDAQUGbGVuZElkAAABDG9ubHlJbnRlcm5hbAEGY2FsbGVyAwkAAAIFBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECEk9ubHkgaW50ZXJuYWwgY2FsbAEVcmVkdWNlckdldERlbGV0ZUVudHJ5AgVhY2N1bQRuZXh0BAskdDAyNTQyMjU5MgUFYWNjdW0ECWRlbGV0aW9ucwgFCyR0MDI1NDIyNTkyAl8xBAdjdXJyZW50CAULJHQwMjU0MjI1OTICXzIECG1heENvdW50CAULJHQwMjU0MjI1OTICXzMEBmxlbmRJZAgFCyR0MDI1NDIyNTkyAl80AwkAZgIFCG1heENvdW50BQdjdXJyZW50CQCVCgMJAM0IAgUJZGVsZXRpb25zCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICAgpsZW5kLXJlbnQtBQZsZW5kSWQCAS0JAKQDAQUHY3VycmVudAkAZAIFB2N1cnJlbnQAAQUIbWF4Q291bnQFBWFjY3VtARJyZWR1Y2VyQ29uY2F0TGlzdHMCBWFjY3VtBG5leHQJAM0IAgUFYWNjdW0FBG5leHQBGHJlZHVjZXJDb25jYXRMaXN0c1N0cmluZwIFYWNjdW0EbmV4dAkAzQgCBQVhY2N1bQUEbmV4dAETcmVkdWNlckxpc3RUb1N0cmluZwIFYWNjdW0EbmV4dAkArAICCQCsAgIFBWFjY3VtAgEtBQRuZXh0AQtyZWR1Y2VyVGVzdAIFYWNjdW0EbmV4dAQLJHQwMzE4NjMyMzYFBWFjY3VtBAlkZWxldGlvbnMIBQskdDAzMTg2MzIzNgJfMQQHY3VycmVudAgFCyR0MDMxODYzMjM2Al8yBAhtYXhDb3VudAgFCyR0MDMxODYzMjM2Al8zBAZsZW5kSWQIBQskdDAzMTg2MzIzNgJfNAMJAGYCBQhtYXhDb3VudAUHY3VycmVudAkAlgoECQDNCAIFCWRlbGV0aW9ucwkArAICCQCsAgIJAKwCAgIKbGVuZC1yZW50LQUGbGVuZElkAgEtCQCkAwEFB2N1cnJlbnQJAGQCBQdjdXJyZW50AAEFCG1heENvdW50BQZsZW5kSWQJAJYKBAUJZGVsZXRpb25zBQdjdXJyZW50BQhtYXhDb3VudAUGbGVuZElkAQ9jaGVja0Fzc2V0T3duZXICBmNhbGxlcgdhc3NldElkAwkAAAIJAPAHAgUGY2FsbGVyCQDZBAEFB2Fzc2V0SWQAAQUEdW5pdAkAAgECEE9ubHkgYXNzZXQgb3duZXIBDGNoZWNrUGF5bWVudAIIcGF5bWVudHMGYW1vdW50AwkAZwIICQCRAwIFCHBheW1lbnRzAAAGYW1vdW50BQZhbW91bnQFBHVuaXQJAAIBAhVhbW91bnQgbGVzcyB0aGVuIG5lZWQBEGNoZWNrQXNzZXRFeGlzdHMBB2Fzc2V0SWQDCQELdmFsdWVPckVsc2UCCQCgCAEFB2Fzc2V0SWQHCQACAQIWdGhpcyB0b2tlbiBhbHJlYWR5IHVzZQUEdW5pdAEOY2hlY2tMZW5kT3duZXICBmNhbGxlcgZsZW5kSWQDCQECIT0CCQEGZ2V0S2V5AgkBC2dldExlbmRKc29uAQUGbGVuZElkAgVvd25lcgkApQgBBQZjYWxsZXIJAAIBAhF5b3UgaGF2ZW4ndCBwZXJtcwUEdW5pdAwBaQEJc2V0U3RyaW5nAgRfa2V5Bl92YWx1ZQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCBQRfa2V5BQZfdmFsdWUFA25pbAFpAQZzZXRJbnQCBF9rZXkGX3ZhbHVlCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQRfa2V5BQZfdmFsdWUFA25pbAFpAQtkZWxldGVFbnRyeQEEX2tleQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELRGVsZXRlRW50cnkBBQRfa2V5BQNuaWwBaQEEaW5pdAQPX2NvbGxlY3Rpb25OYW1lB19zeW1ib2wMX2Rlc2NyaXB0aW9uCF9iYXNlVVJJCQELdmFsdWVPckVsc2UCCQEMb25seUludGVybmFsAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQICDmNvbGxlY3Rpb25OYW1lBQ9fY29sbGVjdGlvbk5hbWUJAMwIAgkBC1N0cmluZ0VudHJ5AgIGc3ltYm9sBQdfc3ltYm9sCQDMCAIJAQtTdHJpbmdFbnRyeQICC2Rlc2NyaXB0aW9uBQxfZGVzY3JpcHRpb24JAMwIAgkBDEludGVnZXJFbnRyeQICC3RvdGFsQW1vdW50AAAJAMwIAgkBC1N0cmluZ0VudHJ5AgIHYmFzZVVSSQUIX2Jhc2VVUkkFA25pbAFpAQdzZXRVc2VyAwdhc3NldElkBHVzZXIHZXhwaXJlcwQDcmVzCQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICBHVzZXIJAMwIAgIHZXhwaXJlcwUDbmlsCQDMCAIJAMwIAgUEdXNlcgkAzAgCBQdleHBpcmVzBQNuaWwFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgd1c2VyT2YtBQdhc3NldElkCgABQAUDcmVzAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwUDbmlsBQNyZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEPc2V0VG9rZW5QYXltZW50AQthc3NldEJpbmFyeQkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgkAzAgCCQELQmluYXJ5RW50cnkCAgx0b2tlblBheW1lbnQFC2Fzc2V0QmluYXJ5BQNuaWwBaQEKbWludFRva2VucwICdG8GYW1vdW50BAZyZWlzdWUJAQdSZWlzc3VlAwUMdG9rZW5QYXltZW50BQZhbW91bnQGBAl0b0FkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQJ0bwQIdHJhbnNmZXIJAQ10cmFuc2Zlck9yTm90AwUJdG9BZGRyZXNzBQZhbW91bnQFDHRva2VuUGF5bWVudAMJAAACBQh0cmFuc2ZlcgUIdHJhbnNmZXIJAMwIAgUIdHJhbnNmZXIJAMwIAgUGcmVpc3VlBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEHbWludE5GVAECdG8EB3Rva2VuSWQJAGQCBQt0b3RhbEFtb3VudAABBA10b2tlbklkU3RyaW5nCQCkAwEFB3Rva2VuSWQEB3ByZU5hbWUJAKwCAgkArAICBQZzeW1ib2wCASMFDXRva2VuSWRTdHJpbmcEBG5hbWUDCQBnAgAQCQCxAgEFB3ByZU5hbWUFB3ByZU5hbWUFDXRva2VuSWRTdHJpbmcECHRva2VuVVJJCQCsAgIFB2Jhc2VVUkkFDXRva2VuSWRTdHJpbmcEBGpzb24KAAFACQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICCHRva2VuVVJJBQNuaWwJAMwIAgkAzAgCBQh0b2tlblVSSQUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcEBWFzc2V0CQDDCAcFBG5hbWUFBGpzb24AAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAl0b0FkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQJ0bwQIdHJhbnNmZXIJAQ10cmFuc2Zlck9yTm90AwUJdG9BZGRyZXNzAAEFB2Fzc2V0SWQDCQAAAgUIdHJhbnNmZXIFCHRyYW5zZmVyCQDMCAIFBWFzc2V0CQDMCAIFCHRyYW5zZmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgt0b3RhbEFtb3VudAUHdG9rZW5JZAkAzAgCCQELU3RyaW5nRW50cnkCBQRuYW1lBQh0b2tlblVSSQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGluaXRMZW5kBAdhc3NldElkD3RpbWVVbml0U2Vjb25kcw10aW1lVW5pdFByaWNlDXRpbWVVbml0Q291bnQJAQt2YWx1ZU9yRWxzZQIJAQ9jaGVja0Fzc2V0T3duZXICCAUBaQZjYWxsZXIFB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJARBjaGVja0Fzc2V0RXhpc3RzAQUHYXNzZXRJZAQFYXNzZXQJAQ5wYXJzZUlkdG9Bc3NldAEFB2Fzc2V0SWQECHRva2VuVVJJCgABQAkA/AcEBQhkQXBwSnNvbgINcmVhZEJ5SlNPTktleQkAzAgCCAUFYXNzZXQLZGVzY3JpcHRpb24JAMwIAgIIdG9rZW5VUkkFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwMJAAACBQh0b2tlblVSSQUIdG9rZW5VUkkECGxlbmRKc29uCgABQAkA/AcEBQhkQXBwSnNvbgIIbWFrZUpTT04JAMwIAgkAzAgCAhJzdXBwb3J0ZWRJbnRlcmZhY2UJAMwIAgIIYXNzZXRkSWQJAMwIAgIIdG9rZW5VUkkJAMwIAgIFb3duZXIJAMwIAgIPdGltZVVuaXRTZWNvbmRzCQDMCAICDXRpbWVVbml0UHJpY2UJAMwIAgINdGltZVVuaXRDb3VudAkAzAgCAg5zdGFydFRpbWVzdGFtcAkAzAgCAgxlbmRUaW1lc3RhbXAJAMwIAgIHZGVwb3NpdAkAzAgCAgdjbGFpbWVkBQNuaWwJAMwIAgkAzAgCAgEwCQDMCAIFB2Fzc2V0SWQJAMwIAgUIdG9rZW5VUkkJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgkApAMBBQ90aW1lVW5pdFNlY29uZHMJAMwIAgkApAMBBQ10aW1lVW5pdFByaWNlCQDMCAIJAKQDAQUNdGltZVVuaXRDb3VudAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAKQDAQkAZAIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQBoAgUPdGltZVVuaXRTZWNvbmRzBQ10aW1lVW5pdENvdW50CQDMCAICATAJAMwIAgIBMAUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUIbGVuZEpzb24FCGxlbmRKc29uBAxsZW5kSWRTdHJpbmcJAKQDAQUJbGVuZENvdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCAglsZW5kQ291bnQJAGQCBQlsZW5kQ291bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQbGVuZEN1cnJlbnRDb3VudAkAZAIFEGxlbmRDdXJyZW50Q291bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAg9sZW5kLXJlbnRDb3VudC0FDGxlbmRJZFN0cmluZwAACQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIFbGVuZC0FDGxlbmRJZFN0cmluZwUIbGVuZEpzb24JAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2Fzc2V0SWQGBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIaW5pdFJlbnQCBmxlbmRJZA10aW1lVW5pdENvdW50CQELdmFsdWVPckVsc2UCCQEMY2hlY2tQYXltZW50AggFAWkIcGF5bWVudHMJAQxjYWxjTGVuZENvc3QCBQZsZW5kSWQFDXRpbWVVbml0Q291bnQEDGxlbmRJZFN0cmluZwkApAMBBQZsZW5kSWQECGxlbmRKc29uCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgICBWxlbmQtBQxsZW5kSWRTdHJpbmcEBnJlbnRJZAkBDGdldFJlbnRDb3VudAEFBmxlbmRJZAQMcmVudElkU3RyaW5nCQCkAwEFBnJlbnRJZAQPdGltZVVuaXRTZWNvbmRzCgABQAkA/AcEBQhkQXBwSnNvbgINcmVhZEJ5SlNPTktleQkAzAgCBQhsZW5kSnNvbgkAzAgCAg90aW1lVW5pdFNlY29uZHMFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwMJAAACBQ90aW1lVW5pdFNlY29uZHMFD3RpbWVVbml0U2Vjb25kcwQSdGltZVVuaXRTZWNvbmRzSW50CQENcGFyc2VJbnRWYWx1ZQEFD3RpbWVVbml0U2Vjb25kcwMJAAACBRJ0aW1lVW5pdFNlY29uZHNJbnQFEnRpbWVVbml0U2Vjb25kc0ludAQIcmVudEpzb24KAAFACQD8BwQFCGRBcHBKc29uAghtYWtlSlNPTgkAzAgCCQDMCAICCGN1c3RvbWVyCQDMCAICDXRpbWVVbml0Q291bnQJAMwIAgIOc3RhcnRUaW1lc3RhbXAJAMwIAgIMZW5kVGltZXN0YW1wCQDMCAICBmNsb3NlZAUDbmlsCQDMCAIJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgkApAMBBQ10aW1lVW5pdENvdW50CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBCQBkAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAGgCBRJ0aW1lVW5pdFNlY29uZHNJbnQFDXRpbWVVbml0Q291bnQJAMwIAgIBMAUDbmlsBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcDCQAAAgUIcmVudEpzb24FCHJlbnRKc29uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICD2xlbmQtcmVudENvdW50LQUMbGVuZElkU3RyaW5nCQBkAgUGcmVudElkAAEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgIKbGVuZC1yZW50LQUMbGVuZElkU3RyaW5nAgEtBQxyZW50SWRTdHJpbmcFCHJlbnRKc29uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCmxlbmQtY29zdC0FDGxlbmRJZFN0cmluZwkAZAIJAQxjYWxjTGVuZENvc3QCBQZsZW5kSWQFDXRpbWVVbml0Q291bnQJAQtnZXRMZW5kQ29zdAEFBmxlbmRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCWNsb3NlTGVuZAEGbGVuZElkCQELdmFsdWVPckVsc2UCCQEOY2hlY2tMZW5kT3duZXICCAUBaQZjYWxsZXIFBmxlbmRJZAQMbGVuZElkU3RyaW5nCQCkAwEFBmxlbmRJZAQPZGVsZXRlRW50cnlMaXN0CAoAAiRsBQtodW5kcmVkTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAUDbmlsAAAAAAUMbGVuZElkU3RyaW5nCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARVyZWR1Y2VyR2V0RGVsZXRlRW50cnkCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAl8xBAl0eExpc3RSYXcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICAgVsZW5kLQUMbGVuZElkU3RyaW5nCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgIPbGVuZC1yZW50Q291bnQtBQxsZW5kSWRTdHJpbmcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICAgpsZW5kLWNvc3QtBQxsZW5kSWRTdHJpbmcJAMwIAgkBDEludGVnZXJFbnRyeQICEGxlbmRDdXJyZW50Q291bnQJAGUCBRBsZW5kQ3VycmVudENvdW50AAEJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQELZ2V0TGVuZENvc3QBBQZsZW5kSWQFDHRva2VuUGF5bWVudAUDbmlsBAZ0eExpc3QKAAIkbAUJdHhMaXN0UmF3CgACJHMJAJADAQUCJGwKAAUkYWNjMAUPZGVsZXRlRW50cnlMaXN0CgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARJyZWR1Y2VyQ29uY2F0TGlzdHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkBQZ0eExpc3QBaQEEdGVzdAAEBGRhdGEJAMwIAgIBMQkAzAgCAgEyCQDMCAICATMFA25pbAQEbGlzdAgKAAIkbAULaHVuZHJlZExpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQFBGRhdGEAAAAFAgE1CgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQtyZWR1Y2VyVGVzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQCXzEJAMwIAgkBC1N0cmluZ0VudHJ5AgIFRGVidWcKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQETcmVkdWNlckxpc3RUb1N0cmluZwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQFA25pbABX+Hwg",
    "height": 2501545,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DtQbkcJvcUYfxppYegAH3LcEdTYDuKYznGC89Bqg5tgR
Next: EX9qkqZg4Ly9KN5p6kiN8hmw1nXud9n5xwDsrmFYYVGP

Diff: 
Old
New
Differences
104
104
 
    let maxCount = $t031863236._3
105
105
 
    let lendId = $t031863236._4
106
106
 
    if ((maxCount > current))
107
-
        then $Tuple3((deletions :+ ((("lend-rent-" + lendId) + "-") + toString(current))), (current + 1), maxCount)
107
+
        then $Tuple4((deletions :+ ((("lend-rent-" + lendId) + "-") + toString(current))), (current + 1), maxCount, lendId)
108
108
 
        else $Tuple4(deletions, current, maxCount, lendId)
109
109
 
    }
110
110
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let collectionName = getStringValue("collectionName")
5
5
 
6
6
 
let symbol = getStringValue("symbol")
7
7
 
8
8
 
let description = getStringValue("description")
9
9
 
10
10
 
let totalAmount = getIntegerValue("totalAmount")
11
11
 
12
12
 
let baseURI = getStringValue("baseURI")
13
13
 
14
14
 
let dAppJson = Address(fromBase58String("3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7"))
15
15
 
16
16
 
let tokenPayment = getBinaryValue("tokenPayment")
17
17
 
18
18
 
let tokenPaymentAsset = valueOrErrorMessage(assetInfo(getBinaryValue("tokenPayment")), "token payment asset doesn't connect")
19
19
 
20
20
 
let lendCount = getIntegerValue("lendCount")
21
21
 
22
22
 
let lendCurrentCount = getIntegerValue("lendCurrentCount")
23
23
 
24
24
 
let hundredList = ["", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", ""]
25
25
 
26
26
 
func parseIdtoAsset (assetId) = valueOrErrorMessage(assetInfo(fromBase58String(assetId)), "Can't find asset by asset id")
27
27
 
28
28
 
29
29
 
func transferOrNot (to,amount,assetId) = if ((to == this))
30
30
 
    then StringEntry("smth", "smth")
31
31
 
    else ScriptTransfer(to, amount, assetId)
32
32
 
33
33
 
34
34
 
func getLendJson (lendId) = {
35
35
 
    let lendIdString = toString(lendId)
36
36
 
    getStringValue(("lend-" + lendIdString))
37
37
 
    }
38
38
 
39
39
 
40
40
 
func getKey (lendJson,key) = {
41
41
 
    let timeUnitSeconds = {
42
42
 
        let @ = invoke(dAppJson, "readByJSONKey", [lendJson, key], nil)
43
43
 
        if ($isInstanceOf(@, "String"))
44
44
 
            then @
45
45
 
            else throw(($getType(@) + " couldn't be cast to String"))
46
46
 
        }
47
47
 
    if ((timeUnitSeconds == timeUnitSeconds))
48
48
 
        then timeUnitSeconds
49
49
 
        else throw("Strict value is not equal to itself.")
50
50
 
    }
51
51
 
52
52
 
53
53
 
func getRentCount (lendId) = {
54
54
 
    let lendIdString = toString(lendId)
55
55
 
    getIntegerValue(("lend-rentCount-" + lendIdString))
56
56
 
    }
57
57
 
58
58
 
59
59
 
func calcLendCost (lendId,timeUnitSeconds) = {
60
60
 
    let lendJson = getLendJson(lendId)
61
61
 
    let timeUnitPriceString = getKey(lendJson, "timeUnitPrice")
62
62
 
    if ((timeUnitPriceString == timeUnitPriceString))
63
63
 
        then {
64
64
 
            let timeUnitPrice = parseIntValue(timeUnitPriceString)
65
65
 
            (timeUnitSeconds * timeUnitPrice)
66
66
 
            }
67
67
 
        else throw("Strict value is not equal to itself.")
68
68
 
    }
69
69
 
70
70
 
71
71
 
func getLendCost (lendId) = valueOrElse(getInteger(("lend-cost-" + toString(lendId))), 0)
72
72
 
73
73
 
74
74
 
func onlyInternal (caller) = if ((caller == this))
75
75
 
    then unit
76
76
 
    else throw("Only internal call")
77
77
 
78
78
 
79
79
 
func reducerGetDeleteEntry (accum,next) = {
80
80
 
    let $t025422592 = accum
81
81
 
    let deletions = $t025422592._1
82
82
 
    let current = $t025422592._2
83
83
 
    let maxCount = $t025422592._3
84
84
 
    let lendId = $t025422592._4
85
85
 
    if ((maxCount > current))
86
86
 
        then $Tuple3((deletions :+ DeleteEntry(((("lend-rent-" + lendId) + "-") + toString(current)))), (current + 1), maxCount)
87
87
 
        else accum
88
88
 
    }
89
89
 
90
90
 
91
91
 
func reducerConcatLists (accum,next) = (accum :+ next)
92
92
 
93
93
 
94
94
 
func reducerConcatListsString (accum,next) = (accum :+ next)
95
95
 
96
96
 
97
97
 
func reducerListToString (accum,next) = ((accum + "-") + next)
98
98
 
99
99
 
100
100
 
func reducerTest (accum,next) = {
101
101
 
    let $t031863236 = accum
102
102
 
    let deletions = $t031863236._1
103
103
 
    let current = $t031863236._2
104
104
 
    let maxCount = $t031863236._3
105
105
 
    let lendId = $t031863236._4
106
106
 
    if ((maxCount > current))
107
-
        then $Tuple3((deletions :+ ((("lend-rent-" + lendId) + "-") + toString(current))), (current + 1), maxCount)
107
+
        then $Tuple4((deletions :+ ((("lend-rent-" + lendId) + "-") + toString(current))), (current + 1), maxCount, lendId)
108
108
 
        else $Tuple4(deletions, current, maxCount, lendId)
109
109
 
    }
110
110
 
111
111
 
112
112
 
func checkAssetOwner (caller,assetId) = if ((assetBalance(caller, fromBase58String(assetId)) == 1))
113
113
 
    then unit
114
114
 
    else throw("Only asset owner")
115
115
 
116
116
 
117
117
 
func checkPayment (payments,amount) = if ((payments[0].amount >= amount))
118
118
 
    then unit
119
119
 
    else throw("amount less then need")
120
120
 
121
121
 
122
122
 
func checkAssetExists (assetId) = if (valueOrElse(getBoolean(assetId), false))
123
123
 
    then throw("this token already use")
124
124
 
    else unit
125
125
 
126
126
 
127
127
 
func checkLendOwner (caller,lendId) = if ((getKey(getLendJson(lendId), "owner") != toString(caller)))
128
128
 
    then throw("you haven't perms")
129
129
 
    else unit
130
130
 
131
131
 
132
132
 
@Callable(i)
133
133
 
func setString (_key,_value) = valueOrElse(onlyInternal(i.caller), [StringEntry(_key, _value)])
134
134
 
135
135
 
136
136
 
137
137
 
@Callable(i)
138
138
 
func setInt (_key,_value) = valueOrElse(onlyInternal(i.caller), [IntegerEntry(_key, _value)])
139
139
 
140
140
 
141
141
 
142
142
 
@Callable(i)
143
143
 
func deleteEntry (_key) = valueOrElse(onlyInternal(i.caller), [DeleteEntry(_key)])
144
144
 
145
145
 
146
146
 
147
147
 
@Callable(i)
148
148
 
func init (_collectionName,_symbol,_description,_baseURI) = valueOrElse(onlyInternal(i.caller), [StringEntry("collectionName", _collectionName), StringEntry("symbol", _symbol), StringEntry("description", _description), IntegerEntry("totalAmount", 0), StringEntry("baseURI", _baseURI)])
149
149
 
150
150
 
151
151
 
152
152
 
@Callable(i)
153
153
 
func setUser (assetId,user,expires) = {
154
154
 
    let res = invoke(dAppJson, "makeJSON", [["user", "expires"], [user, expires]], nil)
155
155
 
    if ((res == res))
156
156
 
        then $Tuple2([StringEntry(("userOf-" + assetId), {
157
157
 
            let @ = res
158
158
 
            if ($isInstanceOf(@, "String"))
159
159
 
                then @
160
160
 
                else throw(($getType(@) + " couldn't be cast to String"))
161
161
 
            })], res)
162
162
 
        else throw("Strict value is not equal to itself.")
163
163
 
    }
164
164
 
165
165
 
166
166
 
167
167
 
@Callable(i)
168
168
 
func setTokenPayment (assetBinary) = valueOrElse(onlyInternal(i.caller), [BinaryEntry("tokenPayment", assetBinary)])
169
169
 
170
170
 
171
171
 
172
172
 
@Callable(i)
173
173
 
func mintTokens (to,amount) = {
174
174
 
    let reisue = Reissue(tokenPayment, amount, true)
175
175
 
    let toAddress = Address(fromBase58String(to))
176
176
 
    let transfer = transferOrNot(toAddress, amount, tokenPayment)
177
177
 
    if ((transfer == transfer))
178
178
 
        then [transfer, reisue]
179
179
 
        else throw("Strict value is not equal to itself.")
180
180
 
    }
181
181
 
182
182
 
183
183
 
184
184
 
@Callable(i)
185
185
 
func mintNFT (to) = {
186
186
 
    let tokenId = (totalAmount + 1)
187
187
 
    let tokenIdString = toString(tokenId)
188
188
 
    let preName = ((symbol + "#") + tokenIdString)
189
189
 
    let name = if ((16 >= size(preName)))
190
190
 
        then preName
191
191
 
        else tokenIdString
192
192
 
    let tokenURI = (baseURI + tokenIdString)
193
193
 
    let json = {
194
194
 
        let @ = invoke(dAppJson, "makeJSON", [["tokenURI"], [tokenURI]], nil)
195
195
 
        if ($isInstanceOf(@, "String"))
196
196
 
            then @
197
197
 
            else throw(($getType(@) + " couldn't be cast to String"))
198
198
 
        }
199
199
 
    let asset = Issue(name, json, 1, 0, false, unit, height)
200
200
 
    let assetId = calculateAssetId(asset)
201
201
 
    let toAddress = Address(fromBase58String(to))
202
202
 
    let transfer = transferOrNot(toAddress, 1, assetId)
203
203
 
    if ((transfer == transfer))
204
204
 
        then [asset, transfer, IntegerEntry("totalAmount", tokenId), StringEntry(name, tokenURI)]
205
205
 
        else throw("Strict value is not equal to itself.")
206
206
 
    }
207
207
 
208
208
 
209
209
 
210
210
 
@Callable(i)
211
211
 
func initLend (assetId,timeUnitSeconds,timeUnitPrice,timeUnitCount) = valueOrElse(checkAssetOwner(i.caller, assetId), valueOrElse(checkAssetExists(assetId), {
212
212
 
    let asset = parseIdtoAsset(assetId)
213
213
 
    let tokenURI = {
214
214
 
        let @ = invoke(dAppJson, "readByJSONKey", [asset.description, "tokenURI"], nil)
215
215
 
        if ($isInstanceOf(@, "String"))
216
216
 
            then @
217
217
 
            else throw(($getType(@) + " couldn't be cast to String"))
218
218
 
        }
219
219
 
    if ((tokenURI == tokenURI))
220
220
 
        then {
221
221
 
            let lendJson = {
222
222
 
                let @ = invoke(dAppJson, "makeJSON", [["supportedInterface", "assetdId", "tokenURI", "owner", "timeUnitSeconds", "timeUnitPrice", "timeUnitCount", "startTimestamp", "endTimestamp", "deposit", "claimed"], ["0", assetId, tokenURI, toString(i.caller), toString(timeUnitSeconds), toString(timeUnitPrice), toString(timeUnitCount), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (timeUnitSeconds * timeUnitCount))), "0", "0"]], nil)
223
223
 
                if ($isInstanceOf(@, "String"))
224
224
 
                    then @
225
225
 
                    else throw(($getType(@) + " couldn't be cast to String"))
226
226
 
                }
227
227
 
            if ((lendJson == lendJson))
228
228
 
                then {
229
229
 
                    let lendIdString = toString(lendCount)
230
230
 
[IntegerEntry("lendCount", (lendCount + 1)), IntegerEntry("lendCurrentCount", (lendCurrentCount + 1)), IntegerEntry(("lend-rentCount-" + lendIdString), 0), StringEntry(("lend-" + lendIdString), lendJson), BooleanEntry(assetId, true)]
231
231
 
                    }
232
232
 
                else throw("Strict value is not equal to itself.")
233
233
 
            }
234
234
 
        else throw("Strict value is not equal to itself.")
235
235
 
    }))
236
236
 
237
237
 
238
238
 
239
239
 
@Callable(i)
240
240
 
func initRent (lendId,timeUnitCount) = valueOrElse(checkPayment(i.payments, calcLendCost(lendId, timeUnitCount)), {
241
241
 
    let lendIdString = toString(lendId)
242
242
 
    let lendJson = getStringValue(("lend-" + lendIdString))
243
243
 
    let rentId = getRentCount(lendId)
244
244
 
    let rentIdString = toString(rentId)
245
245
 
    let timeUnitSeconds = {
246
246
 
        let @ = invoke(dAppJson, "readByJSONKey", [lendJson, "timeUnitSeconds"], nil)
247
247
 
        if ($isInstanceOf(@, "String"))
248
248
 
            then @
249
249
 
            else throw(($getType(@) + " couldn't be cast to String"))
250
250
 
        }
251
251
 
    if ((timeUnitSeconds == timeUnitSeconds))
252
252
 
        then {
253
253
 
            let timeUnitSecondsInt = parseIntValue(timeUnitSeconds)
254
254
 
            if ((timeUnitSecondsInt == timeUnitSecondsInt))
255
255
 
                then {
256
256
 
                    let rentJson = {
257
257
 
                        let @ = invoke(dAppJson, "makeJSON", [["customer", "timeUnitCount", "startTimestamp", "endTimestamp", "closed"], [toString(i.caller), toString(timeUnitCount), toString(lastBlock.timestamp), toString((lastBlock.timestamp + (timeUnitSecondsInt * timeUnitCount))), "0"]], nil)
258
258
 
                        if ($isInstanceOf(@, "String"))
259
259
 
                            then @
260
260
 
                            else throw(($getType(@) + " couldn't be cast to String"))
261
261
 
                        }
262
262
 
                    if ((rentJson == rentJson))
263
263
 
                        then [IntegerEntry(("lend-rentCount-" + lendIdString), (rentId + 1)), StringEntry(((("lend-rent-" + lendIdString) + "-") + rentIdString), rentJson), IntegerEntry(("lend-cost-" + lendIdString), (calcLendCost(lendId, timeUnitCount) + getLendCost(lendId)))]
264
264
 
                        else throw("Strict value is not equal to itself.")
265
265
 
                    }
266
266
 
                else throw("Strict value is not equal to itself.")
267
267
 
            }
268
268
 
        else throw("Strict value is not equal to itself.")
269
269
 
    })
270
270
 
271
271
 
272
272
 
273
273
 
@Callable(i)
274
274
 
func closeLend (lendId) = valueOrElse(checkLendOwner(i.caller, lendId), {
275
275
 
    let lendIdString = toString(lendId)
276
276
 
    let deleteEntryList = (    let $l = hundredList
277
277
 
    let $s = size($l)
278
278
 
    let $acc0 = $Tuple4(nil, 0, 0, lendIdString)
279
279
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
280
280
 
        then $a
281
281
 
        else reducerGetDeleteEntry($a, $l[$i])
282
282
 
283
283
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
284
284
 
        then $a
285
285
 
        else throw("List size exceeds 100")
286
286
 
287
287
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100))._1
288
288
 
    let txListRaw = [DeleteEntry(("lend-" + lendIdString)), DeleteEntry(("lend-rentCount-" + lendIdString)), DeleteEntry(("lend-cost-" + lendIdString)), IntegerEntry("lendCurrentCount", (lendCurrentCount - 1)), ScriptTransfer(i.caller, getLendCost(lendId), tokenPayment)]
289
289
 
    let txList = {
290
290
 
        let $l = txListRaw
291
291
 
        let $s = size($l)
292
292
 
        let $acc0 = deleteEntryList
293
293
 
        func $f1_1 ($a,$i) =         if (($i >= $s))
294
294
 
            then $a
295
295
 
            else reducerConcatLists($a, $l[$i])
296
296
 
297
297
 
        func $f1_2 ($a,$i) =         if (($i >= $s))
298
298
 
            then $a
299
299
 
            else throw("List size exceeds 100")
300
300
 
301
301
 
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
302
302
 
        }
303
303
 
    txList
304
304
 
    })
305
305
 
306
306
 
307
307
 
308
308
 
@Callable(i)
309
309
 
func test () = {
310
310
 
    let data = ["1", "2", "3"]
311
311
 
    let list = (    let $l = hundredList
312
312
 
    let $s = size($l)
313
313
 
    let $acc0 = $Tuple4(data, 0, 5, "5")
314
314
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
315
315
 
        then $a
316
316
 
        else reducerTest($a, $l[$i])
317
317
 
318
318
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
319
319
 
        then $a
320
320
 
        else throw("List size exceeds 100")
321
321
 
322
322
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100))._1
323
323
 
[StringEntry("Debug", {
324
324
 
        let $l = list
325
325
 
        let $s = size($l)
326
326
 
        let $acc0 = ""
327
327
 
        func $f1_1 ($a,$i) =         if (($i >= $s))
328
328
 
            then $a
329
329
 
            else reducerListToString($a, $l[$i])
330
330
 
331
331
 
        func $f1_2 ($a,$i) =         if (($i >= $s))
332
332
 
            then $a
333
333
 
            else throw("List size exceeds 100")
334
334
 
335
335
 
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
336
336
 
        })]
337
337
 
    }
338
338
 
339
339
 

github/deemru/w8io/169f3d6 
50.93 ms ◑