tx · FZs5VPGcTnyv84LpHrPYQaKe9kY136SgpvE4rAZqP7xZ

3MwyBKGZcdChEK9Z55HwLn3A2EgwEJJpqC1:  -0.01700000 Waves

2024.01.31 12:25 [2955583] smart account 3MwyBKGZcdChEK9Z55HwLn3A2EgwEJJpqC1 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FZs5VPGcTnyv84LpHrPYQaKe9kY136SgpvE4rAZqP7xZ",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1706693100388,
    "version": 1,
    "sender": "3MwyBKGZcdChEK9Z55HwLn3A2EgwEJJpqC1",
    "senderPublicKey": "7c3qLtcJ7EaPS2JDjXv8MBbd4kpyc6R27wcn5GgvZhur",
    "proofs": [
        "5mFMej3pd3kX5DybTj2eFRktW4JuzDVtduTzF5n31RNjw6DEYawxKQK63Xg1quoXqsfkFSEWDa1kTj8PfZDsbj3x"
    ],
    "script": "base64:BgIbCAISBgoECAEBARIDCgEIEgMKAQgSABIDCgEIIQAMY29udHJhY3RGaWxlAhB2ZXN0aW5nX25lby5yaWRlAANTRVACAl9fAAhJRFNfTElTVAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgkAzAgCAA8JAMwIAgAQCQDMCAIAEQkAzAgCABIJAMwIAgATCQDMCAIAFAkAzAgCABUJAMwIAgAWCQDMCAIAFwkAzAgCABgJAMwIAgAZCQDMCAIAGgkAzAgCABsJAMwIAgAcCQDMCAIAHQUDbmlsABFNQVhfVkVTVElOR19DT1VOVAkAkAMBBQhJRFNfTElTVAEIdGhyb3dFcnIBA21zZwkAAgEJAKwCAgkArAICBQxjb250cmFjdEZpbGUCAjogBQNtc2cBE2tleU1hbmFnZXJQdWJsaWNLZXkAAhQlc19fbWFuYWdlclB1YmxpY0tleQEWa2V5TWFuYWdlclZhdWx0QWRkcmVzcwACFyVzX19tYW5hZ2VyVmF1bHRBZGRyZXNzARxnZXRNYW5hZ2VyVmF1bHRBZGRyZXNzT3JUaGlzAAQHJG1hdGNoMAkAoggBCQEWa2V5TWFuYWdlclZhdWx0QWRkcmVzcwADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBBQFzBQR0aGlzARZtYW5hZ2VyUHVibGljS2V5T3JVbml0AAQTbWFuYWdlclZhdWx0QWRkcmVzcwkBHGdldE1hbmFnZXJWYXVsdEFkZHJlc3NPclRoaXMABAckbWF0Y2gwCQCdCAIFE21hbmFnZXJWYXVsdEFkZHJlc3MJARNrZXlNYW5hZ2VyUHVibGljS2V5AAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJANkEAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IACmtleUFzc2V0SWQJALkJAgkAzAgCAgIlcwkAzAgCAgdhc3NldElkBQNuaWwFA1NFUAANYXNzZXRJZFN0cmluZwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzBQprZXlBc3NldElkAgVXQVZFUwAMYXNzZXRJZEJ5dGVzAwkAAAIFDWFzc2V0SWRTdHJpbmcCBVdBVkVTBQR1bml0CQDZBAEFDWFzc2V0SWRTdHJpbmcADGtleUFkbWluTGlzdAkAuQkCCQDMCAICAiVzCQDMCAICEGFkbWluQWRkcmVzc0xpc3QFA25pbAUDU0VQAAprZXlCYW5MaXN0CQC5CQIJAMwIAgICJXMJAMwIAgIHYmFuTGlzdAUDbmlsBQNTRVAACWFkbWluTGlzdAQHJG1hdGNoMAkAnQgCBQR0aGlzBQxrZXlBZG1pbkxpc3QDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQC1CQIFAXMFA1NFUAUDbmlsAAdiYW5MaXN0BApiYW5MaXN0UmF3CQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFCmtleUJhbkxpc3QCAAMJAAACBQpiYW5MaXN0UmF3AgAFA25pbAkAvQkCBQpiYW5MaXN0UmF3BQNTRVABFGlzVmFsaWRBZGRyZXNzU3RyaW5nAQ1hZGRyZXNzU3RyaW5nBAckbWF0Y2gwCQCmCAEFDWFkZHJlc3NTdHJpbmcDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQBYQUHJG1hdGNoMAYHAQ5rZXlVc2VyVmVzdGluZwILdXNlckFkZHJlc3MCaWQEBmNoZWNrcwkAzAgCAwkBFGlzVmFsaWRBZGRyZXNzU3RyaW5nAQULdXNlckFkZHJlc3MGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIVYWRkcmVzcyBpcyBub3QgdmFsaWQ6CQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwCASAJAMwIAgMDCQBnAgUCaWQAAAkAZgIFEU1BWF9WRVNUSU5HX0NPVU5UBQJpZAcGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIWaWQgc2hvdWxkIGJlIGxlc3MgdGhhbgkAzAgCCQCkAwEFEU1BWF9WRVNUSU5HX0NPVU5UCQDMCAICBGdvdDoJAMwIAgkApAMBBQJpZAUDbmlsAgEgBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MJALkJAgkAzAgCAgYlcyVzJWQJAMwIAgIHdmVzdGluZwkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCCQCkAwEFAmlkBQNuaWwFA1NFUAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgESa2V5VXNlckFjY3VtdWxhdGVkAQt1c2VyQWRkcmVzcwQGY2hlY2tzCQDMCAIDCQEUaXNWYWxpZEFkZHJlc3NTdHJpbmcBBQt1c2VyQWRkcmVzcwYJAQh0aHJvd0VycgEJALkJAgkAzAgCAhVhZGRyZXNzIGlzIG5vdCB2YWxpZDoJAMwIAgULdXNlckFkZHJlc3MFA25pbAIBIAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgthY2N1bXVsYXRlZAkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQNTRVAJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BEWZvcm1hdFVzZXJWZXN0aW5nBA12ZXN0aW5nQW1vdW50CnN0YXJ0QmxvY2sKbG9ja0xlbmd0aAx0b3RhbENsYWltZWQEBmNoZWNrcwkAzAgCAwkAZwIFDXZlc3RpbmdBbW91bnQAAAYJAQh0aHJvd0VycgECIXZlc3RpbmcgYW1vdW50IGNhbm5vdCBiZSBuZWdhdGl2ZQkAzAgCAwkAZwIFCnN0YXJ0QmxvY2sAAAYJAQh0aHJvd0VycgECHnN0YXJ0IGJsb2NrIGNhbm5vdCBiZSBuZWdhdGl2ZQkAzAgCAwkAZwIFCmxvY2tMZW5ndGgAAAYJAQh0aHJvd0VycgECHmxvY2sgbGVuZ3RoIGNhbm5vdCBiZSBuZWdhdGl2ZQkAzAgCAwkAZwIFDHRvdGFsQ2xhaW1lZAAABgkBCHRocm93RXJyAQIgdG90YWwgY2xhaW1lZCBjYW5ub3QgYmUgbmVnYXRpdmUFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwkAuQkCCQDMCAICCCVkJWQlZCVkCQDMCAIJAKQDAQUNdmVzdGluZ0Ftb3VudAkAzAgCCQCkAwEFCnN0YXJ0QmxvY2sJAMwIAgkApAMBBQpsb2NrTGVuZ3RoCQDMCAIJAKQDAQUMdG90YWxDbGFpbWVkBQNuaWwFA1NFUAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEQcGFyc2VVc2VyVmVzdGluZwILdXNlckFkZHJlc3MCaWQEByRtYXRjaDAJAJ0IAgUEdGhpcwkBDmtleVVzZXJWZXN0aW5nAgULdXNlckFkZHJlc3MFAmlkAwkAAQIFByRtYXRjaDACBlN0cmluZwQJcmF3U3RyaW5nBQckbWF0Y2gwBAtzcGxpdFN0cmluZwkAtQkCBQlyYXdTdHJpbmcFA1NFUAQNdmVzdGluZ0Ftb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFC3NwbGl0U3RyaW5nAAEECnN0YXJ0QmxvY2sJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtzcGxpdFN0cmluZwACBApsb2NrTGVuZ3RoCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULc3BsaXRTdHJpbmcAAwQMdG90YWxDbGFpbWVkAwkAZgIABQkAkAMBBQtzcGxpdFN0cmluZwAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULc3BsaXRTdHJpbmcABAkAlgoEBQ12ZXN0aW5nQW1vdW50BQpzdGFydEJsb2NrBQpsb2NrTGVuZ3RoBQx0b3RhbENsYWltZWQJAJYKBAAAAAAAAAAAARFrZXlWZXN0aW5nSGlzdG9yeQMGYWN0aW9uC3VzZXJBZGRyZXNzBHR4SWQJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCAgdoaXN0b3J5CQDMCAIFC3VzZXJBZGRyZXNzCQDMCAIFBmFjdGlvbgkAzAgCBQR0eElkBQNuaWwFA1NFUAESY2FsY1VubG9ja2VkQW1vdW50AwZhbW91bnQKc3RhcnRCbG9jawpsb2NrTGVuZ3RoBA1lbGFwc2VkQmxvY2tzCQBlAgUGaGVpZ2h0BQpzdGFydEJsb2NrBA51bmxvY2tlZEFtb3VudAMDCQECIT0CBQpsb2NrTGVuZ3RoAAAJAGYCBQ1lbGFwc2VkQmxvY2tzAAAHCQCXAwEJAMwIAgkAawMFBmFtb3VudAUNZWxhcHNlZEJsb2NrcwUKbG9ja0xlbmd0aAkAzAgCBQZhbW91bnQFA25pbAAACQCUCgIFDnVubG9ja2VkQW1vdW50CQBlAgUGYW1vdW50BQ51bmxvY2tlZEFtb3VudAEVZ2V0VXNlclVubG9ja2VkQW1vdW50Agt1c2VyQWRkcmVzcwJpZAQLJHQwNDA1NjQxNDkJARBwYXJzZVVzZXJWZXN0aW5nAgULdXNlckFkZHJlc3MFAmlkBA12ZXN0aW5nQW1vdW50CAULJHQwNDA1NjQxNDkCXzEECnN0YXJ0QmxvY2sIBQskdDA0MDU2NDE0OQJfMgQKbG9ja0xlbmd0aAgFCyR0MDQwNTY0MTQ5Al8zBAx0b3RhbENsYWltZWQIBQskdDA0MDU2NDE0OQJfNAQLJHQwNDE1MjQyNDkJARJjYWxjVW5sb2NrZWRBbW91bnQDBQ12ZXN0aW5nQW1vdW50BQpzdGFydEJsb2NrBQpsb2NrTGVuZ3RoBA51bmxvY2tlZEFtb3VudAgFCyR0MDQxNTI0MjQ5Al8xBA9yZW1haW5pbmdBbW91bnQIBQskdDA0MTUyNDI0OQJfMgkAlAoCBQ51bmxvY2tlZEFtb3VudAUPcmVtYWluaW5nQW1vdW50ARdnZXRVcGRhdGVWZXN0aW5nQWN0aW9ucwILdXNlckFkZHJlc3MCaWQECyR0MDQzNTY0NDQ5CQEQcGFyc2VVc2VyVmVzdGluZwIFC3VzZXJBZGRyZXNzBQJpZAQNdmVzdGluZ0Ftb3VudAgFCyR0MDQzNTY0NDQ5Al8xBApzdGFydEJsb2NrCAULJHQwNDM1NjQ0NDkCXzIECmxvY2tMZW5ndGgIBQskdDA0MzU2NDQ0OQJfMwQMdG90YWxDbGFpbWVkCAULJHQwNDM1NjQ0NDkCXzQECyR0MDQ0NTI0NTMwCQEVZ2V0VXNlclVubG9ja2VkQW1vdW50AgULdXNlckFkZHJlc3MFAmlkBA51bmxvY2tlZEFtb3VudAgFCyR0MDQ0NTI0NTMwAl8xBA9yZW1haW5pbmdBbW91bnQIBQskdDA0NDUyNDUzMAJfMgQPcmVtYWluaW5nQmxvY2tzCQCWAwEJAMwIAgkAZQIJAGQCBQpzdGFydEJsb2NrBQpsb2NrTGVuZ3RoBQZoZWlnaHQJAMwIAgAABQNuaWwED25ld1RvdGFsQ2xhaW1lZAkAZAIFDHRvdGFsQ2xhaW1lZAUOdW5sb2NrZWRBbW91bnQEFHVwZGF0ZVZlc3RpbmdBY3Rpb25zAwkBAiE9AgUOdW5sb2NrZWRBbW91bnQAAAMJAQIhPQIFD3JlbWFpbmluZ0Jsb2NrcwAACQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlVc2VyVmVzdGluZwIFC3VzZXJBZGRyZXNzBQJpZAkBEWZvcm1hdFVzZXJWZXN0aW5nBAUPcmVtYWluaW5nQW1vdW50BQZoZWlnaHQFD3JlbWFpbmluZ0Jsb2NrcwUPbmV3VG90YWxDbGFpbWVkBQNuaWwJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBDmtleVVzZXJWZXN0aW5nAgULdXNlckFkZHJlc3MFAmlkBQNuaWwFA25pbAkAlAoCBRR1cGRhdGVWZXN0aW5nQWN0aW9ucwUOdW5sb2NrZWRBbW91bnQBE2dldFVzZXJDbGFpbUFjdGlvbnMCC3VzZXJBZGRyZXNzAmlkBAskdDA1MDY1NTE1MAkBF2dldFVwZGF0ZVZlc3RpbmdBY3Rpb25zAgULdXNlckFkZHJlc3MFAmlkBBR1cGRhdGVWZXN0aW5nQWN0aW9ucwgFCyR0MDUwNjU1MTUwAl8xBA51bmxvY2tlZEFtb3VudAgFCyR0MDUwNjU1MTUwAl8yBA90cmFuc2ZlckFjdGlvbnMDCQECIT0CBQ51bmxvY2tlZEFtb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFC3VzZXJBZGRyZXNzBQ51bmxvY2tlZEFtb3VudAUMYXNzZXRJZEJ5dGVzBQNuaWwFA25pbAkAlAoCCQDOCAIFFHVwZGF0ZVZlc3RpbmdBY3Rpb25zBQ90cmFuc2ZlckFjdGlvbnMFDnVubG9ja2VkQW1vdW50ARZnZXRBbGxVc2VyQ2xhaW1BY3Rpb25zAQt1c2VyQWRkcmVzcwoBDWFjdGlvbnNIZWxwZXICA2FjYwJpZAQLJHQwNTUyNDU1NjQFA2FjYwQXYWxsVmVzdGluZ3NDbGFpbUFjdGlvbnMIBQskdDA1NTI0NTU2NAJfMQQDc3VtCAULJHQwNTUyNDU1NjQCXzIECyR0MDU1Njk1NjQ2CQETZ2V0VXNlckNsYWltQWN0aW9ucwIFC3VzZXJBZGRyZXNzBQJpZAQTdmVzdGluZ0NsYWltQWN0aW9ucwgFCyR0MDU1Njk1NjQ2Al8xBAtjbGFpbUFtb3VudAgFCyR0MDU1Njk1NjQ2Al8yCQCUCgIJAM4IAgUXYWxsVmVzdGluZ3NDbGFpbUFjdGlvbnMFE3Zlc3RpbmdDbGFpbUFjdGlvbnMJAGQCBQNzdW0FC2NsYWltQW1vdW50CgACJGwFCElEU19MSVNUCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQENYWN0aW9uc0hlbHBlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMzAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4BJmdldE1vdmVBbGxVbmxvY2tlZFRvQWNjdW11bGF0b3JBY3Rpb25zAQt1c2VyQWRkcmVzcwoBDWFjdGlvbnNIZWxwZXICA2FjYwJpZAQLJHQwNTkzOTU5ODAFA2FjYwQYdXBkYXRlQWxsVmVzdGluZ3NBY3Rpb25zCAULJHQwNTkzOTU5ODACXzEEA3N1bQgFCyR0MDU5Mzk1OTgwAl8yBAskdDA1OTg1NjA3MAkBF2dldFVwZGF0ZVZlc3RpbmdBY3Rpb25zAgULdXNlckFkZHJlc3MFAmlkBBR1cGRhdGVWZXN0aW5nQWN0aW9ucwgFCyR0MDU5ODU2MDcwAl8xBA51bmxvY2tlZEFtb3VudAgFCyR0MDU5ODU2MDcwAl8yCQCUCgIJAM4IAgUYdXBkYXRlQWxsVmVzdGluZ3NBY3Rpb25zBRR1cGRhdGVWZXN0aW5nQWN0aW9ucwkAZAIFA3N1bQUOdW5sb2NrZWRBbW91bnQECyR0MDYxNTY2MjQ0CgACJGwFCElEU19MSVNUCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQENYWN0aW9uc0hlbHBlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMzAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4EGHVwZGF0ZUFsbFZlc3RpbmdzQWN0aW9ucwgFCyR0MDYxNTY2MjQ0Al8xBAt1bmxvY2tlZFN1bQgFCyR0MDYxNTY2MjQ0Al8yBA5vbGRBY2N1bXVsYXRlZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQESa2V5VXNlckFjY3VtdWxhdGVkAQULdXNlckFkZHJlc3MAAAQYdXBkYXRlQWNjdW11bGF0ZWRBY3Rpb25zAwkBAiE9AgULdW5sb2NrZWRTdW0AAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleVVzZXJBY2N1bXVsYXRlZAEFC3VzZXJBZGRyZXNzCQBkAgUOb2xkQWNjdW11bGF0ZWQFC3VubG9ja2VkU3VtBQNuaWwFA25pbAkAlAoCCQDOCAIFGHVwZGF0ZUFsbFZlc3RpbmdzQWN0aW9ucwUYdXBkYXRlQWNjdW11bGF0ZWRBY3Rpb25zBQt1bmxvY2tlZFN1bQEaZ2V0Q2xhaW1BY2N1bXVsYXRlZEFjdGlvbnMBC3VzZXJBZGRyZXNzBA5vbGRBY2N1bXVsYXRlZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQESa2V5VXNlckFjY3VtdWxhdGVkAQULdXNlckFkZHJlc3MAAAMJAQIhPQIFDm9sZEFjY3VtdWxhdGVkAAAJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQt1c2VyQWRkcmVzcwUOb2xkQWNjdW11bGF0ZWQFDGFzc2V0SWRCeXRlcwkAzAgCCQELRGVsZXRlRW50cnkBCQESa2V5VXNlckFjY3VtdWxhdGVkAQULdXNlckFkZHJlc3MFA25pbAUOb2xkQWNjdW11bGF0ZWQJAJQKAgUDbmlsAAABEmdldENsYWltQWxsQWN0aW9ucwELdXNlckFkZHJlc3MECyR0MDcwMTI3MTQ1AwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUHYmFuTGlzdAULdXNlckFkZHJlc3MJARZnZXRBbGxVc2VyQ2xhaW1BY3Rpb25zAQULdXNlckFkZHJlc3MJAJQKAgUDbmlsAAAEDGNsYWltQWN0aW9ucwgFCyR0MDcwMTI3MTQ1Al8xBA51bmxvY2tlZEFtb3VudAgFCyR0MDcwMTI3MTQ1Al8yBAskdDA3MTQ4NzIzOAkBGmdldENsYWltQWNjdW11bGF0ZWRBY3Rpb25zAQULdXNlckFkZHJlc3MEF2NsYWltQWNjdW11bGF0ZWRBY3Rpb25zCAULJHQwNzE0ODcyMzgCXzEEEWFjY3VtdWxhdGVkQW1vdW50CAULJHQwNzE0ODcyMzgCXzIEC3RvdGFsQW1vdW50CQBkAgUOdW5sb2NrZWRBbW91bnQFEWFjY3VtdWxhdGVkQW1vdW50CQCUCgIJAM4IAgUMY2xhaW1BY3Rpb25zBRdjbGFpbUFjY3VtdWxhdGVkQWN0aW9ucwULdG90YWxBbW91bnQBEmdldFZlc3RpbmdVc2VySW5mbwELdXNlckFkZHJlc3MKAQZoZWxwZXICA2FjYwJpZAQLJHQwNzQ1Mjc1NDUJARBwYXJzZVVzZXJWZXN0aW5nAgULdXNlckFkZHJlc3MFAmlkBA12ZXN0aW5nQW1vdW50CAULJHQwNzQ1Mjc1NDUCXzEECnN0YXJ0QmxvY2sIBQskdDA3NDUyNzU0NQJfMgQKbG9ja0xlbmd0aAgFCyR0MDc0NTI3NTQ1Al8zBAx0b3RhbENsYWltZWQIBQskdDA3NDUyNzU0NQJfNAQLJHQwNzU1MDc2MjgJARVnZXRVc2VyVW5sb2NrZWRBbW91bnQCBQt1c2VyQWRkcmVzcwUCaWQEDnVubG9ja2VkQW1vdW50CAULJHQwNzU1MDc2MjgCXzEED3JlbWFpbmluZ0Ftb3VudAgFCyR0MDc1NTA3NjI4Al8yAwMJAAACBQ12ZXN0aW5nQW1vdW50AAAGCQEPY29udGFpbnNFbGVtZW50AgUHYmFuTGlzdAULdXNlckFkZHJlc3MFA2FjYwkAzQgCBQNhY2MJAMwIAgUNdmVzdGluZ0Ftb3VudAkAzAgCCQBkAgUKc3RhcnRCbG9jawUKbG9ja0xlbmd0aAkAzAgCBQ51bmxvY2tlZEFtb3VudAkAzAgCBQ9yZW1haW5pbmdBbW91bnQJAMwIAgUMdG90YWxDbGFpbWVkBQNuaWwKAAIkbAUISURTX0xJU1QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmhlbHBlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMzAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4BFWdldEF2YWlsYWJsZVZlc3RpbmdJZAELdXNlckFkZHJlc3MKAQZoZWxwZXICC2F2YWlsYWJsZUlkAmlkBAskdDA3OTY2ODA1OQkBEHBhcnNlVXNlclZlc3RpbmcCBQt1c2VyQWRkcmVzcwUCaWQEDXZlc3RpbmdBbW91bnQIBQskdDA3OTY2ODA1OQJfMQQKc3RhcnRCbG9jawgFCyR0MDc5NjY4MDU5Al8yBApsb2NrTGVuZ3RoCAULJHQwNzk2NjgwNTkCXzMEDHRvdGFsQ2xhaW1lZAgFCyR0MDc5NjY4MDU5Al80AwkAZgIFDXZlc3RpbmdBbW91bnQAAAULYXZhaWxhYmxlSWQDCQAAAgULYXZhaWxhYmxlSWQA////////////AQUCaWQJAJcDAQkAzAgCBQthdmFpbGFibGVJZAkAzAgCBQJpZAUDbmlsBAthdmFpbGFibGVJZAoAAiRsBQhJRFNfTElTVAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAA////////////AQoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGaGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAzMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgMJAAACBQthdmFpbGFibGVJZAD///////////8BCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIodXNlciBleGNlZWRlZCBtYXggYWN0aXZlIHZlc3RpbmcgY291bnQ6IAkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsAgEgBQthdmFpbGFibGVJZAEUZ2V0TmV3VmVzdGluZ0FjdGlvbnMFC3VzZXJBZGRyZXNzAmlkDXZlc3RpbmdBbW91bnQKc3RhcnRCbG9jawpsb2NrTGVuZ3RoCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlVc2VyVmVzdGluZwIFC3VzZXJBZGRyZXNzBQJpZAkBEWZvcm1hdFVzZXJWZXN0aW5nBAUNdmVzdGluZ0Ftb3VudAUKc3RhcnRCbG9jawUKbG9ja0xlbmd0aAAABQNuaWwFAWkBDnZlc3RpbmdGb3JVc2VyBAt1c2VyQWRkcmVzcw12ZXN0aW5nQW1vdW50CnN0YXJ0QmxvY2sKbG9ja0xlbmd0aAQFY2hlY2sJAMwIAgMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEGCQEIdGhyb3dFcnIBAiBzaG91bGQgYmUgd2l0aCBleGFjdGx5IDEgcGF5bWVudAkAzAgCAwkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUMYXNzZXRJZEJ5dGVzBgkBCHRocm93RXJyAQkAuQkCCQDMCAICG3BheW1lbnQgYXNzZXRJZCBzaG91bGQgYmU6IAkAzAgCBQ1hc3NldElkU3RyaW5nBQNuaWwCASAJAMwIAgMJAAACCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUNdmVzdGluZ0Ftb3VudAYJAQh0aHJvd0VycgECL3BheW1lbnQgYW1vdW50IHNob3VsZCBiZSBlcXVhbCB0byB2ZXN0aW5nQW1vdW50CQDMCAIDAwkAAAIFCWFkbWluTGlzdAUDbmlsBgkBD2NvbnRhaW5zRWxlbWVudAIFCWFkbWluTGlzdAkApQgBCAUBaQZjYWxsZXIGCQEIdGhyb3dFcnIBAhF5b3UgbXVzdCBiZSBhZG1pbgUDbmlsAwkAAAIFBWNoZWNrBQVjaGVjawQCaWQJARVnZXRBdmFpbGFibGVWZXN0aW5nSWQBBQt1c2VyQWRkcmVzcwQOaGlzdG9yeUFjdGlvbnMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVZlc3RpbmdIaXN0b3J5AwIGdmVzdGVkBQt1c2VyQWRkcmVzcwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQC5CQIJAMwIAgkApAMBBQ12ZXN0aW5nQW1vdW50CQDMCAIJAKQDAQUKc3RhcnRCbG9jawkAzAgCCQCkAwEFCmxvY2tMZW5ndGgFA25pbAUDU0VQBQNuaWwJAM4IAgkBFGdldE5ld1Zlc3RpbmdBY3Rpb25zBQULdXNlckFkZHJlc3MFAmlkBQ12ZXN0aW5nQW1vdW50BQpzdGFydEJsb2NrBQpsb2NrTGVuZ3RoBQ5oaXN0b3J5QWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQNiYW4BC3VzZXJBZGRyZXNzBAZjaGVja3MJAMwIAgMDCQAAAgUJYWRtaW5MaXN0BQNuaWwGCQEPY29udGFpbnNFbGVtZW50AgUJYWRtaW5MaXN0CQClCAEIBQFpBmNhbGxlcgYJAQh0aHJvd0VycgECEXlvdSBtdXN0IGJlIGFkbWluCQDMCAIDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCBQdiYW5MaXN0BQt1c2VyQWRkcmVzcwYJAQh0aHJvd0VycgEJALkJAgkAzAgCAht1c2VyIGFscmVhZHkgaW4gYSBiYW4gbGlzdDoJAMwIAgULdXNlckFkZHJlc3MFA25pbAIBIAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBAwkdDA5OTI0MTAwMTIJASZnZXRNb3ZlQWxsVW5sb2NrZWRUb0FjY3VtdWxhdG9yQWN0aW9ucwEFC3VzZXJBZGRyZXNzBBhtb3ZlVG9BY2N1bXVsYXRlZEFjdGlvbnMIBQwkdDA5OTI0MTAwMTICXzEEAl9hCAUMJHQwOTkyNDEwMDEyAl8yBBNhZGRUb0Jhbkxpc3RBY3Rpb25zCQDMCAIJAQtTdHJpbmdFbnRyeQIFCmtleUJhbkxpc3QJALsJAgkAzQgCBQdiYW5MaXN0BQt1c2VyQWRkcmVzcwICX18FA25pbAkAzggCBRhtb3ZlVG9BY2N1bXVsYXRlZEFjdGlvbnMFE2FkZFRvQmFuTGlzdEFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEFdW5iYW4BC3VzZXJBZGRyZXNzBAZjaGVja3MJAMwIAgMDCQAAAgUJYWRtaW5MaXN0BQNuaWwGCQEPY29udGFpbnNFbGVtZW50AgUJYWRtaW5MaXN0CQClCAEIBQFpBmNhbGxlcgYJAQh0aHJvd0VycgECEXlvdSBtdXN0IGJlIGFkbWluCQDMCAIDCQEPY29udGFpbnNFbGVtZW50AgUHYmFuTGlzdAULdXNlckFkZHJlc3MGCQEIdGhyb3dFcnIBCQC5CQIJAMwIAgIXdXNlciBub3QgaW4gYSBiYW4gbGlzdDoJAMwIAgULdXNlckFkZHJlc3MFA25pbAIBIAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBApuZXdCYW5MaXN0BAckbWF0Y2gwCQDPCAIFB2Jhbkxpc3QFC3VzZXJBZGRyZXNzAwkAAQIFByRtYXRjaDACA0ludAQDaW5kBQckbWF0Y2gwCQDRCAIFB2Jhbkxpc3QFA2luZAkBCHRocm93RXJyAQIrdXNlciBhZGRyZXNzIGluZGV4IGluIGJhbiBsaXN0IGlzIG5vdCBmb3VuZAMJAAACBQpuZXdCYW5MaXN0BQNuaWwJAMwIAgkBC0RlbGV0ZUVudHJ5AQUKa2V5QmFuTGlzdAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIFCmtleUJhbkxpc3QJALsJAgUKbmV3QmFuTGlzdAICX18FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhjbGFpbUFsbAAEC3VzZXJBZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQNJHQwMTA5MDUxMDk3MAkBEmdldENsYWltQWxsQWN0aW9ucwEFC3VzZXJBZGRyZXNzBAxjbGFpbUFjdGlvbnMIBQ0kdDAxMDkwNTEwOTcwAl8xBAt0b3RhbEFtb3VudAgFDSR0MDEwOTA1MTA5NzACXzIEDmhpc3RvcnlBY3Rpb25zCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlWZXN0aW5nSGlzdG9yeQMCB2NsYWltZWQFC3VzZXJBZGRyZXNzCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAKQDAQULdG90YWxBbW91bnQFA25pbAMJAGYCBQt0b3RhbEFtb3VudAAACQDOCAIFDGNsYWltQWN0aW9ucwUOaGlzdG9yeUFjdGlvbnMJAQh0aHJvd0VycgECEG5vdGhpbmcgdG8gY2xhaW0BaQEQdXNlckluZm9SRUFET05MWQELdXNlckFkZHJlc3MEDSR0MDExNTcxMTE2MjYJARJnZXRDbGFpbUFsbEFjdGlvbnMBBQt1c2VyQWRkcmVzcwQCX2EIBQ0kdDAxMTU3MTExNjI2Al8xBAt0b3RhbEFtb3VudAgFDSR0MDExNTcxMTE2MjYCXzIEEWFjY3VtdWxhdGVkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARJrZXlVc2VyQWNjdW11bGF0ZWQBBQt1c2VyQWRkcmVzcwAACQCUCgIFA25pbAkAlQoDBQt0b3RhbEFtb3VudAURYWNjdW11bGF0ZWRBbW91bnQJARJnZXRWZXN0aW5nVXNlckluZm8BBQt1c2VyQWRkcmVzcwECdHgBBnZlcmlmeQAED3RhcmdldFB1YmxpY0tleQQHJG1hdGNoMAkBFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAnBrBQckbWF0Y2gwBQJwawMJAAECBQckbWF0Y2gwAgRVbml0CAUCdHgPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFD3RhcmdldFB1YmxpY0tleZQggMQ=",
    "chainId": 84,
    "height": 2955583,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6ufmP5RMMxW3rVNkZsrigp22Mnx2QtAE6Mzr6XPNJWkU
