tx · 5jKFfKGXisRRwPZWTzWMaWd65RF2gEkYvZz5ghmjyy2U

3N6HSS7Toat1RhyEsyqVGgVSRzH19W1FTbP:  -0.01900000 Waves

2023.06.23 14:18 [2635187] smart account 3N6HSS7Toat1RhyEsyqVGgVSRzH19W1FTbP > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5jKFfKGXisRRwPZWTzWMaWd65RF2gEkYvZz5ghmjyy2U",
    "fee": 1900000,
    "feeAssetId": null,
    "timestamp": 1687519186064,
    "version": 2,
    "chainId": 84,
    "sender": "3N6HSS7Toat1RhyEsyqVGgVSRzH19W1FTbP",
    "senderPublicKey": "AoKo4segKHU4DeJnxXQYJj2u7J6XJeux6r8KLW52cd2Q",
    "proofs": [
        "5sLMPDU9YDuN2KZZ415bPoxaxWeJNZbAzxz7mPqmTQNk4S1tnB84nE12bKcCnRZVpF18gMX6M5h7e9WrrqoL75Gz"
    ],
    "script": "base64:BwIrCAISAwoBAhIHCgUCAQEBARIDCgECEgMKAQISBAoCAgISBAoCAgISAwoBAigAA1NFUAICX18ADUNPTlRSQUNUX05BTUUCD2NhbGN1bGF0b3IucmlkZQAGU0NBTEU4AIDC1y8ABlNDQUxFNgDAhD0AB1BFTkRJTkcCB1BFTkRJTkcACEZJTklTSEVEAghGSU5JU0hFRAAFV0FWRVMCBVdBVkVTAQd3cmFwRXJyAQFzCQCsAgIJAKwCAgUNQ09OVFJBQ1RfTkFNRQICOiAFAXMBCHRocm93RXJyAQFzCQACAQkBB3dyYXBFcnIBBQFzAQ9hc3NldElkVG9TdHJpbmcBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBYgUHJG1hdGNoMAkA2AQBBQFiAwkAAQIFByRtYXRjaDACBFVuaXQFBVdBVkVTCQACAQILTWF0Y2ggZXJyb3IBA2FicwEBbgMJAGYCAAAFAW4JAQEtAQUBbgUBbgERa2V5RmFjdG9yeUFkZHJlc3MACQC5CQIJAMwIAgICJXMJAMwIAgIHZmFjdG9yeQUDbmlsBQNTRVABDGtleUxwQXNzZXRJZAAJALkJAgkAzAgCAgIlcwkAzAgCAglscEFzc2V0SWQFA25pbAUDU0VQAQ1rZXlYdG5Bc3NldElkAAkAuQkCCQDMCAICAiVzCQDMCAICCnh0bkFzc2V0SWQFA25pbAUDU0VQARJrZXlUcmVhc3VyeUFkZHJlc3MACQC5CQIJAMwIAgICJXMJAMwIAgIIdHJlYXN1cnkFA25pbAUDU0VQAQtrZXlJbnZlc3RlZAEHYXNzZXRJZAkAuQkCCQDMCAICBCVzJXMJAMwIAgIIaW52ZXN0ZWQJAMwIAgkBD2Fzc2V0SWRUb1N0cmluZwEFB2Fzc2V0SWQFA25pbAUDU0VQAQxrZXlBdmFpbGFibGUBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAglhdmFpbGFibGUJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwUDbmlsBQNTRVABCmtleUNsYWltZWQBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgdjbGFpbWVkCQDMCAIJAKUIAQULdXNlckFkZHJlc3MFA25pbAUDU0VQARBrZXlDdXJyZW50UGVyaW9kAAkAuQkCCQDMCAICAiVzCQDMCAICDWN1cnJlbnRQZXJpb2QFA25pbAUDU0VQARFrZXlQcmljZUZvclBlcmlvZAEGcGVyaW9kCQC5CQIJAMwIAgIEJXMlZAkAzAgCAgVwcmljZQkAzAgCCQCkAwEFBnBlcmlvZAUDbmlsBQNTRVABDmtleVN0YXJ0SGVpZ2h0AQZwZXJpb2QJALkJAgkAzAgCAgQlcyVkCQDMCAICC3N0YXJ0SGVpZ2h0CQDMCAIJAKQDAQUGcGVyaW9kBQNuaWwFA1NFUAEPa2V5UGVyaW9kTGVuZ3RoAAIQJXNfX3BlcmlvZExlbmd0aAEYa2V5QmxvY2tQcm9jZXNzaW5nUmV3YXJkAAIZJXNfX2Jsb2NrUHJvY2Vzc2luZ1Jld2FyZAEVa2V5TmV4dEJsb2NrVG9Qcm9jZXNzAAIWJXNfX25leHRCbG9ja1RvUHJvY2VzcwERa2V5QmxvY2tQcm9jZXNzZWQBBmhlaWdodAkAuQkCCQDMCAICBCVzJWQJAMwIAgIOYmxvY2tQcm9jZXNzZWQJAMwIAgkApAMBBQZoZWlnaHQFA25pbAUDU0VQAQ1rZXlXaXRoZHJhd2FsAAIOJXNfX3dpdGhkcmF3YWwBFGtleVdpdGhkcmF3YWxSZXF1ZXN0Agt1c2VyQWRkcmVzcwR0eElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICCndpdGhkcmF3YWwJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwkAzAgCCQDYBAEFBHR4SWQFA25pbAUDU0VQARZ2YWx1ZVdpdGhkcmF3YWxSZXF1ZXN0BAZzdGF0dXMNbHBBc3NldEFtb3VudAx0YXJnZXRQZXJpb2QJY2xhaW1UeElkBAxjbGFpbVR4SWRTdHIEByRtYXRjaDAFCWNsYWltVHhJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAIEU09PTgkAAgECC01hdGNoIGVycm9yCQC5CQIJAMwIAgIIJXMlZCVkJXMJAMwIAgUGc3RhdHVzCQDMCAIJAKQDAQUNbHBBc3NldEFtb3VudAkAzAgCCQCkAwEFDHRhcmdldFBlcmlvZAkAzAgCBQxjbGFpbVR4SWRTdHIFA25pbAUDU0VQASFwYXJzZVdpdGhkcmF3YWxSZXF1ZXN0VmFsdWVPckZhaWwBAXMEBXBhcnRzCQC1CQIFAXMFA1NFUAMJAAACCQCQAwEFBXBhcnRzAAUEBnN0YXR1cwkAkQMCBQVwYXJ0cwABBA1scEFzc2V0QW1vdW50CQETdmFsdWVPckVycm9yTWVzc2FnZQIJALYJAQkAkQMCBQVwYXJ0cwACCQEHd3JhcEVycgECFWludmFsaWQgbHBBc3NldEFtb3VudAQMdGFyZ2V0UGVyaW9kCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALYJAQkAkQMCBQVwYXJ0cwADCQEHd3JhcEVycgECFGludmFsaWQgdGFyZ2V0UGVyaW9kBAljbGFpbVR4SWQJAJEDAgUFcGFydHMABAkAlgoEBQZzdGF0dXMFDWxwQXNzZXRBbW91bnQFDHRhcmdldFBlcmlvZAUJY2xhaW1UeElkCQEIdGhyb3dFcnIBAiBpbnZhbGlkIHdpdGhkcmF3YWwgcmVxdWVzdCB2YWx1ZQAUZmFjdG9yeUFkZHJlc3NPcHRpb24EByRtYXRjaDAJAJ0IAgUEdGhpcwkBEWtleUZhY3RvcnlBZGRyZXNzAAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIFFGZhY3RvcnlBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECF2ludmFsaWQgZmFjdG9yeSBhZGRyZXNzAA9scEFzc2V0SWRPcHRpb24EByRtYXRjaDAFFGZhY3RvcnlBZGRyZXNzT3B0aW9uAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAEByRtYXRjaDEJAJ0IAgUBYQkBDGtleUxwQXNzZXRJZAADCQABAgUHJG1hdGNoMQIGU3RyaW5nBAFzBQckbWF0Y2gxCQDZBAEFAXMDCQABAgUHJG1hdGNoMQIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgAPbHBBc3NldElkT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIFD2xwQXNzZXRJZE9wdGlvbgkBB3dyYXBFcnIBAhFpbnZhbGlkIGxwQXNzZXRJZAAQeHRuQXNzZXRJZE9wdGlvbgQHJG1hdGNoMAUUZmFjdG9yeUFkZHJlc3NPcHRpb24DCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQBYQUHJG1hdGNoMAQHJG1hdGNoMQkAnQgCBQFhCQENa2V5WHRuQXNzZXRJZAADCQABAgUHJG1hdGNoMQIGU3RyaW5nBAFzBQckbWF0Y2gxCQDZBAEFAXMDCQABAgUHJG1hdGNoMQIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgAQeHRuQXNzZXRJZE9yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRB4dG5Bc3NldElkT3B0aW9uCQEHd3JhcEVycgECEmludmFsaWQgeHRuQXNzZXRJZAAVdHJlYXN1cnlBZGRyZXNzT3B0aW9uBAckbWF0Y2gwBRRmYWN0b3J5QWRkcmVzc09wdGlvbgMJAAECBQckbWF0Y2gwAgdBZGRyZXNzBAFhBQckbWF0Y2gwBAckbWF0Y2gxCQCdCAIFAWEJARJrZXlUcmVhc3VyeUFkZHJlc3MAAwkAAQIFByRtYXRjaDECBlN0cmluZwQBcwUHJG1hdGNoMQkApggBBQFzAwkAAQIFByRtYXRjaDECBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAFXRyZWFzdXJ5QWRkcmVzc09yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRV0cmVhc3VyeUFkZHJlc3NPcHRpb24JAQd3cmFwRXJyAQIYaW52YWxpZCB0cmVhc3VyeSBhZGRyZXNzAQtvbmx5QWRkcmVzcwIBaQdhZGRyZXNzAwkAAAIIBQFpBmNhbGxlcgUHYWRkcmVzcwYJAQh0aHJvd0VycgECEXBlcm1pc3Npb24gZGVuaWVkAQtvbmx5RmFjdG9yeQEBaQkBC29ubHlBZGRyZXNzAgUBaQUUZmFjdG9yeUFkZHJlc3NPckZhaWwBD3Jld2FyZEZvck9wdGlvbgIHcmV3YXJkcwZ0YXJnZXQEAXMJAJADAQUHcmV3YXJkcwQLJHQwNDA5NjQxMjEJAJEDAgUHcmV3YXJkcwAABAJhMAgFCyR0MDQwOTY0MTIxAl8xBAJyMAgFCyR0MDQwOTY0MTIxAl8yBAskdDA0MTI0NDE0OQkAkQMCBQdyZXdhcmRzAAEEAmExCAULJHQwNDEyNDQxNDkCXzEEAnIxCAULJHQwNDEyNDQxNDkCXzIECyR0MDQxNTI0MTc3CQCRAwIFB3Jld2FyZHMAAgQCYTIIBQskdDA0MTUyNDE3NwJfMQQCcjIIBQskdDA0MTUyNDE3NwJfMgMDCQBmAgUBcwAACQAAAgUCYTAFBnRhcmdldAcFAnIwAwMJAGYCBQFzAAEJAAACBQJhMQUGdGFyZ2V0BwUCcjEDAwkAZgIFAXMAAgkAAAIFAmEyBQZ0YXJnZXQHBQJyMgUEdW5pdAcBaQEHY2xhaW1MUAEQdXNlckFkZHJlc3NCeXRlcwQLY2hlY2tDYWxsZXIJAQtvbmx5RmFjdG9yeQEFAWkDCQAAAgULY2hlY2tDYWxsZXIFC2NoZWNrQ2FsbGVyBAt1c2VyQWRkcmVzcwkBB0FkZHJlc3MBBRB1c2VyQWRkcmVzc0J5dGVzBAlhdmFpbGFibGUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJAQxrZXlBdmFpbGFibGUBBQt1c2VyQWRkcmVzcwAABAdjbGFpbWVkCQELdmFsdWVPckVsc2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQEKa2V5Q2xhaW1lZAEFC3VzZXJBZGRyZXNzAAAEDmZhY3RvcnlBY3Rpb25zAwkAZgIFCWF2YWlsYWJsZQAACQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCDXRyYW5zZmVyQXNzZXQJAMwIAgUQdXNlckFkZHJlc3NCeXRlcwkAzAgCBQlhdmFpbGFibGUJAMwIAgUPbHBBc3NldElkT3JGYWlsBQNuaWwFA25pbAkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAgxpbnRlZ2VyRW50cnkJAMwIAgkBDGtleUF2YWlsYWJsZQEFC3VzZXJBZGRyZXNzCQDMCAIAAAUDbmlsBQNuaWwJAMwIAgkA/AcEBRRmYWN0b3J5QWRkcmVzc09yRmFpbAIMaW50ZWdlckVudHJ5CQDMCAIJAQprZXlDbGFpbWVkAQULdXNlckFkZHJlc3MJAMwIAgkAZAIFB2NsYWltZWQFCWF2YWlsYWJsZQUDbmlsBQNuaWwFA25pbAkBCHRocm93RXJyAQIQbm90aGluZyB0byBjbGFpbQkAlAoCBQNuaWwFDmZhY3RvcnlBY3Rpb25zCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGZpbmFsaXplBRB1c2VyQWRkcmVzc0J5dGVzGG5ld1RyZWFzdXJ5Vm9sdW1lSW5XYXZlcwh4dG5QcmljZRBwd3JNYW5hZ2Vyc0JvbnVzIHRyZWFzdXJ5Vm9sdW1lRGlmZkFsbG9jYXRpb25Db2VmBAtjaGVja0NhbGxlcgkBC29ubHlGYWN0b3J5AQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEE2N1cnJlbnRQZXJpb2RPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBEGtleUN1cnJlbnRQZXJpb2QACQEHd3JhcEVycgECDmludmFsaWQgcGVyaW9kBAxwZXJpb2RMZW5ndGgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBD2tleVBlcmlvZExlbmd0aAAJAQd3cmFwRXJyAQIVaW52YWxpZCBwZXJpb2QgbGVuZ3RoBBJjdXJyZW50U3RhcnRIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBDmtleVN0YXJ0SGVpZ2h0AQUTY3VycmVudFBlcmlvZE9yRmFpbAkBB3dyYXBFcnIBAhRpbnZhbGlkIHN0YXJ0IGhlaWdodAQSY3VycmVudFByaWNlT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJARFrZXlQcmljZUZvclBlcmlvZAEFE2N1cnJlbnRQZXJpb2RPckZhaWwJAQd3cmFwRXJyAQINaW52YWxpZCBwcmljZQQSbmV4dEJsb2NrVG9Qcm9jZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJARVrZXlOZXh0QmxvY2tUb1Byb2Nlc3MACQEHd3JhcEVycgECHWludmFsaWQgbmV4dCBibG9jayB0byBwcm9jZXNzBA9wZXJpb2RFbmRIZWlnaHQJAGUCCQBkAgUSY3VycmVudFN0YXJ0SGVpZ2h0BQxwZXJpb2RMZW5ndGgAAQQGY2hlY2tzCQDMCAIDCQAAAggFAWkMb3JpZ2luQ2FsbGVyBRV0cmVhc3VyeUFkZHJlc3NPckZhaWwGCQEIdGhyb3dFcnIBAhFwZXJtaXNzaW9uIGRlbmllZAkAzAgCAwkAZgIFEm5leHRCbG9ja1RvUHJvY2VzcwUPcGVyaW9kRW5kSGVpZ2h0BgkBCHRocm93RXJyAQISdW5wcm9jZXNzZWQgYmxvY2tzCQDMCAIDCQBnAgUYbmV3VHJlYXN1cnlWb2x1bWVJbldhdmVzAAAGCQEIdGhyb3dFcnIBAhtpbnZhbGlkIG5ldyB0cmVhc3VyeSB2b2x1bWUJAMwIAgMJAGcCBQh4dG5QcmljZQAABgkBCHRocm93RXJyAQIRaW52YWxpZCBYVE4gcHJpY2UJAMwIAgMDCQBnAgUQcHdyTWFuYWdlcnNCb251cwAACQBnAgUGU0NBTEU4BRBwd3JNYW5hZ2Vyc0JvbnVzBwYJAQh0aHJvd0VycgECGmludmFsaWQgUFdSIG1hbmFnZXJzIGJvbnVzCQDMCAIDAwkAZwIFIHRyZWFzdXJ5Vm9sdW1lRGlmZkFsbG9jYXRpb25Db2VmCQEBLQEFBlNDQUxFOAkAZwIFBlNDQUxFOAUgdHJlYXN1cnlWb2x1bWVEaWZmQWxsb2NhdGlvbkNvZWYHBgkBCHRocm93RXJyAQIzaW52YWxpZCB0cmVhc3VyeSB2b2x1bWUgZGlmZiBhbGxvY2F0aW9uIGNvZWZmaWNpZW50BQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MEEWludmVzdGVkWHRuQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQELa2V5SW52ZXN0ZWQBBRB4dG5Bc3NldElkT3JGYWlsAAAEE2ludmVzdGVkV2F2ZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJAQtrZXlJbnZlc3RlZAEFBHVuaXQAAAQYaW52ZXN0ZWRYdG5BbW91bnRJbldhdmVzCQBrAwURaW52ZXN0ZWRYdG5BbW91bnQFCHh0blByaWNlBQZTQ0FMRTYEHGN1cnJlbnRUcmVhc3VyeVZvbHVtZUluV2F2ZXMJAGQCBRhpbnZlc3RlZFh0bkFtb3VudEluV2F2ZXMFE2ludmVzdGVkV2F2ZXNBbW91bnQECXByb2ZpdFJhdwkAZQIFGG5ld1RyZWFzdXJ5Vm9sdW1lSW5XYXZlcwUcY3VycmVudFRyZWFzdXJ5Vm9sdW1lSW5XYXZlcwQWcHdyTWFuYWdlcnNCb251c0Ftb3VudAMJAGYCBQlwcm9maXRSYXcAAAkAawMFCXByb2ZpdFJhdwUQcHdyTWFuYWdlcnNCb251cwUGU0NBTEU4AAAEBnByb2ZpdAkAZQIFCXByb2ZpdFJhdwUWcHdyTWFuYWdlcnNCb251c0Ftb3VudAQMZG9uYXRpb25QYXJ0AwkAZgIFHGN1cnJlbnRUcmVhc3VyeVZvbHVtZUluV2F2ZXMAAAkAawMFGGludmVzdGVkWHRuQW1vdW50SW5XYXZlcwUGU0NBTEU4BRxjdXJyZW50VHJlYXN1cnlWb2x1bWVJbldhdmVzAAAEFWRvbmF0aW9uUHJvZml0UGFydFJhdwkAawMFBnByb2ZpdAUMZG9uYXRpb25QYXJ0BQZTQ0FMRTgEF2ludmVzdG1lbnRQcm9maXRQYXJ0UmF3CQBlAgUGcHJvZml0BRVkb25hdGlvblByb2ZpdFBhcnRSYXcEI3RyZWFzdXJ5Vm9sdW1lRGlmZkFsbG9jYXRpb25Db2VmQWJzCQEDYWJzAQUgdHJlYXN1cnlWb2x1bWVEaWZmQWxsb2NhdGlvbkNvZWYEEGFtb3VudFRvRG9uYXRpb24JAGsDBRdpbnZlc3RtZW50UHJvZml0UGFydFJhdwMJAGYCAAAFIHRyZWFzdXJ5Vm9sdW1lRGlmZkFsbG9jYXRpb25Db2VmBSN0cmVhc3VyeVZvbHVtZURpZmZBbGxvY2F0aW9uQ29lZkFicwAABQZTQ0FMRTgEEmFtb3VudFRvSW52ZXN0bWVudAkAawMFFWRvbmF0aW9uUHJvZml0UGFydFJhdwMJAGYCBSB0cmVhc3VyeVZvbHVtZURpZmZBbGxvY2F0aW9uQ29lZgAABSN0cmVhc3VyeVZvbHVtZURpZmZBbGxvY2F0aW9uQ29lZkFicwAABQZTQ0FMRTgEEmRvbmF0aW9uUHJvZml0UGFydAkAZAIJAGUCBRVkb25hdGlvblByb2ZpdFBhcnRSYXcFEmFtb3VudFRvSW52ZXN0bWVudAUQYW1vdW50VG9Eb25hdGlvbgQUaW52ZXN0bWVudFByb2ZpdFBhcnQJAGQCCQBlAgUXaW52ZXN0bWVudFByb2ZpdFBhcnRSYXcFEGFtb3VudFRvRG9uYXRpb24FEmFtb3VudFRvSW52ZXN0bWVudAQWaW52ZXN0ZWRXYXZlc0Ftb3VudE5ldwkAZAIFE2ludmVzdGVkV2F2ZXNBbW91bnQFFGludmVzdG1lbnRQcm9maXRQYXJ0BBRpbnZlc3RlZFh0bkFtb3VudE5ldwkAawMJAGQCBRhpbnZlc3RlZFh0bkFtb3VudEluV2F2ZXMFEmRvbmF0aW9uUHJvZml0UGFydAUGU0NBTEU2BQh4dG5QcmljZQQJbmV3UGVyaW9kCQBkAgUTY3VycmVudFBlcmlvZE9yRmFpbAABBA9scEFzc2V0UXVhbnRpdHkICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUPbHBBc3NldElkT3JGYWlsCQEHd3JhcEVycgECFGludmFsaWQgbHBBc3NldCBpbmZvCHF1YW50aXR5BAhuZXdQcmljZQkAawMFFmludmVzdGVkV2F2ZXNBbW91bnROZXcFBlNDQUxFOAUPbHBBc3NldFF1YW50aXR5BBNscEFzc2V0QW1vdW50VG9CdXJuCQELdmFsdWVPckVsc2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQENa2V5V2l0aGRyYXdhbAAAAAQQcGF5bWVudEFtb3VudE1pbgkAlgMBCQDMCAIAAAkAzAgCCQBrAwUTbHBBc3NldEFtb3VudFRvQnVybgUIbmV3UHJpY2UFBlNDQUxFOAUDbmlsBA1wYXltZW50T3B0aW9uAwkAZgIJAJADAQgFAWkIcGF5bWVudHMAAAkAkQMCCAUBaQhwYXltZW50cwAABQR1bml0BA1wYXltZW50QW1vdW50CAkBBXZhbHVlAQUNcGF5bWVudE9wdGlvbgZhbW91bnQEDnBheW1lbnRBc3NldElkCAkBBXZhbHVlAQUNcGF5bWVudE9wdGlvbgdhc3NldElkBAxjaGVja1BheW1lbnQDAwkAAAIFEHBheW1lbnRBbW91bnRNaW4AAAYDAwkBAiE9AgUNcGF5bWVudE9wdGlvbgUEdW5pdAkAAAIFDnBheW1lbnRBc3NldElkBQR1bml0BwkAZwIFDXBheW1lbnRBbW91bnQFEHBheW1lbnRBbW91bnRNaW4HBgkBCHRocm93RXJyAQkArAICAiZpbnZhbGlkIHBheW1lbnRzLCBwYXltZW50IGFtb3VudCBtaW46IAkApAMBBRBwYXltZW50QW1vdW50TWluAwkAAAIFDGNoZWNrUGF5bWVudAUMY2hlY2tQYXltZW50BAdhY3Rpb25zAwkBAiE9AgUNcGF5bWVudE9wdGlvbgUEdW5pdAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRRmYWN0b3J5QWRkcmVzc09yRmFpbAUNcGF5bWVudEFtb3VudAUOcGF5bWVudEFzc2V0SWQFA25pbAUDbmlsBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAgxpbnRlZ2VyRW50cnkJAMwIAgkBEGtleUN1cnJlbnRQZXJpb2QACQDMCAIFCW5ld1BlcmlvZAUDbmlsBQNuaWwJAMwIAgkA/AcEBRRmYWN0b3J5QWRkcmVzc09yRmFpbAIMaW50ZWdlckVudHJ5CQDMCAIJARFrZXlQcmljZUZvclBlcmlvZAEFCW5ld1BlcmlvZAkAzAgCBQhuZXdQcmljZQUDbmlsBQNuaWwJAMwIAgkA/AcEBRRmYWN0b3J5QWRkcmVzc09yRmFpbAIMaW50ZWdlckVudHJ5CQDMCAIJAQ5rZXlTdGFydEhlaWdodAEFCW5ld1BlcmlvZAkAzAgCCQBkAgUPcGVyaW9kRW5kSGVpZ2h0AAEFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCBGJ1cm4JAMwIAgUTbHBBc3NldEFtb3VudFRvQnVybgUDbmlsBQNuaWwJAMwIAgkA/AcEBRRmYWN0b3J5QWRkcmVzc09yRmFpbAIMaW50ZWdlckVudHJ5CQDMCAIJAQ1rZXlXaXRoZHJhd2FsAAkAzAgCAAAFA25pbAUDbmlsBQNuaWwJAJQKAgUHYWN0aW9ucwUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEGaW52ZXN0ARB1c2VyQWRkcmVzc0J5dGVzBAtjaGVja0NhbGxlcgkBC29ubHlGYWN0b3J5AQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEC3VzZXJBZGRyZXNzCQEHQWRkcmVzcwEFEHVzZXJBZGRyZXNzQnl0ZXMEE2N1cnJlbnRQZXJpb2RPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBEGtleUN1cnJlbnRQZXJpb2QACQEHd3JhcEVycgECDmludmFsaWQgcGVyaW9kBBJjdXJyZW50UHJpY2VPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBEWtleVByaWNlRm9yUGVyaW9kAQUTY3VycmVudFBlcmlvZE9yRmFpbAkBB3dyYXBFcnIBAg1pbnZhbGlkIHByaWNlBAdwYXltZW50AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQEIdGhyb3dFcnIBAhBpbnZhbGlkIHBheW1lbnRzBA0kdDAxMTAzNTExMjEyAwMJAAACCAUHcGF5bWVudAdhc3NldElkBQR1bml0CQBmAggFB3BheW1lbnQGYW1vdW50AAAHCQCUCgIIBQdwYXltZW50BmFtb3VudAgFB3BheW1lbnQHYXNzZXRJZAkBCHRocm93RXJyAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAQNcGF5bWVudEFtb3VudAgFDSR0MDExMDM1MTEyMTICXzEEDnBheW1lbnRBc3NldElkCAUNJHQwMTEwMzUxMTIxMgJfMgQNbHBBc3NldEFtb3VudAMJAGYCBRJjdXJyZW50UHJpY2VPckZhaWwAAAkAawMFDXBheW1lbnRBbW91bnQFBlNDQUxFOAUSY3VycmVudFByaWNlT3JGYWlsAAAECGludmVzdGVkCQELdmFsdWVPckVsc2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQELa2V5SW52ZXN0ZWQBBQR1bml0AAAEB2FjdGlvbnMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUVdHJlYXN1cnlBZGRyZXNzT3JGYWlsBQ1wYXltZW50QW1vdW50BQ5wYXltZW50QXNzZXRJZAUDbmlsBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAgxpbnRlZ2VyRW50cnkJAMwIAgkBC2tleUludmVzdGVkAQUEdW5pdAkAzAgCCQBkAgUIaW52ZXN0ZWQFDXBheW1lbnRBbW91bnQFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCB3JlaXNzdWUJAMwIAgUNbHBBc3NldEFtb3VudAUDbmlsBQNuaWwJAMwIAgkA/AcEBRRmYWN0b3J5QWRkcmVzc09yRmFpbAINdHJhbnNmZXJBc3NldAkAzAgCBRB1c2VyQWRkcmVzc0J5dGVzCQDMCAIFDWxwQXNzZXRBbW91bnQJAMwIAgUPbHBBc3NldElkT3JGYWlsBQNuaWwFA25pbAUDbmlsCQCUCgIFB2FjdGlvbnMFDmZhY3RvcnlBY3Rpb25zCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCHdpdGhkcmF3ARB1c2VyQWRkcmVzc0J5dGVzBAtjaGVja0NhbGxlcgkBC29ubHlGYWN0b3J5AQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEC3VzZXJBZGRyZXNzCQEHQWRkcmVzcwEFEHVzZXJBZGRyZXNzQnl0ZXMEE2N1cnJlbnRQZXJpb2RPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBEGtleUN1cnJlbnRQZXJpb2QACQEHd3JhcEVycgECDmludmFsaWQgcGVyaW9kBAdwYXltZW50AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQEIdGhyb3dFcnIBCQEHd3JhcEVycgECEGludmFsaWQgcGF5bWVudHMEDnBheW1lbnRBc3NldElkAwkAAAIIBQdwYXltZW50B2Fzc2V0SWQFD2xwQXNzZXRJZE9yRmFpbAUPbHBBc3NldElkT3JGYWlsCQEIdGhyb3dFcnIBAhVpbnZhbGlkIHBheW1lbnQgYXNzZXQEDXBheW1lbnRBbW91bnQDCQBmAggFB3BheW1lbnQGYW1vdW50AAAIBQdwYXltZW50BmFtb3VudAkBCHRocm93RXJyAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAQKd2l0aGRyYXdhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBDWtleVdpdGhkcmF3YWwAAAAEB2FjdGlvbnMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUUZmFjdG9yeUFkZHJlc3NPckZhaWwFDXBheW1lbnRBbW91bnQFDnBheW1lbnRBc3NldElkBQNuaWwEDmZhY3RvcnlBY3Rpb25zCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCDGludGVnZXJFbnRyeQkAzAgCCQENa2V5V2l0aGRyYXdhbAAJAMwIAgkAZAIFCndpdGhkcmF3YWwFDXBheW1lbnRBbW91bnQFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCC3N0cmluZ0VudHJ5CQDMCAIJARRrZXlXaXRoZHJhd2FsUmVxdWVzdAIFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkCQDMCAIJARZ2YWx1ZVdpdGhkcmF3YWxSZXF1ZXN0BAUHUEVORElORwUNcGF5bWVudEFtb3VudAkAZAIFE2N1cnJlbnRQZXJpb2RPckZhaWwAAQUEdW5pdAUDbmlsBQNuaWwFA25pbAMJAAACBQ5mYWN0b3J5QWN0aW9ucwUOZmFjdG9yeUFjdGlvbnMJAJQKAgUHYWN0aW9ucwUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEOY2FuY2VsV2l0aGRyYXcCEHVzZXJBZGRyZXNzQnl0ZXMEdHhJZAQLY2hlY2tDYWxsZXIJAQtvbmx5RmFjdG9yeQEFAWkDCQAAAgULY2hlY2tDYWxsZXIFC2NoZWNrQ2FsbGVyBAt1c2VyQWRkcmVzcwkBB0FkZHJlc3MBBRB1c2VyQWRkcmVzc0J5dGVzBBd3aXRoZHJhd2FsUmVxdWVzdE9wdGlvbgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQEUa2V5V2l0aGRyYXdhbFJlcXVlc3QCBQt1c2VyQWRkcmVzcwUEdHhJZAkBB3dyYXBFcnIBAhppbnZhbGlkIHdpdGhkcmF3YWwgcmVxdWVzdAQTY3VycmVudFBlcmlvZE9yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQEQa2V5Q3VycmVudFBlcmlvZAAJAQd3cmFwRXJyAQIOaW52YWxpZCBwZXJpb2QEDSR0MDEzNjE1MTM3MjgJASFwYXJzZVdpdGhkcmF3YWxSZXF1ZXN0VmFsdWVPckZhaWwBBRd3aXRoZHJhd2FsUmVxdWVzdE9wdGlvbgQGc3RhdHVzCAUNJHQwMTM2MTUxMzcyOAJfMQQNbHBBc3NldEFtb3VudAgFDSR0MDEzNjE1MTM3MjgCXzIEDHRhcmdldFBlcmlvZAgFDSR0MDEzNjE1MTM3MjgCXzMECWNsYWltVHhJZAgFDSR0MDEzNjE1MTM3MjgCXzQEBmNoZWNrcwkAzAgCAwkAAAIFBnN0YXR1cwUHUEVORElORwYJAQh0aHJvd0VycgECIWludmFsaWQgd2l0aGRyYXdhbCByZXF1ZXN0IHN0YXR1cwkAzAgCAwkAZgIFDHRhcmdldFBlcmlvZAUTY3VycmVudFBlcmlvZE9yRmFpbAYJAQh0aHJvd0VycgECIWludmFsaWQgd2l0aGRyYXdhbCByZXF1ZXN0IHBlcmlvZAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBAp3aXRoZHJhd2FsCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJAQ1rZXlXaXRoZHJhd2FsAAkBB3dyYXBFcnIBAh9pbnZhbGlkIHRvdGFsIHdpdGhkcmF3YWwgYW1vdW50BA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAgxpbnRlZ2VyRW50cnkJAMwIAgkBDWtleVdpdGhkcmF3YWwACQDMCAIDCQBnAgUKd2l0aGRyYXdhbAUNbHBBc3NldEFtb3VudAkAZQIFCndpdGhkcmF3YWwFDWxwQXNzZXRBbW91bnQJAQh0aHJvd0VycgECGWludmFsaWQgd2l0aGRyYXdhbCBhbW91bnQFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCC2RlbGV0ZUVudHJ5CQDMCAIJARRrZXlXaXRoZHJhd2FsUmVxdWVzdAIFC3VzZXJBZGRyZXNzBQR0eElkBQNuaWwFA25pbAkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAg10cmFuc2ZlckFzc2V0CQDMCAIFEHVzZXJBZGRyZXNzQnl0ZXMJAMwIAgUNbHBBc3NldEFtb3VudAkAzAgCBQ9scEFzc2V0SWRPckZhaWwFA25pbAUDbmlsBQNuaWwDCQAAAgUOZmFjdG9yeUFjdGlvbnMFDmZhY3RvcnlBY3Rpb25zCQCUCgIFA25pbAUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKY2xhaW1XYXZlcwIQdXNlckFkZHJlc3NCeXRlcwR0eElkBAtjaGVja0NhbGxlcgkBC29ubHlGYWN0b3J5AQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEC3VzZXJBZGRyZXNzCQEHQWRkcmVzcwEFEHVzZXJBZGRyZXNzQnl0ZXMEE2N1cnJlbnRQZXJpb2RPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBEGtleUN1cnJlbnRQZXJpb2QACQEHd3JhcEVycgECDmludmFsaWQgcGVyaW9kBBd3aXRoZHJhd2FsUmVxdWVzdE9wdGlvbgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQEUa2V5V2l0aGRyYXdhbFJlcXVlc3QCBQt1c2VyQWRkcmVzcwUEdHhJZAkBB3dyYXBFcnIBAhppbnZhbGlkIHdpdGhkcmF3YWwgcmVxdWVzdAQNJHQwMTUwNjAxNTE3MwkBIXBhcnNlV2l0aGRyYXdhbFJlcXVlc3RWYWx1ZU9yRmFpbAEFF3dpdGhkcmF3YWxSZXF1ZXN0T3B0aW9uBAZzdGF0dXMIBQ0kdDAxNTA2MDE1MTczAl8xBA1scEFzc2V0QW1vdW50CAUNJHQwMTUwNjAxNTE3MwJfMgQMdGFyZ2V0UGVyaW9kCAUNJHQwMTUwNjAxNTE3MwJfMwQJY2xhaW1UeElkCAUNJHQwMTUwNjAxNTE3MwJfNAMJAAACBQZzdGF0dXMFCEZJTklTSEVECQEIdGhyb3dFcnIBAiFpbnZhbGlkIHdpdGhkcmF3YWwgcmVxdWVzdCBzdGF0dXMDCQBmAgUMdGFyZ2V0UGVyaW9kBRNjdXJyZW50UGVyaW9kT3JGYWlsCQEIdGhyb3dFcnIBAiFpbnZhbGlkIHdpdGhkcmF3YWwgcmVxdWVzdCBwZXJpb2QEC3ByaWNlT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJARFrZXlQcmljZUZvclBlcmlvZAEFDHRhcmdldFBlcmlvZAkBB3dyYXBFcnIBAg1pbnZhbGlkIHByaWNlBAZhbW91bnQDCQBmAgULcHJpY2VPckZhaWwAAAkAawMFDWxwQXNzZXRBbW91bnQFC3ByaWNlT3JGYWlsBQZTQ0FMRTgAAAQOZmFjdG9yeUFjdGlvbnMJAMwIAgkA/AcEBRRmYWN0b3J5QWRkcmVzc09yRmFpbAILc3RyaW5nRW50cnkJAMwIAgkBFGtleVdpdGhkcmF3YWxSZXF1ZXN0AgULdXNlckFkZHJlc3MFBHR4SWQJAMwIAgkBFnZhbHVlV2l0aGRyYXdhbFJlcXVlc3QEBQhGSU5JU0hFRAUNbHBBc3NldEFtb3VudAUMdGFyZ2V0UGVyaW9kCAUBaQ10cmFuc2FjdGlvbklkBQNuaWwFA25pbAkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAgRidXJuCQDMCAIFDWxwQXNzZXRBbW91bnQFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCDXRyYW5zZmVyV2F2ZXMJAMwIAgUQdXNlckFkZHJlc3NCeXRlcwkAzAgCBQZhbW91bnQFA25pbAUDbmlsBQNuaWwJAJQKAgUDbmlsBQ5mYWN0b3J5QWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ1wcm9jZXNzQmxvY2tzARB1c2VyQWRkcmVzc0J5dGVzBAtjaGVja0NhbGxlcgkBC29ubHlGYWN0b3J5AQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEC3VzZXJBZGRyZXNzCQEHQWRkcmVzcwEFEHVzZXJBZGRyZXNzQnl0ZXMEE2N1cnJlbnRQZXJpb2RPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBEGtleUN1cnJlbnRQZXJpb2QACQEHd3JhcEVycgECDmludmFsaWQgcGVyaW9kBAxwZXJpb2RMZW5ndGgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBD2tleVBlcmlvZExlbmd0aAAJAQd3cmFwRXJyAQIVaW52YWxpZCBwZXJpb2QgbGVuZ3RoBBJjdXJyZW50U3RhcnRIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBRRmYWN0b3J5QWRkcmVzc09yRmFpbAkBDmtleVN0YXJ0SGVpZ2h0AQUTY3VycmVudFBlcmlvZE9yRmFpbAkBB3dyYXBFcnIBAhRpbnZhbGlkIHN0YXJ0IGhlaWdodAQSY3VycmVudFByaWNlT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJARFrZXlQcmljZUZvclBlcmlvZAEFE2N1cnJlbnRQZXJpb2RPckZhaWwJAQd3cmFwRXJyAQINaW52YWxpZCBwcmljZQQSbmV4dEJsb2NrVG9Qcm9jZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUUZmFjdG9yeUFkZHJlc3NPckZhaWwJARVrZXlOZXh0QmxvY2tUb1Byb2Nlc3MACQEHd3JhcEVycgECHWludmFsaWQgbmV4dCBibG9jayB0byBwcm9jZXNzBA9wZXJpb2RFbmRIZWlnaHQJAGUCCQBkAgUSY3VycmVudFN0YXJ0SGVpZ2h0BQxwZXJpb2RMZW5ndGgAAQQcYmxvY2tzUHJvY2Vzc2luZ0JhdGNoU2l6ZU1heAAoBBlibG9ja3NQcm9jZXNzaW5nQmF0Y2hTaXplAwMDCQBnAgUGaGVpZ2h0BRJuZXh0QmxvY2tUb1Byb2Nlc3MDCQBnAgUSbmV4dEJsb2NrVG9Qcm9jZXNzBRJjdXJyZW50U3RhcnRIZWlnaHQGCQAAAgUTY3VycmVudFBlcmlvZE9yRmFpbAAABwkAZwIFD3BlcmlvZEVuZEhlaWdodAUSbmV4dEJsb2NrVG9Qcm9jZXNzBwkAlwMBCQDMCAIJAGQCCQBlAgUPcGVyaW9kRW5kSGVpZ2h0BRJuZXh0QmxvY2tUb1Byb2Nlc3MAAQkAzAgCBRxibG9ja3NQcm9jZXNzaW5nQmF0Y2hTaXplTWF4BQNuaWwJAQh0aHJvd0VycgEJAQd3cmFwRXJyAQIUaW52YWxpZCB0YXJnZXQgYmxvY2sEFWJsb2NrUHJvY2Vzc2luZ1Jld2FyZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQEYa2V5QmxvY2tQcm9jZXNzaW5nUmV3YXJkAAkBB3dyYXBFcnIBAh9pbnZhbGlkIGJsb2NrIHByb2Nlc3NpbmcgcmV3YXJkBCBibG9ja1Byb2Nlc3NpbmdSZXdhcmRCeUdlbmVyYXRvcgkAaQIFFWJsb2NrUHJvY2Vzc2luZ1Jld2FyZAUZYmxvY2tzUHJvY2Vzc2luZ0JhdGNoU2l6ZQQpYmxvY2tQcm9jZXNzaW5nUmV3YXJkQnlHZW5lcmF0b3JSZW1haW5kZXIJAGUCBRVibG9ja1Byb2Nlc3NpbmdSZXdhcmQJAGgCBSBibG9ja1Byb2Nlc3NpbmdSZXdhcmRCeUdlbmVyYXRvcgUZYmxvY2tzUHJvY2Vzc2luZ0JhdGNoU2l6ZQoBA21hcAIDYWNjA2luYwMJAGcCBQNpbmMFGWJsb2Nrc1Byb2Nlc3NpbmdCYXRjaFNpemUFA2FjYwQRdGFyZ2V0QmxvY2tIZWlnaHQJAGQCBRJuZXh0QmxvY2tUb1Byb2Nlc3MFA2luYwQPdGFyZ2V0QmxvY2tJbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAO0HAQURdGFyZ2V0QmxvY2tIZWlnaHQJAQd3cmFwRXJyAQISaW52YWxpZCBibG9jayBpbmZvBBR0cmVhc3VyeVJld2FyZE9yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQEPcmV3YXJkRm9yT3B0aW9uAggFD3RhcmdldEJsb2NrSW5mbwdyZXdhcmRzBRV0cmVhc3VyeUFkZHJlc3NPckZhaWwJAQd3cmFwRXJyAQkArAICAiNpbnZhbGlkIHRyZWFzdXJ5IHJld2FyZCBmb3IgaGVpZ2h0IAkApAMBBRF0YXJnZXRCbG9ja0hlaWdodAQJZ2VuZXJhdG9yCAUPdGFyZ2V0QmxvY2tJbmZvCWdlbmVyYXRvcgQJYXZhaWxhYmxlCQELdmFsdWVPckVsc2UCCQCaCAIFFGZhY3RvcnlBZGRyZXNzT3JGYWlsCQEMa2V5QXZhaWxhYmxlAQUJZ2VuZXJhdG9yAAAEDGNhbGxlclJld2FyZAMJAAACBQNpbmMJAGUCBRlibG9ja3NQcm9jZXNzaW5nQmF0Y2hTaXplAAEJAGQCBSBibG9ja1Byb2Nlc3NpbmdSZXdhcmRCeUdlbmVyYXRvcgUpYmxvY2tQcm9jZXNzaW5nUmV3YXJkQnlHZW5lcmF0b3JSZW1haW5kZXIFIGJsb2NrUHJvY2Vzc2luZ1Jld2FyZEJ5R2VuZXJhdG9yBA1scEFzc2V0QW1vdW50AwkAZgIFEmN1cnJlbnRQcmljZU9yRmFpbAAACQBrAwkAZQIFFHRyZWFzdXJ5UmV3YXJkT3JGYWlsBQxjYWxsZXJSZXdhcmQFBlNDQUxFOAUSY3VycmVudFByaWNlT3JGYWlsAAAEFGZhY3RvcnlBY3Rpb25zU2luZ2xlCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCC3N0cmluZ0VudHJ5CQDMCAIJARFrZXlCbG9ja1Byb2Nlc3NlZAEFEXRhcmdldEJsb2NrSGVpZ2h0CQDMCAIJALkJAgkAzAgCCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAMwIAgkApAMBBRNjdXJyZW50UGVyaW9kT3JGYWlsCQDMCAIJAKUIAQUJZ2VuZXJhdG9yCQDMCAIJANgEAQUQdXNlckFkZHJlc3NCeXRlcwkAzAgCCQCkAwEFFHRyZWFzdXJ5UmV3YXJkT3JGYWlsCQDMCAIJAKQDAQUMY2FsbGVyUmV3YXJkCQDMCAIJAKQDAQUNbHBBc3NldEFtb3VudAUDbmlsBQNTRVAFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCDGludGVnZXJFbnRyeQkAzAgCCQEMa2V5QXZhaWxhYmxlAQUJZ2VuZXJhdG9yCQDMCAIJAGQCBQlhdmFpbGFibGUFDWxwQXNzZXRBbW91bnQFA25pbAUDbmlsBQNuaWwDCQAAAgUUZmFjdG9yeUFjdGlvbnNTaW5nbGUFFGZhY3RvcnlBY3Rpb25zU2luZ2xlCQBkAgUDYWNjBQ1scEFzc2V0QW1vdW50CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBARsaXN0CQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQkAzAgCAAoJAMwIAgALCQDMCAIADAkAzAgCAA0JAMwIAgAOCQDMCAIADwkAzAgCABAJAMwIAgARCQDMCAIAEgkAzAgCABMJAMwIAgAUCQDMCAIAFQkAzAgCABYJAMwIAgAXCQDMCAIAGAkAzAgCABkJAMwIAgAaCQDMCAIAGwkAzAgCABwJAMwIAgAdCQDMCAIAHgkAzAgCAB8JAMwIAgAgCQDMCAIAIQkAzAgCACIJAMwIAgAjCQDMCAIAJAkAzAgCACUJAMwIAgAmCQDMCAIAJwUDbmlsBBJscEFzc2V0QW1vdW50VG90YWwKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDbWFwAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA0MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoAwkAAAIFEmxwQXNzZXRBbW91bnRUb3RhbAUSbHBBc3NldEFtb3VudFRvdGFsBAdhY3Rpb25zCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCDXRyYW5zZmVyV2F2ZXMJAMwIAgUQdXNlckFkZHJlc3NCeXRlcwkAzAgCBRVibG9ja1Byb2Nlc3NpbmdSZXdhcmQFA25pbAUDbmlsCQDMCAIJAPwHBAUUZmFjdG9yeUFkZHJlc3NPckZhaWwCB3JlaXNzdWUJAMwIAgUSbHBBc3NldEFtb3VudFRvdGFsBQNuaWwFA25pbAkAzAgCCQD8BwQFFGZhY3RvcnlBZGRyZXNzT3JGYWlsAgxpbnRlZ2VyRW50cnkJAMwIAgkBFWtleU5leHRCbG9ja1RvUHJvY2VzcwAJAMwIAgkAZAIFEm5leHRCbG9ja1RvUHJvY2VzcwUZYmxvY2tzUHJvY2Vzc2luZ0JhdGNoU2l6ZQUDbmlsBQNuaWwFA25pbAMJAAACBQdhY3Rpb25zBQdhY3Rpb25zCQCUCgIFA25pbAUEdW5pdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXnAMJ6K",
    "height": 2635187,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2exwXVqToTEqykJyzsPpZ5H9hRhvUQxk17HzDyuyARnJ
