2024.04.17 09:31 [3066416] smart account 3MptKi7f3jwXjzqhHpvLLzsSpEQdZiwAo5c > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FnfizKJtJXAhfpiuG6NBbist5MdxsKYrY1SW1YjKT3FZ",
    "fee": 2400000,
    "feeAssetId": null,
    "timestamp": 1713335488627,
    "version": 2,
    "chainId": 84,
    "sender": "3MptKi7f3jwXjzqhHpvLLzsSpEQdZiwAo5c",
    "senderPublicKey": "44kjsoExo76qSrM51NMhbG8FtdLkcPtyJxEDrwDyT8kz",
    "proofs": [
        "4pMZ4cSkzAH2rNkHe3LVquYR8L3GYFwHhmZypwRXANJwMd8oHKw1bAdJpHzQX2LKiTuFFZ67cjEFJ2fzFSPtVeQK"
    ],
    "script": "base64:BgL0JQgCEgkKBwEBAQEBCAESABIECgIICBIDCgEIEgMKARgSBAoCCAgSBAoCCAgiD2dldFN0cmluZ09yRmFpbCIDa2V5IgNTRVAiCEJVRlNDQUxFIgZzY2FsZTgiCHRocm93RXJyIgNtc2ciCGFzU3RyaW5nIgN2YWwiByRtYXRjaDAiBnZhbFN0ciIdY29udmVydFByaWNlQXNzZXRJbnRvSWRvQXNzZXQiEHByaWNlQXNzZXRBbW91bnQiDnByaWNlQXNzZXRNVUxUIgVwcmljZSIJcHJpY2VNVUxUIgxpZG9Bc3NldE1VTFQiD2JQcmljZUFzc2V0TVVMVCINYklkb0Fzc2V0TVVMVCIOYlByaWNlQXNzZXRCVUYiD2JBbW91bnRBc3NldEJVRiIOSWR4Q2ZnSWRvU3RhcnQiEUlkeENmZ0lkb0R1cmF0aW9uIhBJZHhDZmdDbGFpbVN0YXJ0IhNJZHhDZmdDbGFpbUR1cmF0aW9uIgtJZHhDZmdQcmljZSIPSWR4Q2ZnUHJpY2VNdWx0IhBJZHhDZmdJZG9Bc3NldElkIhJJZHhDZmdJZG9Bc3NldE11bHQiEklkeENmZ1ByaWNlQXNzZXRJZCIUSWR4Q2ZnUHJpY2VBc3NldE11bHQiFUlkeENmZ01pbkludmVzdEFtb3VudCINZnJvbWF0Q29uZmlnUyIIaWRvU3RhcnQiC2lkb0R1cmF0aW9uIgpjbGFpbVN0YXJ0Ig1jbGFpbUR1cmF0aW9uIglwcmljZU11bHQiDGlkb0Fzc2V0SWQ1OCIMaWRvQXNzZXRNdWx0Ig5wcmljZUFzc2V0SWQ1OCIOcHJpY2VBc3NldE11bHQiD21pbkludmVzdEFtb3VudCITdG90YWxJZG9Bc3NldFRvU2VsbCIMZnJvbWF0Q29uZmlnIhFJZHhJbnZUb3RhbEFtb3VudCIVSWR4SW52UmVtYWluaW5nQW1vdW50Ih1JZHhJbnZDbGFpbWVkUHJpY2VBc3NldEFtb3VudCIbSWR4SW52Q2xhaW1lZElkb0Fzc2V0QW1vdW50IhdJZHhJbnZMYXN0Q2xhaW1lZEhlaWdodCIPZm9ybWF0SW52ZXN0b3JTIgt0b3RhbEFtb3VudCIPcmVtYWluaW5nQW1vdW50IhdjbGFpbWVkUHJpY2VBc3NldEFtb3VudCIVY2xhaW1lZElkb0Fzc2V0QW1vdW50IhFsYXN0Q2xhaW1lZEhlaWdodCIOZm9ybWF0SW52ZXN0b3IiE2Zvcm1hdEhpc3RvcnlSZWNvcmQiDmlkb0Fzc2V0QW1vdW50IglrZXlDb25maWciC2tleUludmVzdG9yIgt1c2VyQWRkcmVzcyIJa2V5VG90YWxzIhlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkIgR0eXBlIgZ0eElkNTgiFGtleVVTRE5DbGFpbURpc2FibGVkIhVrZXlVU0ROQ2xhaW1FbmRIZWlnaHQiD2tleVBlcmlvZExlbmd0aCIQa2V5Q3VycmVudFBlcmlvZCIUa2V5UGVyaW9kU3RhcnRIZWlnaHQiCXBlcmlvZE51bSISa2V5UGVyaW9kRW5kSGVpZ2h0Ih9rZXlVc2R0UHJpY2VBc3NldEFsbG93YWJsZVJhdGlvIhdrZXlUb3RhbFBlcmlvZEFsbG93YW5jZSIHYXNzZXRJZCIWa2V5VXNlclBlcmlvZEFsbG93YW5jZSIea2V5UGVyaW9kVG90YWxBdmFpbGFibGVUb0NsYWltIh1rZXlQZXJpb2RVc2VyQXZhaWxhYmxlVG9DbGFpbSIba2V5VXNkdFByaWNlQXNzZXRTdGFibGVQb29sIg5rZXlVc2R0QXNzZXRJZCIUa2V5UHJpY2VBc3NldEJhbGFuY2UiB2FkZHJlc3MiGmtleUludmVzdG9yUmVtYWluaW5nQW1vdW50IhdrZXlUb3RhbFJlbWFpbmluZ0Ftb3VudCITa2V5TWFuYWdlclB1YmxpY0tleSIWa2V5TWFuYWdlclZhdWx0QWRkcmVzcyIVa2V5Q2xhaW1DbG9zaW5nSGVpZ2h0IhJjbGFpbUNsb3NpbmdIZWlnaHQiD3JlYWRDb25maWdBcnJheSIjcmVhZFRvdGFsc0FycmF5T3JEZWZhdWx0QnlDdXN0b21LZXkiCWN1c3RvbUtleSIYcmVhZFRvdGFsc0FycmF5T3JEZWZhdWx0IhpyZWFkSW52ZXN0b3JBcnJheU9yRGVmYXVsdCIXcmVhZEludmVzdG9yQXJyYXlPckZhaWwiHGdldE1hbmFnZXJWYXVsdEFkZHJlc3NPclRoaXMiAXMiFUlkeERpZmZUb3RhbEluY3JlbWVudCIkSWR4RGlmZlJlbWFpbmluZ1ByaWNlQW1vdW50SW5jcmVtZW50IiJJZHhEaWZmQ2xhaW1lZFByaWNlQW1vdW50SW5jcmVtZW50IiVJZHhEaWZmQ2xhaW1lZElkb0Fzc2V0QW1vdW50SW5jcmVtZW50IgtUb3RhbHNFbnRyeSIJb3JpZ0FycmF5Ig1pbmNyZW1lbnREaWZmIhRuZXdMYXN0Q2xhaW1lZEhlaWdodCIRcHJpY2VBc3NldEJhbGFuY2UiDm5ld1RvdGFsQW1vdW50IhJuZXdSZW1haW5pbmdBbW91bnQiCGNmZ0FycmF5IhJwcmljZUFzc2V0RGVjaW1hbHMiI3ByaWNlQXNzZXRCYWxhbmNlUHJpY2VBc3NldERlY2ltYWxzIhpuZXdDbGFpbWVkUHJpY2VBc3NldEFtb3VudCIYbmV3Q2xhaW1lZElkb0Fzc2V0QW1vdW50IgdlbnRyaWVzIgRkaWZmIhduZXdMb2dpY1JlbWFpbmluZ0Ftb3VudCIbSW52ZXN0T3BlcmF0aW9uSGlzdG9yeUVudHJ5IgR0eElkIhpDbGFpbU9wZXJhdGlvbkhpc3RvcnlFbnRyeSINaW50ZXJuYWxDbGFpbSIQY2xhaW1lZEFzc2V0SWQ1OCIIY2xhaW1FbmQiCmlkb0Fzc2V0SWQiDHByaWNlQXNzZXRJZCINdXNlckFkZHJlc3M1OCIPb3JpZ0ludmVzdEFycmF5IhFpbnZlc3RUb3RhbEFtb3VudCIaaW52ZXN0TGFzdENsYWltZWRIZWlnaHRUTVAiF2ludmVzdExhc3RDbGFpbWVkSGVpZ2h0IhRuZXdDbGFpbVBlcmlvZEhlaWdodCIOY2xhaW1pbmdCbG9ja3MiGGNsYWltaW5nUHJpY2VBc3NldEFtb3VudCIWY2xhaW1pbmdJZG9Bc3NldEFtb3VudCIGaXNVU0ROIhNpc1VTRE5DbGFpbURpc2FibGVkIgZjaGVja3MiD2ludGVybmFsQ2xhaW1WMiIJb3V0QW1vdW50Ihl0b3RhbFVzZXJBdmFpbGFibGVUb0NsYWltIh50b3RhbFBlcmlvZFByaWNlQXNzZXRBbGxvd2FuY2UiHXVzZXJQZXJpb2RQcmljZUFzc2V0QWxsb3dhbmNlIgxwZXJpb2RMZW5ndGgiDWN1cnJlbnRQZXJpb2QiG3plcm9QZXJpb2RFbmRIZWlnaElzRGVmaW5lZCINJHQwMTMyNzQxNTE0NCIVbGFzdFBlcmlvZFN0YXJ0SGVpZ2h0IhNsYXN0UGVyaW9kRW5kSGVpZ2h0Ig0kdDAxMzUzNDE0MjM5IhR1cGRhdGVkQ3VycmVudFBlcmlvZCILcGVyaW9kU3RhcnQiF2Jsb2Nrc1RvTGFzdFBlcmlvZFN0YXJ0IglwZXJpb2RFbmQiFXplcm9QZXJpb2RTdGFydEhlaWdodCITemVyb1BlcmlvZEVuZEhlaWdodCINJHQwMTQ0OTQxNDg3NiIbcGVyaW9kVG90YWxBdmFpbGFibGVUb0NsYWltIhpwZXJpb2RVc2VyQXZhaWxhYmxlVG9DbGFpbSIZcGVyaW9kTWluQXZhaWxhYmxlVG9DbGFpbSIcdXNkdFByaWNlQXNzZXRBbGxvd2FibGVSYXRpbyIbcHV0T25lVGtuVjJQcmljZUFzc2V0QW1vdW50Ig0kdDAxNTg5OTE2MTUyIgFAIgVib251cyIJZmVlQW1vdW50IghscEFtb3VudCILdXNkdEFzc2V0SWQiDSR0MDE2MjE0MTY0MzIiFGdldE9uZVRrblYyRmVlQW1vdW50Igp1c2R0QW1vdW50IhpjdXJyZW50VXNkdFByaWNlQXNzZXRSYXRpbyITZW5kUGVyaW9kQmxvY2tzTGVmdCIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCITbWFuYWdlclZhdWx0QWRkcmVzcyILbXVzdE1hbmFnZXIiAWkiAnBkIgJwayISZ2V0Q2xhaW1Gb3JBY3Rpb25zIghmYWxsYmFjayIIaW52ZXN0b3IiE2ludmVzdG9yVG90YWxBbW91bnQiF2ludmVzdG9yUmVtYWluaW5nQW1vdW50IhlpbnZlc3RvclByaWNlQXNzZXRCYWxhbmNlIhdpbnZlc3Rvcklkb0Fzc2V0QmFsYW5jZSIZaW52ZXN0b3JMYXN0Q2xhaW1lZEhlaWdodCIRcHJpY2VBc3NldEFjdGlvbnMiGmludmVzdG9yS2V5UmVtYWluaW5nQW1vdW50IhtpbnZlc3RvcktleVJlbWFpbmluZ0FjdGlvbnMiF3RvdGFsSWRvQXNzZXRTZW5kQW1vdW50Ihx0b3RhbElkb0Fzc2V0Rm9ySW52ZXN0b3JEYXRhIgtuZXdJbnZlc3RvciITaW52ZXN0b3JEYXRhQWN0aW9ucyITc2VuZElkb0Fzc2V0QWN0aW9ucyIGaWRvRW5kIgNwbXQiDGlkb0Fzc2V0SW5mbyIOcHJpY2VBc3NldEluZm8iD29yaWdUb3RhbHNBcnJheSIKdG90YWxzRGlmZiIObWluSXZlc3RBbW91bnQiCnBtdEFzc2V0SWQiCXBtdEFtb3VudCIRb3JpZ0ludmVzdG9yQXJyYXkiE25ld1ByaWNlVG90YWxBbW91bnQiFnJlcXVpcmVkSWRvQXNzZXRBbW91bnQiD2NhbGxlckFkZHJlc3M1OCIQY2xhaW1SZXN1bHRUdXBsZSIKb3V0QXNzZXRJZCIaY2xhaW1lZFByaWNlQW1vdW50RnJvbURpZmYiHWNsYWltZWRJZG9Bc3NldEFtb3VudEZyb21EaWZmIg0kdDAyNDU2MjI1MDA2IiJ1cGRhdGVkUGVyaW9kVG90YWxBdmFpbGFibGVUb0NsYWltIiF1cGRhdGVkUGVyaW9kVXNlckF2YWlsYWJsZVRvQ2xhaW0iDmV2YWx1YXRlUmVzdWx0IhthdmFpbGFibGVQcmljZUFtb3VudFRvQ2xhaW0iEGxhc3RDbGFpbUVudHJpZXMiDm5ld0ludmVzdEFycmF5IgZ0b3RhbHMiEXRvdGFsc1RvdGFsQW1vdW50IhV0b3RhbHNSZW1haW5pbmdBbW91bnQiHXRvdGFsc0NsYWltZWRQcmljZUFzc2V0QW1vdW50Iht0b3RhbHNDbGFpbWVkSWRvQXNzZXRBbW91bnQiF3RvdGFsc0xhc3RDbGFpbWVkSGVpZ2h0IhhuZXdUb3RhbHNSZW1haW5pbmdBbW91bnQiDW5ld1RvdGFsQXJyYXkiF25ld1RvdGFsUmVtYWluaW5nQW1vdW50Ihh1cGRhdGVkUHJpY2VBc3NldEJhbGFuY2UiHHByaWNlQXNzZXRCYWxhbmNlSWRvRGVjaW1hbHMiFGNoZWNrVW5jbGFpbWVkQXNzZXRzIhxpbnZlc3RvclJlbWFpbmluZ0Ftb3VudENoZWNrIgluZXdUb3RhbHMiCHVzZXJMaXN0IgZoZWxwZXIiA2FjYyIEdXNlciINJHQwMzQ3NDUzNDc4NyIKYWxsQWN0aW9ucyIIdG90YWxTdW0iCGFkZHJMaXN0Ig0kdDAzNDc5MjM0OTI0Igt1c2VyQWN0aW9ucyIGYWRkU3VtIgJjaCINJHQwMzUxNjIzNTIyOSICJGwiAiRzIgUkYWNjMCIFJGYwXzEiAiRhIgIkaSIFJGYwXzIiA3N1bSICX2EiDHRvdGFsc0FjdGlvbiIVYXZhaWxhYmxlVG9DbGFpbUFycmF5IhlhdmFpbGFibGVJZG9BbW91bnRUb0NsYWltIi5hdmFpbGFibGVJZG9BbW91bnRUb0NsYWltV2l0aFByaWNlQXNzZXRCYWxhbmNlIg0kdDAzNzE5MTM3NjAzIhZjdXJyZW50UGVyaW9kRW5kSGVpZ2h0Ihp1c2VyVG90YWxQcmljZUFzc2V0Q2xhaW1lZCIMcmVzdWx0U3RyaW5nIgxwZXJpb2RMZW5naHQiE3VzZXJQZXJpb2RBbGxvd2FuY2UiFHRvdGFsUGVyaW9kQWxsb3dhbmNlIgJ0eCIGdmVyaWZ5Ig90YXJnZXRQdWJsaWNLZXlGAQFhAQFiCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQUBYgkArAICCQCsAgICD21hbmRhdG9yeSB0aGlzLgUBYgIPIGlzIG5vdCBkZWZpbmVkAAFjAgJfXwABZAkAtgIBAICAkLu61q3wDQABZQCAwtcvAQFmAQFnCQACAQkAuQkCCQDMCAICCWlkby5yaWRlOgkAzAgCBQFnBQNuaWwCASABAWgBAWkEAWoFAWkDCQABAgUBagIGU3RyaW5nBAFrBQFqBQFrCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQFsBQFtAW4BbwFwAXEEAXIJALYCAQUBbgQBcwkAtgIBBQFxBAF0CQC8AgMJALYCAQUBbQUBZAUBcgQBdQkAvAIDBQF0CQC2AgEFAXAJALYCAQUBbwkAoAMBCQC8AgMFAXUJALYCAQUBcQUBZAABdgABAAF3AAIAAXgAAwABeQAEAAF6AAUAAUEABgABQgAHAAFDAAgAAUQACQABRQAKAAFGAAsBAUcMAUgBSQFKAUsBbwFMAU0BTgFPAVABUQFSCQC5CQIJAMwIAgIYJWQlZCVkJWQlZCVkJXMlZCVzJWQlZCVkCQDMCAIFAUgJAMwIAgUBSQkAzAgCBQFKCQDMCAIFAUsJAMwIAgUBbwkAzAgCBQFMCQDMCAIFAU0JAMwIAgUBTgkAzAgCBQFPCQDMCAIFAVAJAMwIAgUBUQkAzAgCBQFSBQNuaWwFAWMBAVMMAUgBSQFKAUsBbwFMAU0BTgFPAVABUQFSCQEBRwwJAKQDAQUBSAkApAMBBQFJCQCkAwEFAUoJAKQDAQUBSwkApAMBBQFvCQCkAwEFAUwFAU0JAKQDAQUBTgUBTwkApAMBBQFQCQCkAwEFAVEJAKQDAQUBUgABVAABAAFVAAIAAVYAAwABVwAEAAFYAAUBAVkFAVoCYWECYWICYWMCYWQJALkJAgkAzAgCAgolZCVkJWQlZCVkCQDMCAIFAVoJAMwIAgUCYWEJAMwIAgUCYWIJAMwIAgUCYWMJAMwIAgUCYWQFA25pbAUBYwECYWUFAVoCYWECYWICYWMCYWQJAQFZBQkApAMBBQFaCQCkAwEFAmFhCQCkAwEFAmFiCQCkAwEFAmFjCQCkAwEFAmFkAQJhZgIBbQJhZwkAuQkCCQDMCAICCCVkJWQlZCVkCQDMCAIJAKQDAQUGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQFtCQDMCAIJAKQDAQUCYWcFA25pbAUBYwECYWgAAgolc19fY29uZmlnAQJhaQECYWoJAKwCAgIEJXNfXwUCYWoBAmFrAAIKJXNfX3RvdGFscwECYWwDAmFtAmFqAmFuCQC5CQIJAMwIAgIRJXMlcyVzJXNfX2hpc3RvcnkJAMwIAgUCYW0JAMwIAgUCYWoJAMwIAgUCYW4FA25pbAUBYwECYW8AAhUlc19fdXNkbkNsYWltRGlzYWJsZWQBAmFwAAIWJXNfX3VzZG5DbGFpbUVuZEhlaWdodAECYXEACQC5CQIJAMwIAgICJXMJAMwIAgIMcGVyaW9kTGVuZ3RoBQNuaWwFAWMBAmFyAAkAuQkCCQDMCAICAiVzCQDMCAICDWN1cnJlbnRQZXJpb2QFA25pbAUBYwECYXMBAmF0CQC5CQIJAMwIAgIEJXMlcwkAzAgCAhFwZXJpb2RTdGFydEhlaWdodAkAzAgCCQCkAwEFAmF0BQNuaWwFAWMBAmF1AQJhdAkAuQkCCQDMCAICBCVzJXMJAMwIAgIPcGVyaW9kRW5kSGVpZ2h0CQDMCAIJAKQDAQUCYXQFA25pbAUBYwECYXYACQC5CQIJAMwIAgICJXMJAMwIAgIcdXNkdFByaWNlQXNzZXRBbGxvd2FibGVSYXRpbwUDbmlsBQFjAQJhdwECYXgJALkJAgkAzAgCAgQlcyVzCQDMCAICFHRvdGFsUGVyaW9kQWxsb3dhbmNlCQDMCAIFAmF4BQNuaWwFAWMBAmF5AQJheAkAuQkCCQDMCAICBCVzJXMJAMwIAgITdXNlclBlcmlvZEFsbG93YW5jZQkAzAgCBQJheAUDbmlsBQFjAQJhegICYXgCYXQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIbcGVyaW9kVG90YWxBdmFpbGFibGVUb0NsYWltCQDMCAIFAmF4CQDMCAIJAKQDAQUCYXQFA25pbAUBYwECYUEDAmF4AmF0AmFqCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgIacGVyaW9kVXNlckF2YWlsYWJsZVRvQ2xhaW0JAMwIAgUCYXgJAMwIAgkApAMBBQJhdAkAzAgCBQJhagUDbmlsBQFjAQJhQgAJALkJAgkAzAgCAgIlcwkAzAgCAhh1c2R0UHJpY2VBc3NldFN0YWJsZVBvb2wFA25pbAUBYwECYUMACQC5CQIJAMwIAgICJXMJAMwIAgILdXNkdEFzc2V0SWQFA25pbAUBYwECYUQBAmFFCQC5CQIJAMwIAgIEJXMlcwkAzAgCAhFwcmljZUFzc2V0QmFsYW5jZQkAzAgCBQJhRQUDbmlsBQFjAQJhRgECYUUJALkJAgkAzAgCAgQlcyVzCQDMCAICF2ludmVzdG9yUmVtYWluaW5nQW1vdW50CQDMCAIFAmFFBQNuaWwFAWMBAmFHAAkAuQkCCQDMCAICAiVzCQDMCAICFHRvdGFsUmVtYWluaW5nQW1vdW50BQNuaWwFAWMBAmFIAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAmFJAAIXJXNfX21hbmFnZXJWYXVsdEFkZHJlc3MBAmFKAAIWJXNfX2NsYWltQ2xvc2luZ0hlaWdodAACYUsJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBAmFKAAAAAQJhTAAJALUJAgkBAWEBCQECYWgABQFjAQJhTQECYU4JALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQJhTgkBAVkFAgEwAgEwAgEwAgEwAgEwBQFjAQJhTwAJAQJhTQEJAQJhawABAmFQAQJhagkBAmFNAQkBAmFpAQUCYWoBAmFRAQJhagkAtQkCCQEBYQEJAQJhaQEFAmFqBQFjAQJhUgAEAWoJAKIIAQkBAmFJAAMJAAECBQFqAgZTdHJpbmcEAmFTBQFqCQERQGV4dHJOYXRpdmUoMTA2MikBBQJhUwUEdGhpcwACYVQAAAACYVUAAQACYVYAAgACYVcAAwECYVgFAWICYVkCYVoCYmECYmIEAVoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhWQUBVAQCYWEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhWQUBVQQCYWIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhWQUBVgQCYWMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhWQUBVwQCYWQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhWQUBWAQCYmMJAGQCBQFaCQCRAwIFAmFaBQJhVAQCYmQJAGQCBQJhYQkAkQMCBQJhWgUCYVUEAmJlCQECYUwABAFPCQCRAwIFAmJlBQFEBAJiZggJAQV2YWx1ZQEJAOwHAQkA2QQBBQFPCGRlY2ltYWxzBAJiZwkAawMFAmJiBQFlCQBsBgAKAAAFAmJmAAAAAAUERE9XTgQCYmgJAGUCCQBkAgUCYWIJAJEDAgUCYVoFAmFWBQJiYgQCYmkJAGQCCQBkAgUCYWMJAJEDAgUCYVoFAmFXBQJiZwQCYmoDCQBmAgAABQJiZAQCYmsJAGUCCQBlAgUCYmMFAmJoBQJiaQQCYmwDCQBmAgAABQJiawAABQJiawkBC1N0cmluZ0VudHJ5AgUBYgkBAmFlBQUCYmMFAmJsBQJiaAUCYmkFAmJhCQELU3RyaW5nRW50cnkCBQFiCQECYWUFBQJiYwUCYmQFAmJoBQJiaQUCYmEFAmJqAQJibQQCYWoBbQJhZwJibgkBC1N0cmluZ0VudHJ5AgkBAmFsAwIGaW52ZXN0BQJhagkA2AQBBQJibgkBAmFmAgUBbQUCYWcBAmJvBAJhagFtAmFnAmJuCQELU3RyaW5nRW50cnkCCQECYWwDAgVjbGFpbQUCYWoJANgEAQUCYm4JAQJhZgIFAW0FAmFnAQJicAMCYnECYWoCYm4EAmJlCQECYUwABAFKCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYmUFAXgEAUsJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiZQUBeQQCYnIJAGQCBQFKBQFLBAFvCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYmUFAXoEAUwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiZQUBQQQBTQkAkQMCBQJiZQUBQgQCYnMJANkEAQUBTQQBTgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJlBQFDBAFPCQCRAwIFAmJlBQFEBAJidAkA2QQBBQFPBAFQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYmUFAUUEAmJ1CQClCAEFAmFqBAJidgkBAmFRAQUCYnUEAmJ3CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYnYFAVQEAmJ4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYnYFAVgEAmJ5AwkAZwIFAUoFAmJ4BQFKBQJieAQCYnoDCQBmAgUGaGVpZ2h0BQJicgUCYnIDCQBmAgUBSgUGaGVpZ2h0BQFKBQZoZWlnaHQEAmJBCQBlAgUCYnoFAmJ5BAJiQgkAawMFAmJ3BQJiQQUBSwQCYkMJAQFsBQUCYkIFAVAFAW8FAUwFAU4EAmJECQAAAgUCYnEFAU8EAmJFCQELdmFsdWVPckVsc2UCCQCgCAEJAQJhbwAHBAJiRgkAzAgCAwkBASEBAwUCYkQFAmJFBwYJAAIBAhZVU0ROIGNsYWltIGlzIGRpc2FibGVkBQNuaWwDCQAAAgUCYkYFAmJGAwkAAAIFAmJxBQFPCQCYCgYJAMwIAgAACQDMCAIJAQEtAQUCYkIJAMwIAgUCYkIJAMwIAgAABQNuaWwFAmJCBQJidAUCYnYFAmJ6CQDMCAIFAmJCCQDMCAIFAmJDBQNuaWwDCQAAAgUCYnEFAU0JAJgKBgkAzAgCAAAJAMwIAgkBAS0BBQJiQgkAzAgCAAAJAMwIAgUCYkMFA25pbAUCYkMFAmJzBQJidgUCYnoJAMwIAgUCYkIJAMwIAgUCYkMFA25pbAkAAgEJAKwCAgIVdW5zdXBwb3J0ZWQgYXNzZXRJZDogBQJicQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECYkcEAU8CYnUCYkgCYkkEAmJKCQEFdmFsdWUBCQCfCAEJAQJhdwEFAU8EAmJLCQEFdmFsdWUBCQCfCAEJAQJheQEFAU8EAmJMCQEFdmFsdWUBCQCfCAEJAQJhcQAEAmJNCQELdmFsdWVPckVsc2UCCQCfCAEJAQJhcgAAAAQCYk4JAQlpc0RlZmluZWQBCQCfCAEJAQJhdQEAAAQCYk8DCQBmAgUCYk0AAAQCYlAJAQV2YWx1ZQEJAJ8IAQkBAmFzAQUCYk0EAmJRCQEFdmFsdWUBCQCfCAEJAQJhdQEFAmJNBAJiUgMJAGYCBQZoZWlnaHQFAmJRBAJiUwkAZAIFAmJNAAEEAmJUAwkAZgIFBmhlaWdodAkAZAIFAmJRBQJiTAQCYlUJAGoCCQBlAgUGaGVpZ2h0BQJiUQUCYkwDCQAAAgUCYlUAAAkAZAIJAGUCBQZoZWlnaHQFAmJMAAEJAGUCBQZoZWlnaHQFAmJVCQBkAgUCYlEAAQQCYlYJAGUCCQBkAgUCYlQFAmJMAAEJAJUKAwUCYlMFAmJUBQJiVgkAlQoDBQJiTQUCYlAFAmJRBAJiUwgFAmJSAl8xBAJiVAgFAmJSAl8yBAJiVggFAmJSAl8zCQCVCgMFAmJTBQJiVAUCYlYDBQJiTgQCYlcJAQV2YWx1ZQEJAJ8IAQkBAmFzAQAABAJiWAkBBXZhbHVlAQkAnwgBCQECYXUBAAAEAmJZAwkAZgIFBmhlaWdodAUCYlgEAmJTCQBkAgUCYk0AAQQCYlQJAGQCBQJiWAABBAJiVgkAZQIJAGQCBQJiVAUCYkwAAQkAlQoDBQJiUwUCYlQFAmJWCQCVCgMFAmJNBQJiVwUCYlgEAmJTCAUCYlkCXzEEAmJUCAUCYlkCXzIEAmJWCAUCYlkCXzMJAJUKAwUCYlMFAmJUBQJiVgkAlQoDBQJiTQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYXMBBQJiTQUGaGVpZ2h0CQELdmFsdWVPckVsc2UCCQCfCAEJAQJhdQEFAmJNCQBlAgkAZAIFBmhlaWdodAUCYkwAAQQCYlMIBQJiTwJfMQQCYlQIBQJiTwJfMgQCYlYIBQJiTwJfMwQCYloJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmF6AgUBTwUCYlMFAmJKBAJjYQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYUEDBQFPBQJiUwUCYnUFAmJLBAJiYgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYUQBBQJidQAABAJjYgkAlwMBCQDMCAIJAGQCBQJiSAUCYmIJAMwIAgUCYloJAMwIAgUCY2EFA25pbAQCY2MJAQV2YWx1ZQEJAJ8IAQkBAmF2AAQCY2QFAWUEAmNlCgACY2YJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQkAoggBCQECYUIAAiFwdXRPbmVUa25WMldpdGhvdXRUYWtlRmVlUkVBRE9OTFkJAMwIAgUCY2QJAMwIAgUBTwUDbmlsBQNuaWwDCQABAgUCY2YCDyhJbnQsIEludCwgSW50KQUCY2YJAAIBCQCsAgIJAAMBBQJjZgIkIGNvdWxkbid0IGJlIGNhc3QgdG8gKEludCwgSW50LCBJbnQpAwkAAAIFAmNlBQJjZQQCY2cIBQJjZQJfMwQCY2gIBQJjZQJfMgQCY2kIBQJjZQJfMQQCY2oJAQV2YWx1ZQEJAKIIAQkBAmFDAAQCY2sKAAJjZgkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCiCAEJAQJhQgACE2dldE9uZVRrblYyUkVBRE9OTFkJAMwIAgUCY2oJAMwIAgUCY2kFA25pbAUDbmlsAwkAAQIFAmNmAgooSW50LCBJbnQpBQJjZgkAAgEJAKwCAgkAAwEFAmNmAh8gY291bGRuJ3QgYmUgY2FzdCB0byAoSW50LCBJbnQpAwkAAAIFAmNrBQJjawQCY2wIBQJjawJfMgQCY20IBQJjawJfMQQCY24JAGsDBQJjZAUBZQUCY20EAmNvCQBlAgUCYlYFBmhlaWdodAkAnAoKBQJjYgUCYloFAmNhBQJiSQUCY2MFAmNuBQJjbwUCYlMFAmJUBQJiVgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECY3AABAJjcQkBAmFSAAQBagkAnQgCBQJjcQkBAmFIAAMJAAECBQFqAgZTdHJpbmcEAmFTBQFqCQDZBAEFAmFTAwkAAQIFAWoCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECY3IBAmNzBAJjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAFqCQECY3AAAwkAAQIFAWoCCkJ5dGVWZWN0b3IEAmN1BQFqAwkAAAIIBQJjcw9jYWxsZXJQdWJsaWNLZXkFAmN1BgUCY3QDCQABAgUBagIEVW5pdAMJAAACCAUCY3MGY2FsbGVyBQR0aGlzBgUCY3QJAAIBAgtNYXRjaCBlcnJvcgECY3YCAmJ1AmJuBAFNCQCRAwIJAQJhTAAFAUIEAmN3CQC5CQIJAMwIAgIKJWQlZCVkJWQlZAkAzAgCAgEwCQDMCAICATAJAMwIAgIBMAkAzAgCAgEwCQDMCAICATAFA25pbAUBYwQCY3gJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQECYWkBBQJidQUCY3cFAWMEAmN5CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCY3gFAVQEAmN6CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCY3gFAVUEAmNBCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCY3gFAVYEAmNCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCY3gFAVcEAmNDCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCY3gFAVgEAW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmFEAQUCYnUAAAQCY0QDCQECIT0CBQFtAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhRAEFAmJ1AAAFA25pbAUDbmlsBAJjRQkBDXBhcnNlSW50VmFsdWUBCQELdmFsdWVPckVsc2UCCQCiCAEJAQJhRgEFAmJ1AgEwBAJjRgMJAQIhPQIFAmNFAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFGAQUCYnUCATAFA25pbAUDbmlsBAJjRwkAaAIJAGQCCQBkAgUCY3oFAW0FAmNFAGQEAmNICQBoAgkAZAIFAmN6BQJjRQBkBAJjSQkAuQkCCQDMCAICCiVkJWQlZCVkJWQJAMwIAgkApAMBBQJjeQkAzAgCAgEwCQDMCAIJAKQDAQUCY0EJAMwIAgkApAMBCQBkAgUCY0IFAmNICQDMCAIJAKQDAQUGaGVpZ2h0BQNuaWwFAWMEAmNKAwkBAiE9AgUCY0gAAAkAzAgCCQELU3RyaW5nRW50cnkCCQECYWkBBQJidQUCY0kFA25pbAUDbmlsBAJjSwMJAQIhPQIFAmNHAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUCYnUFAmNHCQDZBAEFAU0JAMwIAgkBAmJvBAUCYnUAAAUCY0cFAmJuBQNuaWwFA25pbAkAlgoEBQJjegUBbQUCY0UJAM4IAgkAzggCCQDOCAIFAmNLBQJjSgUCY0YFAmNEBwJjcwELY29uc3RydWN0b3IHAUgBSQFKAUsBbwFPAVEEAUwJAGgCCQBoAgBkAOgHAOgHBAJjTAkAZAIFAUgFAUkDCQEJaXNEZWZpbmVkAQkAoggBCQECYWgACQACAQITYWxyZWFkeSBpbml0aWFsaXplZAMJAQIhPQICIzNQTUVITHgxajZ6ZXJhclpUWWZzR3FEZWVacVFvTXB4cTVTCQClCAEIBQJjcwZjYWxsZXIJAAIBAg5ub3QgYXV0aG9yaXplZAMJAQIhPQIJAJADAQgFAmNzCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkAZwIFAmNMBQFKCQACAQImY2xhaW1TdGFydCBtdXN0IGJlIGdyZWF0ZXIgdGhhbiBpZG9FbmQEAmNNCQEFdmFsdWUBCQCRAwIIBQJjcwhwYXltZW50cwAABAJicwkBBXZhbHVlAQgFAmNNB2Fzc2V0SWQEAmNOCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYnMCG2ZhaWwgdG8gbG9hZCBpZG8gYXNzZXQgaW5mbwQBTQkA2AQBBQJicwQBTgkAbAYACgAACAUCY04IZGVjaW1hbHMAAAAABQRET1dOBAJidAkA2QQBBQFPBAJjTwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmJ0Ah1mYWlsIHRvIGxvYWQgcHJpY2UgYXNzZXQgaW5mbwQBUAkAbAYACgAACAUCY08IZGVjaW1hbHMAAAAABQRET1dOBAJjUAkBAmFPAAQCY1EJAMwIAgAACQDMCAIAAAkAzAgCAAAJAMwIAgAABQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFoAAkBAVMMBQFIBQFJBQFKBQFLBQFvBQFMBQFNBQFOBQFPBQFQBQFRCAUCY00GYW1vdW50CQDMCAIJAQJhWAUJAQJhawAFAmNQBQJjUQUBSgAABQNuaWwCY3MBBmludmVzdAAEAmJlCQECYUwABAFICQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYmUFAXYEAUkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiZQUBdwQCY0wJAGQCBQFIBQFJBAFKCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYmUFAXgEAUsJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiZQUBeQQBbwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJlBQF6BAFMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYmUFAUEEAU0JAJEDAgUCYmUFAUIEAmJzCQDZBAEFAU0EAU4JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiZQUBQwQBTwkAkQMCBQJiZQUBRAQCYnQJANkEAQUBTwQBUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJlBQFFBAJjUgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJlBQFGBAJhagkApQgBCAUCY3MGY2FsbGVyAwkAZgIFAUgFBmhlaWdodAkAAgECHGlkbyBoYXMgbm90IGJlZW4gc3RhcnRlZCB5ZXQDCQBmAgUGaGVpZ2h0BQJjTAkAAgECGmlkbyBoYXMgYmVlbiBhbHJlYWR5IGVuZGVkAwkBAiE9AgkAkAMBCAUCY3MIcGF5bWVudHMAAQkAAgECHWV4YWN0bHkgMSBwYXltZW50IGlzIGV4cGVjdGVkBAJjTQkBBXZhbHVlAQkAkQMCCAUCY3MIcGF5bWVudHMAAAQCY1MJAQV2YWx1ZQEIBQJjTQdhc3NldElkBAJjVAgFAmNNBmFtb3VudAMJAQIhPQIFAmNTBQJidAkAAgEJAKwCAgkArAICAhppbnZhbGlkIHBheW1lbnQgYXNzZXQgaWQ6IAkA2AQBBQJjUwIMIGlzIGV4cGVjdGVkBAJjVQkBAmFQAQUCYWoEAmNQCQECYU8ABAJjVgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJjUAUBVAUCY1QEAmNXCQBoAgUCY1YAZAMJAGYCBQJjVwkA8AcCBQR0aGlzBQJicwkAAgECOUlETyBhc3NldCBoYXMgYmVlbiAtIHNvbGQgY29uc2lkZXIgdG8gdXNlIHNtYWxsZXIgcGF5bWVudAQCY1EJAMwIAgUCY1QJAMwIAgUCY1QJAMwIAgAACQDMCAIAAAUDbmlsCQDMCAIJAQJhWAUJAQJhaQEFAmFqBQJjVQUCY1EFAUoAAAkAzAgCCQECYVgFCQECYWsABQJjUAUCY1EFAUoAAAkAzAgCCQECYm0EBQJhagUCY1QAAAgFAmNzDXRyYW5zYWN0aW9uSWQFA25pbAJjcwEFY2xhaW0CAmJxAmJ1BAJjWAkApQgBCAUCY3MGY2FsbGVyAwkBAiE9AgUCYnUFAmNYCQACAQIObm90IGF1dGhvcml6ZWQEAmJlCQECYUwABAFPCQCRAwIFAmJlBQFEBAJjWQkBAmJwAwUCYnEIBQJjcwZjYWxsZXIIBQJjcw10cmFuc2FjdGlvbklkBAJjUQgFAmNZAl8xBAJiSAgFAmNZAl8yBAJjWggFAmNZAl8zBAJidggFAmNZAl80BAJieggFAmNZAl81BAJkYQkAkQMCBQJjUQUCYVYEAmRiCQCRAwIFAmNRBQJhVwQCYmIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmFEAQUCYnUAAAQCYmYICQEFdmFsdWUBCQDsBwEJANkEAQUBTwhkZWNpbWFscwQCYmoDCQAAAgUCYnEFAU8EAmRjCQECYkcEBQFPBQJidQUCYkgJAJEDAgUCY1EFAmFWBAJjYggFAmRjAl8xBAJiWggFAmRjAl8yBAJjYQgFAmRjAl8zBAJiSQgFAmRjAl80BAJjYwgFAmRjAl81BAJjbggFAmRjAl82BAJjbwgFAmRjAl83BAJiUwgFAmRjAl84BAJiVAgFAmRjAl85BAJiVggFAmRjA18xMAQCYkYJAMwIAgMJAGYCBQJjYQAABgkBAWYBAjp1bmF2YWlsYWJsZSB0byBjbGFpbSBiZWNhdXNlIHVzZXIgcGVyaW9kIGFsbG93YW5jZSByZWFjaGVkCQDMCAIDCQBmAgUCYloAAAYJAQFmAQI7dW5hdmFpbGFibGUgdG8gY2xhaW0gYmVjYXVzZSB0b3RhbCBwZXJpb2QgYWxsb3dhbmNlIHJlYWNoZWQJAMwIAgMJAGYCBQJjYgAABgkBAWYBAhBub3RoaW5nIHRvIGNsYWltCQDMCAIDCQBmAgUCY2MFAmNuBgkBAWYBAk91bmF2YWlsYWJsZSB0byBjbGFpbSBiZWNhdXNlIHVzZG4gcHJpY2UgbG93ZXIgdGhhbiB1c2R0UHJpY2VBc3NldEFsbG93YWJsZVJhdGlvCQDMCAIDAwMJAQIhPQIFAmJxBQFPBgkAAAIFAmFLAAAGCQBmAgUCYUsFBmhlaWdodAYJAQFmAQIRQ2xhaW0gaXMgZGlzYWJsZWQFA25pbAMJAAACBQJiRgUCYkYEAmRkCQBlAgUCYloFAmNiBAJkZQkAZQIFAmNhBQJjYgQCYmoDCQBmAgUCYmIFAmNiCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJjcwZjYWxsZXIFAmNiBQJjWgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmFEAQUCYnUJAGUCBQJiYgUCY2IFA25pbAQCZGYJALUJAgkBAWgBCQD8BwQFBHRoaXMCDWNsYWltUkVBRE9OTFkJAMwIAgUBTwkAzAgCBQJidQUDbmlsBQNuaWwFAWMDCQAAAgUCZGYFAmRmBAJkZwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRmAAMEAmRoAwkAAAIFAmRnBQJjYgQCY3kJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidgUBVAQCY3oJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidgUBVQQCY0EJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidgUBVgQCY0IJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidgUBVwQCY0MJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidgUBWAQCZGkJAMwIAgkApAMBBQJjeQkAzAgCAgEwCQDMCAIJAKQDAQUCY0EJAMwIAgkApAMBBQJjQgkAzAgCCQCkAwEFAmNDBQNuaWwEAmRqCQECYU8ABAJkawkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRqBQFUBAJkbAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRqBQFVBAJkbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRqBQFWBAJkbgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRqBQFXBAJkbwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRqBQFYBAJkcAkAZQIFAmRsBQJjegQCZHEJAMwIAgkApAMBBQJkawkAzAgCCQCkAwEFAmRwCQDMCAIJAKQDAQUCZG0JAMwIAgkApAMBBQJkbgkAzAgCCQCkAwEFAmRvBQNuaWwEAmRyCQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYUcAAAAFAmN6CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhRgEFAmJ1CQCkAwEFAmN6CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhRwAJAKQDAQUCZHIJAMwIAgkBAmFYBQkBAmFpAQUCYnUFAmRpBQJjUQUCYnoAAAkAzAgCCQECYVgFCQECYWsABQJkcQUCY1EFAmJ6AAAFA25pbAkAzAgCCQECYVgFCQECYWkBBQJidQUCYnYFAmNRBQJiegAACQDMCAIJAQJhWAUJAQJhawAJAQJhTwAFAmNRBQJiegAABQNuaWwEAmRzCQBlAgkAZAIFAmJiBQJiSAUCY2IJAM4IAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCY3MGY2FsbGVyBQJjYgUCY1oJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhRAEFAmJ1BQJkcwUDbmlsBQJkaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhcgAFAmJTCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYXMBBQJiUwUCYlQJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhdQEFAmJTBQJiVgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmF6AgUBTwUCYlMFAmRkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYUEDBQFPBQJiUwUCYnUFAmRlCQDMCAIJAQJibwQFAmJ1BQJjYgUCZGIIBQJjcw10cmFuc2FjdGlvbklkBQNuaWwFAmJqBQR1bml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAJkdAkAawMFAmJiBQFlCQBsBgAKAAAFAmJmAAAAAAUERE9XTgkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJjcwZjYWxsZXIJAGQCBQJiSAUCZHQFAmNaCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYUQBBQJidQAACQDMCAIJAQJhWAUJAQJhaQEFAmJ1BQJidgUCY1EFAmJ6BQJiYgkAzAgCCQECYVgFCQECYWsACQECYU8ABQJjUQUCYnoFAmJiCQDMCAIJAQJibwQFAmJ1BQJkYQkAZAIFAmRiBQJkdAgFAmNzDXRyYW5zYWN0aW9uSWQFA25pbAUEdW5pdAUCYmoCY3MBEmNsZWFuUmVtYWluZ0Ftb3VudAECYnUEAU8JAJEDAgkBAmFMAAUBRAQCZGYJALUJAgkBAWgBCQD8BwQFBHRoaXMCDWNsYWltUkVBRE9OTFkJAMwIAgUBTwkAzAgCBQJidQUDbmlsBQNuaWwFAWMDCQAAAgUCZGYFAmRmBAJkZwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmRmAAIEAmR1AwkAAAIFAmRnAAAGCQEBZgECGnVzZXIgaGF2ZSB1bmNsYWltZWQgYXNzZXRzAwkAAAIFAmR1BQJkdQQCY3gJALUJAgkBBXZhbHVlAQkAoggBCQECYWkBBQJidQUBYwQCY3kJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJjeAUBVAQCY3oJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJjeAUBVQQCY0EJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJjeAUBVgQCY0IJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJjeAUBVwQCY0MJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJjeAUBWAQCZHYDCQECIT0CBQJjegAABgkBAWYBAiRpbnZlc3RvclJlbWFpbmluZ0Ftb3VudCBhbHJlYWR5IHplcm8DCQAAAgUCZHYFAmR2BAJjSQkAuQkCCQDMCAICCiVkJWQlZCVkJWQJAMwIAgkApAMBBQJjeQkAzAgCAgEwCQDMCAIJAKQDAQUCY0EJAMwIAgkApAMBBQJjQgkAzAgCCQCkAwEFAmNDBQNuaWwFAWMEAmRqCQC1CQIJAQV2YWx1ZQEJAKIIAQkBAmFrAAUBYwQCZGsJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJkagUBVAQCZGwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJkagUBVQQCZG0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJkagUBVgQCZG4JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJkagUBVwQCZG8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJkagUBWAQCZHcJALkJAgkAzAgCAgolZCVkJWQlZCVkCQDMCAIJAKQDAQUCZGsJAMwIAgkApAMBCQBlAgUCZGwFAmN6CQDMCAIJAKQDAQUCZG0JAMwIAgkApAMBBQJkbgkAzAgCCQCkAwEFAmRvBQNuaWwFAWMEAmRyCQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYUcAAAAFAmN6CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhRgEFAmJ1CQCkAwEFAmN6CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhRwAJAKQDAQUCZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFpAQUCYnUFAmNJCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhawAFAmR3BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY3MBCGNsYWltRm9yAQJkeAoBAmR5AgJkegJkQQQCZEIFAmR6BAJkQwgFAmRCAl8xBAJkRAgFAmRCAl8yBAJkRQgFAmRCAl8zBAJkRgkBAmN2AgUCZEEIBQJjcw10cmFuc2FjdGlvbklkBAJjeggFAmRGAl8xBAFtCAUCZEYCXzIEAmNFCAUCZEYCXzMEAmRHCAUCZEYCXzQEAmRICQBkAgUCY3oFAmNFBAJkSQMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFAmRFBQJkQQYJAQFmAQIZZHVwbGljYXRlIGFkZHJlc3MgaW4gbGlzdAMJAAACBQJkSQUCZEkJAJUKAwkAzggCBQJkQwUCZEcJAGQCBQJkRAUCZEgJAM0IAgUCZEUFAmRBCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAJkSgoAAmRLBQJkeAoAAmRMCQCQAwEFAmRLCgACZE0JAJUKAwUDbmlsAAAFA25pbAoBAmROAgJkTwJkUAMJAGcCBQJkUAUCZEwFAmRPCQECZHkCBQJkTwkAkQMCBQJkSwUCZFAKAQJkUQICZE8CZFADCQBnAgUCZFAFAmRMBQJkTwkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE5CQECZFECCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CCQECZE4CBQJkTQAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMEAmRDCAUCZEoCXzEEAmRSCAUCZEoCXzIEAmRTCAUCZEoCXzMEAmRUAwkBAiE9AgUCZFIAAAkAzAgCCQECYVgFCQECYWsACQECYU8ACQDMCAIAAAkAzAgCCQEBLQEFAmRSCQDMCAIAAAkAzAgCBQJkUgUDbmlsBQZoZWlnaHQAAAUDbmlsBQNuaWwJAM4IAgUCZEMFAmRUAmNzAQ1jbGFpbVJFQURPTkxZAgJicQJidQQCY1kJAQJicAMFAmJxCQERQGV4dHJOYXRpdmUoMTA2MikBBQJidQkA2QQBAgAEAmNRCAUCY1kCXzEEAmJICAUCY1kCXzIEAmNaCAUCY1kCXzMEAmJ2CAUCY1kCXzQEAmJ6CAUCY1kCXzUEAmRVCAUCY1kCXzYEAmRnCQCRAwIFAmRVAAAEAmRWCQCRAwIFAmRVAAEJAJQKAgUDbmlsCQC5CQIJAMwIAgIGJXMlZCVkCQDMCAIFAmJ1CQDMCAIJAKQDAQUCZGcJAMwIAgkApAMBBQJkVgUDbmlsBQFjAmNzAQ9jbGFpbVYyUkVBRE9OTFkCAmJxAmJ1BAJjWQkBAmJwAwUCYnEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmJ1CQDZBAECAAQCY1EIBQJjWQJfMQQCYkgIBQJjWQJfMgQCY1oIBQJjWQJfMwQCYnYIBQJjWQJfNAQCYnoIBQJjWQJfNQQCZFUIBQJjWQJfNgQCZGcJAJEDAgUCZFUAAAQCZFYJAJEDAgUCZFUAAQQCYmUJAQJhTAAEAU8JAJEDAgUCYmUFAUQEAmJiCQELdmFsdWVPckVsc2UCCQCfCAEJAQJhRAEFAmJ1AAAEAmR0CQBoAgUCYmIAZAQCZFcJAGQCBQJkVgUCZHQEAmRYCQECYkcEBQFPBQJidQUCYkgJAJEDAgUCY1EFAmFWBAJjYggFAmRYAl8xBAJiWggFAmRYAl8yBAJjYQgFAmRYAl8zBAJiSQgFAmRYAl80BAJjYwgFAmRYAl81BAJjbggFAmRYAl82BAJjbwgFAmRYAl83BAJiUwgFAmRYAl84BAJiVAgFAmRYAl85BAJiVggFAmRYA18xMAQCZFkJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmF1AQUCYlMAAAQCZFoJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkBAmFRAQUCYnUFAVYFAmJiBAJlYQMJAGYCBQZoZWlnaHQFAmRZBAJlYgkBBXZhbHVlAQkAnwgBCQECYXEABAJlYwkBBXZhbHVlAQkAnwgBCQECYXkBBQFPBAJlZAkBBXZhbHVlAQkAnwgBCQECYXcBBQFPCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCZFcJAMwIAgkApAMBBQJlYwkAzAgCCQCkAwEFAmVkCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjbgkAzAgCCQCkAwEFAmViCQDMCAIJAKQDAQUCZFoFA25pbAUBYwkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmRXCQDMCAIJAKQDAQUCY2IJAMwIAgkApAMBBQJiWgkAzAgCCQCkAwEFAmNjCQDMCAIJAKQDAQUCY24JAMwIAgkApAMBBQJjbwkAzAgCCQCkAwEFAmRaBQNuaWwFAWMJAJQKAgUDbmlsBQJlYQECZWUBAmVmAAQCZWcEAWoJAQJjcAADCQABAgUBagIKQnl0ZVZlY3RvcgQCY3UFAWoFAmN1AwkAAQIFAWoCBFVuaXQIBQJlZQ9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgkA9AMDCAUCZWUJYm9keUJ5dGVzCQCRAwIIBQJlZQZwcm9vZnMAAAUCZWcQcATg",
    "height": 3066416,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4h8gLRqk1176MfcahPVr6jC9Vc57ZHyyiXfJgJ66q6kL
