tx · 39vgKtpBYiPeCfEuRJCMUJ2MnrG4Z75NhSZScURj9HeE

3Mzep1R5kHeC1ecKFkWjuhU3Gw4LAdCib9N:  -0.01500000 Waves

2024.02.06 09:59 [2964060] smart account 3Mzep1R5kHeC1ecKFkWjuhU3Gw4LAdCib9N > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "39vgKtpBYiPeCfEuRJCMUJ2MnrG4Z75NhSZScURj9HeE",
    "fee": 1500000,
    "feeAssetId": null,
    "timestamp": 1707202806384,
    "version": 2,
    "chainId": 84,
    "sender": "3Mzep1R5kHeC1ecKFkWjuhU3Gw4LAdCib9N",
    "senderPublicKey": "41THq9VrFxHEvVGJyz2oMpJQErnSkkqJXpBypSDxa5Mv",
    "proofs": [
        "Vo9Q8etihaiT7EyVf9yZhuxDiKAKZGyqMnW37CjjXyS53gneoYHHJ9vvHLf173vu7QHRedbRdksbEsuZZgWZ2y1"
    ],
    "script": "base64:BwIaCAISBAoCAhgSBAoCAhgSBAoCAhgSBAoCAhgoAAdjaGFpbklkCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAhjaGFpbklkVAEBVAAIY2hhaW5JZFcBAVcAA1NFUAICX18ABVdBVkVTAgVXQVZFUwAQY29udHJhY3RGaWxlbmFtZQIVd3hkYW9fY2FsY3VsYXRvci5yaWRlAAVtdWx0OACAwtcvAAZtdWx0MTgJALYCAQCAgJC7utat8A0ADXdhdmVzRGVjaW1hbHMACAAMdXNkdERlY2ltYWxzAAYBBXRvWDE4AgdvcmlnVmFsDW9yaWdTY2FsZU11bHQJALwCAwkAtgIBBQdvcmlnVmFsBQZtdWx0MTgJALYCAQUNb3JpZ1NjYWxlTXVsdAEHZnJvbVgxOAIDdmFsD3Jlc3VsdFNjYWxlTXVsdAkAoAMBCQC8AgMFA3ZhbAkAtgIBBQ9yZXN1bHRTY2FsZU11bHQFBm11bHQxOAEHd3JhcEVycgEBcwkArAICCQCsAgIFEGNvbnRyYWN0RmlsZW5hbWUCAjogBQFzAQh0aHJvd0VycgEBcwkAAgEJAQd3cmFwRXJyAQUBcwAJd3hBc3NldElkAwkAAAIFB2NoYWluSWQFCGNoYWluSWRXASCTARyrqcduJVfOZp5xtr2qa/g86FgLKu7ZoE67PNwUsQMJAAACBQdjaGFpbklkBQhjaGFpbklkVAEgxlIegU7qbuM8wJewDl8s8mrp7Z2yhtGaQnioYH0+G7EJAQh0aHJvd0VycgECEGludmFsaWQgY2hhaW4gaWQBEGtleUN1cnJlbnRQZXJpb2QACQC5CQIJAMwIAgICJXMJAMwIAgINY3VycmVudFBlcmlvZAUDbmlsBQNTRVABFmtleVN0YXJ0SGVpZ2h0QnlQZXJpb2QBBnBlcmlvZAkAuQkCCQDMCAICBCVzJWQJAMwIAgILc3RhcnRIZWlnaHQJAMwIAgkApAMBBQZwZXJpb2QFA25pbAUDU0VQAQ9rZXlQZXJpb2RMZW5ndGgACQC5CQIJAMwIAgICJXMJAMwIAgIMcGVyaW9kTGVuZ3RoBQNuaWwFA1NFUAEYa2V5VHJlYXN1cnlWYWx1ZUJ5UGVyaW9kAQZwZXJpb2QJALkJAgkAzAgCAgQlcyVkCQDMCAICDXRyZWFzdXJ5VmFsdWUJAMwIAgkApAMBBQZwZXJpb2QFA25pbAUDU0VQAQxrZXlTa2luVG90YWwBD3RyZWFzdXJ5QWRkcmVzcwkArAICAgtza2luX3RvdGFsXwkApQgBBQ90cmVhc3VyeUFkZHJlc3MBFWtleVBvd2VyQ29uZmlnQWRkcmVzcwACFiVzX19wb3dlckNvbmZpZ0FkZHJlc3MBEnBvd2VyQ29uZmlnQWRkcmVzcwEOZmFjdG9yeUFkZHJlc3MJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgQHJG1hdGNoMAkAnQgCBQ5mYWN0b3J5QWRkcmVzcwkBFWtleVBvd2VyQ29uZmlnQWRkcmVzcwADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yCQEHd3JhcEVycgECHGludmFsaWQgcG93ZXIgY29uZmlnIGFkZHJlc3MBD2tleVBvd2VyQXNzZXRJZAACDHBvd2VyQXNzZXRJZAEPZ2V0UG93ZXJBc3NldElkAQ5mYWN0b3J5QWRkcmVzcwkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgkBEnBvd2VyQ29uZmlnQWRkcmVzcwEFDmZhY3RvcnlBZGRyZXNzCQEPa2V5UG93ZXJBc3NldElkAAkBB3dyYXBFcnIBAhZpbnZhbGlkIHBvd2VyIGFzc2V0IGlkARdrZXlQb3dlckNvbnRyYWN0QWRkcmVzcwACGCVzX19wb3dlckNvbnRyYWN0QWRkcmVzcwEUcG93ZXJDb250cmFjdEFkZHJlc3MBDmZhY3RvcnlBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIEByRtYXRjaDAJAJ0IAgUOZmFjdG9yeUFkZHJlc3MJARdrZXlQb3dlckNvbnRyYWN0QWRkcmVzcwADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yCQEHd3JhcEVycgECHmludmFsaWQgcG93ZXIgY29udHJhY3QgYWRkcmVzcwEWa2V5UG9vbHNGYWN0b3J5QWRkcmVzcwACFyVzX19wb29sc0ZhY3RvcnlBZGRyZXNzARZnZXRQb29sc0ZhY3RvcnlBZGRyZXNzAQ5mYWN0b3J5QWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBAckbWF0Y2gwCQCdCAIFDmZhY3RvcnlBZGRyZXNzCQEWa2V5UG9vbHNGYWN0b3J5QWRkcmVzcwADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yCQEHd3JhcEVycgECHWludmFsaWQgcG9vbHMgZmFjdG9yeSBhZGRyZXNzARJrZXlUcmVhc3VyeUFkZHJlc3MAAhMlc19fdHJlYXN1cnlBZGRyZXNzARJnZXRUcmVhc3VyeUFkZHJlc3MBDmZhY3RvcnlBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIEByRtYXRjaDAJAJ0IAgUOZmFjdG9yeUFkZHJlc3MJARJrZXlUcmVhc3VyeUFkZHJlc3MAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkApggBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgkBB3dyYXBFcnIBAhhpbnZhbGlkIHRyZWFzdXJ5IGFkZHJlc3MBCWtleUFzc2V0cwACCiVzX19hc3NldHMBDGdldEFzc2V0c1N0cgEOZmFjdG9yeUFkZHJlc3MJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ5mYWN0b3J5QWRkcmVzcwkBCWtleUFzc2V0cwAJAQd3cmFwRXJyAQIOaW52YWxpZCBhc3NldHMBDGtleUxwQXNzZXRJZAACDSVzX19scEFzc2V0SWQBDGdldExwQXNzZXRJZAEOZmFjdG9yeUFkZHJlc3MJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFDmZhY3RvcnlBZGRyZXNzCQEMa2V5THBBc3NldElkAAkBB3dyYXBFcnIBAhNpbnZhbGlkIGxwIGFzc2V0IGlkARJnZXRBc3NldEluZm9PckZhaWwBB2Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQdhc3NldElkCQEHd3JhcEVycgECEmludmFsaWQgYXNzZXQgaW5mbwERZ2V0QXNzZXRzQmFsYW5jZXMCDXRhcmdldEFkZHJlc3MLYXNzZXRJZExpc3QKAQNtYXACA2FjYw5uZXh0QXNzZXRJZFN0cgQHYmFsYW5jZQMJAAACBQ5uZXh0QXNzZXRJZFN0cgUFV0FWRVMJAQV0b1gxOAIICQDvBwEFDXRhcmdldEFkZHJlc3MJYXZhaWxhYmxlCQBsBgAKAAAFDXdhdmVzRGVjaW1hbHMAAAAABQRET1dOBAdhc3NldElkCQDZBAEFDm5leHRBc3NldElkU3RyBA1hc3NldERlY2ltYWxzCAkBEmdldEFzc2V0SW5mb09yRmFpbAEFB2Fzc2V0SWQIZGVjaW1hbHMJAQV0b1gxOAIJAPAHAgUNdGFyZ2V0QWRkcmVzcwUHYXNzZXRJZAkAbAYACgAABQ1hc3NldERlY2ltYWxzAAAAAAUERE9XTgkAzQgCBQNhY2MFB2JhbGFuY2UKAAIkbAULYXNzZXRJZExpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA21hcAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgEPZ2V0QXNzZXRzUHJpY2VzAhNwb29sc0ZhY3RvcnlBZGRyZXNzC2Fzc2V0SWRMaXN0AwkAAAIFB2NoYWluSWQFCGNoYWluSWRXBBN3YXZlc1VzZHRBZGRyZXNzU3RyAiMzUEtmcnVwRXlkVTJuWkFnaFZqWkFmdkN3TUJrenVSMUY1MgQOd2F2ZXNVc2R0UHJpY2UJAKcDAQoAAUAJAPwHBAUTcG9vbHNGYWN0b3J5QWRkcmVzcwIIZ2V0UHJpY2UJAMwIAgUTd2F2ZXNVc2R0QWRkcmVzc1N0cgUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBBJ3YXZlc1h0bkFkZHJlc3NTdHICIzNQUFpXZ0ZOUktITHZNNTFwd1M5MzRDOFZaN2QyRjRaNThnBA13YXZlc1h0blByaWNlCQCnAwEKAAFACQD8BwQFE3Bvb2xzRmFjdG9yeUFkZHJlc3MCCGdldFByaWNlCQDMCAIFEndhdmVzWHRuQWRkcmVzc1N0cgUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBAx4dG5Vc2R0UHJpY2UJALwCAwUOd2F2ZXNVc2R0UHJpY2UFBm11bHQxOAUNd2F2ZXNYdG5QcmljZQoBA21hcAIDYWNjC25leHRBc3NldElkBAVwcmljZQQHJG1hdGNoMAULbmV4dEFzc2V0SWQDCQAAAgIsMnRoc0FDdUhtekRNdU5lelBNMzJ3ZzlhM0J3VXpCV0RlU0tha2d6M2N3MjEFByRtYXRjaDAEEnB3cldhdmVzQWRkcmVzc1N0cgIjM1BEaTdRcThwTFFZdnRLeVRmUXVxcVBVV3lob1liVTk1N3QEDXB3cldhdmVzUHJpY2UJAKcDAQoAAUAJAPwHBAUTcG9vbHNGYWN0b3J5QWRkcmVzcwIIZ2V0UHJpY2UJAMwIAgUScHdyV2F2ZXNBZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJALwCAwUNcHdyV2F2ZXNQcmljZQUOd2F2ZXNVc2R0UHJpY2UFBm11bHQxOAMJAAACAixBdHF2NTlFWXpqRkd1aXRLVm5NUms2SDhGdWtqb1Yza3RQb3JiRXlzMjVvbgUHJG1hdGNoMAQRd3hXYXZlc0FkZHJlc3NTdHICIzNQRnphSDJnaHB3QU5IRmdqZXZhODNOMXl4ekVyRUx4MmVoBAx3eFdhdmVzUHJpY2UJAKcDAQoAAUAJAPwHBAUTcG9vbHNGYWN0b3J5QWRkcmVzcwIIZ2V0UHJpY2UJAMwIAgURd3hXYXZlc0FkZHJlc3NTdHIFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwkAvAIDBQx3eFdhdmVzUHJpY2UFDndhdmVzVXNkdFByaWNlBQZtdWx0MTgDCQAAAgIsMzROOVljRUVUTFduOTNxWVE2NEVzUDF4ODl0U3J1SlU0NFJyRU1TWFhFUEoFByRtYXRjaDAEFndhdmVzVXNkdHd4Z0FkZHJlc3NTdHICIzNQS01WWjdrUWVhUkVhallpOFljMjVSbzZtY053NUQ2UVNhBBF3YXZlc1VzZHR3eGdQcmljZQkApwMBCgABQAkA/AcEBRNwb29sc0ZhY3RvcnlBZGRyZXNzAghnZXRQcmljZQkAzAgCBRZ3YXZlc1VzZHR3eGdBZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJALwCAwUOd2F2ZXNVc2R0UHJpY2UFBm11bHQxOAURd2F2ZXNVc2R0d3hnUHJpY2UDCQAAAgIsNlh0SGpwWGJzOVJSSlAyU3I5R1V5VnF6QUNjYnk5VGtUaEhYbmpWQzVDREoFByRtYXRjaDAEFndhdmVzVXNkY3d4Z0FkZHJlc3NTdHICIzNQM2czZWlwZkcyTlpLS1FFOERaWHQyRTl0UkpxaWk5amNYBBF3YXZlc1VzZGN3eGdQcmljZQkApwMBCgABQAkA/AcEBRNwb29sc0ZhY3RvcnlBZGRyZXNzAghnZXRQcmljZQkAzAgCBRZ3YXZlc1VzZGN3eGdBZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJALwCAwUOd2F2ZXNVc2R0UHJpY2UFBm11bHQxOAURd2F2ZXNVc2Rjd3hnUHJpY2UDCQAAAgIsSFprMW1iZnVKcG14VTFGczRBWDVNV0xWWXRjdHNOY2c2ZTJDNlZLcUs4emsFByRtYXRjaDAEE2x0Y3d4Z1h0bkFkZHJlc3NTdHICIzNQOTR3dnU1Z0E3VmhqUGdBQjN0d2FlcWR3SEN3TksydnNuBA5sdGN3eGdYdG5QcmljZQkApwMBCgABQAkA/AcEBRNwb29sc0ZhY3RvcnlBZGRyZXNzAghnZXRQcmljZQkAzAgCBRNsdGN3eGdYdG5BZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJALwCAwUObHRjd3hnWHRuUHJpY2UFDHh0blVzZHRQcmljZQUGbXVsdDE4AwkAAAICLDQ3NGpUZVl4MnIyVmEzNTc5NHRDU2NBWFdKRzloVTJIY2d4ek1vd2FaVW51BQckbWF0Y2gwBBVldGh3eGdXYXZlc0FkZHJlc3NTdHICIzNQM1hHVE42czI5Mmc5aXdZaHMzVEVxSnFIaWZmUVlvanVFBBBldGh3eGdXYXZlc1ByaWNlCQCnAwEKAAFACQD8BwQFE3Bvb2xzRmFjdG9yeUFkZHJlc3MCCGdldFByaWNlCQDMCAIFFWV0aHd4Z1dhdmVzQWRkcmVzc1N0cgUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nCQC8AgMFEGV0aHd4Z1dhdmVzUHJpY2UFDndhdmVzVXNkdFByaWNlBQZtdWx0MTgDCQAAAgIsOExRVzhmN1A1ZDVQWk03R3RaRUJnYXFSUEdTelMzRGZQdWlYclVSSjRBSlMFByRtYXRjaDAEE2J0Y3d4Z1h0bkFkZHJlc3NTdHICIzNQQ0JXRFRBNmpyRnN3ZDdnUWdhRTNYazdnTE01UktvZnZwBA5idGN3eGdYdG5QcmljZQkApwMBCgABQAkA/AcEBRNwb29sc0ZhY3RvcnlBZGRyZXNzAghnZXRQcmljZQkAzAgCBRNidGN3eGdYdG5BZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJALwCAwUOYnRjd3hnWHRuUHJpY2UFDHh0blVzZHRQcmljZQUGbXVsdDE4CQEIdGhyb3dFcnIBAhBpbnZhbGlkIGFzc2V0IGlkCQDNCAIFA2FjYwUFcHJpY2UKAAIkbAULYXNzZXRJZExpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA21hcAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgMJAAACBQdjaGFpbklkBQhjaGFpbklkVAoBA21hcAIDYWNjC25leHRBc3NldElkBAVwcmljZQQHJG1hdGNoMAULbmV4dEFzc2V0SWQDCQAAAgIsRU1BTUx4RG52M3hpejhSWGc4QnRqMzNqY0V3M3dMY3pMM0pLWVltdXVicGMFByRtYXRjaDAEEHd4VXNkdEFkZHJlc3NTdHICIzNNclVMUVJMYzUyR1dySkYxdE1jQW00TTc4ZlBlNTdvOUt0BAt3eFVzZHRQcmljZQkApwMBCgABQAkA/AcEBRNwb29sc0ZhY3RvcnlBZGRyZXNzAghnZXRQcmljZQkAzAgCBRB3eFVzZHRBZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcFC3d4VXNkdFByaWNlAwkAAAICLEE3S3NoN2ZYeXFtMUtoS0FpSzNiQUIyYWlQU2l0UVFGNnYxcHl1OVNTM0ZSBQckbWF0Y2gwBBJ1c2RjVXNkdEFkZHJlc3NTdHICIzNNektTZFRIMmpGYnlwTHNvTmZySDdRZ2t6U2J4M0VZd0NBBA11c2RjVXNkdFByaWNlCQCnAwEKAAFACQD8BwQFE3Bvb2xzRmFjdG9yeUFkZHJlc3MCCGdldFByaWNlCQDMCAIFEnVzZGNVc2R0QWRkcmVzc1N0cgUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBQ11c2RjVXNkdFByaWNlAwkAAAICLDhRNlNFMkFOZWJ1Znc4SnVQakpWUmpaRDZkckQ4aWhqTmpNOHhhR1VTZmRSBQckbWF0Y2gwBAVwcmljZQkBBXRvWDE4AgCAo8NHCQBsBgAKAAAFDHVzZHREZWNpbWFscwAAAAAFBERPV04FBXByaWNlCQEIdGhyb3dFcnIBAhBpbnZhbGlkIGFzc2V0IGlkCQDNCAIFA2FjYwUFcHJpY2UKAAIkbAULYXNzZXRJZExpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA21hcAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkBCHRocm93RXJyAQIQaW52YWxpZCBjaGFpbiBpZAERY2FsY1RyZWFzdXJ5VmFsdWUBDmZhY3RvcnlBZGRyZXNzBA90cmVhc3VyeUFkZHJlc3MJARJnZXRUcmVhc3VyeUFkZHJlc3MBBQ5mYWN0b3J5QWRkcmVzcwQTcG9vbHNGYWN0b3J5QWRkcmVzcwkBFmdldFBvb2xzRmFjdG9yeUFkZHJlc3MBBQ5mYWN0b3J5QWRkcmVzcwQJYXNzZXRzU3RyCQC1CQIJAQxnZXRBc3NldHNTdHIBBQ5mYWN0b3J5QWRkcmVzcwUDU0VQBA5hc3NldHNCYWxhbmNlcwkBEWdldEFzc2V0c0JhbGFuY2VzAgUPdHJlYXN1cnlBZGRyZXNzBQlhc3NldHNTdHIEDGFzc2V0c1ByaWNlcwkBD2dldEFzc2V0c1ByaWNlcwIFE3Bvb2xzRmFjdG9yeUFkZHJlc3MFCWFzc2V0c1N0cgoBBnJlZHVjZQIDYWNjDm5leHRBc3NldElkU3RyBAdhc3NldElkCQDZBAEFDm5leHRBc3NldElkU3RyBAVpbmRleAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCWFzc2V0c1N0cgUObmV4dEFzc2V0SWRTdHIJAQd3cmFwRXJyAQIQaW52YWxpZCBhc3NldCBpZAQHYmFsYW5jZQkAkQMCBQ5hc3NldHNCYWxhbmNlcwUFaW5kZXgEBXByaWNlCQCRAwIFDGFzc2V0c1ByaWNlcwUFaW5kZXgECmFzc2V0VmFsdWUJALwCAwUHYmFsYW5jZQUFcHJpY2UFBm11bHQxOAkAtwICBQNhY2MFCmFzc2V0VmFsdWUEDXRyZWFzdXJ5VmFsdWUKAAIkbAUJYXNzZXRzU3RyCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAtgIBAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBnJlZHVjZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgUNdHJlYXN1cnlWYWx1ZQELY2FsY1Jld2FyZHMCDmZhY3RvcnlBZGRyZXNzDXBheW1lbnRBbW91bnQECWFzc2V0c1N0cgkAtQkCCQEMZ2V0QXNzZXRzU3RyAQUOZmFjdG9yeUFkZHJlc3MFA1NFUAQNd3hkYW9RdWFudGl0eQgJARJnZXRBc3NldEluZm9PckZhaWwBCQEMZ2V0THBBc3NldElkAQUOZmFjdG9yeUFkZHJlc3MIcXVhbnRpdHkDCQAAAgUNd3hkYW9RdWFudGl0eQUNd3hkYW9RdWFudGl0eQQOYXNzZXRzQmFsYW5jZXMJARFnZXRBc3NldHNCYWxhbmNlcwIFDmZhY3RvcnlBZGRyZXNzBQlhc3NldHNTdHIKAQNtYXACA2FjYw5uZXh0QXNzZXRJZFN0cgQHYXNzZXRJZAkA2QQBBQ5uZXh0QXNzZXRJZFN0cgQFaW5kZXgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQlhc3NldHNTdHIFDm5leHRBc3NldElkU3RyCQEHd3JhcEVycgECFWludmFsaWQgYXNzZXQgYmFsYW5jZQQNYXNzZXREZWNpbWFscwgJARJnZXRBc3NldEluZm9PckZhaWwBBQdhc3NldElkCGRlY2ltYWxzBAdiYWxhbmNlCQEHZnJvbVgxOAIJAJEDAgUOYXNzZXRzQmFsYW5jZXMFBWluZGV4CQBsBgAKAAAFDWFzc2V0RGVjaW1hbHMAAAAABQRET1dOBAZhbW91bnQJAGsDBQdiYWxhbmNlBQ1wYXltZW50QW1vdW50BQ13eGRhb1F1YW50aXR5AwkAZgIFBmFtb3VudAAACQCUCgIJAM0IAggFA2FjYwJfMQUHYXNzZXRJZAkAzQgCCAUDYWNjAl8yBQZhbW91bnQFA2FjYwoAAiRsBQlhc3NldHNTdHIKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtYXACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BCWNhbGNQcmljZQEOZmFjdG9yeUFkZHJlc3MEE3Bvb2xzRmFjdG9yeUFkZHJlc3MJARZnZXRQb29sc0ZhY3RvcnlBZGRyZXNzAQUOZmFjdG9yeUFkZHJlc3MEDWN1cnJlbnRQZXJpb2QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ5mYWN0b3J5QWRkcmVzcwkBEGtleUN1cnJlbnRQZXJpb2QACQEHd3JhcEVycgECFmludmFsaWQgY3VycmVudCBwZXJpb2QEEnN0YXJ0VHJlYXN1cnlWYWx1ZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzCQEYa2V5VHJlYXN1cnlWYWx1ZUJ5UGVyaW9kAQUNY3VycmVudFBlcmlvZAkBB3dyYXBFcnIBCQCsAgICImludmFsaWQgdHJlYXN1cnkgdmFsdWUgZm9yIHBlcmlvZCAJAKQDAQUNY3VycmVudFBlcmlvZAQNdHJlYXN1cnlWYWx1ZQkBB2Zyb21YMTgCCQERY2FsY1RyZWFzdXJ5VmFsdWUBBQ5mYWN0b3J5QWRkcmVzcwkAbAYACgAABQx1c2R0RGVjaW1hbHMAAAAABQRET1dOBBF0cmVhc3VyeVZhbHVlRGlmZgkAZQIFDXRyZWFzdXJ5VmFsdWUFEnN0YXJ0VHJlYXN1cnlWYWx1ZQQUdHJlYXN1cnlWYWx1ZURpZmZSYXcJAQV0b1gxOAIFEXRyZWFzdXJ5VmFsdWVEaWZmCQBsBgAKAAAFDHVzZHREZWNpbWFscwAAAAAFBERPV04ECnB3ckFzc2V0SWQJAQ9nZXRQb3dlckFzc2V0SWQBBQ5mYWN0b3J5QWRkcmVzcwQHcHdySW5mbwkBEmdldEFzc2V0SW5mb09yRmFpbAEFCnB3ckFzc2V0SWQEC3B3clByaWNlUmF3CQCRAwIJAQ9nZXRBc3NldHNQcmljZXMCBRNwb29sc0ZhY3RvcnlBZGRyZXNzCQDMCAIJANgEAQUKcHdyQXNzZXRJZAUDbmlsAAAECHB3clByaWNlAwkAvwICBQtwd3JQcmljZVJhdwkAtgIBAAAJAQdmcm9tWDE4AgULcHdyUHJpY2VSYXcJAGwGAAoAAAUMdXNkdERlY2ltYWxzAAAAAAUERE9XTgkBCHRocm93RXJyAQIRaW52YWxpZCBQV1IgcHJpY2UED3RyZWFzdXJ5QWRkcmVzcwkBEmdldFRyZWFzdXJ5QWRkcmVzcwEFDmZhY3RvcnlBZGRyZXNzBAlza2luVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgkBFHBvd2VyQ29udHJhY3RBZGRyZXNzAQUOZmFjdG9yeUFkZHJlc3MJAQxrZXlTa2luVG90YWwBBQ90cmVhc3VyeUFkZHJlc3MAAAQJd3hkYW9JbmZvCQESZ2V0QXNzZXRJbmZvT3JGYWlsAQkBDGdldExwQXNzZXRJZAEFDmZhY3RvcnlBZGRyZXNzBAxwd3JSZW1haW5pbmcJAGkCCAUJd3hkYW9JbmZvCHF1YW50aXR5AGQECXB3ckFtb3VudAkAZAIFCXNraW5Ub3RhbAUMcHdyUmVtYWluaW5nBAxwd3JBbW91bnRSYXcJAQV0b1gxOAIFCXB3ckFtb3VudAkAbAYACgAACAUHcHdySW5mbwhkZWNpbWFscwAAAAAFBERPV04EGmZhY3RvcnlBZGRyZXNzV3hCYWxhbmNlUmF3CQCRAwIJARFnZXRBc3NldHNCYWxhbmNlcwIFDmZhY3RvcnlBZGRyZXNzCQDMCAIJANgEAQUJd3hBc3NldElkBQNuaWwAAAQXZmFjdG9yeUFkZHJlc3NXeEJhbGFuY2UJAQdmcm9tWDE4AgUaZmFjdG9yeUFkZHJlc3NXeEJhbGFuY2VSYXcJAGwGAAoAAAUMdXNkdERlY2ltYWxzAAAAAAUERE9XTgQKd3hQcmljZVJhdwkAkQMCCQEPZ2V0QXNzZXRzUHJpY2VzAgUTcG9vbHNGYWN0b3J5QWRkcmVzcwkAzAgCCQDYBAEFCXd4QXNzZXRJZAUDbmlsAAAEB3d4UHJpY2UDCQC/AgIFCnd4UHJpY2VSYXcJALYCAQAACQEHZnJvbVgxOAIFCnd4UHJpY2VSYXcJAGwGAAoAAAUMdXNkdERlY2ltYWxzAAAAAAUERE9XTgkBCHRocm93RXJyAQIQaW52YWxpZCB3eCBwcmljZQQNd3hkYW9RdWFudGl0eQgFCXd4ZGFvSW5mbwhxdWFudGl0eQQQd3hkYW9RdWFudGl0eVJhdwkBBXRvWDE4AgUNd3hkYW9RdWFudGl0eQkAbAYACgAACAUJd3hkYW9JbmZvCGRlY2ltYWxzAAAAAAUERE9XTgQNd3hEYW9QcmljZVJhdwkAugICCQC3AgIJALcCAgULcHdyUHJpY2VSYXcJALwCAwkAuQICBRpmYWN0b3J5QWRkcmVzc1d4QmFsYW5jZVJhdwkAtgIBAGQFCnd4UHJpY2VSYXcFEHd4ZGFvUXVhbnRpdHlSYXcJALwCAwkAmAMBCQDMCAIFFHRyZWFzdXJ5VmFsdWVEaWZmUmF3CQDMCAIJALYCAQAABQNuaWwJALkCAgkAtgIBAAIFBm11bHQxOAkAuQICCQC2AgEACgUMcHdyQW1vdW50UmF3CQC2AgEAZAQKd3hEYW9QcmljZQkBB2Zyb21YMTgCBQ13eERhb1ByaWNlUmF3CQBsBgAKAAAFDHVzZHREZWNpbWFscwAAAAAFBERPV04EDXJld2FyZHNQcmljZXMJAQtjYWxjUmV3YXJkcwIFDmZhY3RvcnlBZGRyZXNzCQBsBgAKAAAIBQl3eGRhb0luZm8IZGVjaW1hbHMAAAAABQRET1dOCQCUCgIJAMwIAgUKd3hEYW9QcmljZQkAzAgCBQ1yZXdhcmRzUHJpY2VzBQNuaWwJAMwIAgkAzAgCAgp3eERhb1ByaWNlCQDMCAIFCnd4RGFvUHJpY2UFA25pbAkAzAgCCQDMCAICCHB3clByaWNlCQDMCAIFCHB3clByaWNlBQNuaWwJAMwIAgkAzAgCAhdmYWN0b3J5QWRkcmVzc1d4QmFsYW5jZQkAzAgCBRdmYWN0b3J5QWRkcmVzc1d4QmFsYW5jZQUDbmlsCQDMCAIJAMwIAgIHd3hQcmljZQkAzAgCBQd3eFByaWNlBQNuaWwJAMwIAgkAzAgCAg13eGRhb1F1YW50aXR5CQDMCAIFDXd4ZGFvUXVhbnRpdHkFA25pbAkAzAgCCQDMCAICEXRyZWFzdXJ5VmFsdWVEaWZmCQDMCAIFEXRyZWFzdXJ5VmFsdWVEaWZmBQNuaWwJAMwIAgkAzAgCAglwd3JBbW91bnQJAMwIAgUJcHdyQW1vdW50BQNuaWwJAMwIAgkAzAgCAglza2luVG90YWwJAMwIAgUJc2tpblRvdGFsBQNuaWwJAMwIAgkAzAgCAgxwd3JSZW1haW5pbmcJAMwIAgUMcHdyUmVtYWluaW5nBQNuaWwFA25pbAQBaQEEc3dhcAIPY2FsbGVyUHVibGljS2V5BGFyZ3MEDmZhY3RvcnlBZGRyZXNzCAUBaQZjYWxsZXIEC3VzZXJBZGRyZXNzCQCnCAEFD2NhbGxlclB1YmxpY0tleQQHcGF5bWVudAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkBCHRocm93RXJyAQIVMSBwYXltZW50IGlzIHJlcXVpcmVkBANlcnIJAQd3cmFwRXJyAQIYaW52YWxpZCBwYXltZW50IGFzc2V0IGlkBA5wYXltZW50QXNzZXRJZAMJAAACCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQdwYXltZW50B2Fzc2V0SWQFA2VycgkBDGdldExwQXNzZXRJZAEFDmZhY3RvcnlBZGRyZXNzCQEFdmFsdWUBCAUHcGF5bWVudAdhc3NldElkCQEIdGhyb3dFcnIBBQNlcnIECHB3clByaWNlAGQECXB3ckFtb3VudAkAaQIIBQdwYXltZW50BmFtb3VudAUIcHdyUHJpY2UECXRyYW5zZmVycwkBC2NhbGNSZXdhcmRzAgUOZmFjdG9yeUFkZHJlc3MIBQdwYXltZW50BmFtb3VudAMJAAACBQl0cmFuc2ZlcnMFCXRyYW5zZmVycwQUYWRkaXRpb25hbExvY2tSb3VuZHMAAAQOZmFjdG9yeUFjdGlvbnMJAM4IAgkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAiBjb21taXRBZnRlclN0YXJ0V2l0aExvY2tSb3VuZEZvcgkAzAgCCQClCAEJARRwb3dlckNvbnRyYWN0QWRkcmVzcwEFDmZhY3RvcnlBZGRyZXNzCQDMCAIJAKUIAQkBEmdldFRyZWFzdXJ5QWRkcmVzcwEFDmZhY3RvcnlBZGRyZXNzCQDMCAIJAKUIAQULdXNlckFkZHJlc3MJAMwIAgUUYWRkaXRpb25hbExvY2tSb3VuZHMJAMwIAgkBD2dldFBvd2VyQXNzZXRJZAEFDmZhY3RvcnlBZGRyZXNzCQDMCAIFCXB3ckFtb3VudAUDbmlsBQNuaWwFA25pbAMJAAACCQCQAwEIBQl0cmFuc2ZlcnMCXzEAAAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCDnRyYW5zZmVyQXNzZXRzCQDMCAIIBQt1c2VyQWRkcmVzcwVieXRlcwkAzAgCCAUJdHJhbnNmZXJzAl8xCQDMCAIIBQl0cmFuc2ZlcnMCXzIFA25pbAUDbmlsBQNuaWwJAJQKAgkAzAgCCQEEQnVybgIFDnBheW1lbnRBc3NldElkCAUHcGF5bWVudAZhbW91bnQFA25pbAUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEFcHJpY2UCD2NhbGxlclB1YmxpY0tleQRhcmdzBA5mYWN0b3J5QWRkcmVzcwgFAWkGY2FsbGVyCQCUCgIFA25pbAgJAQljYWxjUHJpY2UBBQ5mYWN0b3J5QWRkcmVzcwJfMQFpAQpwcmljZURlYnVnAg9jYWxsZXJQdWJsaWNLZXkEYXJncwQOZmFjdG9yeUFkZHJlc3MIBQFpBmNhbGxlcgkAlAoCBQNuaWwICQEJY2FsY1ByaWNlAQUOZmFjdG9yeUFkZHJlc3MCXzIBaQEQZ2V0VHJlYXN1cnlWYWx1ZQIPY2FsbGVyUHVibGljS2V5BGFyZ3MEDmZhY3RvcnlBZGRyZXNzCAUBaQZjYWxsZXIEDXRyZWFzdXJ5VmFsdWUJAQdmcm9tWDE4AgkBEWNhbGNUcmVhc3VyeVZhbHVlAQUOZmFjdG9yeUFkZHJlc3MJAGwGAAoAAAUMdXNkdERlY2ltYWxzAAAAAAUERE9XTgkAlAoCBQNuaWwFDXRyZWFzdXJ5VmFsdWUBAnR4AQZ2ZXJpZnkACQAAAgUHY2hhaW5JZAUIY2hhaW5JZFQnBRqc",
    "height": 2964060,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2oJsntcxnVq5Kag446GkvE8aDPKHpvRumR4amMFP3NiF