Next: CK4sYcu67kpWrryazaT54bguTXR2LWzHnenFWnhhvLGn

Diff: 
Old
New
Differences
310
310
 
                    let bb = fraction(aX, c, ba)
311
311
 
                    let bc = valueOrElse(getInteger(T, H()), 0)
312
312
 
                    let bd = max([0, fraction(bc, bb, c)])
313
-
                    let be = if (if ((bd == 0))
313
+
                    let be = if ((size(ad.payments) > 0))
314
+
                        then ad.payments[0]
315
+
                        else unit
316
+
                    let bf = value(be).amount
317
+
                    let bg = value(be).assetId
318
+
                    let bh = if (if ((bd == 0))
314
319
 
                        then true
315
-
                        else if (if ((size(ad.payments) == 1))
316
-
                            then (ad.payments[0].assetId == unit)
320
+
                        else if (if ((be != unit))
321
+
                            then (bg == unit)
317
322
 
                            else false)
318
-
                            then (ad.payments[0].amount >= bd)
323
+
                            then (bf >= bd)
319
324
 
                            else false)
320
325
 
                        then true
321
326
 
                        else j(("invalid payments, payment amount min: " + toString(bd)))
322
-
                    if ((be == be))
327
+
                    if ((bh == bh))
323
328
 
                        then {
329
+
                            let bi = if ((be != unit))
330
+
                                then [ScriptTransfer(T, bf, bg)]
331
+
                                else nil
324
332
 
                            let aw = [invoke(T, "integerEntry", [y(), aZ], nil), invoke(T, "integerEntry", [z(aZ), bb], nil), invoke(T, "integerEntry", [B(aZ), (aG + 1)], nil), invoke(T, "burn", [bc], nil), invoke(T, "integerEntry", [H(), 0], nil)]
325
-
                            $Tuple2(nil, aw)
333
+
                            $Tuple2(bi, aw)
326
334
 
                            }
327
335
 
                        else throw("Strict value is not equal to itself.")
328
336
 
                    }
341
349
 
            let w = Address(as)
342
350
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
343
351
 
            let aE = valueOrErrorMessage(getInteger(T, z(aB)), h("invalid price"))
344
-
            let bf = if ((size(ad.payments) == 1))
352
+
            let bj = if ((size(ad.payments) == 1))
345
353
 
                then ad.payments[0]
346
354
 
                else j("invalid payments")
347
-
            let bg = if (if ((bf.assetId == unit))
348
-
                then (bf.amount > 0)
355
+
            let bk = if (if ((bj.assetId == unit))
356
+
                then (bj.amount > 0)
349
357
 
                else false)
350
-
                then bf.amount
358
+
                then $Tuple2(bj.amount, bj.assetId)
351
359
 
                else j("invalid payment amount")
360
+
            let bf = bk._1
361
+
            let bg = bk._2
352
362
 
            let M = if ((aE > 0))
353
-
                then fraction(bg, c, aE)
363
+
                then fraction(bf, c, aE)
354
364
 
                else 0
355
-
            let bh = valueOrElse(getInteger(T, u(unit)), 0)
356
-
            let aw = [invoke(T, "integerEntry", [u(unit), (bh + bg)], nil), invoke(T, "reissue", [M], nil), invoke(T, "transferAsset", [as, M, X], nil), invoke(T, "transferWaves", [ab.bytes, bg], [AttachedPayment(unit, bg)])]
357
-
            $Tuple2(nil, aw)
365
+
            let bl = valueOrElse(getInteger(T, u(unit)), 0)
366
+
            let bi = [ScriptTransfer(ab, bf, bg)]
367
+
            let aw = [invoke(T, "integerEntry", [u(unit), (bl + bf)], nil), invoke(T, "reissue", [M], nil), invoke(T, "transferAsset", [as, M, X], nil)]
368
+
            $Tuple2(bi, aw)
358
369
 
            }
359
370
 
        else throw("Strict value is not equal to itself.")
360
371
 
    }