Next: none

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func getStringOrFail (key) = valueOrErrorMessage(getString(key), (("mandatory this." + key) + " is not defined"))
5
5
 
6
6
 
7
7
 
let SEP = "__"
8
8
 
9
9
 
let BUFSCALE = toBigInt(1000000000000000000)
10
10
 
11
11
 
let scale8 = 100000000
12
12
 
13
13
 
func throwErr (msg) = throw(makeString(["ido.ride:", msg], " "))
14
14
 
15
15
 
16
16
 
func asString (val) = match val {
17
17
 
    case valStr: String => 
18
18
 
        valStr
19
19
 
    case _ => 
20
20
 
        throw("fail to cast into String")
21
21
 
}
22
22
 
23
23
 
24
24
 
func convertPriceAssetIntoIdoAsset (priceAssetAmount,priceAssetMULT,price,priceMULT,idoAssetMULT) = {
25
25
 
    let bPriceAssetMULT = toBigInt(priceAssetMULT)
26
26
 
    let bIdoAssetMULT = toBigInt(idoAssetMULT)
27
27
 
    let bPriceAssetBUF = fraction(toBigInt(priceAssetAmount), BUFSCALE, bPriceAssetMULT)
28
28
 
    let bAmountAssetBUF = fraction(bPriceAssetBUF, toBigInt(priceMULT), toBigInt(price))
29
29
 
    toInt(fraction(bAmountAssetBUF, toBigInt(idoAssetMULT), BUFSCALE))
30
30
 
    }