Next: 4m7Y4Bh8V7RPdeN2bnQfjioA2RMSkGeVtSyvEAEXRAso

Diff: 

OldNewDifferences
107107     }
108108 
109109 
110-func D (E,F,G) = {
110+func D (E,F,G,H) = {
111111     let B = [if ((E >= 0))
112112         then true
113113         else e("vesting amount cannot be negative"), if ((F >= 0))
114114         then true
115115         else e("start block cannot be negative"), if ((G >= 0))
116116         then true
117-        else e("lock length cannot be negative")]
117+        else e("lock length cannot be negative"), if ((H >= 0))
118+        then true
119+        else e("total claimed cannot be negative")]
118120     if ((B == B))
119-        then makeString(["%d%d%d", toString(E), toString(F), toString(G)], b)
121+        then makeString(["%d%d%d%d", toString(E), toString(F), toString(G), toString(H)], b)
120122         else throw("Strict value is not equal to itself.")
121123     }
122124 
123125 
124-func H (z,A) = {
126+func I (z,A) = {
125127     let j = getString(this, y(z, A))
126128     if ($isInstanceOf(j, "String"))
127129         then {
128-            let I = j
129-            let J = split(I, b)
130-            let E = parseIntValue(J[1])
131-            let F = parseIntValue(J[2])
132-            let G = parseIntValue(J[3])
133-            $Tuple3(E, F, G)
130+            let J = j
131+            let K = split(J, b)
132+            let E = parseIntValue(K[1])
133+            let F = parseIntValue(K[2])
134+            let G = parseIntValue(K[3])
135+            let H = if ((5 > size(K)))
136+                then 0
137+                else parseIntValue(K[4])
138+            $Tuple4(E, F, G, H)
134139             }
135-        else $Tuple3(0, 0, 0)
140+        else $Tuple4(0, 0, 0, 0)
136141     }
137142 
138143 
139-func K (L,z,M) = makeString(["%s%s%s%s", "history", z, L, M], b)
144+func L (M,z,N) = makeString(["%s%s%s%s", "history", z, M, N], b)
140145 
141146 
142-func N (O,F,G) = {
143-    let P = (height - F)
144-    let Q = if (if ((G != 0))
145-        then (P > 0)
147+func O (P,F,G) = {
148+    let Q = (height - F)
149+    let R = if (if ((G != 0))
150+        then (Q > 0)
146151         else false)
147-        then min([fraction(O, P, G), O])
152+        then min([fraction(P, Q, G), P])
148153         else 0
149-    $Tuple2(Q, (O - Q))
154+    $Tuple2(R, (P - R))
150155     }
151156 
152157 
153-func R (z,A) = {
154-    let S = H(z, A)
155-    let E = S._1
156-    let F = S._2
157-    let G = S._3
158-    let T = N(E, F, G)
159-    let Q = T._1
160-    let U = T._2
161-    $Tuple2(Q, U)
158+func S (z,A) = {
159+    let T = I(z, A)
160+    let E = T._1
161+    let F = T._2
162+    let G = T._3
163+    let H = T._4
164+    let U = O(E, F, G)
165+    let R = U._1
166+    let V = U._2
167+    $Tuple2(R, V)
162168     }
163169 
164170 
165-func V (z,A) = {
166-    let W = H(z, A)
167-    let E = W._1
168-    let F = W._2
169-    let G = W._3
170-    let X = R(z, A)
171-    let Q = X._1
172-    let U = X._2
173-    let Y = max([((F + G) - height), 0])
174-    let Z = if ((Q != 0))
175-        then if ((Y != 0))
176-            then [StringEntry(y(z, A), D(U, height, Y))]
171+func W (z,A) = {
172+    let X = I(z, A)
173+    let E = X._1
174+    let F = X._2
175+    let G = X._3
176+    let H = X._4
177+    let Y = S(z, A)
178+    let R = Y._1
179+    let V = Y._2
180+    let Z = max([((F + G) - height), 0])
181+    let aa = (H + R)
182+    let ab = if ((R != 0))
183+        then if ((Z != 0))
184+            then [StringEntry(y(z, A), D(V, height, Z, aa))]
177185             else [DeleteEntry(y(z, A))]
178186         else nil
179-    $Tuple2(Z, Q)
187+    $Tuple2(ab, R)
180188     }
181189 
182190 
183-func aa (z,A) = {
184-    let ab = V(z, A)
185-    let Z = ab._1
186-    let Q = ab._2
187-    let ac = if ((Q != 0))
188-        then [ScriptTransfer(addressFromStringValue(z), Q, p)]
191+func ac (z,A) = {
192+    let ad = W(z, A)
193+    let ab = ad._1
194+    let R = ad._2
195+    let ae = if ((R != 0))
196+        then [ScriptTransfer(addressFromStringValue(z), R, p)]
189197         else nil
190-    $Tuple2((Z ++ ac), Q)
198+    $Tuple2((ab ++ ae), R)
191199     }
192200 
193201 
194-func ad (z) = {
195-    func ae (af,A) =     {
196-        let ag = af
197-        let ah = ag._1
198-        let ai = ag._2
199-        let aj = aa(z, A)
200-        let ak = aj._1
201-        let al = aj._2
202-        $Tuple2((ah ++ ak), (ai + al))
202+func af (z) = {
203+    func ag (ah,A) =     {
204+        let ai = ah
205+        let aj = ai._1
206+        let ak = ai._2
207+        let al = ac(z, A)
208+        let am = al._1
209+        let an = al._2
210+        $Tuple2((aj ++ am), (ak + an))
203211         }
204212 
205-    let am = c
206-    let an = size(am)
207-    let ao = $Tuple2(nil, 0)
208-    func ap (aq,ar) =     if ((ar >= an))
209-        then aq
210-        else ae(aq, am[ar])
213+    let ao = c
214+    let ap = size(ao)
215+    let aq = $Tuple2(nil, 0)
216+    func ar (as,at) =     if ((at >= ap))
217+        then as
218+        else ag(as, ao[at])
211219 
212-    func as (aq,ar) =     if ((ar >= an))
213-        then aq
220+    func au (as,at) =     if ((at >= ap))
221+        then as
214222         else throw("List size exceeds 30")
215223 
216-    as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
224+    au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
217225     }
218226 
219227 
220-func at (z) = {
221-    func ae (af,A) =     {
222-        let au = af
223-        let av = au._1
224-        let ai = au._2
225-        let aw = V(z, A)
226-        let Z = aw._1
227-        let Q = aw._2
228-        $Tuple2((av ++ Z), (ai + Q))
228+func av (z) = {
229+    func ag (ah,A) =     {
230+        let aw = ah
231+        let ax = aw._1
232+        let ak = aw._2
233+        let ay = W(z, A)
234+        let ab = ay._1
235+        let R = ay._2
236+        $Tuple2((ax ++ ab), (ak + R))
229237         }
230238 
231-    let ax = {
232-        let am = c
233-        let an = size(am)
234-        let ao = $Tuple2(nil, 0)
235-        func ap (aq,ar) =         if ((ar >= an))
236-            then aq
237-            else ae(aq, am[ar])
239+    let az = {
240+        let ao = c
241+        let ap = size(ao)
242+        let aq = $Tuple2(nil, 0)
243+        func ar (as,at) =         if ((at >= ap))
244+            then as
245+            else ag(as, ao[at])
238246 
239-        func as (aq,ar) =         if ((ar >= an))
240-            then aq
247+        func au (as,at) =         if ((at >= ap))
248+            then as
241249             else throw("List size exceeds 30")
242250 
243-        as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
251+        au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
244252         }
245-    let av = ax._1
246-    let ay = ax._2
247-    let az = valueOrElse(getInteger(this, C(z)), 0)
248-    let aA = if ((ay != 0))
249-        then [IntegerEntry(C(z), (az + ay))]
253+    let ax = az._1
254+    let aA = az._2
255+    let aB = valueOrElse(getInteger(this, C(z)), 0)
256+    let aC = if ((aA != 0))
257+        then [IntegerEntry(C(z), (aB + aA))]
250258         else nil
251-    $Tuple2((av ++ aA), ay)
259+    $Tuple2((ax ++ aC), aA)
252260     }
253261 
254262 
255-func aB (z) = {
256-    let az = valueOrElse(getInteger(this, C(z)), 0)
257-    if ((az != 0))
258-        then $Tuple2([ScriptTransfer(addressFromStringValue(z), az, p), DeleteEntry(C(z))], az)
263+func aD (z) = {
264+    let aB = valueOrElse(getInteger(this, C(z)), 0)
265+    if ((aB != 0))
266+        then $Tuple2([ScriptTransfer(addressFromStringValue(z), aB, p), DeleteEntry(C(z))], aB)
259267         else $Tuple2(nil, 0)
260268     }
261269 
262270 
263-func aC (z) = {
264-    let aD = if (!(containsElement(t, z)))
265-        then ad(z)
271+func aE (z) = {
272+    let aF = if (!(containsElement(t, z)))
273+        then af(z)
266274         else $Tuple2(nil, 0)
267-    let aE = aD._1
268-    let Q = aD._2
269-    let aF = aB(z)
270275     let aG = aF._1
271-    let aH = aF._2
272-    let aI = (Q + aH)
273-    $Tuple2((aE ++ aG), aI)
276+    let R = aF._2
277+    let aH = aD(z)
278+    let aI = aH._1
279+    let aJ = aH._2
280+    let aK = (R + aJ)
281+    $Tuple2((aG ++ aI), aK)
274282     }
275283 
276284 
277-func aJ (z) = {
278-    func aK (af,A) =     {
279-        let aL = H(z, A)
280-        let E = aL._1
281-        let F = aL._2
282-        let G = aL._3
283-        let aM = R(z, A)
284-        let Q = aM._1
285-        let U = aM._2
285+func aL (z) = {
286+    func aM (ah,A) =     {
287+        let aN = I(z, A)
288+        let E = aN._1
289+        let F = aN._2
290+        let G = aN._3
291+        let H = aN._4
292+        let aO = S(z, A)
293+        let R = aO._1
294+        let V = aO._2
286295         if (if ((E == 0))
287296             then true
288297             else containsElement(t, z))
289-            then af
290-            else (af :+ [E, (F + G), Q, U])
298+            then ah
299+            else (ah :+ [E, (F + G), R, V, H])
291300         }
292301 
293-    let am = c
294-    let an = size(am)
295-    let ao = nil
296-    func ap (aq,ar) =     if ((ar >= an))
297-        then aq
298-        else aK(aq, am[ar])
302+    let ao = c
303+    let ap = size(ao)
304+    let aq = nil
305+    func ar (as,at) =     if ((at >= ap))
306+        then as
307+        else aM(as, ao[at])
299308 
300-    func as (aq,ar) =     if ((ar >= an))
301-        then aq
309+    func au (as,at) =     if ((at >= ap))
310+        then as
302311         else throw("List size exceeds 30")
303312 
304-    as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
313+    au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
305314     }
306315 
307316 
308-func aN (z) = {
309-    func aK (aO,A) =     {
310-        let aP = H(z, A)
311-        let E = aP._1
312-        let F = aP._2
313-        let G = aP._3
317+func aP (z) = {
318+    func aM (aQ,A) =     {
319+        let aR = I(z, A)
320+        let E = aR._1
321+        let F = aR._2
322+        let G = aR._3
323+        let H = aR._4
314324         if ((E > 0))
315-            then aO
316-            else if ((aO == -1))
325+            then aQ
326+            else if ((aQ == -1))
317327                 then A
318-                else min([aO, A])
328+                else min([aQ, A])
319329         }
320330 
321-    let aO = {
322-        let am = c
323-        let an = size(am)
324-        let ao = -1
325-        func ap (aq,ar) =         if ((ar >= an))
326-            then aq
327-            else aK(aq, am[ar])
331+    let aQ = {
332+        let ao = c
333+        let ap = size(ao)
334+        let aq = -1
335+        func ar (as,at) =         if ((at >= ap))
336+            then as
337+            else aM(as, ao[at])
328338 
329-        func as (aq,ar) =         if ((ar >= an))
330-            then aq
339+        func au (as,at) =         if ((at >= ap))
340+            then as
331341             else throw("List size exceeds 30")
332342 
333-        as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
343+        au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
334344         }
335-    if ((aO == -1))
345+    if ((aQ == -1))
336346         then e(makeString(["user exceeded max active vesting count: ", z], " "))
337-        else aO
347+        else aQ
338348     }
339349 
340350 
341-func aQ (z,A,E,F,G) = [StringEntry(y(z, A), D(E, F, G))]
351+func aS (z,A,E,F,G) = [StringEntry(y(z, A), D(E, F, G, 0))]
342352 
343353 
344-@Callable(aR)
354+@Callable(aT)
345355 func vestingForUser (z,E,F,G) = {
346-    let aS = [if ((size(aR.payments) == 1))
356+    let aU = [if ((size(aT.payments) == 1))
347357         then true
348-        else e("should be with exactly 1 payment"), if ((aR.payments[0].assetId == p))
358+        else e("should be with exactly 1 payment"), if ((aT.payments[0].assetId == p))
349359         then true
350-        else e(makeString(["payment assetId should be: ", o], " ")), if ((aR.payments[0].amount == E))
360+        else e(makeString(["payment assetId should be: ", o], " ")), if ((aT.payments[0].amount == E))
351361         then true
352362         else e("payment amount should be equal to vestingAmount"), if (if ((s == nil))
353363         then true
354-        else containsElement(s, toString(aR.caller)))
364+        else containsElement(s, toString(aT.caller)))
355365         then true
356366         else e("you must be admin")]
357-    if ((aS == aS))
367+    if ((aU == aU))
358368         then {
359-            let A = aN(z)
360-            let aT = [StringEntry(K("vested", z, toBase58String(aR.transactionId)), makeString([toString(E), toString(F), toString(G)], b))]
361-            (aQ(z, A, E, F, G) ++ aT)
369+            let A = aP(z)
370+            let aV = [StringEntry(L("vested", z, toBase58String(aT.transactionId)), makeString([toString(E), toString(F), toString(G)], b))]
371+            (aS(z, A, E, F, G) ++ aV)
362372             }
363373         else throw("Strict value is not equal to itself.")
364374     }
365375 
366376 
367377 
368-@Callable(aR)
378+@Callable(aT)
369379 func ban (z) = {
370380     let B = [if (if ((s == nil))
371381         then true
372-        else containsElement(s, toString(aR.caller)))
382+        else containsElement(s, toString(aT.caller)))
373383         then true
374384         else e("you must be admin"), if (!(containsElement(t, z)))
375385         then true
376386         else e(makeString(["user already in a ban list:", z], " "))]
377387     if ((B == B))
378388         then {
379-            let aU = at(z)
380-            let aV = aU._1
381-            let aW = aU._2
382-            let aX = [StringEntry(r, makeString_11C((t :+ z), "__"))]
383-            (aV ++ aX)
389+            let aW = av(z)
390+            let aX = aW._1
391+            let aY = aW._2
392+            let aZ = [StringEntry(r, makeString_11C((t :+ z), "__"))]
393+            (aX ++ aZ)
384394             }
385395         else throw("Strict value is not equal to itself.")
386396     }
387397 
388398 
389399 
390-@Callable(aR)
400+@Callable(aT)
391401 func unban (z) = {
392402     let B = [if (if ((s == nil))
393403         then true
394-        else containsElement(s, toString(aR.caller)))
404+        else containsElement(s, toString(aT.caller)))
395405         then true
396406         else e("you must be admin"), if (containsElement(t, z))
397407         then true
398408         else e(makeString(["user not in a ban list:", z], " "))]
399409     if ((B == B))
400410         then {
401-            let aY = {
411+            let ba = {
402412                 let j = indexOf(t, z)
403413                 if ($isInstanceOf(j, "Int"))
404414                     then {
405-                        let aZ = j
406-                        removeByIndex(t, aZ)
415+                        let bb = j
416+                        removeByIndex(t, bb)
407417                         }
408418                     else e("user address index in ban list is not found")
409419                 }
410-            if ((aY == nil))
420+            if ((ba == nil))
411421                 then [DeleteEntry(r)]
412-                else [StringEntry(r, makeString_11C(aY, "__"))]
422+                else [StringEntry(r, makeString_11C(ba, "__"))]
413423             }
414424         else throw("Strict value is not equal to itself.")
415425     }
416426 
417427 
418428 
419-@Callable(aR)
429+@Callable(aT)
420430 func claimAll () = {
421-    let z = toString(aR.caller)
422-    let ba = aC(z)
423-    let aE = ba._1
424-    let aI = ba._2
425-    let aT = [StringEntry(K("claimed", z, toBase58String(aR.transactionId)), toString(aI))]
426-    if ((aI > 0))
427-        then (aE ++ aT)
431+    let z = toString(aT.caller)
432+    let bc = aE(z)
433+    let aG = bc._1
434+    let aK = bc._2
435+    let aV = [StringEntry(L("claimed", z, toBase58String(aT.transactionId)), toString(aK))]
436+    if ((aK > 0))
437+        then (aG ++ aV)
428438         else e("nothing to claim")
429439     }
430440 
431441 
432442 
433-@Callable(aR)
443+@Callable(aT)
434444 func userInfoREADONLY (z) = {
435-    let bb = aC(z)
436-    let aW = bb._1
437-    let aI = bb._2
438-    let aH = valueOrElse(getInteger(this, C(z)), 0)
439-    $Tuple2(nil, $Tuple3(aI, aH, aJ(z)))
445+    let bd = aE(z)
446+    let aY = bd._1
447+    let aK = bd._2
448+    let aJ = valueOrElse(getInteger(this, C(z)), 0)
449+    $Tuple2(nil, $Tuple3(aK, aJ, aL(z)))
440450     }
441451 
442452 
443-
444-@Callable(aR)
445-func foo () = {
446-    let bc = throw("err")
447-    if ((bc == bc))
448-        then nil
449-        else throw("Strict value is not equal to itself.")
450-    }
451-
452-
453-@Verifier(bd)
454-func be () = {
455-    let bf = {
453+@Verifier(be)
454+func bf () = {
455+    let bg = {
456456         let j = l()
457457         if ($isInstanceOf(j, "ByteVector"))
458458             then {
459-                let bg = j
460-                bg
459+                let bh = j
460+                bh
461461                 }
462462             else if ($isInstanceOf(j, "Unit"))
463-                then bd.senderPublicKey
463+                then be.senderPublicKey
464464                 else throw("Match error")
465465         }
466-    sigVerify(bd.bodyBytes, bd.proofs[0], bf)
466+    sigVerify(be.bodyBytes, be.proofs[0], bg)
467467     }
468468 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = "vesting_neo.ride"
55 
66 let b = "__"
77 
88 let c = [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]
99 
1010 let d = size(c)
1111 
1212 func e (f) = throw(((a + ": ") + f))
1313 
1414 
1515 func g () = "%s__managerPublicKey"
1616 
1717 
1818 func h () = "%s__managerVaultAddress"
1919 
2020 
2121 func i () = {
2222     let j = getString(h())
2323     if ($isInstanceOf(j, "String"))
2424         then {
2525             let k = j
2626             addressFromStringValue(k)
2727             }
2828         else this
2929     }
3030 
3131 
3232 func l () = {
3333     let m = i()
3434     let j = getString(m, g())
3535     if ($isInstanceOf(j, "String"))
3636         then {
3737             let k = j
3838             fromBase58String(k)
3939             }
4040         else if ($isInstanceOf(j, "Unit"))
4141             then unit
4242             else throw("Match error")
4343     }
4444 
4545 
4646 let n = makeString(["%s", "assetId"], b)
4747 
4848 let o = valueOrElse(getString(this, n), "WAVES")
4949 
5050 let p = if ((o == "WAVES"))
5151     then unit
5252     else fromBase58String(o)
5353 
5454 let q = makeString(["%s", "adminAddressList"], b)
5555 
5656 let r = makeString(["%s", "banList"], b)
5757 
5858 let s = {
5959     let j = getString(this, q)
6060     if ($isInstanceOf(j, "String"))
6161         then {
6262             let k = j
6363             split(k, b)
6464             }
6565         else nil
6666     }
6767 
6868 let t = {
6969     let u = valueOrElse(getString(this, r), "")
7070     if ((u == ""))
7171         then nil
7272         else split_51C(u, b)
7373     }
7474 
7575 func v (w) = {
7676     let j = addressFromString(w)
7777     if ($isInstanceOf(j, "Address"))
7878         then {
7979             let x = j
8080             true
8181             }
8282         else false
8383     }
8484 
8585 
8686 func y (z,A) = {
8787     let B = [if (v(z))
8888         then true
8989         else e(makeString(["address is not valid:", z], " ")), if (if ((A >= 0))
9090         then (d > A)
9191         else false)
9292         then true
9393         else e(makeString(["id should be less than", toString(d), "got:", toString(A)], " "))]
9494     if ((B == B))
9595         then makeString(["%s%s%d", "vesting", z, toString(A)], b)
9696         else throw("Strict value is not equal to itself.")
9797     }
9898 
9999 
100100 func C (z) = {
101101     let B = [if (v(z))
102102         then true
103103         else e(makeString(["address is not valid:", z], " "))]
104104     if ((B == B))
105105         then makeString(["%s%s", "accumulated", z], b)
106106         else throw("Strict value is not equal to itself.")
107107     }
108108 
109109 
110-func D (E,F,G) = {
110+func D (E,F,G,H) = {
111111     let B = [if ((E >= 0))
112112         then true
113113         else e("vesting amount cannot be negative"), if ((F >= 0))
114114         then true
115115         else e("start block cannot be negative"), if ((G >= 0))
116116         then true
117-        else e("lock length cannot be negative")]
117+        else e("lock length cannot be negative"), if ((H >= 0))
118+        then true
119+        else e("total claimed cannot be negative")]
118120     if ((B == B))
119-        then makeString(["%d%d%d", toString(E), toString(F), toString(G)], b)
121+        then makeString(["%d%d%d%d", toString(E), toString(F), toString(G), toString(H)], b)
120122         else throw("Strict value is not equal to itself.")
121123     }
122124 
123125 
124-func H (z,A) = {
126+func I (z,A) = {
125127     let j = getString(this, y(z, A))
126128     if ($isInstanceOf(j, "String"))
127129         then {
128-            let I = j
129-            let J = split(I, b)
130-            let E = parseIntValue(J[1])
131-            let F = parseIntValue(J[2])
132-            let G = parseIntValue(J[3])
133-            $Tuple3(E, F, G)
130+            let J = j
131+            let K = split(J, b)
132+            let E = parseIntValue(K[1])
133+            let F = parseIntValue(K[2])
134+            let G = parseIntValue(K[3])
135+            let H = if ((5 > size(K)))
136+                then 0
137+                else parseIntValue(K[4])
138+            $Tuple4(E, F, G, H)
134139             }
135-        else $Tuple3(0, 0, 0)
140+        else $Tuple4(0, 0, 0, 0)
136141     }
137142 
138143 
139-func K (L,z,M) = makeString(["%s%s%s%s", "history", z, L, M], b)
144+func L (M,z,N) = makeString(["%s%s%s%s", "history", z, M, N], b)
140145 
141146 
142-func N (O,F,G) = {
143-    let P = (height - F)
144-    let Q = if (if ((G != 0))
145-        then (P > 0)
147+func O (P,F,G) = {
148+    let Q = (height - F)
149+    let R = if (if ((G != 0))
150+        then (Q > 0)
146151         else false)
147-        then min([fraction(O, P, G), O])
152+        then min([fraction(P, Q, G), P])
148153         else 0
149-    $Tuple2(Q, (O - Q))
154+    $Tuple2(R, (P - R))
150155     }
151156 
152157 
153-func R (z,A) = {
154-    let S = H(z, A)
155-    let E = S._1
156-    let F = S._2
157-    let G = S._3
158-    let T = N(E, F, G)
159-    let Q = T._1
160-    let U = T._2
161-    $Tuple2(Q, U)
158+func S (z,A) = {
159+    let T = I(z, A)
160+    let E = T._1
161+    let F = T._2
162+    let G = T._3
163+    let H = T._4
164+    let U = O(E, F, G)
165+    let R = U._1
166+    let V = U._2
167+    $Tuple2(R, V)
162168     }
163169 
164170 
165-func V (z,A) = {
166-    let W = H(z, A)
167-    let E = W._1
168-    let F = W._2
169-    let G = W._3
170-    let X = R(z, A)
171-    let Q = X._1
172-    let U = X._2
173-    let Y = max([((F + G) - height), 0])
174-    let Z = if ((Q != 0))
175-        then if ((Y != 0))
176-            then [StringEntry(y(z, A), D(U, height, Y))]
171+func W (z,A) = {
172+    let X = I(z, A)
173+    let E = X._1
174+    let F = X._2
175+    let G = X._3
176+    let H = X._4
177+    let Y = S(z, A)
178+    let R = Y._1
179+    let V = Y._2
180+    let Z = max([((F + G) - height), 0])
181+    let aa = (H + R)
182+    let ab = if ((R != 0))
183+        then if ((Z != 0))
184+            then [StringEntry(y(z, A), D(V, height, Z, aa))]
177185             else [DeleteEntry(y(z, A))]
178186         else nil
179-    $Tuple2(Z, Q)
187+    $Tuple2(ab, R)
180188     }
181189 
182190 
183-func aa (z,A) = {
184-    let ab = V(z, A)
185-    let Z = ab._1
186-    let Q = ab._2
187-    let ac = if ((Q != 0))
188-        then [ScriptTransfer(addressFromStringValue(z), Q, p)]
191+func ac (z,A) = {
192+    let ad = W(z, A)
193+    let ab = ad._1
194+    let R = ad._2
195+    let ae = if ((R != 0))
196+        then [ScriptTransfer(addressFromStringValue(z), R, p)]
189197         else nil
190-    $Tuple2((Z ++ ac), Q)
198+    $Tuple2((ab ++ ae), R)
191199     }
192200 
193201 
194-func ad (z) = {
195-    func ae (af,A) =     {
196-        let ag = af
197-        let ah = ag._1
198-        let ai = ag._2
199-        let aj = aa(z, A)
200-        let ak = aj._1
201-        let al = aj._2
202-        $Tuple2((ah ++ ak), (ai + al))
202+func af (z) = {
203+    func ag (ah,A) =     {
204+        let ai = ah
205+        let aj = ai._1
206+        let ak = ai._2
207+        let al = ac(z, A)
208+        let am = al._1
209+        let an = al._2
210+        $Tuple2((aj ++ am), (ak + an))
203211         }
204212 
205-    let am = c
206-    let an = size(am)
207-    let ao = $Tuple2(nil, 0)
208-    func ap (aq,ar) =     if ((ar >= an))
209-        then aq
210-        else ae(aq, am[ar])
213+    let ao = c
214+    let ap = size(ao)
215+    let aq = $Tuple2(nil, 0)
216+    func ar (as,at) =     if ((at >= ap))
217+        then as
218+        else ag(as, ao[at])
211219 
212-    func as (aq,ar) =     if ((ar >= an))
213-        then aq
220+    func au (as,at) =     if ((at >= ap))
221+        then as
214222         else throw("List size exceeds 30")
215223 
216-    as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
224+    au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
217225     }
218226 
219227 
220-func at (z) = {
221-    func ae (af,A) =     {
222-        let au = af
223-        let av = au._1
224-        let ai = au._2
225-        let aw = V(z, A)
226-        let Z = aw._1
227-        let Q = aw._2
228-        $Tuple2((av ++ Z), (ai + Q))
228+func av (z) = {
229+    func ag (ah,A) =     {
230+        let aw = ah
231+        let ax = aw._1
232+        let ak = aw._2
233+        let ay = W(z, A)
234+        let ab = ay._1
235+        let R = ay._2
236+        $Tuple2((ax ++ ab), (ak + R))
229237         }
230238 
231-    let ax = {
232-        let am = c
233-        let an = size(am)
234-        let ao = $Tuple2(nil, 0)
235-        func ap (aq,ar) =         if ((ar >= an))
236-            then aq
237-            else ae(aq, am[ar])
239+    let az = {
240+        let ao = c
241+        let ap = size(ao)
242+        let aq = $Tuple2(nil, 0)
243+        func ar (as,at) =         if ((at >= ap))
244+            then as
245+            else ag(as, ao[at])
238246 
239-        func as (aq,ar) =         if ((ar >= an))
240-            then aq
247+        func au (as,at) =         if ((at >= ap))
248+            then as
241249             else throw("List size exceeds 30")
242250 
243-        as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
251+        au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
244252         }
245-    let av = ax._1
246-    let ay = ax._2
247-    let az = valueOrElse(getInteger(this, C(z)), 0)
248-    let aA = if ((ay != 0))
249-        then [IntegerEntry(C(z), (az + ay))]
253+    let ax = az._1
254+    let aA = az._2
255+    let aB = valueOrElse(getInteger(this, C(z)), 0)
256+    let aC = if ((aA != 0))
257+        then [IntegerEntry(C(z), (aB + aA))]
250258         else nil
251-    $Tuple2((av ++ aA), ay)
259+    $Tuple2((ax ++ aC), aA)
252260     }
253261 
254262 
255-func aB (z) = {
256-    let az = valueOrElse(getInteger(this, C(z)), 0)
257-    if ((az != 0))
258-        then $Tuple2([ScriptTransfer(addressFromStringValue(z), az, p), DeleteEntry(C(z))], az)
263+func aD (z) = {
264+    let aB = valueOrElse(getInteger(this, C(z)), 0)
265+    if ((aB != 0))
266+        then $Tuple2([ScriptTransfer(addressFromStringValue(z), aB, p), DeleteEntry(C(z))], aB)
259267         else $Tuple2(nil, 0)
260268     }
261269 
262270 
263-func aC (z) = {
264-    let aD = if (!(containsElement(t, z)))
265-        then ad(z)
271+func aE (z) = {
272+    let aF = if (!(containsElement(t, z)))
273+        then af(z)
266274         else $Tuple2(nil, 0)
267-    let aE = aD._1
268-    let Q = aD._2
269-    let aF = aB(z)
270275     let aG = aF._1
271-    let aH = aF._2
272-    let aI = (Q + aH)
273-    $Tuple2((aE ++ aG), aI)
276+    let R = aF._2
277+    let aH = aD(z)
278+    let aI = aH._1
279+    let aJ = aH._2
280+    let aK = (R + aJ)
281+    $Tuple2((aG ++ aI), aK)
274282     }
275283 
276284 
277-func aJ (z) = {
278-    func aK (af,A) =     {
279-        let aL = H(z, A)
280-        let E = aL._1
281-        let F = aL._2
282-        let G = aL._3
283-        let aM = R(z, A)
284-        let Q = aM._1
285-        let U = aM._2
285+func aL (z) = {
286+    func aM (ah,A) =     {
287+        let aN = I(z, A)
288+        let E = aN._1
289+        let F = aN._2
290+        let G = aN._3
291+        let H = aN._4
292+        let aO = S(z, A)
293+        let R = aO._1
294+        let V = aO._2
286295         if (if ((E == 0))
287296             then true
288297             else containsElement(t, z))
289-            then af
290-            else (af :+ [E, (F + G), Q, U])
298+            then ah
299+            else (ah :+ [E, (F + G), R, V, H])
291300         }
292301 
293-    let am = c
294-    let an = size(am)
295-    let ao = nil
296-    func ap (aq,ar) =     if ((ar >= an))
297-        then aq
298-        else aK(aq, am[ar])
302+    let ao = c
303+    let ap = size(ao)
304+    let aq = nil
305+    func ar (as,at) =     if ((at >= ap))
306+        then as
307+        else aM(as, ao[at])
299308 
300-    func as (aq,ar) =     if ((ar >= an))
301-        then aq
309+    func au (as,at) =     if ((at >= ap))
310+        then as
302311         else throw("List size exceeds 30")
303312 
304-    as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
313+    au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
305314     }
306315 
307316 
308-func aN (z) = {
309-    func aK (aO,A) =     {
310-        let aP = H(z, A)
311-        let E = aP._1
312-        let F = aP._2
313-        let G = aP._3
317+func aP (z) = {
318+    func aM (aQ,A) =     {
319+        let aR = I(z, A)
320+        let E = aR._1
321+        let F = aR._2
322+        let G = aR._3
323+        let H = aR._4
314324         if ((E > 0))
315-            then aO
316-            else if ((aO == -1))
325+            then aQ
326+            else if ((aQ == -1))
317327                 then A
318-                else min([aO, A])
328+                else min([aQ, A])
319329         }
320330 
321-    let aO = {
322-        let am = c
323-        let an = size(am)
324-        let ao = -1
325-        func ap (aq,ar) =         if ((ar >= an))
326-            then aq
327-            else aK(aq, am[ar])
331+    let aQ = {
332+        let ao = c
333+        let ap = size(ao)
334+        let aq = -1
335+        func ar (as,at) =         if ((at >= ap))
336+            then as
337+            else aM(as, ao[at])
328338 
329-        func as (aq,ar) =         if ((ar >= an))
330-            then aq
339+        func au (as,at) =         if ((at >= ap))
340+            then as
331341             else throw("List size exceeds 30")
332342 
333-        as(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ap(ao, 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)
343+        au(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(ar(aq, 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)
334344         }
335-    if ((aO == -1))
345+    if ((aQ == -1))
336346         then e(makeString(["user exceeded max active vesting count: ", z], " "))
337-        else aO
347+        else aQ
338348     }
339349 
340350 
341-func aQ (z,A,E,F,G) = [StringEntry(y(z, A), D(E, F, G))]
351+func aS (z,A,E,F,G) = [StringEntry(y(z, A), D(E, F, G, 0))]
342352 
343353 
344-@Callable(aR)
354+@Callable(aT)
345355 func vestingForUser (z,E,F,G) = {
346-    let aS = [if ((size(aR.payments) == 1))
356+    let aU = [if ((size(aT.payments) == 1))
347357         then true
348-        else e("should be with exactly 1 payment"), if ((aR.payments[0].assetId == p))
358+        else e("should be with exactly 1 payment"), if ((aT.payments[0].assetId == p))
349359         then true
350-        else e(makeString(["payment assetId should be: ", o], " ")), if ((aR.payments[0].amount == E))
360+        else e(makeString(["payment assetId should be: ", o], " ")), if ((aT.payments[0].amount == E))
351361         then true
352362         else e("payment amount should be equal to vestingAmount"), if (if ((s == nil))
353363         then true
354-        else containsElement(s, toString(aR.caller)))
364+        else containsElement(s, toString(aT.caller)))
355365         then true
356366         else e("you must be admin")]
357-    if ((aS == aS))
367+    if ((aU == aU))
358368         then {
359-            let A = aN(z)
360-            let aT = [StringEntry(K("vested", z, toBase58String(aR.transactionId)), makeString([toString(E), toString(F), toString(G)], b))]
361-            (aQ(z, A, E, F, G) ++ aT)
369+            let A = aP(z)
370+            let aV = [StringEntry(L("vested", z, toBase58String(aT.transactionId)), makeString([toString(E), toString(F), toString(G)], b))]
371+            (aS(z, A, E, F, G) ++ aV)
362372             }
363373         else throw("Strict value is not equal to itself.")
364374     }
365375 
366376 
367377 
368-@Callable(aR)
378+@Callable(aT)
369379 func ban (z) = {
370380     let B = [if (if ((s == nil))
371381         then true
372-        else containsElement(s, toString(aR.caller)))
382+        else containsElement(s, toString(aT.caller)))
373383         then true
374384         else e("you must be admin"), if (!(containsElement(t, z)))
375385         then true
376386         else e(makeString(["user already in a ban list:", z], " "))]
377387     if ((B == B))
378388         then {
379-            let aU = at(z)
380-            let aV = aU._1
381-            let aW = aU._2
382-            let aX = [StringEntry(r, makeString_11C((t :+ z), "__"))]
383-            (aV ++ aX)
389+            let aW = av(z)
390+            let aX = aW._1
391+            let aY = aW._2
392+            let aZ = [StringEntry(r, makeString_11C((t :+ z), "__"))]
393+            (aX ++ aZ)
384394             }
385395         else throw("Strict value is not equal to itself.")
386396     }
387397 
388398 
389399 
390-@Callable(aR)
400+@Callable(aT)
391401 func unban (z) = {
392402     let B = [if (if ((s == nil))
393403         then true
394-        else containsElement(s, toString(aR.caller)))
404+        else containsElement(s, toString(aT.caller)))
395405         then true
396406         else e("you must be admin"), if (containsElement(t, z))
397407         then true
398408         else e(makeString(["user not in a ban list:", z], " "))]
399409     if ((B == B))
400410         then {
401-            let aY = {
411+            let ba = {
402412                 let j = indexOf(t, z)
403413                 if ($isInstanceOf(j, "Int"))
404414                     then {
405-                        let aZ = j
406-                        removeByIndex(t, aZ)
415+                        let bb = j
416+                        removeByIndex(t, bb)
407417                         }
408418                     else e("user address index in ban list is not found")
409419                 }
410-            if ((aY == nil))
420+            if ((ba == nil))
411421                 then [DeleteEntry(r)]
412-                else [StringEntry(r, makeString_11C(aY, "__"))]
422+                else [StringEntry(r, makeString_11C(ba, "__"))]
413423             }
414424         else throw("Strict value is not equal to itself.")
415425     }
416426 
417427 
418428 
419-@Callable(aR)
429+@Callable(aT)
420430 func claimAll () = {
421-    let z = toString(aR.caller)
422-    let ba = aC(z)
423-    let aE = ba._1
424-    let aI = ba._2
425-    let aT = [StringEntry(K("claimed", z, toBase58String(aR.transactionId)), toString(aI))]
426-    if ((aI > 0))
427-        then (aE ++ aT)
431+    let z = toString(aT.caller)
432+    let bc = aE(z)
433+    let aG = bc._1
434+    let aK = bc._2
435+    let aV = [StringEntry(L("claimed", z, toBase58String(aT.transactionId)), toString(aK))]
436+    if ((aK > 0))
437+        then (aG ++ aV)
428438         else e("nothing to claim")
429439     }
430440 
431441 
432442 
433-@Callable(aR)
443+@Callable(aT)
434444 func userInfoREADONLY (z) = {
435-    let bb = aC(z)
436-    let aW = bb._1
437-    let aI = bb._2
438-    let aH = valueOrElse(getInteger(this, C(z)), 0)
439-    $Tuple2(nil, $Tuple3(aI, aH, aJ(z)))
445+    let bd = aE(z)
446+    let aY = bd._1
447+    let aK = bd._2
448+    let aJ = valueOrElse(getInteger(this, C(z)), 0)
449+    $Tuple2(nil, $Tuple3(aK, aJ, aL(z)))
440450     }
441451 
442452 
443-
444-@Callable(aR)
445-func foo () = {
446-    let bc = throw("err")
447-    if ((bc == bc))
448-        then nil
449-        else throw("Strict value is not equal to itself.")
450-    }
451-
452-
453-@Verifier(bd)
454-func be () = {
455-    let bf = {
453+@Verifier(be)
454+func bf () = {
455+    let bg = {
456456         let j = l()
457457         if ($isInstanceOf(j, "ByteVector"))
458458             then {
459-                let bg = j
460-                bg
459+                let bh = j
460+                bh
461461                 }
462462             else if ($isInstanceOf(j, "Unit"))
463-                then bd.senderPublicKey
463+                then be.senderPublicKey
464464                 else throw("Match error")
465465         }
466-    sigVerify(bd.bodyBytes, bd.proofs[0], bf)
466+    sigVerify(be.bodyBytes, be.proofs[0], bg)
467467     }
468468 
github/deemru/w8io/c3f4982 
114.67 ms ◑