368
379
 
        then {
369
380
 
            let w = Address(as)
370
381
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
371
-
            let bf = if ((size(ad.payments) == 1))
382
+
            let bj = if ((size(ad.payments) == 1))
372
383
 
                then ad.payments[0]
373
384
 
                else j(h("invalid payments"))
374
-
            let bi = if ((bf.assetId == X))
385
+
            let bg = if ((bj.assetId == X))
375
386
 
                then X
376
387
 
                else j("invalid payment asset")
377
-
            let bg = if ((bf.amount > 0))
378
-
                then bf.amount
388
+
            let bf = if ((bj.amount > 0))
389
+
                then bj.amount
379
390
 
                else j("invalid payment amount")
380
-
            let bj = valueOrElse(getInteger(T, H()), 0)
381
-
            let aw = [invoke(T, "integerEntry", [H(), (bj + bg)], nil), invoke(T, "stringEntry", [I(w, ad.transactionId), K(e, bg, (aB + 1), unit)], nil)]
391
+
            let bm = valueOrElse(getInteger(T, H()), 0)
392
+
            let bi = [ScriptTransfer(T, bf, bg)]
393
+
            let aw = [invoke(T, "integerEntry", [H(), (bm + bf)], nil), invoke(T, "stringEntry", [I(w, ad.transactionId), K(e, bf, (aB + 1), unit)], nil)]
382
394
 
            if ((aw == aw))
383
-
                then $Tuple2([ScriptTransfer(T, bg, bi)], aw)
395
+
                then $Tuple2(bi, aw)
384
396
 
                else throw("Strict value is not equal to itself.")
385
397
 
            }