31
31
 
32
32
 
33
33
 
let IdxCfgIdoStart = 1
34
34
 
35
35
 
let IdxCfgIdoDuration = 2
36
36
 
37
37
 
let IdxCfgClaimStart = 3
38
38
 
39
39
 
let IdxCfgClaimDuration = 4
40
40
 
41
41
 
let IdxCfgPrice = 5
42
42
 
43
43
 
let IdxCfgPriceMult = 6
44
44
 
45
45
 
let IdxCfgIdoAssetId = 7
46
46
 
47
47
 
let IdxCfgIdoAssetMult = 8
48
48
 
49
49
 
let IdxCfgPriceAssetId = 9
50
50
 
51
51
 
let IdxCfgPriceAssetMult = 10
52
52
 
53
53
 
let IdxCfgMinInvestAmount = 11
54
54
 
55
55
 
func fromatConfigS (idoStart,idoDuration,claimStart,claimDuration,price,priceMult,idoAssetId58,idoAssetMult,priceAssetId58,priceAssetMult,minInvestAmount,totalIdoAssetToSell) = makeString(["%d%d%d%d%d%d%s%d%s%d%d%d", idoStart, idoDuration, claimStart, claimDuration, price, priceMult, idoAssetId58, idoAssetMult, priceAssetId58, priceAssetMult, minInvestAmount, totalIdoAssetToSell], SEP)
56
56
 