Next: 7Dm2AdTsyibbZjun99FPgFytSWCPwkkWEyvWNpxEUHKt

Diff: 

OldNewDifferences
355355     }
356356 
357357 
358+func calcRewards (factoryAddress,paymentAmount) = {
359+    let assetsStr = split(getAssetsStr(factoryAddress), SEP)
360+    let wxdaoQuantity = getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity
361+    if ((wxdaoQuantity == wxdaoQuantity))
362+        then {
363+            let assetsBalances = getAssetsBalances(factoryAddress, assetsStr)
364+            func map (acc,nextAssetIdStr) =             {
365+                let assetId = fromBase58String(nextAssetIdStr)
366+                let index = valueOrErrorMessage(indexOf(assetsStr, nextAssetIdStr), wrapErr("invalid asset balance"))
367+                let assetDecimals = getAssetInfoOrFail(assetId).decimals
368+                let balance = fromX18(assetsBalances[index], pow(10, 0, assetDecimals, 0, 0, DOWN))
369+                let amount = fraction(balance, paymentAmount, wxdaoQuantity)
370+                if ((amount > 0))
371+                    then $Tuple2((acc._1 :+ assetId), (acc._2 :+ amount))
372+                    else acc
373+                }
374+
375+            let $l = assetsStr
376+            let $s = size($l)
377+            let $acc0 = $Tuple2(nil, nil)
378+            func $f0_1 ($a,$i) =             if (($i >= $s))
379+                then $a
380+                else map($a, $l[$i])
381+
382+            func $f0_2 ($a,$i) =             if (($i >= $s))
383+                then $a
384+                else throw("List size exceeds 6")
385+
386+            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
387+            }
388+        else throw("Strict value is not equal to itself.")
389+    }
390+
391+
358392 func calcPrice (factoryAddress) = {
359393     let poolsFactoryAddress = getPoolsFactoryAddress(factoryAddress)
360394     let currentPeriod = valueOrErrorMessage(getInteger(factoryAddress, keyCurrentPeriod()), wrapErr("invalid current period"))
363397     let treasuryValueDiff = (treasuryValue - startTreasuryValue)
364398     let treasuryValueDiffRaw = toX18(treasuryValueDiff, pow(10, 0, usdtDecimals, 0, 0, DOWN))
365399     let pwrAssetId = getPowerAssetId(factoryAddress)
400+    let pwrInfo = getAssetInfoOrFail(pwrAssetId)
366401     let pwrPriceRaw = getAssetsPrices(poolsFactoryAddress, [toBase58String(pwrAssetId)])[0]
367402     let pwrPrice = if ((pwrPriceRaw > toBigInt(0)))
368403         then fromX18(pwrPriceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
369404         else throwErr("invalid PWR price")
370405     let treasuryAddress = getTreasuryAddress(factoryAddress)
371406     let skinTotal = valueOrElse(getInteger(powerContractAddress(factoryAddress), keySkinTotal(treasuryAddress)), 0)
372-    let pwrRemaining = (getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity / 100)
407+    let wxdaoInfo = getAssetInfoOrFail(getLpAssetId(factoryAddress))
408+    let pwrRemaining = (wxdaoInfo.quantity / 100)
373409     let pwrAmount = (skinTotal + pwrRemaining)
374-    let pwrAmountRaw = toX18(pwrAmount, pow(10, 0, getAssetInfoOrFail(getLpAssetId(factoryAddress)).decimals, 0, 0, DOWN))
410+    let pwrAmountRaw = toX18(pwrAmount, pow(10, 0, pwrInfo.decimals, 0, 0, DOWN))
375411     let factoryAddressWxBalanceRaw = getAssetsBalances(factoryAddress, [toBase58String(wxAssetId)])[0]
376412     let factoryAddressWxBalance = fromX18(factoryAddressWxBalanceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
377413     let wxPriceRaw = getAssetsPrices(poolsFactoryAddress, [toBase58String(wxAssetId)])[0]
378414     let wxPrice = if ((wxPriceRaw > toBigInt(0)))
379415         then fromX18(wxPriceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
380416         else throwErr("invalid wx price")
381-    let wxdaoQuantity = getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity
382-    let wxdaoQuantityRaw = toX18(wxdaoQuantity, pow(10, 0, getAssetInfoOrFail(getLpAssetId(factoryAddress)).decimals, 0, 0, DOWN))
417+    let wxdaoQuantity = wxdaoInfo.quantity
418+    let wxdaoQuantityRaw = toX18(wxdaoQuantity, pow(10, 0, wxdaoInfo.decimals, 0, 0, DOWN))
383419     let wxDaoPriceRaw = (((pwrPriceRaw + fraction((factoryAddressWxBalanceRaw * toBigInt(100)), wxPriceRaw, wxdaoQuantityRaw)) + fraction(max([treasuryValueDiffRaw, toBigInt(0)]), (toBigInt(2) * mult18), (toBigInt(10) * pwrAmountRaw))) / toBigInt(100))
384420     let wxDaoPrice = fromX18(wxDaoPriceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
385-    $Tuple2(wxDaoPrice, [["wxDaoPrice", wxDaoPrice], ["pwrPrice", pwrPrice], ["factoryAddressWxBalance", factoryAddressWxBalance], ["wxPrice", wxPrice], ["wxdaoQuantity", wxdaoQuantity], ["treasuryValueDiff", treasuryValueDiff], ["pwrAmount", pwrAmount], ["skinTotal", skinTotal], ["pwrRemaining", pwrRemaining]])
421+    let rewardsPrices = calcRewards(factoryAddress, pow(10, 0, wxdaoInfo.decimals, 0, 0, DOWN))
422+    $Tuple2([wxDaoPrice, rewardsPrices], [["wxDaoPrice", wxDaoPrice], ["pwrPrice", pwrPrice], ["factoryAddressWxBalance", factoryAddressWxBalance], ["wxPrice", wxPrice], ["wxdaoQuantity", wxdaoQuantity], ["treasuryValueDiff", treasuryValueDiff], ["pwrAmount", pwrAmount], ["skinTotal", skinTotal], ["pwrRemaining", pwrRemaining]])
386423     }
387-
388-
389-@Callable(i)
390-func withdraw (args) = {
391-    let recipient = addressFromStringValue(args[0])
392-    let amount = parseIntValue(args[1])
393-    let result = invoke(i.caller, "transferWaves", [recipient.bytes, amount], nil)
394-    $Tuple2(nil, result)
395-    }
396-
397-
398-
399-@Callable(i)
400-func setIntParam (args) = {
401-    let key = args[0]
402-    let val = parseIntValue(args[1])
403-    let result = invoke(i.caller, "integerEntry", [key, val], nil)
404-    $Tuple2(nil, result)
405-    }
406-
407424 
408425 
409426 @Callable(i)
419436         else throwErr(err)
420437     let pwrPrice = 100
421438     let pwrAmount = (payment.amount / pwrPrice)
422-    let assetsStr = split(getAssetsStr(factoryAddress), SEP)
423-    let pwrBalance = assetBalance(factoryAddress, getPowerAssetId(factoryAddress))
424-    if ((pwrBalance == pwrBalance))
439+    let transfers = calcRewards(factoryAddress, payment.amount)
440+    if ((transfers == transfers))
425441         then {
426-            let wxdaoQuantity = getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity
427-            if ((wxdaoQuantity == wxdaoQuantity))
428-                then {
429-                    let assetsBalances = getAssetsBalances(factoryAddress, assetsStr)
430-                    func map (acc,nextAssetIdStr) =                     {
431-                        let assetId = fromBase58String(nextAssetIdStr)
432-                        let index = valueOrErrorMessage(indexOf(assetsStr, nextAssetIdStr), wrapErr("invalid asset balance"))
433-                        let assetDecimals = getAssetInfoOrFail(assetId).decimals
434-                        let balance = fromX18(assetsBalances[index], pow(10, 0, assetDecimals, 0, 0, DOWN))
435-                        let amount = fraction(balance, payment.amount, wxdaoQuantity)
436-                        if ((amount > 0))
437-                            then $Tuple2((acc._1 :+ assetId), (acc._2 :+ amount))
438-                            else acc
439-                        }
440-
441-                    let transfers = {
442-                        let $l = assetsStr
443-                        let $s = size($l)
444-                        let $acc0 = $Tuple2(nil, nil)
445-                        func $f0_1 ($a,$i) =                         if (($i >= $s))
446-                            then $a
447-                            else map($a, $l[$i])
448-
449-                        func $f0_2 ($a,$i) =                         if (($i >= $s))
450-                            then $a
451-                            else throw("List size exceeds 6")
452-
453-                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
454-                        }
455-                    if ((transfers == transfers))
456-                        then {
457-                            let additionalLockRounds = 0
458-                            let factoryActions = ([invoke(factoryAddress, "commitAfterStartWithLockRoundFor", [toString(powerContractAddress(factoryAddress)), toString(factoryAddress), toString(userAddress), additionalLockRounds, getPowerAssetId(factoryAddress), pwrAmount], nil)] ++ (if ((size(transfers._1) == 0))
459-                                then nil
460-                                else [invoke(factoryAddress, "transferAssets", [userAddress.bytes, transfers._1, transfers._2], nil)]))
461-                            $Tuple2([Burn(paymentAssetId, payment.amount)], factoryActions)
462-                            }
463-                        else throw("Strict value is not equal to itself.")
464-                    }
465-                else throw("Strict value is not equal to itself.")
442+            let additionalLockRounds = 0
443+            let factoryActions = ([invoke(factoryAddress, "commitAfterStartWithLockRoundFor", [toString(powerContractAddress(factoryAddress)), toString(getTreasuryAddress(factoryAddress)), toString(userAddress), additionalLockRounds, getPowerAssetId(factoryAddress), pwrAmount], nil)] ++ (if ((size(transfers._1) == 0))
444+                then nil
445+                else [invoke(factoryAddress, "transferAssets", [userAddress.bytes, transfers._1, transfers._2], nil)]))
446+            $Tuple2([Burn(paymentAssetId, payment.amount)], factoryActions)
466447             }
467448         else throw("Strict value is not equal to itself.")
468449     }

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 7 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let chainId = take(drop(this.bytes, 1), 1)
55 
66 let chainIdT = base58'2T'
77 
88 let chainIdW = base58'2W'
99 
1010 let SEP = "__"
1111 
1212 let WAVES = "WAVES"
1313 
1414 let contractFilename = "wxdao_calculator.ride"
1515 
1616 let mult8 = 100000000
1717 
1818 let mult18 = toBigInt(1000000000000000000)
1919 
2020 let wavesDecimals = 8
2121 
2222 let usdtDecimals = 6
2323 
2424 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), mult18, toBigInt(origScaleMult))
2525 
2626 
2727 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), mult18))
2828 
2929 
3030 func wrapErr (s) = ((contractFilename + ": ") + s)
3131 
3232 
3333 func throwErr (s) = throw(wrapErr(s))
3434 
3535 
3636 let wxAssetId = if ((chainId == chainIdW))
3737     then base58'Atqv59EYzjFGuitKVnMRk6H8FukjoV3ktPorbEys25on'
3838     else if ((chainId == chainIdT))
3939         then base58'EMAMLxDnv3xiz8RXg8Btj33jcEw3wLczL3JKYYmuubpc'
4040         else throwErr("invalid chain id")
4141 
4242 func keyCurrentPeriod () = makeString(["%s", "currentPeriod"], SEP)
4343 
4444 
4545 func keyStartHeightByPeriod (period) = makeString(["%s%d", "startHeight", toString(period)], SEP)
4646 
4747 
4848 func keyPeriodLength () = makeString(["%s", "periodLength"], SEP)
4949 
5050 
5151 func keyTreasuryValueByPeriod (period) = makeString(["%s%d", "treasuryValue", toString(period)], SEP)
5252 
5353 
5454 func keySkinTotal (treasuryAddress) = ("skin_total_" + toString(treasuryAddress))
5555 
5656 
5757 func keyPowerConfigAddress () = "%s__powerConfigAddress"
5858 
5959 
6060 func powerConfigAddress (factoryAddress) = valueOrErrorMessage(match getString(factoryAddress, keyPowerConfigAddress()) {
6161     case s: String => 
6262         addressFromString(s)
6363     case _: Unit => 
6464         unit
6565     case _ => 
6666         throw("Match error")
6767 }, wrapErr("invalid power config address"))
6868 
6969 
7070 func keyPowerAssetId () = "powerAssetId"
7171 
7272 
7373 func getPowerAssetId (factoryAddress) = fromBase58String(valueOrErrorMessage(getString(powerConfigAddress(factoryAddress), keyPowerAssetId()), wrapErr("invalid power asset id")))
7474 
7575 
7676 func keyPowerContractAddress () = "%s__powerContractAddress"
7777 
7878 
7979 func powerContractAddress (factoryAddress) = valueOrErrorMessage(match getString(factoryAddress, keyPowerContractAddress()) {
8080     case s: String => 
8181         addressFromString(s)
8282     case _: Unit => 
8383         unit
8484     case _ => 
8585         throw("Match error")
8686 }, wrapErr("invalid power contract address"))
8787 
8888 
8989 func keyPoolsFactoryAddress () = "%s__poolsFactoryAddress"
9090 
9191 
9292 func getPoolsFactoryAddress (factoryAddress) = valueOrErrorMessage(match getString(factoryAddress, keyPoolsFactoryAddress()) {
9393     case s: String => 
9494         addressFromString(s)
9595     case _: Unit => 
9696         unit
9797     case _ => 
9898         throw("Match error")
9999 }, wrapErr("invalid pools factory address"))
100100 
101101 
102102 func keyTreasuryAddress () = "%s__treasuryAddress"
103103 
104104 
105105 func getTreasuryAddress (factoryAddress) = valueOrErrorMessage(match getString(factoryAddress, keyTreasuryAddress()) {
106106     case s: String => 
107107         addressFromString(s)
108108     case _: Unit => 
109109         unit
110110     case _ => 
111111         throw("Match error")
112112 }, wrapErr("invalid treasury address"))
113113 
114114 
115115 func keyAssets () = "%s__assets"
116116 
117117 
118118 func getAssetsStr (factoryAddress) = valueOrErrorMessage(getString(factoryAddress, keyAssets()), wrapErr("invalid assets"))
119119 
120120 
121121 func keyLpAssetId () = "%s__lpAssetId"
122122 
123123 
124124 func getLpAssetId (factoryAddress) = fromBase58String(valueOrErrorMessage(getString(factoryAddress, keyLpAssetId()), wrapErr("invalid lp asset id")))
125125 
126126 
127127 func getAssetInfoOrFail (assetId) = valueOrErrorMessage(assetInfo(assetId), wrapErr("invalid asset info"))
128128 
129129 
130130 func getAssetsBalances (targetAddress,assetIdList) = {
131131     func map (acc,nextAssetIdStr) =     {
132132         let balance = if ((nextAssetIdStr == WAVES))
133133             then toX18(wavesBalance(targetAddress).available, pow(10, 0, wavesDecimals, 0, 0, DOWN))
134134             else {
135135                 let assetId = fromBase58String(nextAssetIdStr)
136136                 let assetDecimals = getAssetInfoOrFail(assetId).decimals
137137                 toX18(assetBalance(targetAddress, assetId), pow(10, 0, assetDecimals, 0, 0, DOWN))
138138                 }
139139         (acc :+ balance)
140140         }
141141 
142142     let $l = assetIdList
143143     let $s = size($l)
144144     let $acc0 = nil
145145     func $f0_1 ($a,$i) =     if (($i >= $s))
146146         then $a
147147         else map($a, $l[$i])
148148 
149149     func $f0_2 ($a,$i) =     if (($i >= $s))
150150         then $a
151151         else throw("List size exceeds 10")
152152 
153153     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
154154     }
155155 
156156 
157157 func getAssetsPrices (poolsFactoryAddress,assetIdList) = if ((chainId == chainIdW))
158158     then {
159159         let wavesUsdtAddressStr = "3PKfrupEydU2nZAghVjZAfvCwMBkzuR1F52"
160160         let wavesUsdtPrice = parseBigIntValue({
161161             let @ = invoke(poolsFactoryAddress, "getPrice", [wavesUsdtAddressStr], nil)
162162             if ($isInstanceOf(@, "String"))
163163                 then @
164164                 else throw(($getType(@) + " couldn't be cast to String"))
165165             })
166166         let wavesXtnAddressStr = "3PPZWgFNRKHLvM51pwS934C8VZ7d2F4Z58g"
167167         let wavesXtnPrice = parseBigIntValue({
168168             let @ = invoke(poolsFactoryAddress, "getPrice", [wavesXtnAddressStr], nil)
169169             if ($isInstanceOf(@, "String"))
170170                 then @
171171                 else throw(($getType(@) + " couldn't be cast to String"))
172172             })
173173         let xtnUsdtPrice = fraction(wavesUsdtPrice, mult18, wavesXtnPrice)
174174         func map (acc,nextAssetId) =         {
175175             let price =             match nextAssetId {
176176                 case _ => 
177177                     if (("2thsACuHmzDMuNezPM32wg9a3BwUzBWDeSKakgz3cw21" == $match0))
178178                         then {
179179                             let pwrWavesAddressStr = "3PDi7Qq8pLQYvtKyTfQuqqPUWyhoYbU957t"
180180                             let pwrWavesPrice = parseBigIntValue({
181181                                 let @ = invoke(poolsFactoryAddress, "getPrice", [pwrWavesAddressStr], nil)
182182                                 if ($isInstanceOf(@, "String"))
183183                                     then @
184184                                     else throw(($getType(@) + " couldn't be cast to String"))
185185                                 })
186186                             fraction(pwrWavesPrice, wavesUsdtPrice, mult18)
187187                             }
188188                         else if (("Atqv59EYzjFGuitKVnMRk6H8FukjoV3ktPorbEys25on" == $match0))
189189                             then {
190190                                 let wxWavesAddressStr = "3PFzaH2ghpwANHFgjeva83N1yxzErELx2eh"
191191                                 let wxWavesPrice = parseBigIntValue({
192192                                     let @ = invoke(poolsFactoryAddress, "getPrice", [wxWavesAddressStr], nil)
193193                                     if ($isInstanceOf(@, "String"))
194194                                         then @
195195                                         else throw(($getType(@) + " couldn't be cast to String"))
196196                                     })
197197                                 fraction(wxWavesPrice, wavesUsdtPrice, mult18)
198198                                 }
199199                             else if (("34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ" == $match0))
200200                                 then {
201201                                     let wavesUsdtwxgAddressStr = "3PKMVZ7kQeaREajYi8Yc25Ro6mcNw5D6QSa"
202202                                     let wavesUsdtwxgPrice = parseBigIntValue({
203203                                         let @ = invoke(poolsFactoryAddress, "getPrice", [wavesUsdtwxgAddressStr], nil)
204204                                         if ($isInstanceOf(@, "String"))
205205                                             then @
206206                                             else throw(($getType(@) + " couldn't be cast to String"))
207207                                         })
208208                                     fraction(wavesUsdtPrice, mult18, wavesUsdtwxgPrice)
209209                                     }
210210                                 else if (("6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ" == $match0))
211211                                     then {
212212                                         let wavesUsdcwxgAddressStr = "3P3g3eipfG2NZKKQE8DZXt2E9tRJqii9jcX"
213213                                         let wavesUsdcwxgPrice = parseBigIntValue({
214214                                             let @ = invoke(poolsFactoryAddress, "getPrice", [wavesUsdcwxgAddressStr], nil)
215215                                             if ($isInstanceOf(@, "String"))
216216                                                 then @
217217                                                 else throw(($getType(@) + " couldn't be cast to String"))
218218                                             })
219219                                         fraction(wavesUsdtPrice, mult18, wavesUsdcwxgPrice)
220220                                         }
221221                                     else if (("HZk1mbfuJpmxU1Fs4AX5MWLVYtctsNcg6e2C6VKqK8zk" == $match0))
222222                                         then {
223223                                             let ltcwxgXtnAddressStr = "3P94wvu5gA7VhjPgAB3twaeqdwHCwNK2vsn"
224224                                             let ltcwxgXtnPrice = parseBigIntValue({
225225                                                 let @ = invoke(poolsFactoryAddress, "getPrice", [ltcwxgXtnAddressStr], nil)
226226                                                 if ($isInstanceOf(@, "String"))
227227                                                     then @
228228                                                     else throw(($getType(@) + " couldn't be cast to String"))
229229                                                 })
230230                                             fraction(ltcwxgXtnPrice, xtnUsdtPrice, mult18)
231231                                             }
232232                                         else if (("474jTeYx2r2Va35794tCScAXWJG9hU2HcgxzMowaZUnu" == $match0))
233233                                             then {
234234                                                 let ethwxgWavesAddressStr = "3P3XGTN6s292g9iwYhs3TEqJqHiffQYojuE"
235235                                                 let ethwxgWavesPrice = parseBigIntValue({
236236                                                     let @ = invoke(poolsFactoryAddress, "getPrice", [ethwxgWavesAddressStr], nil)
237237                                                     if ($isInstanceOf(@, "String"))
238238                                                         then @
239239                                                         else throw(($getType(@) + " couldn't be cast to String"))
240240                                                     })
241241                                                 fraction(ethwxgWavesPrice, wavesUsdtPrice, mult18)
242242                                                 }
243243                                             else if (("8LQW8f7P5d5PZM7GtZEBgaqRPGSzS3DfPuiXrURJ4AJS" == $match0))
244244                                                 then {
245245                                                     let btcwxgXtnAddressStr = "3PCBWDTA6jrFswd7gQgaE3Xk7gLM5RKofvp"
246246                                                     let btcwxgXtnPrice = parseBigIntValue({
247247                                                         let @ = invoke(poolsFactoryAddress, "getPrice", [btcwxgXtnAddressStr], nil)
248248                                                         if ($isInstanceOf(@, "String"))
249249                                                             then @
250250                                                             else throw(($getType(@) + " couldn't be cast to String"))
251251                                                         })
252252                                                     fraction(btcwxgXtnPrice, xtnUsdtPrice, mult18)
253253                                                     }
254254                                                 else throwErr("invalid asset id")
255255             }
256256             (acc :+ price)
257257             }
258258 
259259         let $l = assetIdList
260260         let $s = size($l)
261261         let $acc0 = nil
262262         func $f0_1 ($a,$i) =         if (($i >= $s))
263263             then $a
264264             else map($a, $l[$i])
265265 
266266         func $f0_2 ($a,$i) =         if (($i >= $s))
267267             then $a
268268             else throw("List size exceeds 10")
269269 
270270         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
271271         }
272272     else if ((chainId == chainIdT))
273273         then {
274274             func map (acc,nextAssetId) =             {
275275                 let price =                 match nextAssetId {
276276                     case _ => 
277277                         if (("EMAMLxDnv3xiz8RXg8Btj33jcEw3wLczL3JKYYmuubpc" == $match0))
278278                             then {
279279                                 let wxUsdtAddressStr = "3MrULQRLc52GWrJF1tMcAm4M78fPe57o9Kt"
280280                                 let wxUsdtPrice = parseBigIntValue({
281281                                     let @ = invoke(poolsFactoryAddress, "getPrice", [wxUsdtAddressStr], nil)
282282                                     if ($isInstanceOf(@, "String"))
283283                                         then @
284284                                         else throw(($getType(@) + " couldn't be cast to String"))
285285                                     })
286286                                 wxUsdtPrice
287287                                 }
288288                             else if (("A7Ksh7fXyqm1KhKAiK3bAB2aiPSitQQF6v1pyu9SS3FR" == $match0))
289289                                 then {
290290                                     let usdcUsdtAddressStr = "3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA"
291291                                     let usdcUsdtPrice = parseBigIntValue({
292292                                         let @ = invoke(poolsFactoryAddress, "getPrice", [usdcUsdtAddressStr], nil)
293293                                         if ($isInstanceOf(@, "String"))
294294                                             then @
295295                                             else throw(($getType(@) + " couldn't be cast to String"))
296296                                         })
297297                                     usdcUsdtPrice
298298                                     }
299299                                 else if (("8Q6SE2ANebufw8JuPjJVRjZD6drD8ihjNjM8xaGUSfdR" == $match0))
300300                                     then {
301301                                         let price = toX18(150000000, pow(10, 0, usdtDecimals, 0, 0, DOWN))
302302                                         price
303303                                         }
304304                                     else throwErr("invalid asset id")
305305                 }
306306                 (acc :+ price)
307307                 }
308308 
309309             let $l = assetIdList
310310             let $s = size($l)
311311             let $acc0 = nil
312312             func $f0_1 ($a,$i) =             if (($i >= $s))
313313                 then $a
314314                 else map($a, $l[$i])
315315 
316316             func $f0_2 ($a,$i) =             if (($i >= $s))
317317                 then $a
318318                 else throw("List size exceeds 10")
319319 
320320             $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
321321             }
322322         else throwErr("invalid chain id")
323323 
324324 
325325 func calcTreasuryValue (factoryAddress) = {
326326     let treasuryAddress = getTreasuryAddress(factoryAddress)
327327     let poolsFactoryAddress = getPoolsFactoryAddress(factoryAddress)
328328     let assetsStr = split(getAssetsStr(factoryAddress), SEP)
329329     let assetsBalances = getAssetsBalances(treasuryAddress, assetsStr)
330330     let assetsPrices = getAssetsPrices(poolsFactoryAddress, assetsStr)
331331     func reduce (acc,nextAssetIdStr) =     {
332332         let assetId = fromBase58String(nextAssetIdStr)
333333         let index = valueOrErrorMessage(indexOf(assetsStr, nextAssetIdStr), wrapErr("invalid asset id"))
334334         let balance = assetsBalances[index]
335335         let price = assetsPrices[index]
336336         let assetValue = fraction(balance, price, mult18)
337337         (acc + assetValue)
338338         }
339339 
340340     let treasuryValue = {
341341         let $l = assetsStr
342342         let $s = size($l)
343343         let $acc0 = toBigInt(0)
344344         func $f0_1 ($a,$i) =         if (($i >= $s))
345345             then $a
346346             else reduce($a, $l[$i])
347347 
348348         func $f0_2 ($a,$i) =         if (($i >= $s))
349349             then $a
350350             else throw("List size exceeds 10")
351351 
352352         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
353353         }
354354     treasuryValue
355355     }
356356 
357357 
358+func calcRewards (factoryAddress,paymentAmount) = {
359+    let assetsStr = split(getAssetsStr(factoryAddress), SEP)
360+    let wxdaoQuantity = getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity
361+    if ((wxdaoQuantity == wxdaoQuantity))
362+        then {
363+            let assetsBalances = getAssetsBalances(factoryAddress, assetsStr)
364+            func map (acc,nextAssetIdStr) =             {
365+                let assetId = fromBase58String(nextAssetIdStr)
366+                let index = valueOrErrorMessage(indexOf(assetsStr, nextAssetIdStr), wrapErr("invalid asset balance"))
367+                let assetDecimals = getAssetInfoOrFail(assetId).decimals
368+                let balance = fromX18(assetsBalances[index], pow(10, 0, assetDecimals, 0, 0, DOWN))
369+                let amount = fraction(balance, paymentAmount, wxdaoQuantity)
370+                if ((amount > 0))
371+                    then $Tuple2((acc._1 :+ assetId), (acc._2 :+ amount))
372+                    else acc
373+                }
374+
375+            let $l = assetsStr
376+            let $s = size($l)
377+            let $acc0 = $Tuple2(nil, nil)
378+            func $f0_1 ($a,$i) =             if (($i >= $s))
379+                then $a
380+                else map($a, $l[$i])
381+
382+            func $f0_2 ($a,$i) =             if (($i >= $s))
383+                then $a
384+                else throw("List size exceeds 6")
385+
386+            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
387+            }
388+        else throw("Strict value is not equal to itself.")
389+    }
390+
391+
358392 func calcPrice (factoryAddress) = {
359393     let poolsFactoryAddress = getPoolsFactoryAddress(factoryAddress)
360394     let currentPeriod = valueOrErrorMessage(getInteger(factoryAddress, keyCurrentPeriod()), wrapErr("invalid current period"))
361395     let startTreasuryValue = valueOrErrorMessage(getInteger(factoryAddress, keyTreasuryValueByPeriod(currentPeriod)), wrapErr(("invalid treasury value for period " + toString(currentPeriod))))
362396     let treasuryValue = fromX18(calcTreasuryValue(factoryAddress), pow(10, 0, usdtDecimals, 0, 0, DOWN))
363397     let treasuryValueDiff = (treasuryValue - startTreasuryValue)
364398     let treasuryValueDiffRaw = toX18(treasuryValueDiff, pow(10, 0, usdtDecimals, 0, 0, DOWN))
365399     let pwrAssetId = getPowerAssetId(factoryAddress)
400+    let pwrInfo = getAssetInfoOrFail(pwrAssetId)
366401     let pwrPriceRaw = getAssetsPrices(poolsFactoryAddress, [toBase58String(pwrAssetId)])[0]
367402     let pwrPrice = if ((pwrPriceRaw > toBigInt(0)))
368403         then fromX18(pwrPriceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
369404         else throwErr("invalid PWR price")
370405     let treasuryAddress = getTreasuryAddress(factoryAddress)
371406     let skinTotal = valueOrElse(getInteger(powerContractAddress(factoryAddress), keySkinTotal(treasuryAddress)), 0)
372-    let pwrRemaining = (getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity / 100)
407+    let wxdaoInfo = getAssetInfoOrFail(getLpAssetId(factoryAddress))
408+    let pwrRemaining = (wxdaoInfo.quantity / 100)
373409     let pwrAmount = (skinTotal + pwrRemaining)
374-    let pwrAmountRaw = toX18(pwrAmount, pow(10, 0, getAssetInfoOrFail(getLpAssetId(factoryAddress)).decimals, 0, 0, DOWN))
410+    let pwrAmountRaw = toX18(pwrAmount, pow(10, 0, pwrInfo.decimals, 0, 0, DOWN))
375411     let factoryAddressWxBalanceRaw = getAssetsBalances(factoryAddress, [toBase58String(wxAssetId)])[0]
376412     let factoryAddressWxBalance = fromX18(factoryAddressWxBalanceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
377413     let wxPriceRaw = getAssetsPrices(poolsFactoryAddress, [toBase58String(wxAssetId)])[0]
378414     let wxPrice = if ((wxPriceRaw > toBigInt(0)))
379415         then fromX18(wxPriceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
380416         else throwErr("invalid wx price")
381-    let wxdaoQuantity = getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity
382-    let wxdaoQuantityRaw = toX18(wxdaoQuantity, pow(10, 0, getAssetInfoOrFail(getLpAssetId(factoryAddress)).decimals, 0, 0, DOWN))
417+    let wxdaoQuantity = wxdaoInfo.quantity
418+    let wxdaoQuantityRaw = toX18(wxdaoQuantity, pow(10, 0, wxdaoInfo.decimals, 0, 0, DOWN))
383419     let wxDaoPriceRaw = (((pwrPriceRaw + fraction((factoryAddressWxBalanceRaw * toBigInt(100)), wxPriceRaw, wxdaoQuantityRaw)) + fraction(max([treasuryValueDiffRaw, toBigInt(0)]), (toBigInt(2) * mult18), (toBigInt(10) * pwrAmountRaw))) / toBigInt(100))
384420     let wxDaoPrice = fromX18(wxDaoPriceRaw, pow(10, 0, usdtDecimals, 0, 0, DOWN))
385-    $Tuple2(wxDaoPrice, [["wxDaoPrice", wxDaoPrice], ["pwrPrice", pwrPrice], ["factoryAddressWxBalance", factoryAddressWxBalance], ["wxPrice", wxPrice], ["wxdaoQuantity", wxdaoQuantity], ["treasuryValueDiff", treasuryValueDiff], ["pwrAmount", pwrAmount], ["skinTotal", skinTotal], ["pwrRemaining", pwrRemaining]])
421+    let rewardsPrices = calcRewards(factoryAddress, pow(10, 0, wxdaoInfo.decimals, 0, 0, DOWN))
422+    $Tuple2([wxDaoPrice, rewardsPrices], [["wxDaoPrice", wxDaoPrice], ["pwrPrice", pwrPrice], ["factoryAddressWxBalance", factoryAddressWxBalance], ["wxPrice", wxPrice], ["wxdaoQuantity", wxdaoQuantity], ["treasuryValueDiff", treasuryValueDiff], ["pwrAmount", pwrAmount], ["skinTotal", skinTotal], ["pwrRemaining", pwrRemaining]])
386423     }
387-
388-
389-@Callable(i)
390-func withdraw (args) = {
391-    let recipient = addressFromStringValue(args[0])
392-    let amount = parseIntValue(args[1])
393-    let result = invoke(i.caller, "transferWaves", [recipient.bytes, amount], nil)
394-    $Tuple2(nil, result)
395-    }
396-
397-
398-
399-@Callable(i)
400-func setIntParam (args) = {
401-    let key = args[0]
402-    let val = parseIntValue(args[1])
403-    let result = invoke(i.caller, "integerEntry", [key, val], nil)
404-    $Tuple2(nil, result)
405-    }
406-
407424 
408425 
409426 @Callable(i)
410427 func swap (callerPublicKey,args) = {
411428     let factoryAddress = i.caller
412429     let userAddress = addressFromPublicKey(callerPublicKey)
413430     let payment = if ((size(i.payments) == 1))
414431         then i.payments[0]
415432         else throwErr("1 payment is required")
416433     let err = wrapErr("invalid payment asset id")
417434     let paymentAssetId = if ((valueOrErrorMessage(payment.assetId, err) == getLpAssetId(factoryAddress)))
418435         then value(payment.assetId)
419436         else throwErr(err)
420437     let pwrPrice = 100
421438     let pwrAmount = (payment.amount / pwrPrice)
422-    let assetsStr = split(getAssetsStr(factoryAddress), SEP)
423-    let pwrBalance = assetBalance(factoryAddress, getPowerAssetId(factoryAddress))
424-    if ((pwrBalance == pwrBalance))
439+    let transfers = calcRewards(factoryAddress, payment.amount)
440+    if ((transfers == transfers))
425441         then {
426-            let wxdaoQuantity = getAssetInfoOrFail(getLpAssetId(factoryAddress)).quantity
427-            if ((wxdaoQuantity == wxdaoQuantity))
428-                then {
429-                    let assetsBalances = getAssetsBalances(factoryAddress, assetsStr)
430-                    func map (acc,nextAssetIdStr) =                     {
431-                        let assetId = fromBase58String(nextAssetIdStr)
432-                        let index = valueOrErrorMessage(indexOf(assetsStr, nextAssetIdStr), wrapErr("invalid asset balance"))
433-                        let assetDecimals = getAssetInfoOrFail(assetId).decimals
434-                        let balance = fromX18(assetsBalances[index], pow(10, 0, assetDecimals, 0, 0, DOWN))
435-                        let amount = fraction(balance, payment.amount, wxdaoQuantity)
436-                        if ((amount > 0))
437-                            then $Tuple2((acc._1 :+ assetId), (acc._2 :+ amount))
438-                            else acc
439-                        }
440-
441-                    let transfers = {
442-                        let $l = assetsStr
443-                        let $s = size($l)
444-                        let $acc0 = $Tuple2(nil, nil)
445-                        func $f0_1 ($a,$i) =                         if (($i >= $s))
446-                            then $a
447-                            else map($a, $l[$i])
448-
449-                        func $f0_2 ($a,$i) =                         if (($i >= $s))
450-                            then $a
451-                            else throw("List size exceeds 6")
452-
453-                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
454-                        }
455-                    if ((transfers == transfers))
456-                        then {
457-                            let additionalLockRounds = 0
458-                            let factoryActions = ([invoke(factoryAddress, "commitAfterStartWithLockRoundFor", [toString(powerContractAddress(factoryAddress)), toString(factoryAddress), toString(userAddress), additionalLockRounds, getPowerAssetId(factoryAddress), pwrAmount], nil)] ++ (if ((size(transfers._1) == 0))
459-                                then nil
460-                                else [invoke(factoryAddress, "transferAssets", [userAddress.bytes, transfers._1, transfers._2], nil)]))
461-                            $Tuple2([Burn(paymentAssetId, payment.amount)], factoryActions)
462-                            }
463-                        else throw("Strict value is not equal to itself.")
464-                    }
465-                else throw("Strict value is not equal to itself.")
442+            let additionalLockRounds = 0
443+            let factoryActions = ([invoke(factoryAddress, "commitAfterStartWithLockRoundFor", [toString(powerContractAddress(factoryAddress)), toString(getTreasuryAddress(factoryAddress)), toString(userAddress), additionalLockRounds, getPowerAssetId(factoryAddress), pwrAmount], nil)] ++ (if ((size(transfers._1) == 0))
444+                then nil
445+                else [invoke(factoryAddress, "transferAssets", [userAddress.bytes, transfers._1, transfers._2], nil)]))
446+            $Tuple2([Burn(paymentAssetId, payment.amount)], factoryActions)
466447             }
467448         else throw("Strict value is not equal to itself.")
468449     }
469450 
470451 
471452 
472453 @Callable(i)
473454 func price (callerPublicKey,args) = {
474455     let factoryAddress = i.caller
475456     $Tuple2(nil, calcPrice(factoryAddress)._1)
476457     }
477458 
478459 
479460 
480461 @Callable(i)
481462 func priceDebug (callerPublicKey,args) = {
482463     let factoryAddress = i.caller
483464     $Tuple2(nil, calcPrice(factoryAddress)._2)
484465     }
485466 
486467 
487468 
488469 @Callable(i)
489470 func getTreasuryValue (callerPublicKey,args) = {
490471     let factoryAddress = i.caller
491472     let treasuryValue = fromX18(calcTreasuryValue(factoryAddress), pow(10, 0, usdtDecimals, 0, 0, DOWN))
492473     $Tuple2(nil, treasuryValue)
493474     }
494475 
495476 
496477 @Verifier(tx)
497478 func verify () = (chainId == chainIdT)
498479 
github/deemru/w8io/c3f4982 
50.25 ms ◑