386
398
 
        else throw("Strict value is not equal to itself.")
394
406
 
    if ((at == at))
395
407
 
        then {
396
408
 
            let w = Address(as)
397
-
            let bk = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
409
+
            let bn = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
398
410
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
399
-
            let bl = Q(bk)
400
-
            let L = bl._1
401
-
            let M = bl._2
402
-
            let N = bl._3
403
-
            let O = bl._4
411
+
            let bo = Q(bn)
412
+
            let L = bo._1
413
+
            let M = bo._2
414
+
            let N = bo._3
415
+
            let O = bo._4
404
416
 
            let aH = [if ((L == e))
405
417
 
                then true
406
418
 
                else j("invalid withdrawal request status"), if ((N > aB))
408
420
 
                else j("invalid withdrawal request period")]
409
421
 
            if ((aH == aH))
410
422
 
                then {
411
-
                    let bj = valueOrErrorMessage(getInteger(T, H()), h("invalid total withdrawal amount"))
412
-
                    let aw = [invoke(T, "integerEntry", [H(), if ((bj >= M))
413
-
                        then (bj - M)
423
+
                    let bm = valueOrErrorMessage(getInteger(T, H()), h("invalid total withdrawal amount"))
424
+
                    let aw = [invoke(T, "integerEntry", [H(), if ((bm >= M))
425
+
                        then (bm - M)
414
426
 
                        else j("invalid withdrawal amount")], nil), invoke(T, "deleteEntry", [I(w, J)], nil), invoke(T, "transferAsset", [as, M, X], nil)]
415
427
 
                    if ((aw == aw))
416
428
 
                        then $Tuple2(nil, aw)
430
442
 
        then {
431
443
 
            let w = Address(as)
432
444
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
433
-
            let bk = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
434
-
            let bm = Q(bk)
435
-
            let L = bm._1
436
-
            let M = bm._2
437
-
            let N = bm._3
438
-
            let O = bm._4
445
+
            let bn = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
446
+
            let bp = Q(bn)
447
+
            let L = bp._1
448
+
            let M = bp._2
449
+
            let N = bp._3
450
+
            let O = bp._4
439
451
 
            if ((L == f))
440
452
 
                then j("invalid withdrawal request status")
441
453
 
                else if ((N > aB))
442
454
 
                    then j("invalid withdrawal request period")
443
455
 
                    else {
444
-
                        let bn = valueOrErrorMessage(getInteger(T, z(N)), h("invalid price"))
445
-
                        let bo = if ((bn > 0))
446
-
                            then fraction(M, bn, c)
456
+
                        let bq = valueOrErrorMessage(getInteger(T, z(N)), h("invalid price"))
457
+
                        let br = if ((bq > 0))
458
+
                            then fraction(M, bq, c)
447
459
 
                            else 0
448
-
                        let aw = [invoke(T, "stringEntry", [I(w, J), K(f, M, N, ad.transactionId)], nil), invoke(T, "burn", [M], nil), invoke(T, "transferWaves", [as, bo], nil)]
460
+
                        let aw = [invoke(T, "stringEntry", [I(w, J), K(f, M, N, ad.transactionId)], nil), invoke(T, "burn", [M], nil), invoke(T, "transferWaves", [as, br], nil)]
449
461
 
                        $Tuple2(nil, aw)
450
462
 
                        }
451
463
 
            }
466
478
 
            let aE = valueOrErrorMessage(getInteger(T, z(aB)), h("invalid price"))
467
479
 
            let aF = valueOrErrorMessage(getInteger(T, E()), h("invalid next block to process"))
468
480
 
            let aG = ((aD + aC) - 1)
469
-
            let bp = 40
470
-
            let bq = if (if (if ((height >= aF))
481
+
            let bs = 40
482
+
            let bt = if (if (if ((height >= aF))
471
483
 
                then if ((aF >= aD))
472
484
 
                    then true
473
485
 
                    else (aB == 0)
474
486
 
                else false)
475
487
 
                then (aG >= aF)
476
488
 
                else false)
477
-
                then min([((aG - aF) + 1), bp])
489
+
                then min([((aG - aF) + 1), bs])
478
490
 
                else j(h("invalid target block"))
479
-
            let br = valueOrErrorMessage(getInteger(T, D()), h("invalid block processing reward"))
480
-
            let bs = (br / bq)
481
-
            let bt = (br - (bs * bq))
482
-
            func bu (bv,bw) =             if ((bw >= bq))
483
-
                then bv
491
+
            let bu = valueOrErrorMessage(getInteger(T, D()), h("invalid block processing reward"))
492
+
            let bv = (bu / bt)
493
+
            let bw = (bu - (bv * bt))
494
+
            func bx (by,bz) =             if ((bz >= bt))
495
+
                then by
484
496
 
                else {
485
-
                    let bx = (aF + bw)
486
-
                    let by = valueOrErrorMessage(blockInfoByHeight(bx), h("invalid block info"))
487
-
                    let bz = valueOrErrorMessage(ag(by.rewards, ab), h(("invalid treasury reward for height " + toString(bx))))
488
-
                    let bA = by.generator
489
-
                    let au = valueOrElse(getInteger(T, v(bA)), 0)
490
-
                    let bB = if ((bw == (bq - 1)))
491
-
                        then (bs + bt)
492
-
                        else bs
497
+
                    let bA = (aF + bz)
498
+
                    let bB = valueOrErrorMessage(blockInfoByHeight(bA), h("invalid block info"))
499
+
                    let bC = valueOrErrorMessage(ag(bB.rewards, ab), h(("invalid treasury reward for height " + toString(bA))))
500
+
                    let bD = bB.generator
501
+
                    let au = valueOrElse(getInteger(T, v(bD)), 0)
502
+
                    let bE = if ((bz == (bt - 1)))
503
+
                        then (bv + bw)
504
+
                        else bv
493
505
 
                    let M = if ((aE > 0))
494
-
                        then fraction((bz - bB), c, aE)
506
+
                        then fraction((bC - bE), c, aE)
495
507
 
                        else 0
496
-
                    let bC = [invoke(T, "stringEntry", [F(bx), makeString([toBase58String(ad.transactionId), toString(aB), toString(bA), toBase58String(as), toString(bz), toString(bB), toString(M)], a)], nil), invoke(T, "integerEntry", [v(bA), (au + M)], nil)]
497
-
                    if ((bC == bC))
498
-
                        then (bv + M)
508
+
                    let bF = [invoke(T, "stringEntry", [F(bA), makeString([toBase58String(ad.transactionId), toString(aB), toString(bD), toBase58String(as), toString(bC), toString(bE), toString(M)], a)], nil), invoke(T, "integerEntry", [v(bD), (au + M)], nil)]
509
+
                    if ((bF == bF))
510
+
                        then (by + M)
499
511
 
                        else throw("Strict value is not equal to itself.")
500
512
 
                    }
501
513
 
502
-
            let bD = [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]
503
-
            let bE = {
504
-
                let bF = bD
505
-
                let bG = size(bF)
506
-
                let bH = 0
507
-
                func bI (bJ,bK) =                 if ((bK >= bG))
508
-
                    then bJ
509
-
                    else bu(bJ, bF[bK])
514
+
            let bG = [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]
515
+
            let bH = {
516
+
                let bI = bG
517
+
                let bJ = size(bI)
518
+
                let bK = 0
519
+
                func bL (bM,bN) =                 if ((bN >= bJ))
520
+
                    then bM
521
+
                    else bx(bM, bI[bN])
510
522
 
511
-
                func bL (bJ,bK) =                 if ((bK >= bG))
512
-
                    then bJ
523
+
                func bO (bM,bN) =                 if ((bN >= bJ))
524
+
                    then bM
513
525
 
                    else throw("List size exceeds 40")
514
526
 
515
-
                bL(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bH, 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)
527
+
                bO(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bK, 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)
516
528
 
                }
517
-
            if ((bE == bE))
529
+
            if ((bH == bH))
518
530
 
                then {
519
-
                    let bM = [invoke(T, "transferWaves", [as, br], nil), invoke(T, "reissue", [bE], nil), invoke(T, "integerEntry", [E(), (aF + bq)], nil)]
520
-
                    if ((bM == bM))
531
+
                    let bi = [invoke(T, "transferWaves", [as, bu], nil), invoke(T, "reissue", [bH], nil), invoke(T, "integerEntry", [E(), (aF + bt)], nil)]
532
+
                    if ((bi == bi))
521
533
 
                        then $Tuple2(nil, unit)
522
534
 
                        else throw("Strict value is not equal to itself.")
523
535
 
                    }
527
539
 
    }
528
540
 
529
541
 
530
-
@Verifier(bN)
531
-
func bO () = sigVerify(bN.bodyBytes, bN.proofs[0], bN.senderPublicKey)
542
+
@Verifier(bP)
543
+
func bQ () = sigVerify(bP.bodyBytes, bP.proofs[0], bP.senderPublicKey)
532
544
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 7 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = "__"
5
5
 
6
6
 
let b = "calculator.ride"
7
7
 
8
8
 
let c = 100000000
9
9
 
10
10
 
let d = 1000000
11
11
 
12
12
 
let e = "PENDING"
13
13
 
14
14
 
let f = "FINISHED"
15
15
 
16
16
 
let g = "WAVES"
17
17
 
18
18
 
func h (i) = ((b + ": ") + i)
19
19
 
20
20
 
21
21
 
func j (i) = throw(h(i))
22
22
 
23
23
 
24
24
 
func k (l) = {
25
25
 
    let m = l
26
26
 
    if ($isInstanceOf(m, "ByteVector"))
27
27
 
        then {
28
28
 
            let n = m
29
29
 
            toBase58String(n)
30
30
 
            }
31
31
 
        else if ($isInstanceOf(m, "Unit"))
32
32
 
            then g
33
33
 
            else throw("Match error")
34
34
 
    }
35
35
 
36
36
 
37
37
 
func o (p) = if ((0 > p))
38
38
 
    then -(p)
39
39
 
    else p
40
40
 
41
41
 
42
42
 
func q () = makeString(["%s", "factory"], a)
43
43
 
44
44
 
45
45
 
func r () = makeString(["%s", "lpAssetId"], a)
46
46
 
47
47
 
48
48
 
func s () = makeString(["%s", "xtnAssetId"], a)
49
49
 
50
50
 
51
51
 
func t () = makeString(["%s", "treasury"], a)
52
52
 
53
53
 
54
54
 
func u (l) = makeString(["%s%s", "invested", k(l)], a)
55
55
 
56
56
 
57
57
 
func v (w) = makeString(["%s%s", "available", toString(w)], a)
58
58
 
59
59
 
60
60
 
func x (w) = makeString(["%s%s", "claimed", toString(w)], a)
61
61
 
62
62
 
63
63
 
func y () = makeString(["%s", "currentPeriod"], a)
64
64
 
65
65
 
66
66
 
func z (A) = makeString(["%s%d", "price", toString(A)], a)
67
67
 
68
68
 
69
69
 
func B (A) = makeString(["%s%d", "startHeight", toString(A)], a)
70
70
 
71
71
 
72
72
 
func C () = "%s__periodLength"
73
73
 
74
74
 
75
75
 
func D () = "%s__blockProcessingReward"
76
76
 
77
77
 
78
78
 
func E () = "%s__nextBlockToProcess"
79
79
 
80
80
 
81
81
 
func F (G) = makeString(["%s%d", "blockProcessed", toString(G)], a)
82
82
 
83
83
 
84
84
 
func H () = "%s__withdrawal"
85
85
 
86
86
 
87
87
 
func I (w,J) = makeString(["%s%s%s", "withdrawal", toString(w), toBase58String(J)], a)
88
88
 
89
89
 
90
90
 
func K (L,M,N,O) = {
91
91
 
    let P = {
92
92
 
        let m = O
93
93
 
        if ($isInstanceOf(m, "ByteVector"))
94
94
 
            then {
95
95
 
                let n = m
96
96
 
                toBase58String(n)
97
97
 
                }
98
98
 
            else if ($isInstanceOf(m, "Unit"))
99
99
 
                then "SOON"
100
100
 
                else throw("Match error")
101
101
 
        }
102
102
 
    makeString(["%s%d%d%s", L, toString(M), toString(N), P], a)
103
103
 
    }
104
104
 
105
105
 
106
106
 
func Q (i) = {
107
107
 
    let R = split(i, a)
108
108
 
    if ((size(R) == 5))
109
109
 
        then {
110
110
 
            let L = R[1]
111
111
 
            let M = valueOrErrorMessage(parseInt(R[2]), h("invalid lpAssetAmount"))
112
112
 
            let N = valueOrErrorMessage(parseInt(R[3]), h("invalid targetPeriod"))
113
113
 
            let O = R[4]
114
114
 
            $Tuple4(L, M, N, O)
115
115
 
            }
116
116
 
        else j("invalid withdrawal request value")
117
117
 
    }
118
118
 
119
119
 
120
120
 
let S = {
121
121
 
    let m = getString(this, q())
122
122
 
    if ($isInstanceOf(m, "String"))
123
123
 
        then {
124
124
 
            let i = m
125
125
 
            addressFromString(i)
126
126
 
            }
127
127
 
        else if ($isInstanceOf(m, "Unit"))
128
128
 
            then unit
129
129
 
            else throw("Match error")
130
130
 
    }
131
131
 
132
132
 
let T = valueOrErrorMessage(S, h("invalid factory address"))
133
133
 
134
134
 
let U = {
135
135
 
    let m = S
136
136
 
    if ($isInstanceOf(m, "Address"))
137
137
 
        then {
138
138
 
            let V = m
139
139
 
            let W = getString(V, r())
140
140
 
            if ($isInstanceOf(W, "String"))
141
141
 
                then {
142
142
 
                    let i = W
143
143
 
                    fromBase58String(i)
144
144
 
                    }
145
145
 
                else if ($isInstanceOf(W, "Unit"))
146
146
 
                    then unit
147
147
 
                    else throw("Match error")
148
148
 
            }
149
149
 
        else if ($isInstanceOf(m, "Unit"))
150
150
 
            then unit
151
151
 
            else throw("Match error")
152
152
 
    }
153
153
 
154
154
 
let X = valueOrErrorMessage(U, h("invalid lpAssetId"))
155
155
 
156
156
 
let Y = {
157
157
 
    let m = S
158
158
 
    if ($isInstanceOf(m, "Address"))
159
159
 
        then {
160
160
 
            let V = m
161
161
 
            let W = getString(V, s())
162
162
 
            if ($isInstanceOf(W, "String"))
163
163
 
                then {
164
164
 
                    let i = W
165
165
 
                    fromBase58String(i)
166
166
 
                    }
167
167
 
                else if ($isInstanceOf(W, "Unit"))
168
168
 
                    then unit
169
169
 
                    else throw("Match error")
170
170
 
            }
171
171
 
        else if ($isInstanceOf(m, "Unit"))
172
172
 
            then unit
173
173
 
            else throw("Match error")
174
174
 
    }
175
175
 
176
176
 
let Z = valueOrErrorMessage(Y, h("invalid xtnAssetId"))
177
177
 
178
178
 
let aa = {
179
179
 
    let m = S
180
180
 
    if ($isInstanceOf(m, "Address"))
181
181
 
        then {
182
182
 
            let V = m
183
183
 
            let W = getString(V, t())
184
184
 
            if ($isInstanceOf(W, "String"))
185
185
 
                then {
186
186
 
                    let i = W
187
187
 
                    addressFromString(i)
188
188
 
                    }
189
189
 
                else if ($isInstanceOf(W, "Unit"))
190
190
 
                    then unit
191
191
 
                    else throw("Match error")
192
192
 
            }
193
193
 
        else if ($isInstanceOf(m, "Unit"))
194
194
 
            then unit
195
195
 
            else throw("Match error")
196
196
 
    }
197
197
 
198
198
 
let ab = valueOrErrorMessage(aa, h("invalid treasury address"))
199
199
 
200
200
 
func ac (ad,ae) = if ((ad.caller == ae))
201
201
 
    then true
202
202
 
    else j("permission denied")
203
203
 
204
204
 
205
205
 
func af (ad) = ac(ad, T)
206
206
 
207
207
 
208
208
 
func ag (ah,ai) = {
209
209
 
    let i = size(ah)
210
210
 
    let aj = ah[0]
211
211
 
    let ak = aj._1
212
212
 
    let al = aj._2
213
213
 
    let am = ah[1]
214
214
 
    let an = am._1
215
215
 
    let ao = am._2
216
216
 
    let ap = ah[2]
217
217
 
    let aq = ap._1
218
218
 
    let ar = ap._2
219
219
 
    if (if ((i > 0))
220
220
 
        then (ak == ai)
221
221
 
        else false)
222
222
 
        then al
223
223
 
        else if (if ((i > 1))
224
224
 
            then (an == ai)
225
225
 
            else false)
226
226
 
            then ao
227
227
 
            else if (if ((i > 2))
228
228
 
                then (aq == ai)
229
229
 
                else false)
230
230
 
                then ar
231
231
 
                else unit
232
232
 
    }
233
233
 
234
234
 
235
235
 
@Callable(ad)
236
236
 
func claimLP (as) = {
237
237
 
    let at = af(ad)
238
238
 
    if ((at == at))
239
239
 
        then {
240
240
 
            let w = Address(as)
241
241
 
            let au = valueOrElse(getInteger(T, v(w)), 0)
242
242
 
            let av = valueOrElse(getInteger(T, x(w)), 0)
243
243
 
            let aw = if ((au > 0))
244
244
 
                then [invoke(T, "transferAsset", [as, au, X], nil), invoke(T, "integerEntry", [v(w), 0], nil), invoke(T, "integerEntry", [x(w), (av + au)], nil)]
245
245
 
                else j("nothing to claim")
246
246
 
            $Tuple2(nil, aw)
247
247
 
            }
248
248
 
        else throw("Strict value is not equal to itself.")
249
249
 
    }
250
250
 
251
251
 
252
252
 
253
253
 
@Callable(ad)
254
254
 
func finalize (as,ax,ay,az,aA) = {
255
255
 
    let at = af(ad)
256
256
 
    if ((at == at))
257
257
 
        then {
258
258
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
259
259
 
            let aC = valueOrErrorMessage(getInteger(T, C()), h("invalid period length"))
260
260
 
            let aD = valueOrErrorMessage(getInteger(T, B(aB)), h("invalid start height"))
261
261
 
            let aE = valueOrErrorMessage(getInteger(T, z(aB)), h("invalid price"))
262
262
 
            let aF = valueOrErrorMessage(getInteger(T, E()), h("invalid next block to process"))
263
263
 
            let aG = ((aD + aC) - 1)
264
264
 
            let aH = [if ((ad.originCaller == ab))
265
265
 
                then true
266
266
 
                else j("permission denied"), if ((aF > aG))
267
267
 
                then true
268
268
 
                else j("unprocessed blocks"), if ((ax >= 0))
269
269
 
                then true
270
270
 
                else j("invalid new treasury volume"), if ((ay >= 0))
271
271
 
                then true
272
272
 
                else j("invalid XTN price"), if (if ((az >= 0))
273
273
 
                then (c >= az)
274
274
 
                else false)
275
275
 
                then true
276
276
 
                else j("invalid PWR managers bonus"), if (if ((aA >= -(c)))
277
277
 
                then (c >= aA)
278
278
 
                else false)
279
279
 
                then true
280
280
 
                else j("invalid treasury volume diff allocation coefficient")]
281
281
 
            if ((aH == aH))
282
282
 
                then {
283
283
 
                    let aI = valueOrElse(getInteger(T, u(Z)), 0)
284
284
 
                    let aJ = valueOrElse(getInteger(T, u(unit)), 0)
285
285
 
                    let aK = fraction(aI, ay, d)
286
286
 
                    let aL = (aK + aJ)
287
287
 
                    let aM = (ax - aL)
288
288
 
                    let aN = if ((aM > 0))
289
289
 
                        then fraction(aM, az, c)
290
290
 
                        else 0
291
291
 
                    let aO = (aM - aN)
292
292
 
                    let aP = if ((aL > 0))
293
293
 
                        then fraction(aK, c, aL)
294
294
 
                        else 0
295
295
 
                    let aQ = fraction(aO, aP, c)
296
296
 
                    let aR = (aO - aQ)
297
297
 
                    let aS = o(aA)
298
298
 
                    let aT = fraction(aR, if ((0 > aA))
299
299
 
                        then aS
300
300
 
                        else 0, c)
301
301
 
                    let aU = fraction(aQ, if ((aA > 0))
302
302
 
                        then aS
303
303
 
                        else 0, c)
304
304
 
                    let aV = ((aQ - aU) + aT)
305
305
 
                    let aW = ((aR - aT) + aU)
306
306
 
                    let aX = (aJ + aW)
307
307
 
                    let aY = fraction((aK + aV), d, ay)
308
308
 
                    let aZ = (aB + 1)
309
309
 
                    let ba = valueOrErrorMessage(assetInfo(X), h("invalid lpAsset info")).quantity
310
310
 
                    let bb = fraction(aX, c, ba)
311
311
 
                    let bc = valueOrElse(getInteger(T, H()), 0)
312
312
 
                    let bd = max([0, fraction(bc, bb, c)])
313
-
                    let be = if (if ((bd == 0))
313
+
                    let be = if ((size(ad.payments) > 0))
314
+
                        then ad.payments[0]
315
+
                        else unit
316
+
                    let bf = value(be).amount
317
+
                    let bg = value(be).assetId
318
+
                    let bh = if (if ((bd == 0))
314
319
 
                        then true
315
-
                        else if (if ((size(ad.payments) == 1))
316
-
                            then (ad.payments[0].assetId == unit)
320
+
                        else if (if ((be != unit))
321
+
                            then (bg == unit)
317
322
 
                            else false)
318
-
                            then (ad.payments[0].amount >= bd)
323
+
                            then (bf >= bd)
319
324
 
                            else false)
320
325
 
                        then true
321
326
 
                        else j(("invalid payments, payment amount min: " + toString(bd)))
322
-
                    if ((be == be))
327
+
                    if ((bh == bh))
323
328
 
                        then {
329
+
                            let bi = if ((be != unit))
330
+
                                then [ScriptTransfer(T, bf, bg)]
331
+
                                else nil
324
332
 
                            let aw = [invoke(T, "integerEntry", [y(), aZ], nil), invoke(T, "integerEntry", [z(aZ), bb], nil), invoke(T, "integerEntry", [B(aZ), (aG + 1)], nil), invoke(T, "burn", [bc], nil), invoke(T, "integerEntry", [H(), 0], nil)]
325
-
                            $Tuple2(nil, aw)
333
+
                            $Tuple2(bi, aw)
326
334
 
                            }
327
335
 
                        else throw("Strict value is not equal to itself.")
328
336
 
                    }
329
337
 
                else throw("Strict value is not equal to itself.")
330
338
 
            }
331
339
 
        else throw("Strict value is not equal to itself.")
332
340
 
    }
333
341
 
334
342
 
335
343
 
336
344
 
@Callable(ad)
337
345
 
func invest (as) = {
338
346
 
    let at = af(ad)
339
347
 
    if ((at == at))
340
348
 
        then {
341
349
 
            let w = Address(as)
342
350
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
343
351
 
            let aE = valueOrErrorMessage(getInteger(T, z(aB)), h("invalid price"))
344
-
            let bf = if ((size(ad.payments) == 1))
352
+
            let bj = if ((size(ad.payments) == 1))
345
353
 
                then ad.payments[0]
346
354
 
                else j("invalid payments")
347
-
            let bg = if (if ((bf.assetId == unit))
348
-
                then (bf.amount > 0)
355
+
            let bk = if (if ((bj.assetId == unit))
356
+
                then (bj.amount > 0)
349
357
 
                else false)
350
-
                then bf.amount
358
+
                then $Tuple2(bj.amount, bj.assetId)
351
359
 
                else j("invalid payment amount")
360
+
            let bf = bk._1
361
+
            let bg = bk._2
352
362
 
            let M = if ((aE > 0))
353
-
                then fraction(bg, c, aE)
363
+
                then fraction(bf, c, aE)
354
364
 
                else 0
355
-
            let bh = valueOrElse(getInteger(T, u(unit)), 0)
356
-
            let aw = [invoke(T, "integerEntry", [u(unit), (bh + bg)], nil), invoke(T, "reissue", [M], nil), invoke(T, "transferAsset", [as, M, X], nil), invoke(T, "transferWaves", [ab.bytes, bg], [AttachedPayment(unit, bg)])]
357
-
            $Tuple2(nil, aw)
365
+
            let bl = valueOrElse(getInteger(T, u(unit)), 0)
366
+
            let bi = [ScriptTransfer(ab, bf, bg)]
367
+
            let aw = [invoke(T, "integerEntry", [u(unit), (bl + bf)], nil), invoke(T, "reissue", [M], nil), invoke(T, "transferAsset", [as, M, X], nil)]
368
+
            $Tuple2(bi, aw)
358
369
 
            }
359
370
 
        else throw("Strict value is not equal to itself.")
360
371
 
    }
361
372
 
362
373
 
363
374
 
364
375
 
@Callable(ad)
365
376
 
func withdraw (as) = {
366
377
 
    let at = af(ad)
367
378
 
    if ((at == at))
368
379
 
        then {
369
380
 
            let w = Address(as)
370
381
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
371
-
            let bf = if ((size(ad.payments) == 1))
382
+
            let bj = if ((size(ad.payments) == 1))
372
383
 
                then ad.payments[0]
373
384
 
                else j(h("invalid payments"))
374
-
            let bi = if ((bf.assetId == X))
385
+
            let bg = if ((bj.assetId == X))
375
386
 
                then X
376
387
 
                else j("invalid payment asset")
377
-
            let bg = if ((bf.amount > 0))
378
-
                then bf.amount
388
+
            let bf = if ((bj.amount > 0))
389
+
                then bj.amount
379
390
 
                else j("invalid payment amount")
380
-
            let bj = valueOrElse(getInteger(T, H()), 0)
381
-
            let aw = [invoke(T, "integerEntry", [H(), (bj + bg)], nil), invoke(T, "stringEntry", [I(w, ad.transactionId), K(e, bg, (aB + 1), unit)], nil)]
391
+
            let bm = valueOrElse(getInteger(T, H()), 0)
392
+
            let bi = [ScriptTransfer(T, bf, bg)]
393
+
            let aw = [invoke(T, "integerEntry", [H(), (bm + bf)], nil), invoke(T, "stringEntry", [I(w, ad.transactionId), K(e, bf, (aB + 1), unit)], nil)]
382
394
 
            if ((aw == aw))
383
-
                then $Tuple2([ScriptTransfer(T, bg, bi)], aw)
395
+
                then $Tuple2(bi, aw)
384
396
 
                else throw("Strict value is not equal to itself.")
385
397
 
            }
386
398
 
        else throw("Strict value is not equal to itself.")
387
399
 
    }
388
400
 
389
401
 
390
402
 
391
403
 
@Callable(ad)
392
404
 
func cancelWithdraw (as,J) = {
393
405
 
    let at = af(ad)
394
406
 
    if ((at == at))
395
407
 
        then {
396
408
 
            let w = Address(as)
397
-
            let bk = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
409
+
            let bn = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
398
410
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
399
-
            let bl = Q(bk)
400
-
            let L = bl._1
401
-
            let M = bl._2
402
-
            let N = bl._3
403
-
            let O = bl._4
411
+
            let bo = Q(bn)
412
+
            let L = bo._1
413
+
            let M = bo._2
414
+
            let N = bo._3
415
+
            let O = bo._4
404
416
 
            let aH = [if ((L == e))
405
417
 
                then true
406
418
 
                else j("invalid withdrawal request status"), if ((N > aB))
407
419
 
                then true
408
420
 
                else j("invalid withdrawal request period")]
409
421
 
            if ((aH == aH))
410
422
 
                then {
411
-
                    let bj = valueOrErrorMessage(getInteger(T, H()), h("invalid total withdrawal amount"))
412
-
                    let aw = [invoke(T, "integerEntry", [H(), if ((bj >= M))
413
-
                        then (bj - M)
423
+
                    let bm = valueOrErrorMessage(getInteger(T, H()), h("invalid total withdrawal amount"))
424
+
                    let aw = [invoke(T, "integerEntry", [H(), if ((bm >= M))
425
+
                        then (bm - M)
414
426
 
                        else j("invalid withdrawal amount")], nil), invoke(T, "deleteEntry", [I(w, J)], nil), invoke(T, "transferAsset", [as, M, X], nil)]
415
427
 
                    if ((aw == aw))
416
428
 
                        then $Tuple2(nil, aw)
417
429
 
                        else throw("Strict value is not equal to itself.")
418
430
 
                    }
419
431
 
                else throw("Strict value is not equal to itself.")
420
432
 
            }
421
433
 
        else throw("Strict value is not equal to itself.")
422
434
 
    }
423
435
 
424
436
 
425
437
 
426
438
 
@Callable(ad)
427
439
 
func claimWaves (as,J) = {
428
440
 
    let at = af(ad)
429
441
 
    if ((at == at))
430
442
 
        then {
431
443
 
            let w = Address(as)
432
444
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
433
-
            let bk = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
434
-
            let bm = Q(bk)
435
-
            let L = bm._1
436
-
            let M = bm._2
437
-
            let N = bm._3
438
-
            let O = bm._4
445
+
            let bn = valueOrErrorMessage(getString(T, I(w, J)), h("invalid withdrawal request"))
446
+
            let bp = Q(bn)
447
+
            let L = bp._1
448
+
            let M = bp._2
449
+
            let N = bp._3
450
+
            let O = bp._4
439
451
 
            if ((L == f))
440
452
 
                then j("invalid withdrawal request status")
441
453
 
                else if ((N > aB))
442
454
 
                    then j("invalid withdrawal request period")
443
455
 
                    else {
444
-
                        let bn = valueOrErrorMessage(getInteger(T, z(N)), h("invalid price"))
445
-
                        let bo = if ((bn > 0))
446
-
                            then fraction(M, bn, c)
456
+
                        let bq = valueOrErrorMessage(getInteger(T, z(N)), h("invalid price"))
457
+
                        let br = if ((bq > 0))
458
+
                            then fraction(M, bq, c)
447
459
 
                            else 0
448
-
                        let aw = [invoke(T, "stringEntry", [I(w, J), K(f, M, N, ad.transactionId)], nil), invoke(T, "burn", [M], nil), invoke(T, "transferWaves", [as, bo], nil)]
460
+
                        let aw = [invoke(T, "stringEntry", [I(w, J), K(f, M, N, ad.transactionId)], nil), invoke(T, "burn", [M], nil), invoke(T, "transferWaves", [as, br], nil)]
449
461
 
                        $Tuple2(nil, aw)
450
462
 
                        }
451
463
 
            }
452
464
 
        else throw("Strict value is not equal to itself.")
453
465
 
    }
454
466
 
455
467
 
456
468
 
457
469
 
@Callable(ad)
458
470
 
func processBlocks (as) = {
459
471
 
    let at = af(ad)
460
472
 
    if ((at == at))
461
473
 
        then {
462
474
 
            let w = Address(as)
463
475
 
            let aB = valueOrErrorMessage(getInteger(T, y()), h("invalid period"))
464
476
 
            let aC = valueOrErrorMessage(getInteger(T, C()), h("invalid period length"))
465
477
 
            let aD = valueOrErrorMessage(getInteger(T, B(aB)), h("invalid start height"))
466
478
 
            let aE = valueOrErrorMessage(getInteger(T, z(aB)), h("invalid price"))
467
479
 
            let aF = valueOrErrorMessage(getInteger(T, E()), h("invalid next block to process"))
468
480
 
            let aG = ((aD + aC) - 1)
469
-
            let bp = 40
470
-
            let bq = if (if (if ((height >= aF))
481
+
            let bs = 40
482
+
            let bt = if (if (if ((height >= aF))
471
483
 
                then if ((aF >= aD))
472
484
 
                    then true
473
485
 
                    else (aB == 0)
474
486
 
                else false)
475
487
 
                then (aG >= aF)
476
488
 
                else false)
477
-
                then min([((aG - aF) + 1), bp])
489
+
                then min([((aG - aF) + 1), bs])
478
490
 
                else j(h("invalid target block"))
479
-
            let br = valueOrErrorMessage(getInteger(T, D()), h("invalid block processing reward"))
480
-
            let bs = (br / bq)
481
-
            let bt = (br - (bs * bq))
482
-
            func bu (bv,bw) =             if ((bw >= bq))
483
-
                then bv
491
+
            let bu = valueOrErrorMessage(getInteger(T, D()), h("invalid block processing reward"))
492
+
            let bv = (bu / bt)
493
+
            let bw = (bu - (bv * bt))
494
+
            func bx (by,bz) =             if ((bz >= bt))
495
+
                then by
484
496
 
                else {
485
-
                    let bx = (aF + bw)
486
-
                    let by = valueOrErrorMessage(blockInfoByHeight(bx), h("invalid block info"))
487
-
                    let bz = valueOrErrorMessage(ag(by.rewards, ab), h(("invalid treasury reward for height " + toString(bx))))
488
-
                    let bA = by.generator
489
-
                    let au = valueOrElse(getInteger(T, v(bA)), 0)
490
-
                    let bB = if ((bw == (bq - 1)))
491
-
                        then (bs + bt)
492
-
                        else bs
497
+
                    let bA = (aF + bz)
498
+
                    let bB = valueOrErrorMessage(blockInfoByHeight(bA), h("invalid block info"))
499
+
                    let bC = valueOrErrorMessage(ag(bB.rewards, ab), h(("invalid treasury reward for height " + toString(bA))))
500
+
                    let bD = bB.generator
501
+
                    let au = valueOrElse(getInteger(T, v(bD)), 0)
502
+
                    let bE = if ((bz == (bt - 1)))
503
+
                        then (bv + bw)
504
+
                        else bv
493
505
 
                    let M = if ((aE > 0))
494
-
                        then fraction((bz - bB), c, aE)
506
+
                        then fraction((bC - bE), c, aE)
495
507
 
                        else 0
496
-
                    let bC = [invoke(T, "stringEntry", [F(bx), makeString([toBase58String(ad.transactionId), toString(aB), toString(bA), toBase58String(as), toString(bz), toString(bB), toString(M)], a)], nil), invoke(T, "integerEntry", [v(bA), (au + M)], nil)]
497
-
                    if ((bC == bC))
498
-
                        then (bv + M)
508
+
                    let bF = [invoke(T, "stringEntry", [F(bA), makeString([toBase58String(ad.transactionId), toString(aB), toString(bD), toBase58String(as), toString(bC), toString(bE), toString(M)], a)], nil), invoke(T, "integerEntry", [v(bD), (au + M)], nil)]
509
+
                    if ((bF == bF))
510
+
                        then (by + M)
499
511
 
                        else throw("Strict value is not equal to itself.")
500
512
 
                    }
501
513
 
502
-
            let bD = [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]
503
-
            let bE = {
504
-
                let bF = bD
505
-
                let bG = size(bF)
506
-
                let bH = 0
507
-
                func bI (bJ,bK) =                 if ((bK >= bG))
508
-
                    then bJ
509
-
                    else bu(bJ, bF[bK])
514
+
            let bG = [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]
515
+
            let bH = {
516
+
                let bI = bG
517
+
                let bJ = size(bI)
518
+
                let bK = 0
519
+
                func bL (bM,bN) =                 if ((bN >= bJ))
520
+
                    then bM
521
+
                    else bx(bM, bI[bN])
510
522
 
511
-
                func bL (bJ,bK) =                 if ((bK >= bG))
512
-
                    then bJ
523
+
                func bO (bM,bN) =                 if ((bN >= bJ))
524
+
                    then bM
513
525
 
                    else throw("List size exceeds 40")
514
526
 
515
-
                bL(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bI(bH, 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)
527
+
                bO(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bL(bK, 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)
516
528
 
                }
517
-
            if ((bE == bE))
529
+
            if ((bH == bH))
518
530
 
                then {
519
-
                    let bM = [invoke(T, "transferWaves", [as, br], nil), invoke(T, "reissue", [bE], nil), invoke(T, "integerEntry", [E(), (aF + bq)], nil)]
520
-
                    if ((bM == bM))
531
+
                    let bi = [invoke(T, "transferWaves", [as, bu], nil), invoke(T, "reissue", [bH], nil), invoke(T, "integerEntry", [E(), (aF + bt)], nil)]
532
+
                    if ((bi == bi))
521
533
 
                        then $Tuple2(nil, unit)
522
534
 
                        else throw("Strict value is not equal to itself.")
523
535
 
                    }
524
536
 
                else throw("Strict value is not equal to itself.")
525
537
 
            }
526
538
 
        else throw("Strict value is not equal to itself.")
527
539
 
    }
528
540
 
529
541
 
530
-
@Verifier(bN)
531
-
func bO () = sigVerify(bN.bodyBytes, bN.proofs[0], bN.senderPublicKey)
542
+
@Verifier(bP)
543
+
func bQ () = sigVerify(bP.bodyBytes, bP.proofs[0], bP.senderPublicKey)
532
544
 

github/deemru/w8io/c3f4982 
103.73 ms ◑