57
57
 
58
58
 
func fromatConfig (idoStart,idoDuration,claimStart,claimDuration,price,priceMult,idoAssetId58,idoAssetMult,priceAssetId58,priceAssetMult,minInvestAmount,totalIdoAssetToSell) = fromatConfigS(toString(idoStart), toString(idoDuration), toString(claimStart), toString(claimDuration), toString(price), toString(priceMult), idoAssetId58, toString(idoAssetMult), priceAssetId58, toString(priceAssetMult), toString(minInvestAmount), toString(totalIdoAssetToSell))
59
59
 
60
60
 
61
61
 
let IdxInvTotalAmount = 1
62
62
 
63
63
 
let IdxInvRemainingAmount = 2
64
64
 
65
65
 
let IdxInvClaimedPriceAssetAmount = 3
66
66
 
67
67
 
let IdxInvClaimedIdoAssetAmount = 4
68
68
 
69
69
 
let IdxInvLastClaimedHeight = 5
70
70
 
71
71
 
func formatInvestorS (totalAmount,remainingAmount,claimedPriceAssetAmount,claimedIdoAssetAmount,lastClaimedHeight) = makeString(["%d%d%d%d%d", totalAmount, remainingAmount, claimedPriceAssetAmount, claimedIdoAssetAmount, lastClaimedHeight], SEP)
72
72
 
73
73
 
74
74
 
func formatInvestor (totalAmount,remainingAmount,claimedPriceAssetAmount,claimedIdoAssetAmount,lastClaimedHeight) = formatInvestorS(toString(totalAmount), toString(remainingAmount), toString(claimedPriceAssetAmount), toString(claimedIdoAssetAmount), toString(lastClaimedHeight))
75
75
 
76
76
 
77
77
 
func formatHistoryRecord (priceAssetAmount,idoAssetAmount) = makeString(["%d%d%d%d", toString(height), toString(lastBlock.timestamp), toString(priceAssetAmount), toString(idoAssetAmount)], SEP)
78
78
 
79
79
 
80
80
 
func keyConfig () = "%s__config"
81
81
 
82
82
 
83
83
 
func keyInvestor (userAddress) = ("%s__" + userAddress)
84
84
 
85
85
 
86
86
 
func keyTotals () = "%s__totals"
87
87
 
88
88
 
89
89
 
func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
90
90
 
91
91
 
92
92
 
func keyUSDNClaimDisabled () = "%s__usdnClaimDisabled"
93
93
 
94
94
 
95
95
 
func keyUSDNClaimEndHeight () = "%s__usdnClaimEndHeight"
96
96
 
97
97
 
98
98
 
func keyPeriodLength () = makeString(["%s", "periodLength"], SEP)
99
99
 
100
100
 
101
101
 
func keyCurrentPeriod () = makeString(["%s", "currentPeriod"], SEP)
102
102
 
103
103
 
104
104
 
func keyPeriodStartHeight (periodNum) = makeString(["%s%s", "periodStartHeight", toString(periodNum)], SEP)
105
105
 
106
106
 
107
107
 
func keyPeriodEndHeight (periodNum) = makeString(["%s%s", "periodEndHeight", toString(periodNum)], SEP)
108
108
 
109
109
 
110
110
 
func keyUsdtPriceAssetAllowableRatio () = makeString(["%s", "usdtPriceAssetAllowableRatio"], SEP)
111
111
 
112
112
 
113
113
 
func keyTotalPeriodAllowance (assetId) = makeString(["%s%s", "totalPeriodAllowance", assetId], SEP)
114
114
 
115
115
 
116
116
 
func keyUserPeriodAllowance (assetId) = makeString(["%s%s", "userPeriodAllowance", assetId], SEP)
117
117
 
118
118
 
119
119
 
func keyPeriodTotalAvailableToClaim (assetId,periodNum) = makeString(["%s%s%s", "periodTotalAvailableToClaim", assetId, toString(periodNum)], SEP)
120
120
 
121
121
 
122
122
 
func keyPeriodUserAvailableToClaim (assetId,periodNum,userAddress) = makeString(["%s%s%s%s", "periodUserAvailableToClaim", assetId, toString(periodNum), userAddress], SEP)
123
123
 
124
124
 
125
125
 
func keyUsdtPriceAssetStablePool () = makeString(["%s", "usdtPriceAssetStablePool"], SEP)
126
126
 
127
127
 
128
128
 
func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], SEP)
129
129
 
130
130
 
131
131
 
func keyPriceAssetBalance (address) = makeString(["%s%s", "priceAssetBalance", address], SEP)
132
132
 
133
133
 
134
134
 
func keyInvestorRemainingAmount (address) = makeString(["%s%s", "investorRemainingAmount", address], SEP)
135
135
 
136
136
 
137
137
 
func keyTotalRemainingAmount () = makeString(["%s", "totalRemainingAmount"], SEP)
138
138
 
139
139
 
140
140
 
func keyManagerPublicKey () = "%s__managerPublicKey"
141
141
 
142
142
 
143
143
 
func keyManagerVaultAddress () = "%s__managerVaultAddress"
144
144
 
145
145
 
146
146
 
func keyClaimClosingHeight () = "%s__claimClosingHeight"
147
147
 
148
148
 
149
149
 
let claimClosingHeight = valueOrElse(getInteger(this, keyClaimClosingHeight()), 0)
150
150
 
151
151
 
func readConfigArray () = split(getStringOrFail(keyConfig()), SEP)
152
152
 
153
153
 
154
154
 
func readTotalsArrayOrDefaultByCustomKey (customKey) = split(valueOrElse(getString(customKey), formatInvestorS("0", "0", "0", "0", "0")), SEP)
155
155
 
156
156
 
157
157
 
func readTotalsArrayOrDefault () = readTotalsArrayOrDefaultByCustomKey(keyTotals())
158
158
 
159
159
 
160
160
 
func readInvestorArrayOrDefault (userAddress) = readTotalsArrayOrDefaultByCustomKey(keyInvestor(userAddress))
161
161
 
162
162
 
163
163
 
func readInvestorArrayOrFail (userAddress) = split(getStringOrFail(keyInvestor(userAddress)), SEP)
164
164
 
165
165
 
166
166
 
func getManagerVaultAddressOrThis () = match getString(keyManagerVaultAddress()) {
167
167
 
    case s: String => 
168
168
 
        addressFromStringValue(s)
169
169
 
    case _ => 
170
170
 
        this
171
171
 
}
172
172
 
173
173
 
174
174
 
let IdxDiffTotalIncrement = 0
175
175
 
176
176
 
let IdxDiffRemainingPriceAmountIncrement = 1
177
177
 
178
178
 
let IdxDiffClaimedPriceAmountIncrement = 2
179
179
 
180
180
 
let IdxDiffClaimedIdoAssetAmountIncrement = 3
181
181
 
182
182
 
func TotalsEntry (key,origArray,incrementDiff,newLastClaimedHeight,priceAssetBalance) = {
183
183
 
    let totalAmount = parseIntValue(origArray[IdxInvTotalAmount])
184
184
 
    let remainingAmount = parseIntValue(origArray[IdxInvRemainingAmount])
185
185
 
    let claimedPriceAssetAmount = parseIntValue(origArray[IdxInvClaimedPriceAssetAmount])
186
186
 
    let claimedIdoAssetAmount = parseIntValue(origArray[IdxInvClaimedIdoAssetAmount])
187
187
 
    let lastClaimedHeight = parseIntValue(origArray[IdxInvLastClaimedHeight])
188
188
 
    let newTotalAmount = (totalAmount + incrementDiff[IdxDiffTotalIncrement])
189
189
 
    let newRemainingAmount = (remainingAmount + incrementDiff[IdxDiffRemainingPriceAmountIncrement])
190
190
 
    let cfgArray = readConfigArray()
191
191
 
    let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
192
192
 
    let priceAssetDecimals = value(assetInfo(fromBase58String(priceAssetId58))).decimals
193
193
 
    let priceAssetBalancePriceAssetDecimals = fraction(priceAssetBalance, scale8, pow(10, 0, priceAssetDecimals, 0, 0, DOWN))
194
194
 
    let newClaimedPriceAssetAmount = ((claimedPriceAssetAmount + incrementDiff[IdxDiffClaimedPriceAmountIncrement]) - priceAssetBalance)
195
195
 
    let newClaimedIdoAssetAmount = ((claimedIdoAssetAmount + incrementDiff[IdxDiffClaimedIdoAssetAmountIncrement]) + priceAssetBalancePriceAssetDecimals)
196
196
 
    let entries = if ((0 > newRemainingAmount))
197
197
 
        then {
198
198
 
            let diff = ((newTotalAmount - newClaimedPriceAssetAmount) - newClaimedIdoAssetAmount)
199
199
 
            let newLogicRemainingAmount = if ((0 > diff))
200
200
 
                then 0
201
201
 
                else diff
202
202
 
            StringEntry(key, formatInvestor(newTotalAmount, newLogicRemainingAmount, newClaimedPriceAssetAmount, newClaimedIdoAssetAmount, newLastClaimedHeight))
203
203
 
            }
204
204
 
        else StringEntry(key, formatInvestor(newTotalAmount, newRemainingAmount, newClaimedPriceAssetAmount, newClaimedIdoAssetAmount, newLastClaimedHeight))
205
205
 
    entries
206
206
 
    }
207
207
 
208
208
 
209
209
 
func InvestOperationHistoryEntry (userAddress,priceAssetAmount,idoAssetAmount,txId) = StringEntry(keyOperationHistoryRecord("invest", userAddress, toBase58String(txId)), formatHistoryRecord(priceAssetAmount, idoAssetAmount))
210
210
 
211
211
 
212
212
 
func ClaimOperationHistoryEntry (userAddress,priceAssetAmount,idoAssetAmount,txId) = StringEntry(keyOperationHistoryRecord("claim", userAddress, toBase58String(txId)), formatHistoryRecord(priceAssetAmount, idoAssetAmount))
213
213
 
214
214
 
215
215
 
func internalClaim (claimedAssetId58,userAddress,txId) = {
216
216
 
    let cfgArray = readConfigArray()
217
217
 
    let claimStart = parseIntValue(cfgArray[IdxCfgClaimStart])
218
218
 
    let claimDuration = parseIntValue(cfgArray[IdxCfgClaimDuration])
219
219
 
    let claimEnd = (claimStart + claimDuration)
220
220
 
    let price = parseIntValue(cfgArray[IdxCfgPrice])
221
221
 
    let priceMult = parseIntValue(cfgArray[IdxCfgPriceMult])
222
222
 
    let idoAssetId58 = cfgArray[IdxCfgIdoAssetId]
223
223
 
    let idoAssetId = fromBase58String(idoAssetId58)
224
224
 
    let idoAssetMult = parseIntValue(cfgArray[IdxCfgIdoAssetMult])
225
225
 
    let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
226
226
 
    let priceAssetId = fromBase58String(priceAssetId58)
227
227
 
    let priceAssetMult = parseIntValue(cfgArray[IdxCfgPriceAssetMult])
228
228
 
    let userAddress58 = toString(userAddress)
229
229
 
    let origInvestArray = readInvestorArrayOrFail(userAddress58)
230
230
 
    let investTotalAmount = parseIntValue(origInvestArray[IdxInvTotalAmount])
231
231
 
    let investLastClaimedHeightTMP = parseIntValue(origInvestArray[IdxInvLastClaimedHeight])
232
232
 
    let investLastClaimedHeight = if ((claimStart >= investLastClaimedHeightTMP))
233
233
 
        then claimStart
234
234
 
        else investLastClaimedHeightTMP
235
235
 
    let newClaimPeriodHeight = if ((height > claimEnd))
236
236
 
        then claimEnd
237
237
 
        else if ((claimStart > height))
238
238
 
            then claimStart
239
239
 
            else height
240
240
 
    let claimingBlocks = (newClaimPeriodHeight - investLastClaimedHeight)
241
241
 
    let claimingPriceAssetAmount = fraction(investTotalAmount, claimingBlocks, claimDuration)
242
242
 
    let claimingIdoAssetAmount = convertPriceAssetIntoIdoAsset(claimingPriceAssetAmount, priceAssetMult, price, priceMult, idoAssetMult)
243
243
 
    let isUSDN = (claimedAssetId58 == priceAssetId58)
244
244
 
    let isUSDNClaimDisabled = valueOrElse(getBoolean(keyUSDNClaimDisabled()), false)
245
245
 
    let checks = [if (!(if (isUSDN)
246
246
 
        then isUSDNClaimDisabled
247
247
 
        else false))
248
248
 
        then true
249
249
 
        else throw("USDN claim is disabled")]
250
250
 
    if ((checks == checks))
251
251
 
        then if ((claimedAssetId58 == priceAssetId58))
252
252
 
            then $Tuple6([0, -(claimingPriceAssetAmount), claimingPriceAssetAmount, 0], claimingPriceAssetAmount, priceAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
253
253
 
            else if ((claimedAssetId58 == idoAssetId58))
254
254
 
                then $Tuple6([0, -(claimingPriceAssetAmount), 0, claimingIdoAssetAmount], claimingIdoAssetAmount, idoAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
255
255
 
                else throw(("unsupported assetId: " + claimedAssetId58))
256
256
 
        else throw("Strict value is not equal to itself.")
257
257
 
    }
258
258
 
259
259
 
260
260
 
func internalClaimV2 (priceAssetId58,userAddress58,outAmount,totalUserAvailableToClaim) = {
261
261
 
    let totalPeriodPriceAssetAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
262
262
 
    let userPeriodPriceAssetAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
263
263
 
    let periodLength = value(getInteger(keyPeriodLength()))
264
264
 
    let currentPeriod = valueOrElse(getInteger(keyCurrentPeriod()), 0)
265
265
 
    let zeroPeriodEndHeighIsDefined = isDefined(getInteger(keyPeriodEndHeight(0)))
266
266
 
    let $t01327415144 = if ((currentPeriod > 0))
267
267
 
        then {
268
268
 
            let lastPeriodStartHeight = value(getInteger(keyPeriodStartHeight(currentPeriod)))
269
269
 
            let lastPeriodEndHeight = value(getInteger(keyPeriodEndHeight(currentPeriod)))
270
270
 
            let $t01353414239 = if ((height > lastPeriodEndHeight))
271
271
 
                then {
272
272
 
                    let updatedCurrentPeriod = (currentPeriod + 1)
273
273
 
                    let periodStart = if ((height > (lastPeriodEndHeight + periodLength)))
274
274
 
                        then {
275
275
 
                            let blocksToLastPeriodStart = ((height - lastPeriodEndHeight) % periodLength)
276
276
 
                            if ((blocksToLastPeriodStart == 0))
277
277
 
                                then ((height - periodLength) + 1)
278
278
 
                                else (height - blocksToLastPeriodStart)
279
279
 
                            }
280
280
 
                        else (lastPeriodEndHeight + 1)
281
281
 
                    let periodEnd = ((periodStart + periodLength) - 1)
282
282
 
                    $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
283
283
 
                    }
284
284
 
                else $Tuple3(currentPeriod, lastPeriodStartHeight, lastPeriodEndHeight)
285
285
 
            let updatedCurrentPeriod = $t01353414239._1
286
286
 
            let periodStart = $t01353414239._2
287
287
 
            let periodEnd = $t01353414239._3
288
288
 
            $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
289
289
 
            }
290
290
 
        else if (zeroPeriodEndHeighIsDefined)
291
291
 
            then {
292
292
 
                let zeroPeriodStartHeight = value(getInteger(keyPeriodStartHeight(0)))
293
293
 
                let zeroPeriodEndHeight = value(getInteger(keyPeriodEndHeight(0)))
294
294
 
                let $t01449414876 = if ((height > zeroPeriodEndHeight))
295
295
 
                    then {
296
296
 
                        let updatedCurrentPeriod = (currentPeriod + 1)
297
297
 
                        let periodStart = (zeroPeriodEndHeight + 1)
298
298
 
                        let periodEnd = ((periodStart + periodLength) - 1)
299
299
 
                        $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
300
300
 
                        }
301
301
 
                    else $Tuple3(currentPeriod, zeroPeriodStartHeight, zeroPeriodEndHeight)
302
302
 
                let updatedCurrentPeriod = $t01449414876._1
303
303
 
                let periodStart = $t01449414876._2
304
304
 
                let periodEnd = $t01449414876._3
305
305
 
                $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
306
306
 
                }
307
307
 
            else $Tuple3(currentPeriod, valueOrElse(getInteger(keyPeriodStartHeight(currentPeriod)), height), valueOrElse(getInteger(keyPeriodEndHeight(currentPeriod)), ((height + periodLength) - 1)))
308
308
 
    let updatedCurrentPeriod = $t01327415144._1
309
309
 
    let periodStart = $t01327415144._2
310
310
 
    let periodEnd = $t01327415144._3
311
311
 
    let periodTotalAvailableToClaim = valueOrElse(getInteger(keyPeriodTotalAvailableToClaim(priceAssetId58, updatedCurrentPeriod)), totalPeriodPriceAssetAllowance)
312
312
 
    let periodUserAvailableToClaim = valueOrElse(getInteger(keyPeriodUserAvailableToClaim(priceAssetId58, updatedCurrentPeriod, userAddress58)), userPeriodPriceAssetAllowance)
313
313
 
    let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
314
314
 
    let periodMinAvailableToClaim = min([(outAmount + priceAssetBalance), periodTotalAvailableToClaim, periodUserAvailableToClaim])
315
315
 
    let usdtPriceAssetAllowableRatio = value(getInteger(keyUsdtPriceAssetAllowableRatio()))
316
316
 
    let putOneTknV2PriceAssetAmount = scale8
317
317
 
    let $t01589916152 = {
318
318
 
        let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "putOneTknV2WithoutTakeFeeREADONLY", [putOneTknV2PriceAssetAmount, priceAssetId58], nil)
319
319
 
        if ($isInstanceOf(@, "(Int, Int, Int)"))
320
320
 
            then @
321
321
 
            else throw(($getType(@) + " couldn't be cast to (Int, Int, Int)"))
322
322
 
        }
323
323
 
    if (($t01589916152 == $t01589916152))
324
324
 
        then {
325
325
 
            let bonus = $t01589916152._3
326
326
 
            let feeAmount = $t01589916152._2
327
327
 
            let lpAmount = $t01589916152._1
328
328
 
            let usdtAssetId = value(getString(keyUsdtAssetId()))
329
329
 
            let $t01621416432 = {
330
330
 
                let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "getOneTknV2READONLY", [usdtAssetId, lpAmount], nil)
331
331
 
                if ($isInstanceOf(@, "(Int, Int)"))
332
332
 
                    then @
333
333
 
                    else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
334
334
 
                }
335
335
 
            if (($t01621416432 == $t01621416432))
336
336
 
                then {
337
337
 
                    let getOneTknV2FeeAmount = $t01621416432._2
338
338
 
                    let usdtAmount = $t01621416432._1
339
339
 
                    let currentUsdtPriceAssetRatio = fraction(putOneTknV2PriceAssetAmount, scale8, usdtAmount)
340
340
 
                    let endPeriodBlocksLeft = (periodEnd - height)
341
341
 
                    $Tuple10(periodMinAvailableToClaim, periodTotalAvailableToClaim, periodUserAvailableToClaim, totalUserAvailableToClaim, usdtPriceAssetAllowableRatio, currentUsdtPriceAssetRatio, endPeriodBlocksLeft, updatedCurrentPeriod, periodStart, periodEnd)
342
342
 
                    }
343
343
 
                else throw("Strict value is not equal to itself.")
344
344
 
            }
345
345
 
        else throw("Strict value is not equal to itself.")
346
346
 
    }
347
347
 
348
348
 
349
349
 
func managerPublicKeyOrUnit () = {
350
350
 
    let managerVaultAddress = getManagerVaultAddressOrThis()
351
351
 
    match getString(managerVaultAddress, keyManagerPublicKey()) {
352
352
 
        case s: String => 
353
353
 
            fromBase58String(s)
354
354
 
        case _: Unit => 
355
355
 
            unit
356
356
 
        case _ => 
357
357
 
            throw("Match error")
358
358
 
    }
359
359
 
    }
360
360
 
361
361
 
362
362
 
func mustManager (i) = {
363
363
 
    let pd = throw("Permission denied")
364
364
 
    match managerPublicKeyOrUnit() {
365
365
 
        case pk: ByteVector => 
366
366
 
            if ((i.callerPublicKey == pk))
367
367
 
                then true
368
368
 
                else pd
369
369
 
        case _: Unit => 
370
370
 
            if ((i.caller == this))
371
371
 
                then true
372
372
 
                else pd
373
373
 
        case _ => 
374
374
 
            throw("Match error")
375
375
 
    }
376
376
 
    }
377
377
 
378
378
 
379
379
 
func getClaimForActions (userAddress58,txId) = {
380
380
 
    let idoAssetId58 = readConfigArray()[IdxCfgIdoAssetId]
381
381
 
    let fallback = makeString(["%d%d%d%d%d", "0", "0", "0", "0", "0"], SEP)
382
382
 
    let investor = split(valueOrElse(getString(keyInvestor(userAddress58)), fallback), SEP)
383
383
 
    let investorTotalAmount = parseIntValue(investor[IdxInvTotalAmount])
384
384
 
    let investorRemainingAmount = parseIntValue(investor[IdxInvRemainingAmount])
385
385
 
    let investorPriceAssetBalance = parseIntValue(investor[IdxInvClaimedPriceAssetAmount])
386
386
 
    let investorIdoAssetBalance = parseIntValue(investor[IdxInvClaimedIdoAssetAmount])
387
387
 
    let investorLastClaimedHeight = parseIntValue(investor[IdxInvLastClaimedHeight])
388
388
 
    let priceAssetAmount = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
389
389
 
    let priceAssetActions = if ((priceAssetAmount != 0))
390
390
 
        then [IntegerEntry(keyPriceAssetBalance(userAddress58), 0)]
391
391
 
        else nil
392
392
 
    let investorKeyRemainingAmount = parseIntValue(valueOrElse(getString(keyInvestorRemainingAmount(userAddress58)), "0"))
393
393
 
    let investorKeyRemainingActions = if ((investorKeyRemainingAmount != 0))
394
394
 
        then [StringEntry(keyInvestorRemainingAmount(userAddress58), "0")]
395
395
 
        else nil
396
396
 
    let totalIdoAssetSendAmount = (((investorRemainingAmount + priceAssetAmount) + investorKeyRemainingAmount) * 100)
397
397
 
    let totalIdoAssetForInvestorData = ((investorRemainingAmount + investorKeyRemainingAmount) * 100)
398
398
 
    let newInvestor = makeString(["%d%d%d%d%d", toString(investorTotalAmount), "0", toString(investorPriceAssetBalance), toString((investorIdoAssetBalance + totalIdoAssetForInvestorData)), toString(height)], SEP)
399
399
 
    let investorDataActions = if ((totalIdoAssetForInvestorData != 0))
400
400
 
        then [StringEntry(keyInvestor(userAddress58), newInvestor)]
401
401
 
        else nil
402
402
 
    let sendIdoAssetActions = if ((totalIdoAssetSendAmount != 0))
403
403
 
        then [ScriptTransfer(addressFromStringValue(userAddress58), totalIdoAssetSendAmount, fromBase58String(idoAssetId58)), ClaimOperationHistoryEntry(userAddress58, 0, totalIdoAssetSendAmount, txId)]
404
404
 
        else nil
405
405
 
    $Tuple4(investorRemainingAmount, priceAssetAmount, investorKeyRemainingAmount, (((sendIdoAssetActions ++ investorDataActions) ++ investorKeyRemainingActions) ++ priceAssetActions))
406
406
 
    }
407
407
 
408
408
 
409
409
 
@Callable(i)
410
410
 
func constructor (idoStart,idoDuration,claimStart,claimDuration,price,priceAssetId58,minInvestAmount) = {
411
411
 
    let priceMult = ((100 * 1000) * 1000)
412
412
 
    let idoEnd = (idoStart + idoDuration)
413
413
 
    if (isDefined(getString(keyConfig())))
414
414
 
        then throw("already initialized")
415
415
 
        else if (("3PMEHLx1j6zerarZTYfsGqDeeZqQoMpxq5S" != toString(i.caller)))
416
416
 
            then throw("not authorized")
417
417
 
            else if ((size(i.payments) != 1))
418
418
 
                then throw("exactly 1 payment must be attached")
419
419
 
                else if ((idoEnd >= claimStart))
420
420
 
                    then throw("claimStart must be greater than idoEnd")
421
421
 
                    else {
422
422
 
                        let pmt = value(i.payments[0])
423
423
 
                        let idoAssetId = value(pmt.assetId)
424
424
 
                        let idoAssetInfo = valueOrErrorMessage(assetInfo(idoAssetId), "fail to load ido asset info")
425
425
 
                        let idoAssetId58 = toBase58String(idoAssetId)
426
426
 
                        let idoAssetMult = pow(10, 0, idoAssetInfo.decimals, 0, 0, DOWN)
427
427
 
                        let priceAssetId = fromBase58String(priceAssetId58)
428
428
 
                        let priceAssetInfo = valueOrErrorMessage(assetInfo(priceAssetId), "fail to load price asset info")
429
429
 
                        let priceAssetMult = pow(10, 0, priceAssetInfo.decimals, 0, 0, DOWN)
430
430
 
                        let origTotalsArray = readTotalsArrayOrDefault()
431
431
 
                        let totalsDiff = [0, 0, 0, 0]
432
432
 
[StringEntry(keyConfig(), fromatConfig(idoStart, idoDuration, claimStart, claimDuration, price, priceMult, idoAssetId58, idoAssetMult, priceAssetId58, priceAssetMult, minInvestAmount, pmt.amount)), TotalsEntry(keyTotals(), origTotalsArray, totalsDiff, claimStart, 0)]
433
433
 
                        }
434
434
 
    }
435
435
 
436
436
 
437
437
 
438
438
 
@Callable(i)
439
439
 
func invest () = {
440
440
 
    let cfgArray = readConfigArray()
441
441
 
    let idoStart = parseIntValue(cfgArray[IdxCfgIdoStart])
442
442
 
    let idoDuration = parseIntValue(cfgArray[IdxCfgIdoDuration])
443
443
 
    let idoEnd = (idoStart + idoDuration)
444
444
 
    let claimStart = parseIntValue(cfgArray[IdxCfgClaimStart])
445
445
 
    let claimDuration = parseIntValue(cfgArray[IdxCfgClaimDuration])
446
446
 
    let price = parseIntValue(cfgArray[IdxCfgPrice])
447
447
 
    let priceMult = parseIntValue(cfgArray[IdxCfgPriceMult])
448
448
 
    let idoAssetId58 = cfgArray[IdxCfgIdoAssetId]
449
449
 
    let idoAssetId = fromBase58String(idoAssetId58)
450
450
 
    let idoAssetMult = parseIntValue(cfgArray[IdxCfgIdoAssetMult])
451
451
 
    let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
452
452
 
    let priceAssetId = fromBase58String(priceAssetId58)
453
453
 
    let priceAssetMult = parseIntValue(cfgArray[IdxCfgPriceAssetMult])
454
454
 
    let minIvestAmount = parseIntValue(cfgArray[IdxCfgMinInvestAmount])
455
455
 
    let userAddress = toString(i.caller)
456
456
 
    if ((idoStart > height))
457
457
 
        then throw("ido has not been started yet")
458
458
 
        else if ((height > idoEnd))
459
459
 
            then throw("ido has been already ended")
460
460
 
            else if ((size(i.payments) != 1))
461
461
 
                then throw("exactly 1 payment is expected")
462
462
 
                else {
463
463
 
                    let pmt = value(i.payments[0])
464
464
 
                    let pmtAssetId = value(pmt.assetId)
465
465
 
                    let pmtAmount = pmt.amount
466
466
 
                    if ((pmtAssetId != priceAssetId))
467
467
 
                        then throw((("invalid payment asset id: " + toBase58String(pmtAssetId)) + " is expected"))
468
468
 
                        else {
469
469
 
                            let origInvestorArray = readInvestorArrayOrDefault(userAddress)
470
470
 
                            let origTotalsArray = readTotalsArrayOrDefault()
471
471
 
                            let newPriceTotalAmount = (parseIntValue(origTotalsArray[IdxInvTotalAmount]) + pmtAmount)
472
472
 
                            let requiredIdoAssetAmount = (newPriceTotalAmount * 100)
473
473
 
                            if ((requiredIdoAssetAmount > assetBalance(this, idoAssetId)))
474
474
 
                                then throw("IDO asset has been - sold consider to use smaller payment")
475
475
 
                                else {
476
476
 
                                    let totalsDiff = [pmtAmount, pmtAmount, 0, 0]
477
477
 
[TotalsEntry(keyInvestor(userAddress), origInvestorArray, totalsDiff, claimStart, 0), TotalsEntry(keyTotals(), origTotalsArray, totalsDiff, claimStart, 0), InvestOperationHistoryEntry(userAddress, pmtAmount, 0, i.transactionId)]
478
478
 
                                    }
479
479
 
                            }
480
480
 
                    }
481
481
 
    }
482
482
 
483
483
 
484
484
 
485
485
 
@Callable(i)
486
486
 
func claim (claimedAssetId58,userAddress58) = {
487
487
 
    let callerAddress58 = toString(i.caller)
488
488
 
    if ((userAddress58 != callerAddress58))
489
489
 
        then throw("not authorized")
490
490
 
        else {
491
491
 
            let cfgArray = readConfigArray()
492
492
 
            let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
493
493
 
            let claimResultTuple = internalClaim(claimedAssetId58, i.caller, i.transactionId)
494
494
 
            let totalsDiff = claimResultTuple._1
495
495
 
            let outAmount = claimResultTuple._2
496
496
 
            let outAssetId = claimResultTuple._3
497
497
 
            let origInvestArray = claimResultTuple._4
498
498
 
            let newClaimPeriodHeight = claimResultTuple._5
499
499
 
            let claimedPriceAmountFromDiff = totalsDiff[IdxDiffClaimedPriceAmountIncrement]
500
500
 
            let claimedIdoAssetAmountFromDiff = totalsDiff[IdxDiffClaimedIdoAssetAmountIncrement]
501
501
 
            let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
502
502
 
            let priceAssetDecimals = value(assetInfo(fromBase58String(priceAssetId58))).decimals
503
503
 
            let entries = if ((claimedAssetId58 == priceAssetId58))
504
504
 
                then {
505
505
 
                    let $t02456225006 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
506
506
 
                    let periodMinAvailableToClaim = $t02456225006._1
507
507
 
                    let periodTotalAvailableToClaim = $t02456225006._2
508
508
 
                    let periodUserAvailableToClaim = $t02456225006._3
509
509
 
                    let totalUserAvailableToClaim = $t02456225006._4
510
510
 
                    let usdtPriceAssetAllowableRatio = $t02456225006._5
511
511
 
                    let currentUsdtPriceAssetRatio = $t02456225006._6
512
512
 
                    let endPeriodBlocksLeft = $t02456225006._7
513
513
 
                    let updatedCurrentPeriod = $t02456225006._8
514
514
 
                    let periodStart = $t02456225006._9
515
515
 
                    let periodEnd = $t02456225006._10
516
516
 
                    let checks = [if ((periodUserAvailableToClaim > 0))
517
517
 
                        then true
518
518
 
                        else throwErr("unavailable to claim because user period allowance reached"), if ((periodTotalAvailableToClaim > 0))
519
519
 
                        then true
520
520
 
                        else throwErr("unavailable to claim because total period allowance reached"), if ((periodMinAvailableToClaim > 0))
521
521
 
                        then true
522
522
 
                        else throwErr("nothing to claim"), if ((usdtPriceAssetAllowableRatio > currentUsdtPriceAssetRatio))
523
523
 
                        then true
524
524
 
                        else throwErr("unavailable to claim because usdn price lower than usdtPriceAssetAllowableRatio"), if (if (if ((claimedAssetId58 != priceAssetId58))
525
525
 
                        then true
526
526
 
                        else (claimClosingHeight == 0))
527
527
 
                        then true
528
528
 
                        else (claimClosingHeight > height))
529
529
 
                        then true
530
530
 
                        else throwErr("Claim is disabled")]
531
531
 
                    if ((checks == checks))
532
532
 
                        then {
533
533
 
                            let updatedPeriodTotalAvailableToClaim = (periodTotalAvailableToClaim - periodMinAvailableToClaim)
534
534
 
                            let updatedPeriodUserAvailableToClaim = (periodUserAvailableToClaim - periodMinAvailableToClaim)
535
535
 
                            let entries = if ((priceAssetBalance > periodMinAvailableToClaim))
536
536
 
                                then [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), (priceAssetBalance - periodMinAvailableToClaim))]
537
537
 
                                else {
538
538
 
                                    let evaluateResult = split(asString(invoke(this, "claimREADONLY", [priceAssetId58, userAddress58], nil)), SEP)
539
539
 
                                    if ((evaluateResult == evaluateResult))
540
540
 
                                        then {
541
541
 
                                            let availablePriceAmountToClaim = parseIntValue(evaluateResult[3])
542
542
 
                                            let lastClaimEntries = if ((availablePriceAmountToClaim == periodMinAvailableToClaim))
543
543
 
                                                then {
544
544
 
                                                    let investorTotalAmount = parseIntValue(origInvestArray[IdxInvTotalAmount])
545
545
 
                                                    let investorRemainingAmount = parseIntValue(origInvestArray[IdxInvRemainingAmount])
546
546
 
                                                    let investorPriceAssetBalance = parseIntValue(origInvestArray[IdxInvClaimedPriceAssetAmount])
547
547
 
                                                    let investorIdoAssetBalance = parseIntValue(origInvestArray[IdxInvClaimedIdoAssetAmount])
548
548
 
                                                    let investorLastClaimedHeight = parseIntValue(origInvestArray[IdxInvLastClaimedHeight])
549
549
 
                                                    let newInvestArray = [toString(investorTotalAmount), "0", toString(investorPriceAssetBalance), toString(investorIdoAssetBalance), toString(investorLastClaimedHeight)]
550
550
 
                                                    let totals = readTotalsArrayOrDefault()
551
551
 
                                                    let totalsTotalAmount = parseIntValue(totals[IdxInvTotalAmount])
552
552
 
                                                    let totalsRemainingAmount = parseIntValue(totals[IdxInvRemainingAmount])
553
553
 
                                                    let totalsClaimedPriceAssetAmount = parseIntValue(totals[IdxInvClaimedPriceAssetAmount])
554
554
 
                                                    let totalsClaimedIdoAssetAmount = parseIntValue(totals[IdxInvClaimedIdoAssetAmount])
555
555
 
                                                    let totalsLastClaimedHeight = parseIntValue(totals[IdxInvLastClaimedHeight])
556
556
 
                                                    let newTotalsRemainingAmount = (totalsRemainingAmount - investorRemainingAmount)
557
557
 
                                                    let newTotalArray = [toString(totalsTotalAmount), toString(newTotalsRemainingAmount), toString(totalsClaimedPriceAssetAmount), toString(totalsClaimedIdoAssetAmount), toString(totalsLastClaimedHeight)]
558
558
 
                                                    let newTotalRemainingAmount = (valueOrElse(getInteger(keyTotalRemainingAmount()), 0) + investorRemainingAmount)
559
559
 
[StringEntry(keyInvestorRemainingAmount(userAddress58), toString(investorRemainingAmount)), StringEntry(keyTotalRemainingAmount(), toString(newTotalRemainingAmount)), TotalsEntry(keyInvestor(userAddress58), newInvestArray, totalsDiff, newClaimPeriodHeight, 0), TotalsEntry(keyTotals(), newTotalArray, totalsDiff, newClaimPeriodHeight, 0)]
560
560
 
                                                    }
561
561
 
                                                else [TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight, 0), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight, 0)]
562
562
 
                                            let updatedPriceAssetBalance = ((priceAssetBalance + outAmount) - periodMinAvailableToClaim)
563
563
 
                                            ([ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), updatedPriceAssetBalance)] ++ lastClaimEntries)
564
564
 
                                            }
565
565
 
                                        else throw("Strict value is not equal to itself.")
566
566
 
                                    }
567
567
 
                            $Tuple2(([IntegerEntry(keyCurrentPeriod(), updatedCurrentPeriod), IntegerEntry(keyPeriodStartHeight(updatedCurrentPeriod), periodStart), IntegerEntry(keyPeriodEndHeight(updatedCurrentPeriod), periodEnd), IntegerEntry(keyPeriodTotalAvailableToClaim(priceAssetId58, updatedCurrentPeriod), updatedPeriodTotalAvailableToClaim), IntegerEntry(keyPeriodUserAvailableToClaim(priceAssetId58, updatedCurrentPeriod, userAddress58), updatedPeriodUserAvailableToClaim), ClaimOperationHistoryEntry(userAddress58, periodMinAvailableToClaim, claimedIdoAssetAmountFromDiff, i.transactionId)] ++ entries), unit)
568
568
 
                            }
569
569
 
                        else throw("Strict value is not equal to itself.")
570
570
 
                    }
571
571
 
                else {
572
572
 
                    let priceAssetBalanceIdoDecimals = fraction(priceAssetBalance, scale8, pow(10, 0, priceAssetDecimals, 0, 0, DOWN))
573
573
 
                    $Tuple2([ScriptTransfer(i.caller, (outAmount + priceAssetBalanceIdoDecimals), outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), 0), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight, priceAssetBalance), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight, priceAssetBalance), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, (claimedIdoAssetAmountFromDiff + priceAssetBalanceIdoDecimals), i.transactionId)], unit)
574
574
 
                    }
575
575
 
            entries
576
576
 
            }
577
577
 
    }
578
578
 
579
579
 
580
580
 
581
581
 
@Callable(i)
582
582
 
func cleanRemaingAmount (userAddress58) = {
583
583
 
    let priceAssetId58 = readConfigArray()[IdxCfgPriceAssetId]
584
584
 
    let evaluateResult = split(asString(invoke(this, "claimREADONLY", [priceAssetId58, userAddress58], nil)), SEP)
585
585
 
    if ((evaluateResult == evaluateResult))
586
586
 
        then {
587
587
 
            let availablePriceAmountToClaim = parseIntValue(evaluateResult[2])
588
588
 
            let checkUnclaimedAssets = if ((availablePriceAmountToClaim == 0))
589
589
 
                then true
590
590
 
                else throwErr("user have unclaimed assets")
591
591
 
            if ((checkUnclaimedAssets == checkUnclaimedAssets))
592
592
 
                then {
593
593
 
                    let investor = split(value(getString(keyInvestor(userAddress58))), SEP)
594
594
 
                    let investorTotalAmount = parseIntValue(investor[IdxInvTotalAmount])
595
595
 
                    let investorRemainingAmount = parseIntValue(investor[IdxInvRemainingAmount])
596
596
 
                    let investorPriceAssetBalance = parseIntValue(investor[IdxInvClaimedPriceAssetAmount])
597
597
 
                    let investorIdoAssetBalance = parseIntValue(investor[IdxInvClaimedIdoAssetAmount])
598
598
 
                    let investorLastClaimedHeight = parseIntValue(investor[IdxInvLastClaimedHeight])
599
599
 
                    let investorRemainingAmountCheck = if ((investorRemainingAmount != 0))
600
600
 
                        then true
601
601
 
                        else throwErr("investorRemainingAmount already zero")
602
602
 
                    if ((investorRemainingAmountCheck == investorRemainingAmountCheck))
603
603
 
                        then {
604
604
 
                            let newInvestor = makeString(["%d%d%d%d%d", toString(investorTotalAmount), "0", toString(investorPriceAssetBalance), toString(investorIdoAssetBalance), toString(investorLastClaimedHeight)], SEP)
605
605
 
                            let totals = split(value(getString(keyTotals())), SEP)
606
606
 
                            let totalsTotalAmount = parseIntValue(totals[IdxInvTotalAmount])
607
607
 
                            let totalsRemainingAmount = parseIntValue(totals[IdxInvRemainingAmount])
608
608
 
                            let totalsClaimedPriceAssetAmount = parseIntValue(totals[IdxInvClaimedPriceAssetAmount])
609
609
 
                            let totalsClaimedIdoAssetAmount = parseIntValue(totals[IdxInvClaimedIdoAssetAmount])
610
610
 
                            let totalsLastClaimedHeight = parseIntValue(totals[IdxInvLastClaimedHeight])
611
611
 
                            let newTotals = makeString(["%d%d%d%d%d", toString(totalsTotalAmount), toString((totalsRemainingAmount - investorRemainingAmount)), toString(totalsClaimedPriceAssetAmount), toString(totalsClaimedIdoAssetAmount), toString(totalsLastClaimedHeight)], SEP)
612
612
 
                            let newTotalRemainingAmount = (valueOrElse(getInteger(keyTotalRemainingAmount()), 0) + investorRemainingAmount)
613
613
 
[StringEntry(keyInvestorRemainingAmount(userAddress58), toString(investorRemainingAmount)), StringEntry(keyTotalRemainingAmount(), toString(newTotalRemainingAmount)), StringEntry(keyInvestor(userAddress58), newInvestor), StringEntry(keyTotals(), newTotals)]
614
614
 
                            }
615
615
 
                        else throw("Strict value is not equal to itself.")
616
616
 
                    }
617
617
 
                else throw("Strict value is not equal to itself.")
618
618
 
            }
619
619
 
        else throw("Strict value is not equal to itself.")
620
620
 
    }
621
621
 
622
622
 
623
623
 
624
624
 
@Callable(i)
625
625
 
func claimFor (userList) = {
626
626
 
    func helper (acc,user) =     {
627
627
 
        let $t03474534787 = acc
628
628
 
        let allActions = $t03474534787._1
629
629
 
        let totalSum = $t03474534787._2
630
630
 
        let addrList = $t03474534787._3
631
631
 
        let $t03479234924 = getClaimForActions(user, i.transactionId)
632
632
 
        let investorRemainingAmount = $t03479234924._1
633
633
 
        let priceAssetAmount = $t03479234924._2
634
634
 
        let investorKeyRemainingAmount = $t03479234924._3
635
635
 
        let userActions = $t03479234924._4
636
636
 
        let addSum = (investorRemainingAmount + investorKeyRemainingAmount)
637
637
 
        let ch = if (!(containsElement(addrList, user)))
638
638
 
            then true
639
639
 
            else throwErr("duplicate address in list")
640
640
 
        if ((ch == ch))
641
641
 
            then $Tuple3((allActions ++ userActions), (totalSum + addSum), (addrList :+ user))
642
642
 
            else throw("Strict value is not equal to itself.")
643
643
 
        }
644
644
 
645
645
 
    let $t03516235229 = {
646
646
 
        let $l = userList
647
647
 
        let $s = size($l)
648
648
 
        let $acc0 = $Tuple3(nil, 0, nil)
649
649
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
650
650
 
            then $a
651
651
 
            else helper($a, $l[$i])
652
652
 
653
653
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
654
654
 
            then $a
655
655
 
            else throw("List size exceeds 19")
656
656
 
657
657
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19)
658
658
 
        }
659
659
 
    let allActions = $t03516235229._1
660
660
 
    let sum = $t03516235229._2
661
661
 
    let _a = $t03516235229._3
662
662
 
    let totalsAction = if ((sum != 0))
663
663
 
        then [TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), [0, -(sum), 0, sum], height, 0)]
664
664
 
        else nil
665
665
 
    (allActions ++ totalsAction)
666
666
 
    }
667
667
 
668
668
 
669
669
 
670
670
 
@Callable(i)
671
671
 
func claimREADONLY (claimedAssetId58,userAddress58) = {
672
672
 
    let claimResultTuple = internalClaim(claimedAssetId58, addressFromStringValue(userAddress58), fromBase58String(""))
673
673
 
    let totalsDiff = claimResultTuple._1
674
674
 
    let outAmount = claimResultTuple._2
675
675
 
    let outAssetId = claimResultTuple._3
676
676
 
    let origInvestArray = claimResultTuple._4
677
677
 
    let newClaimPeriodHeight = claimResultTuple._5
678
678
 
    let availableToClaimArray = claimResultTuple._6
679
679
 
    let availablePriceAmountToClaim = availableToClaimArray[0]
680
680
 
    let availableIdoAmountToClaim = availableToClaimArray[1]
681
681
 
    $Tuple2(nil, makeString(["%s%d%d", userAddress58, toString(availablePriceAmountToClaim), toString(availableIdoAmountToClaim)], SEP))
682
682
 
    }
683
683
 
684
684
 
685
685
 
686
686
 
@Callable(i)
687
687
 
func claimV2READONLY (claimedAssetId58,userAddress58) = {
688
688
 
    let claimResultTuple = internalClaim(claimedAssetId58, addressFromStringValue(userAddress58), fromBase58String(""))
689
689
 
    let totalsDiff = claimResultTuple._1
690
690
 
    let outAmount = claimResultTuple._2
691
691
 
    let outAssetId = claimResultTuple._3
692
692
 
    let origInvestArray = claimResultTuple._4
693
693
 
    let newClaimPeriodHeight = claimResultTuple._5
694
694
 
    let availableToClaimArray = claimResultTuple._6
695
695
 
    let availablePriceAmountToClaim = availableToClaimArray[0]
696
696
 
    let availableIdoAmountToClaim = availableToClaimArray[1]
697
697
 
    let cfgArray = readConfigArray()
698
698
 
    let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
699
699
 
    let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
700
700
 
    let priceAssetBalanceIdoDecimals = (priceAssetBalance * 100)
701
701
 
    let availableIdoAmountToClaimWithPriceAssetBalance = (availableIdoAmountToClaim + priceAssetBalanceIdoDecimals)
702
702
 
    let $t03719137603 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
703
703
 
    let periodMinAvailableToClaim = $t03719137603._1
704
704
 
    let periodTotalAvailableToClaim = $t03719137603._2
705
705
 
    let periodUserAvailableToClaim = $t03719137603._3
706
706
 
    let totalUserAvailableToClaim = $t03719137603._4
707
707
 
    let usdtPriceAssetAllowableRatio = $t03719137603._5
708
708
 
    let currentUsdtPriceAssetRatio = $t03719137603._6
709
709
 
    let endPeriodBlocksLeft = $t03719137603._7
710
710
 
    let updatedCurrentPeriod = $t03719137603._8
711
711
 
    let periodStart = $t03719137603._9
712
712
 
    let periodEnd = $t03719137603._10
713
713
 
    let currentPeriodEndHeight = valueOrElse(getInteger(keyPeriodEndHeight(updatedCurrentPeriod)), 0)
714
714
 
    let userTotalPriceAssetClaimed = (parseIntValue(readInvestorArrayOrFail(userAddress58)[IdxInvClaimedPriceAssetAmount]) - priceAssetBalance)
715
715
 
    let resultString = if ((height > currentPeriodEndHeight))
716
716
 
        then {
717
717
 
            let periodLenght = value(getInteger(keyPeriodLength()))
718
718
 
            let userPeriodAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
719
719
 
            let totalPeriodAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
720
720
 
            makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(userPeriodAllowance), toString(totalPeriodAllowance), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(periodLenght), toString(userTotalPriceAssetClaimed)], SEP)
721
721
 
            }
722
722
 
        else makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(periodMinAvailableToClaim), toString(periodTotalAvailableToClaim), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(endPeriodBlocksLeft), toString(userTotalPriceAssetClaimed)], SEP)
723
723
 
    $Tuple2(nil, resultString)
724
724
 
    }
725
725
 
726
726
 
727
727
 
@Verifier(tx)
728
728
 
func verify () = {
729
729
 
    let targetPublicKey =     match managerPublicKeyOrUnit() {
730
730
 
        case pk: ByteVector => 
731
731
 
            pk
732
732
 
        case _: Unit => 
733
733
 
            tx.senderPublicKey
734
734
 
        case _ => 
735
735
 
            throw("Match error")
736
736
 
    }
737
737
 
    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
738
738
 
    }
739
739
 

github/deemru/w8io/786bc32 
71.60 ms ◑