w8 · tx · 4vL···cNT

tx · 4vLmzA5dArDonP97Q8CrgLKjRLYKYhAVEYn8T1ze1cNT

3MrfwTQPjiMpon8KZcJjatDLHbWNwVyadKE:  -0.02600000 Waves

2022.11.03 16:36 [2301002] smart account 3MrfwTQPjiMpon8KZcJjatDLHbWNwVyadKE > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4vLmzA5dArDonP97Q8CrgLKjRLYKYhAVEYn8T1ze1cNT",
    "fee": 2600000,
    "feeAssetId": null,
    "timestamp": 1667482621397,
    "version": 1,
    "sender": "3MrfwTQPjiMpon8KZcJjatDLHbWNwVyadKE",
    "senderPublicKey": "6bj3L3GyaTejhux59f2iQkvXJZ9hAukkWN67hi3X8ND4",
    "proofs": [
        "fkvYU4ZR5iJfViFVacgLNxQczwjf7YC577DC2usDyRCJ2xVvsZXB6wnki8pZ4x64KYZA3kf6otghiCvDrXZ5oNt"
    ],
    "script": "base64:AAIFAAAAAAAADtEIAhIJCgcBAQEBAQgBEgASBAoCCAgSBAoCCAgSBAoCCAgSAwoBCBIAIg9nZXRTdHJpbmdPckZhaWwiA2tleSIDU0VQIghCVUZTQ0FMRSIGc2NhbGU4Igh0aHJvd0VyciIDbXNnIh1jb252ZXJ0UHJpY2VBc3NldEludG9JZG9Bc3NldCIQcHJpY2VBc3NldEFtb3VudCIOcHJpY2VBc3NldE1VTFQiBXByaWNlIglwcmljZU1VTFQiDGlkb0Fzc2V0TVVMVCIPYlByaWNlQXNzZXRNVUxUIg1iSWRvQXNzZXRNVUxUIg5iUHJpY2VBc3NldEJVRiIPYkFtb3VudEFzc2V0QlVGIg5JZHhDZmdJZG9TdGFydCIRSWR4Q2ZnSWRvRHVyYXRpb24iEElkeENmZ0NsYWltU3RhcnQiE0lkeENmZ0NsYWltRHVyYXRpb24iC0lkeENmZ1ByaWNlIg9JZHhDZmdQcmljZU11bHQiEElkeENmZ0lkb0Fzc2V0SWQiEklkeENmZ0lkb0Fzc2V0TXVsdCISSWR4Q2ZnUHJpY2VBc3NldElkIhRJZHhDZmdQcmljZUFzc2V0TXVsdCIVSWR4Q2ZnTWluSW52ZXN0QW1vdW50Ig1mcm9tYXRDb25maWdTIghpZG9TdGFydCILaWRvRHVyYXRpb24iCmNsYWltU3RhcnQiDWNsYWltRHVyYXRpb24iCXByaWNlTXVsdCIMaWRvQXNzZXRJZDU4IgxpZG9Bc3NldE11bHQiDnByaWNlQXNzZXRJZDU4Ig5wcmljZUFzc2V0TXVsdCIPbWluSW52ZXN0QW1vdW50IhN0b3RhbElkb0Fzc2V0VG9TZWxsIgxmcm9tYXRDb25maWciEUlkeEludlRvdGFsQW1vdW50IhVJZHhJbnZSZW1haW5pbmdBbW91bnQiHUlkeEludkNsYWltZWRQcmljZUFzc2V0QW1vdW50IhtJZHhJbnZDbGFpbWVkSWRvQXNzZXRBbW91bnQiF0lkeEludkxhc3RDbGFpbWVkSGVpZ2h0Ig9mb3JtYXRJbnZlc3RvclMiC3RvdGFsQW1vdW50Ig9yZW1haW5pbmdBbW91bnQiF2NsYWltZWRQcmljZUFzc2V0QW1vdW50IhVjbGFpbWVkSWRvQXNzZXRBbW91bnQiEWxhc3RDbGFpbWVkSGVpZ2h0Ig5mb3JtYXRJbnZlc3RvciITZm9ybWF0SGlzdG9yeVJlY29yZCIOaWRvQXNzZXRBbW91bnQiCWtleUNvbmZpZyILa2V5SW52ZXN0b3IiC3VzZXJBZGRyZXNzIglrZXlUb3RhbHMiGWtleU9wZXJhdGlvbkhpc3RvcnlSZWNvcmQiBHR5cGUiBnR4SWQ1OCIUa2V5VVNETkNsYWltRGlzYWJsZWQiFWtleVVTRE5DbGFpbUVuZEhlaWdodCIPa2V5UGVyaW9kTGVuZ3RoIhBrZXlDdXJyZW50UGVyaW9kIhRrZXlQZXJpb2RTdGFydEhlaWdodCIJcGVyaW9kTnVtIhJrZXlQZXJpb2RFbmRIZWlnaHQiH2tleVVzZHRQcmljZUFzc2V0QWxsb3dhYmxlUmF0aW8iF2tleVRvdGFsUGVyaW9kQWxsb3dhbmNlIgdhc3NldElkIhZrZXlVc2VyUGVyaW9kQWxsb3dhbmNlIh5rZXlQZXJpb2RUb3RhbEF2YWlsYWJsZVRvQ2xhaW0iHWtleVBlcmlvZFVzZXJBdmFpbGFibGVUb0NsYWltIhtrZXlVc2R0UHJpY2VBc3NldFN0YWJsZVBvb2wiDmtleVVzZHRBc3NldElkIhRrZXlQcmljZUFzc2V0QmFsYW5jZSIHYWRkcmVzcyITa2V5TWFuYWdlclB1YmxpY0tleSIaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiD3JlYWRDb25maWdBcnJheSIjcmVhZFRvdGFsc0FycmF5T3JEZWZhdWx0QnlDdXN0b21LZXkiCWN1c3RvbUtleSIYcmVhZFRvdGFsc0FycmF5T3JEZWZhdWx0IhpyZWFkSW52ZXN0b3JBcnJheU9yRGVmYXVsdCIXcmVhZEludmVzdG9yQXJyYXlPckZhaWwiFUlkeERpZmZUb3RhbEluY3JlbWVudCIkSWR4RGlmZlJlbWFpbmluZ1ByaWNlQW1vdW50SW5jcmVtZW50IiJJZHhEaWZmQ2xhaW1lZFByaWNlQW1vdW50SW5jcmVtZW50IiVJZHhEaWZmQ2xhaW1lZElkb0Fzc2V0QW1vdW50SW5jcmVtZW50IgtUb3RhbHNFbnRyeSIJb3JpZ0FycmF5Ig1pbmNyZW1lbnREaWZmIhRuZXdMYXN0Q2xhaW1lZEhlaWdodCIObmV3VG90YWxBbW91bnQiEm5ld1JlbWFpbmluZ0Ftb3VudCIabmV3Q2xhaW1lZFByaWNlQXNzZXRBbW91bnQiGG5ld0NsYWltZWRJZG9Bc3NldEFtb3VudCIbSW52ZXN0T3BlcmF0aW9uSGlzdG9yeUVudHJ5IgR0eElkIhpDbGFpbU9wZXJhdGlvbkhpc3RvcnlFbnRyeSINaW50ZXJuYWxDbGFpbSIQY2xhaW1lZEFzc2V0SWQ1OCIIY2ZnQXJyYXkiCGNsYWltRW5kIgppZG9Bc3NldElkIgxwcmljZUFzc2V0SWQiDXVzZXJBZGRyZXNzNTgiD29yaWdJbnZlc3RBcnJheSIRaW52ZXN0VG90YWxBbW91bnQiGmludmVzdExhc3RDbGFpbWVkSGVpZ2h0VE1QIhdpbnZlc3RMYXN0Q2xhaW1lZEhlaWdodCIUbmV3Q2xhaW1QZXJpb2RIZWlnaHQiDmNsYWltaW5nQmxvY2tzIhhjbGFpbWluZ1ByaWNlQXNzZXRBbW91bnQiFmNsYWltaW5nSWRvQXNzZXRBbW91bnQiBmlzVVNETiITaXNVU0ROQ2xhaW1EaXNhYmxlZCIGY2hlY2tzIg9pbnRlcm5hbENsYWltVjIiCW91dEFtb3VudCIZdG90YWxVc2VyQXZhaWxhYmxlVG9DbGFpbSIedG90YWxQZXJpb2RQcmljZUFzc2V0QWxsb3dhbmNlIh11c2VyUGVyaW9kUHJpY2VBc3NldEFsbG93YW5jZSIMcGVyaW9kTGVuZ3RoIg1jdXJyZW50UGVyaW9kIht6ZXJvUGVyaW9kRW5kSGVpZ2hJc0RlZmluZWQiDSR0MDExODM1MTM3MDUiFWxhc3RQZXJpb2RTdGFydEhlaWdodCITbGFzdFBlcmlvZEVuZEhlaWdodCINJHQwMTIwOTUxMjgwMCIUdXBkYXRlZEN1cnJlbnRQZXJpb2QiC3BlcmlvZFN0YXJ0IhdibG9ja3NUb0xhc3RQZXJpb2RTdGFydCIJcGVyaW9kRW5kIhV6ZXJvUGVyaW9kU3RhcnRIZWlnaHQiE3plcm9QZXJpb2RFbmRIZWlnaHQiDSR0MDEzMDU1MTM0MzciG3BlcmlvZFRvdGFsQXZhaWxhYmxlVG9DbGFpbSIacGVyaW9kVXNlckF2YWlsYWJsZVRvQ2xhaW0iEXByaWNlQXNzZXRCYWxhbmNlIhlwZXJpb2RNaW5BdmFpbGFibGVUb0NsYWltIhx1c2R0UHJpY2VBc3NldEFsbG93YWJsZVJhdGlvIhtwdXRPbmVUa25WMlByaWNlQXNzZXRBbW91bnQiDSR0MDE0NDYwMTQ3MTMiAUAiBWJvbnVzIglmZWVBbW91bnQiCGxwQW1vdW50Igt1c2R0QXNzZXRJZCINJHQwMTQ3NzUxNDk5MyIUZ2V0T25lVGtuVjJGZWVBbW91bnQiCnVzZHRBbW91bnQiGmN1cnJlbnRVc2R0UHJpY2VBc3NldFJhdGlvIhNlbmRQZXJpb2RCbG9ja3NMZWZ0IhZtYW5hZ2VyUHVibGljS2V5T3JVbml0IgckbWF0Y2gwIgFzIh1wZW5kaW5nTWFuYWdlclB1YmxpY0tleU9yVW5pdCILbXVzdE1hbmFnZXIiAWkiAnBkIgJwayIGaWRvRW5kIgNwbXQiDGlkb0Fzc2V0SW5mbyIOcHJpY2VBc3NldEluZm8iD29yaWdUb3RhbHNBcnJheSIKdG90YWxzRGlmZiIObWluSXZlc3RBbW91bnQiCnBtdEFzc2V0SWQiCXBtdEFtb3VudCIRb3JpZ0ludmVzdG9yQXJyYXkiE25ld1ByaWNlVG90YWxBbW91bnQiFnJlcXVpcmVkSWRvQXNzZXRBbW91bnQiD2NhbGxlckFkZHJlc3M1OCIQY2xhaW1SZXN1bHRUdXBsZSIKb3V0QXNzZXRJZCIaY2xhaW1lZFByaWNlQW1vdW50RnJvbURpZmYiHWNsYWltZWRJZG9Bc3NldEFtb3VudEZyb21EaWZmIgdlbnRyaWVzIg0kdDAyMDY0OTIxMDkzIiJ1cGRhdGVkUGVyaW9kVG90YWxBdmFpbGFibGVUb0NsYWltIiF1cGRhdGVkUGVyaW9kVXNlckF2YWlsYWJsZVRvQ2xhaW0iGHVwZGF0ZWRQcmljZUFzc2V0QmFsYW5jZSIVYXZhaWxhYmxlVG9DbGFpbUFycmF5IhthdmFpbGFibGVQcmljZUFtb3VudFRvQ2xhaW0iGWF2YWlsYWJsZUlkb0Ftb3VudFRvQ2xhaW0iLmF2YWlsYWJsZUlkb0Ftb3VudFRvQ2xhaW1XaXRoUHJpY2VBc3NldEJhbGFuY2UiDSR0MDI3MTIwMjc1MzIiFmN1cnJlbnRQZXJpb2RFbmRIZWlnaHQiDHJlc3VsdFN0cmluZyIMcGVyaW9kTGVuZ2h0IhN1c2VyUGVyaW9kQWxsb3dhbmNlIhR0b3RhbFBlcmlvZEFsbG93YW5jZSIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiC2NoZWNrQ2FsbGVyIhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5AAAAQAEAAAABYQAAAAEAAAABYgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEIgAAAAEFAAAAAWIJAAEsAAAAAgkAASwAAAACAgAAAA9tYW5kYXRvcnkgdGhpcy4FAAAAAWICAAAADyBpcyBub3QgZGVmaW5lZAAAAAABYwIAAAACX18AAAAAAWQJAAE2AAAAAQAN4Lazp2QAAAAAAAABZQAAAAAABfXhAAEAAAABZgAAAAEAAAABZwkAAAIAAAABCQAEuQAAAAIJAARMAAAAAgIAAAAJaWRvLnJpZGU6CQAETAAAAAIFAAAAAWcFAAAAA25pbAIAAAABIAEAAAABaAAAAAUAAAABaQAAAAFqAAAAAWsAAAABbAAAAAFtBAAAAAFuCQABNgAAAAEFAAAAAWoEAAAAAW8JAAE2AAAAAQUAAAABbQQAAAABcAkAATwAAAADCQABNgAAAAEFAAAAAWkFAAAAAWQFAAAAAW4EAAAAAXEJAAE8AAAAAwUAAAABcAkAATYAAAABBQAAAAFsCQABNgAAAAEFAAAAAWsJAAGgAAAAAQkAATwAAAADBQAAAAFxCQABNgAAAAEFAAAAAW0FAAAAAWQAAAAAAXIAAAAAAAAAAAEAAAAAAXMAAAAAAAAAAAIAAAAAAXQAAAAAAAAAAAMAAAAAAXUAAAAAAAAAAAQAAAAAAXYAAAAAAAAAAAUAAAAAAXcAAAAAAAAAAAYAAAAAAXgAAAAAAAAAAAcAAAAAAXkAAAAAAAAAAAgAAAAAAXoAAAAAAAAAAAkAAAAAAUEAAAAAAAAAAAoAAAAAAUIAAAAAAAAAAAsBAAAAAUMAAAAMAAAAAUQAAAABRQAAAAFGAAAAAUcAAAABawAAAAFIAAAAAUkAAAABSgAAAAFLAAAAAUwAAAABTQAAAAFOCQAEuQAAAAIJAARMAAAAAgIAAAAYJWQlZCVkJWQlZCVkJXMlZCVzJWQlZCVkCQAETAAAAAIFAAAAAUQJAARMAAAAAgUAAAABRQkABEwAAAACBQAAAAFGCQAETAAAAAIFAAAAAUcJAARMAAAAAgUAAAABawkABEwAAAACBQAAAAFICQAETAAAAAIFAAAAAUkJAARMAAAAAgUAAAABSgkABEwAAAACBQAAAAFLCQAETAAAAAIFAAAAAUwJAARMAAAAAgUAAAABTQkABEwAAAACBQAAAAFOBQAAAANuaWwFAAAAAWMBAAAAAU8AAAAMAAAAAUQAAAABRQAAAAFGAAAAAUcAAAABawAAAAFIAAAAAUkAAAABSgAAAAFLAAAAAUwAAAABTQAAAAFOCQEAAAABQwAAAAwJAAGkAAAAAQUAAAABRAkAAaQAAAABBQAAAAFFCQABpAAAAAEFAAAAAUYJAAGkAAAAAQUAAAABRwkAAaQAAAABBQAAAAFrCQABpAAAAAEFAAAAAUgFAAAAAUkJAAGkAAAAAQUAAAABSgUAAAABSwkAAaQAAAABBQAAAAFMCQABpAAAAAEFAAAAAU0JAAGkAAAAAQUAAAABTgAAAAABUAAAAAAAAAAAAQAAAAABUQAAAAAAAAAAAgAAAAABUgAAAAAAAAAAAwAAAAABUwAAAAAAAAAABAAAAAABVAAAAAAAAAAABQEAAAABVQAAAAUAAAABVgAAAAFXAAAAAVgAAAABWQAAAAFaCQAEuQAAAAIJAARMAAAAAgIAAAAKJWQlZCVkJWQlZAkABEwAAAACBQAAAAFWCQAETAAAAAIFAAAAAVcJAARMAAAAAgUAAAABWAkABEwAAAACBQAAAAFZCQAETAAAAAIFAAAAAVoFAAAAA25pbAUAAAABYwEAAAACYWEAAAAFAAAAAVYAAAABVwAAAAFYAAAAAVkAAAABWgkBAAAAAVUAAAAFCQABpAAAAAEFAAAAAVYJAAGkAAAAAQUAAAABVwkAAaQAAAABBQAAAAFYCQABpAAAAAEFAAAAAVkJAAGkAAAAAQUAAAABWgEAAAACYWIAAAACAAAAAWkAAAACYWMJAAS5AAAAAgkABEwAAAACAgAAAAglZCVkJWQlZAkABEwAAAACCQABpAAAAAEFAAAABmhlaWdodAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIJAAGkAAAAAQUAAAABaQkABEwAAAACCQABpAAAAAEFAAAAAmFjBQAAAANuaWwFAAAAAWMBAAAAAmFkAAAAAAIAAAAKJXNfX2NvbmZpZwEAAAACYWUAAAABAAAAAmFmCQABLAAAAAICAAAABCVzX18FAAAAAmFmAQAAAAJhZwAAAAACAAAACiVzX190b3RhbHMBAAAAAmFoAAAAAwAAAAJhaQAAAAJhZgAAAAJhagkABLkAAAACCQAETAAAAAICAAAAESVzJXMlcyVzX19oaXN0b3J5CQAETAAAAAIFAAAAAmFpCQAETAAAAAIFAAAAAmFmCQAETAAAAAIFAAAAAmFqBQAAAANuaWwFAAAAAWMBAAAAAmFrAAAAAAIAAAAVJXNfX3VzZG5DbGFpbURpc2FibGVkAQAAAAJhbAAAAAACAAAAFiVzX191c2RuQ2xhaW1FbmRIZWlnaHQBAAAAAmFtAAAAAAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAADHBlcmlvZExlbmd0aAUAAAADbmlsBQAAAAFjAQAAAAJhbgAAAAAJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAAA1jdXJyZW50UGVyaW9kBQAAAANuaWwFAAAAAWMBAAAAAmFvAAAAAQAAAAJhcAkABLkAAAACCQAETAAAAAICAAAABCVzJXMJAARMAAAAAgIAAAARcGVyaW9kU3RhcnRIZWlnaHQJAARMAAAAAgkAAaQAAAABBQAAAAJhcAUAAAADbmlsBQAAAAFjAQAAAAJhcQAAAAEAAAACYXAJAAS5AAAAAgkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAAD3BlcmlvZEVuZEhlaWdodAkABEwAAAACCQABpAAAAAEFAAAAAmFwBQAAAANuaWwFAAAAAWMBAAAAAmFyAAAAAAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAAHHVzZHRQcmljZUFzc2V0QWxsb3dhYmxlUmF0aW8FAAAAA25pbAUAAAABYwEAAAACYXMAAAABAAAAAmF0CQAEuQAAAAIJAARMAAAAAgIAAAAEJXMlcwkABEwAAAACAgAAABR0b3RhbFBlcmlvZEFsbG93YW5jZQkABEwAAAACBQAAAAJhdAUAAAADbmlsBQAAAAFjAQAAAAJhdQAAAAEAAAACYXQJAAS5AAAAAgkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAAE3VzZXJQZXJpb2RBbGxvd2FuY2UJAARMAAAAAgUAAAACYXQFAAAAA25pbAUAAAABYwEAAAACYXYAAAACAAAAAmF0AAAAAmFwCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAICAAAAG3BlcmlvZFRvdGFsQXZhaWxhYmxlVG9DbGFpbQkABEwAAAACBQAAAAJhdAkABEwAAAACCQABpAAAAAEFAAAAAmFwBQAAAANuaWwFAAAAAWMBAAAAAmF3AAAAAwAAAAJhdAAAAAJhcAAAAAJhZgkABLkAAAACCQAETAAAAAICAAAACCVzJXMlcyVzCQAETAAAAAICAAAAGnBlcmlvZFVzZXJBdmFpbGFibGVUb0NsYWltCQAETAAAAAIFAAAAAmF0CQAETAAAAAIJAAGkAAAAAQUAAAACYXAJAARMAAAAAgUAAAACYWYFAAAAA25pbAUAAAABYwEAAAACYXgAAAAACQAEuQAAAAIJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAAYdXNkdFByaWNlQXNzZXRTdGFibGVQb29sBQAAAANuaWwFAAAAAWMBAAAAAmF5AAAAAAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAAC3VzZHRBc3NldElkBQAAAANuaWwFAAAAAWMBAAAAAmF6AAAAAQAAAAJhQQkABLkAAAACCQAETAAAAAICAAAABCVzJXMJAARMAAAAAgIAAAARcHJpY2VBc3NldEJhbGFuY2UJAARMAAAAAgUAAAACYUEFAAAAA25pbAUAAAABYwEAAAACYUIAAAAAAgAAABQlc19fbWFuYWdlclB1YmxpY0tleQEAAAACYUMAAAAAAgAAABslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAAAAAmFEAAAAAAkABLUAAAACCQEAAAABYQAAAAEJAQAAAAJhZAAAAAAFAAAAAWMBAAAAAmFFAAAAAQAAAAJhRgkABLUAAAACCQEAAAALdmFsdWVPckVsc2UAAAACCQAEIgAAAAEFAAAAAmFGCQEAAAABVQAAAAUCAAAAATACAAAAATACAAAAATACAAAAATACAAAAATAFAAAAAWMBAAAAAmFHAAAAAAkBAAAAAmFFAAAAAQkBAAAAAmFnAAAAAAEAAAACYUgAAAABAAAAAmFmCQEAAAACYUUAAAABCQEAAAACYWUAAAABBQAAAAJhZgEAAAACYUkAAAABAAAAAmFmCQAEtQAAAAIJAQAAAAFhAAAAAQkBAAAAAmFlAAAAAQUAAAACYWYFAAAAAWMAAAAAAmFKAAAAAAAAAAAAAAAAAAJhSwAAAAAAAAAAAQAAAAACYUwAAAAAAAAAAAIAAAAAAmFNAAAAAAAAAAADAQAAAAJhTgAAAAQAAAABYgAAAAJhTwAAAAJhUAAAAAJhUQQAAAABVgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmFPBQAAAAFQBAAAAAFXCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYU8FAAAAAVEEAAAAAVgJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJhTwUAAAABUgQAAAABWQkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmFPBQAAAAFTBAAAAAFaCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYU8FAAAAAVQEAAAAAmFSCQAAZAAAAAIFAAAAAVYJAAGRAAAAAgUAAAACYVAFAAAAAmFKBAAAAAJhUwkAAGQAAAACBQAAAAFXCQABkQAAAAIFAAAAAmFQBQAAAAJhSwQAAAACYVQJAABkAAAAAgUAAAABWAkAAZEAAAACBQAAAAJhUAUAAAACYUwEAAAAAmFVCQAAZAAAAAIFAAAAAVkJAAGRAAAAAgUAAAACYVAFAAAAAmFNAwkAAGYAAAACAAAAAAAAAAAABQAAAAJhUwkAAAIAAAABAgAAAAxpbnZhbGlkIG1hdGgJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAWIJAQAAAAJhYQAAAAUFAAAAAmFSBQAAAAJhUwUAAAACYVQFAAAAAmFVBQAAAAJhUQEAAAACYVYAAAAEAAAAAmFmAAAAAWkAAAACYWMAAAACYVcJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAJhaAAAAAMCAAAABmludmVzdAUAAAACYWYJAAJYAAAAAQUAAAACYVcJAQAAAAJhYgAAAAIFAAAAAWkFAAAAAmFjAQAAAAJhWAAAAAQAAAACYWYAAAABaQAAAAJhYwAAAAJhVwkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAAmFoAAAAAwIAAAAFY2xhaW0FAAAAAmFmCQACWAAAAAEFAAAAAmFXCQEAAAACYWIAAAACBQAAAAFpBQAAAAJhYwEAAAACYVkAAAADAAAAAmFaAAAAAmFmAAAAAmFXBAAAAAJiYQkBAAAAAmFEAAAAAAQAAAABRgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJhBQAAAAF0BAAAAAFHCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYmEFAAAAAXUEAAAAAmJiCQAAZAAAAAIFAAAAAUYFAAAAAUcEAAAAAWsJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiYQUAAAABdgQAAAABSAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJhBQAAAAF3BAAAAAFJCQABkQAAAAIFAAAAAmJhBQAAAAF4BAAAAAJiYwkAAlkAAAABBQAAAAFJBAAAAAFKCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYmEFAAAAAXkEAAAAAUsJAAGRAAAAAgUAAAACYmEFAAAAAXoEAAAAAmJkCQACWQAAAAEFAAAAAUsEAAAAAUwJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiYQUAAAABQQQAAAACYmUJAAQlAAAAAQUAAAACYWYEAAAAAmJmCQEAAAACYUkAAAABBQAAAAJiZQQAAAACYmcJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiZgUAAAABUAQAAAACYmgJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiZgUAAAABVAQAAAACYmkDCQAAZwAAAAIFAAAAAUYFAAAAAmJoBQAAAAFGBQAAAAJiaAQAAAACYmoDCQAAZgAAAAIFAAAABmhlaWdodAUAAAACYmIFAAAAAmJiAwkAAGYAAAACBQAAAAFGBQAAAAZoZWlnaHQFAAAAAUYFAAAABmhlaWdodAQAAAACYmsJAABlAAAAAgUAAAACYmoFAAAAAmJpBAAAAAJibAkAAGsAAAADBQAAAAJiZwUAAAACYmsFAAAAAUcEAAAAAmJtCQEAAAABaAAAAAUFAAAAAmJsBQAAAAFMBQAAAAFrBQAAAAFIBQAAAAFKBAAAAAJibgkAAAAAAAACBQAAAAJhWgUAAAABSwQAAAACYm8JAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQgAAAAAQkBAAAAAmFrAAAAAAcEAAAAAmJwCQAETAAAAAIDCQEAAAABIQAAAAEDBQAAAAJibgUAAAACYm8HBgkAAAIAAAABAgAAABZVU0ROIGNsYWltIGlzIGRpc2FibGVkBQAAAANuaWwDCQAAAAAAAAIFAAAAAmJwBQAAAAJicAMJAAAAAAAAAgUAAAACYVoFAAAAAUsJAAUYAAAABgkABEwAAAACAAAAAAAAAAAACQAETAAAAAIJAQAAAAEtAAAAAQUAAAACYmwJAARMAAAAAgUAAAACYmwJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsBQAAAAJibAUAAAACYmQFAAAAAmJmBQAAAAJiagkABEwAAAACBQAAAAJibAkABEwAAAACBQAAAAJibQUAAAADbmlsAwkAAAAAAAACBQAAAAJhWgUAAAABSQkABRgAAAAGCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgkBAAAAAS0AAAABBQAAAAJibAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIFAAAAAmJtBQAAAANuaWwFAAAAAmJtBQAAAAJiYwUAAAACYmYFAAAAAmJqCQAETAAAAAIFAAAAAmJsCQAETAAAAAIFAAAAAmJtBQAAAANuaWwJAAACAAAAAQkAASwAAAACAgAAABV1bnN1cHBvcnRlZCBhc3NldElkOiAFAAAAAmFaCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEAAAACYnEAAAAEAAAAAUsAAAACYmUAAAACYnIAAAACYnMEAAAAAmJ0CQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhcwAAAAEFAAAAAUsEAAAAAmJ1CQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhdQAAAAEFAAAAAUsEAAAAAmJ2CQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhbQAAAAAEAAAAAmJ3CQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAEJAQAAAAJhbgAAAAAAAAAAAAAAAAAEAAAAAmJ4CQEAAAAJaXNEZWZpbmVkAAAAAQkABB8AAAABCQEAAAACYXEAAAABAAAAAAAAAAAABAAAAAJieQMJAABmAAAAAgUAAAACYncAAAAAAAAAAAAEAAAAAmJ6CQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhbwAAAAEFAAAAAmJ3BAAAAAJiQQkBAAAABXZhbHVlAAAAAQkABB8AAAABCQEAAAACYXEAAAABBQAAAAJidwQAAAACYkIDCQAAZgAAAAIFAAAABmhlaWdodAUAAAACYkEEAAAAAmJDCQAAZAAAAAIFAAAAAmJ3AAAAAAAAAAABBAAAAAJiRAMJAABmAAAAAgUAAAAGaGVpZ2h0CQAAZAAAAAIFAAAAAmJBBQAAAAJidgQAAAACYkUJAABqAAAAAgkAAGUAAAACBQAAAAZoZWlnaHQFAAAAAmJBBQAAAAJidgMJAAAAAAAAAgUAAAACYkUAAAAAAAAAAAAJAABkAAAAAgkAAGUAAAACBQAAAAZoZWlnaHQFAAAAAmJ2AAAAAAAAAAABCQAAZQAAAAIFAAAABmhlaWdodAUAAAACYkUJAABkAAAAAgUAAAACYkEAAAAAAAAAAAEEAAAAAmJGCQAAZQAAAAIJAABkAAAAAgUAAAACYkQFAAAAAmJ2AAAAAAAAAAABCQAFFQAAAAMFAAAAAmJDBQAAAAJiRAUAAAACYkYJAAUVAAAAAwUAAAACYncFAAAAAmJ6BQAAAAJiQQQAAAACYkMIBQAAAAJiQgAAAAJfMQQAAAACYkQIBQAAAAJiQgAAAAJfMgQAAAACYkYIBQAAAAJiQgAAAAJfMwkABRUAAAADBQAAAAJiQwUAAAACYkQFAAAAAmJGAwUAAAACYngEAAAAAmJHCQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhbwAAAAEAAAAAAAAAAAAEAAAAAmJICQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhcQAAAAEAAAAAAAAAAAAEAAAAAmJJAwkAAGYAAAACBQAAAAZoZWlnaHQFAAAAAmJIBAAAAAJiQwkAAGQAAAACBQAAAAJidwAAAAAAAAAAAQQAAAACYkQJAABkAAAAAgUAAAACYkgAAAAAAAAAAAEEAAAAAmJGCQAAZQAAAAIJAABkAAAAAgUAAAACYkQFAAAAAmJ2AAAAAAAAAAABCQAFFQAAAAMFAAAAAmJDBQAAAAJiRAUAAAACYkYJAAUVAAAAAwUAAAACYncFAAAAAmJHBQAAAAJiSAQAAAACYkMIBQAAAAJiSQAAAAJfMQQAAAACYkQIBQAAAAJiSQAAAAJfMgQAAAACYkYIBQAAAAJiSQAAAAJfMwkABRUAAAADBQAAAAJiQwUAAAACYkQFAAAAAmJGCQAFFQAAAAMFAAAAAmJ3CQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAEJAQAAAAJhbwAAAAEFAAAAAmJ3BQAAAAZoZWlnaHQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQfAAAAAQkBAAAAAmFxAAAAAQUAAAACYncJAABlAAAAAgkAAGQAAAACBQAAAAZoZWlnaHQFAAAAAmJ2AAAAAAAAAAABBAAAAAJiQwgFAAAAAmJ5AAAAAl8xBAAAAAJiRAgFAAAAAmJ5AAAAAl8yBAAAAAJiRggFAAAAAmJ5AAAAAl8zBAAAAAJiSgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB8AAAABCQEAAAACYXYAAAACBQAAAAFLBQAAAAJiQwUAAAACYnQEAAAAAmJLCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAEJAQAAAAJhdwAAAAMFAAAAAUsFAAAAAmJDBQAAAAJiZQUAAAACYnUEAAAAAmJMCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAEJAQAAAAJhegAAAAEFAAAAAmJlAAAAAAAAAAAABAAAAAJiTQkAAZcAAAABCQAETAAAAAIJAABkAAAAAgUAAAACYnIFAAAAAmJMCQAETAAAAAIFAAAAAmJKCQAETAAAAAIFAAAAAmJLBQAAAANuaWwEAAAAAmJOCQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAAJhcgAAAAAEAAAAAmJPBQAAAAFlBAAAAAJiUAoAAAAAAmJRCQAD/AAAAAQJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAAmF4AAAAAAIAAAAhcHV0T25lVGtuVjJXaXRob3V0VGFrZUZlZVJFQURPTkxZCQAETAAAAAIFAAAAAmJPCQAETAAAAAIFAAAAAUsFAAAAA25pbAUAAAADbmlsAwkAAAEAAAACBQAAAAJiUQIAAAAPKEludCwgSW50LCBJbnQpBQAAAAJiUQkAAAIAAAABAgAAACRDb3VsZG4ndCBjYXN0IEFueSB0byAoSW50LCBJbnQsIEludCkDCQAAAAAAAAIFAAAAAmJQBQAAAAJiUAQAAAACYlIIBQAAAAJiUAAAAAJfMwQAAAACYlMIBQAAAAJiUAAAAAJfMgQAAAACYlQIBQAAAAJiUAAAAAJfMQQAAAACYlUJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAAmF5AAAAAAQAAAACYlYKAAAAAAJiUQkAA/wAAAAECQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAFdmFsdWUAAAABCQAEIgAAAAEJAQAAAAJheAAAAAACAAAAE2dldE9uZVRrblYyUkVBRE9OTFkJAARMAAAAAgUAAAACYlUJAARMAAAAAgUAAAACYlQFAAAAA25pbAUAAAADbmlsAwkAAAEAAAACBQAAAAJiUQIAAAAKKEludCwgSW50KQUAAAACYlEJAAACAAAAAQIAAAAfQ291bGRuJ3QgY2FzdCBBbnkgdG8gKEludCwgSW50KQMJAAAAAAAAAgUAAAACYlYFAAAAAmJWBAAAAAJiVwgFAAAAAmJWAAAAAl8yBAAAAAJiWAgFAAAAAmJWAAAAAl8xBAAAAAJiWQkAAGsAAAADBQAAAAJiWAUAAAACYk8FAAAAAWUEAAAAAmJaCQAAZQAAAAIFAAAAAmJGBQAAAAZoZWlnaHQJAAUcAAAACgUAAAACYk0FAAAAAmJKBQAAAAJiSwUAAAACYnMFAAAAAmJOBQAAAAJiWQUAAAACYloFAAAAAmJDBQAAAAJiRAUAAAACYkYJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEAAAACY2EAAAAABAAAAAJjYgkABCIAAAABCQEAAAACYUIAAAAAAwkAAAEAAAACBQAAAAJjYgIAAAAGU3RyaW5nBAAAAAJjYwUAAAACY2IJAAJZAAAAAQUAAAACY2MDCQAAAQAAAAIFAAAAAmNiAgAAAARVbml0BQAAAAR1bml0CQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAAJjZAAAAAAEAAAAAmNiCQAEIgAAAAEJAQAAAAJhQwAAAAADCQAAAQAAAAIFAAAAAmNiAgAAAAZTdHJpbmcEAAAAAmNjBQAAAAJjYgkAAlkAAAABBQAAAAJjYwMJAAABAAAAAgUAAAACY2ICAAAABFVuaXQFAAAABHVuaXQJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IBAAAAAmNlAAAAAQAAAAJjZgQAAAACY2cJAAACAAAAAQIAAAARUGVybWlzc2lvbiBkZW5pZWQEAAAAAmNiCQEAAAACY2EAAAAAAwkAAAEAAAACBQAAAAJjYgIAAAAKQnl0ZVZlY3RvcgQAAAACY2gFAAAAAmNiAwkAAAAAAAACCAUAAAACY2YAAAAPY2FsbGVyUHVibGljS2V5BQAAAAJjaAYFAAAAAmNnAwkAAAEAAAACBQAAAAJjYgIAAAAEVW5pdAMJAAAAAAAAAggFAAAAAmNmAAAABmNhbGxlcgUAAAAEdGhpcwYFAAAAAmNnCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAAAABwAAAAJjZgEAAAALY29uc3RydWN0b3IAAAAHAAAAAUQAAAABRQAAAAFGAAAAAUcAAAABawAAAAFLAAAAAU0EAAAAAUgJAABoAAAAAgkAAGgAAAACAAAAAAAAAABkAAAAAAAAAAPoAAAAAAAAAAPoBAAAAAJjaQkAAGQAAAACBQAAAAFEBQAAAAFFAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQiAAAAAQkBAAAAAmFkAAAAAAkAAAIAAAABAgAAABNhbHJlYWR5IGluaXRpYWxpemVkAwkBAAAAAiE9AAAAAgIAAAAjM1BNRUhMeDFqNnplcmFyWlRZZnNHcURlZVpxUW9NcHhxNVMJAAQlAAAAAQgFAAAAAmNmAAAABmNhbGxlcgkAAAIAAAABAgAAAA5ub3QgYXV0aG9yaXplZAMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAmNmAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQDCQAAZwAAAAIFAAAAAmNpBQAAAAFGCQAAAgAAAAECAAAAJmNsYWltU3RhcnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gaWRvRW5kBAAAAAJjagkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAACY2YAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAAmJjCQEAAAAFdmFsdWUAAAABCAUAAAACY2oAAAAHYXNzZXRJZAQAAAACY2sJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkAA+wAAAABBQAAAAJiYwIAAAAbZmFpbCB0byBsb2FkIGlkbyBhc3NldCBpbmZvBAAAAAFJCQACWAAAAAEFAAAAAmJjBAAAAAFKCQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAIBQAAAAJjawAAAAhkZWNpbWFscwAAAAAAAAAAAAAAAAAAAAAAAAUAAAAERE9XTgQAAAACYmQJAAJZAAAAAQUAAAABSwQAAAACY2wJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkAA+wAAAABBQAAAAJiZAIAAAAdZmFpbCB0byBsb2FkIHByaWNlIGFzc2V0IGluZm8EAAAAAUwJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAgFAAAAAmNsAAAACGRlY2ltYWxzAAAAAAAAAAAAAAAAAAAAAAAABQAAAARET1dOBAAAAAJjbQkBAAAAAmFHAAAAAAQAAAACY24JAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAJhZAAAAAAJAQAAAAFPAAAADAUAAAABRAUAAAABRQUAAAABRgUAAAABRwUAAAABawUAAAABSAUAAAABSQUAAAABSgUAAAABSwUAAAABTAUAAAABTQgFAAAAAmNqAAAABmFtb3VudAkABEwAAAACCQEAAAACYU4AAAAECQEAAAACYWcAAAAABQAAAAJjbQUAAAACY24FAAAAAUYFAAAAA25pbAAAAAJjZgEAAAAGaW52ZXN0AAAAAAQAAAACYmEJAQAAAAJhRAAAAAAEAAAAAUQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiYQUAAAABcgQAAAABRQkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJhBQAAAAFzBAAAAAJjaQkAAGQAAAACBQAAAAFEBQAAAAFFBAAAAAFGCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYmEFAAAAAXQEAAAAAUcJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiYQUAAAABdQQAAAABawkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJhBQAAAAF2BAAAAAFICQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYmEFAAAAAXcEAAAAAUkJAAGRAAAAAgUAAAACYmEFAAAAAXgEAAAAAmJjCQACWQAAAAEFAAAAAUkEAAAAAUoJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJiYQUAAAABeQQAAAABSwkAAZEAAAACBQAAAAJiYQUAAAABegQAAAACYmQJAAJZAAAAAQUAAAABSwQAAAABTAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJhBQAAAAFBBAAAAAJjbwkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJhBQAAAAFCBAAAAAJhZgkABCUAAAABCAUAAAACY2YAAAAGY2FsbGVyAwkAAGYAAAACBQAAAAFEBQAAAAZoZWlnaHQJAAACAAAAAQIAAAAcaWRvIGhhcyBub3QgYmVlbiBzdGFydGVkIHlldAMJAABmAAAAAgUAAAAGaGVpZ2h0BQAAAAJjaQkAAAIAAAABAgAAABppZG8gaGFzIGJlZW4gYWxyZWFkeSBlbmRlZAMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAmNmAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAHWV4YWN0bHkgMSBwYXltZW50IGlzIGV4cGVjdGVkBAAAAAJjagkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAACY2YAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAAmNwCQEAAAAFdmFsdWUAAAABCAUAAAACY2oAAAAHYXNzZXRJZAQAAAACY3EIBQAAAAJjagAAAAZhbW91bnQDCQEAAAACIT0AAAACBQAAAAJjcAUAAAACYmQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAGmludmFsaWQgcGF5bWVudCBhc3NldCBpZDogCQACWAAAAAEFAAAAAmNwAgAAAAwgaXMgZXhwZWN0ZWQEAAAAAmNyCQEAAAACYUgAAAABBQAAAAJhZgQAAAACY20JAQAAAAJhRwAAAAAEAAAAAmNzCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJjbQUAAAABUAUAAAACY3EEAAAAAmN0CQAAaAAAAAIFAAAAAmNzAAAAAAAAAABkAwkAAGYAAAACBQAAAAJjdAkAA/AAAAACBQAAAAR0aGlzBQAAAAJiYwkAAAIAAAABAgAAADlJRE8gYXNzZXQgaGFzIGJlZW4gLSBzb2xkIGNvbnNpZGVyIHRvIHVzZSBzbWFsbGVyIHBheW1lbnQEAAAAAmNuCQAETAAAAAIFAAAAAmNxCQAETAAAAAIFAAAAAmNxCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAQAAAAJhTgAAAAQJAQAAAAJhZQAAAAEFAAAAAmFmBQAAAAJjcgUAAAACY24FAAAAAUYJAARMAAAAAgkBAAAAAmFOAAAABAkBAAAAAmFnAAAAAAUAAAACY20FAAAAAmNuBQAAAAFGCQAETAAAAAIJAQAAAAJhVgAAAAQFAAAAAmFmBQAAAAJjcQAAAAAAAAAAAAgFAAAAAmNmAAAADXRyYW5zYWN0aW9uSWQFAAAAA25pbAAAAAJjZgEAAAAFY2xhaW0AAAACAAAAAmFaAAAAAmJlBAAAAAJjdQkABCUAAAABCAUAAAACY2YAAAAGY2FsbGVyAwkBAAAAAiE9AAAAAgUAAAACYmUFAAAAAmN1CQAAAgAAAAECAAAADm5vdCBhdXRob3JpemVkBAAAAAJiYQkBAAAAAmFEAAAAAAQAAAABSwkAAZEAAAACBQAAAAJiYQUAAAABegQAAAACY3YJAQAAAAJhWQAAAAMFAAAAAmFaCAUAAAACY2YAAAAGY2FsbGVyCAUAAAACY2YAAAANdHJhbnNhY3Rpb25JZAQAAAACY24IBQAAAAJjdgAAAAJfMQQAAAACYnIIBQAAAAJjdgAAAAJfMgQAAAACY3cIBQAAAAJjdgAAAAJfMwQAAAACYmYIBQAAAAJjdgAAAAJfNAQAAAACYmoIBQAAAAJjdgAAAAJfNQQAAAACY3gJAAGRAAAAAgUAAAACY24FAAAAAmFMBAAAAAJjeQkAAZEAAAACBQAAAAJjbgUAAAACYU0EAAAAAmN6AwkAAAAAAAACBQAAAAJhWgUAAAABSwQAAAACY0EJAQAAAAJicQAAAAQFAAAAAUsFAAAAAmJlBQAAAAJicgkAAZEAAAACBQAAAAJjbgUAAAACYUwEAAAAAmJNCAUAAAACY0EAAAACXzEEAAAAAmJKCAUAAAACY0EAAAACXzIEAAAAAmJLCAUAAAACY0EAAAACXzMEAAAAAmJzCAUAAAACY0EAAAACXzQEAAAAAmJOCAUAAAACY0EAAAACXzUEAAAAAmJZCAUAAAACY0EAAAACXzYEAAAAAmJaCAUAAAACY0EAAAACXzcEAAAAAmJDCAUAAAACY0EAAAACXzgEAAAAAmJECAUAAAACY0EAAAACXzkEAAAAAmJGCAUAAAACY0EAAAADXzEwBAAAAAJicAkABEwAAAACAwkAAGYAAAACBQAAAAJiSwAAAAAAAAAAAAYJAQAAAAFmAAAAAQIAAAA6dW5hdmFpbGFibGUgdG8gY2xhaW0gYmVjYXVzZSB1c2VyIHBlcmlvZCBhbGxvd2FuY2UgcmVhY2hlZAkABEwAAAACAwkAAGYAAAACBQAAAAJiSgAAAAAAAAAAAAYJAQAAAAFmAAAAAQIAAAA7dW5hdmFpbGFibGUgdG8gY2xhaW0gYmVjYXVzZSB0b3RhbCBwZXJpb2QgYWxsb3dhbmNlIHJlYWNoZWQJAARMAAAAAgMJAABmAAAAAgUAAAACYk0AAAAAAAAAAAAGCQEAAAABZgAAAAECAAAAEG5vdGhpbmcgdG8gY2xhaW0JAARMAAAAAgMJAABmAAAAAgUAAAACYk4FAAAAAmJZBgkBAAAAAWYAAAABAgAAAE91bmF2YWlsYWJsZSB0byBjbGFpbSBiZWNhdXNlIHVzZG4gcHJpY2UgbG93ZXIgdGhhbiB1c2R0UHJpY2VBc3NldEFsbG93YWJsZVJhdGlvBQAAAANuaWwDCQAAAAAAAAIFAAAAAmJwBQAAAAJicAQAAAACYkwJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQfAAAAAQkBAAAAAmF6AAAAAQUAAAACYmUAAAAAAAAAAAAEAAAAAmNCCQAAZQAAAAIFAAAAAmJKBQAAAAJiTQQAAAACY0MJAABlAAAAAgUAAAACYksFAAAAAmJNBAAAAAJjegMJAABnAAAAAgUAAAACYkwFAAAAAmJNCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAJjZgAAAAZjYWxsZXIFAAAAAmJNBQAAAAJjdwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmF6AAAAAQUAAAACYmUJAABlAAAAAgUAAAACYkwFAAAAAmJNBQAAAANuaWwEAAAAAmNECQAAZQAAAAIJAABkAAAAAgUAAAACYkwFAAAAAmJyBQAAAAJiTQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAACY2YAAAAGY2FsbGVyBQAAAAJiTQUAAAACY3cJAARMAAAAAgkBAAAAAmFOAAAABAkBAAAAAmFlAAAAAQUAAAACYmUFAAAAAmJmBQAAAAJjbgUAAAACYmoJAARMAAAAAgkBAAAAAmFOAAAABAkBAAAAAmFnAAAAAAkBAAAAAmFHAAAAAAUAAAACY24FAAAAAmJqCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAACYXoAAAABBQAAAAJiZQUAAAACY0QFAAAAA25pbAkABRQAAAACCQAETgAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAJhbgAAAAAFAAAAAmJDCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAACYW8AAAABBQAAAAJiQwUAAAACYkQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAJhcQAAAAEFAAAAAmJDBQAAAAJiRgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmF2AAAAAgUAAAABSwUAAAACYkMFAAAAAmNCCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAACYXcAAAADBQAAAAFLBQAAAAJiQwUAAAACYmUFAAAAAmNDCQAETAAAAAIJAQAAAAJhWAAAAAQFAAAAAmJlBQAAAAJiTQUAAAACY3kIBQAAAAJjZgAAAA10cmFuc2FjdGlvbklkBQAAAANuaWwFAAAAAmN6BQAAAAR1bml0CQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkABRQAAAACCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAJjZgAAAAZjYWxsZXIFAAAAAmJyBQAAAAJjdwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAmF6AAAAAQUAAAACYmUAAAAAAAAAAAAJAARMAAAAAgkBAAAAAmFOAAAABAkBAAAAAmFlAAAAAQUAAAACYmUFAAAAAmJmBQAAAAJjbgUAAAACYmoJAARMAAAAAgkBAAAAAmFOAAAABAkBAAAAAmFnAAAAAAkBAAAAAmFHAAAAAAUAAAACY24FAAAAAmJqCQAETAAAAAIJAQAAAAJhWAAAAAQFAAAAAmJlBQAAAAJjeAUAAAACY3kIBQAAAAJjZgAAAA10cmFuc2FjdGlvbklkBQAAAANuaWwFAAAABHVuaXQFAAAAAmN6AAAAAmNmAQAAAA1jbGFpbVJFQURPTkxZAAAAAgAAAAJhWgAAAAJiZQQAAAACY3YJAQAAAAJhWQAAAAMFAAAAAmFaCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAJiZQkAAlkAAAABAgAAAAAEAAAAAmNuCAUAAAACY3YAAAACXzEEAAAAAmJyCAUAAAACY3YAAAACXzIEAAAAAmN3CAUAAAACY3YAAAACXzMEAAAAAmJmCAUAAAACY3YAAAACXzQEAAAAAmJqCAUAAAACY3YAAAACXzUEAAAAAmNFCAUAAAACY3YAAAACXzYEAAAAAmNGCQABkQAAAAIFAAAAAmNFAAAAAAAAAAAABAAAAAJjRwkAAZEAAAACBQAAAAJjRQAAAAAAAAAAAQkABRQAAAACBQAAAANuaWwJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVkJWQJAARMAAAAAgUAAAACYmUJAARMAAAAAgkAAaQAAAABBQAAAAJjRgkABEwAAAACCQABpAAAAAEFAAAAAmNHBQAAAANuaWwFAAAAAWMAAAACY2YBAAAAD2NsYWltVjJSRUFET05MWQAAAAIAAAACYVoAAAACYmUEAAAAAmN2CQEAAAACYVkAAAADBQAAAAJhWgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAACYmUJAAJZAAAAAQIAAAAABAAAAAJjbggFAAAAAmN2AAAAAl8xBAAAAAJicggFAAAAAmN2AAAAAl8yBAAAAAJjdwgFAAAAAmN2AAAAAl8zBAAAAAJiZggFAAAAAmN2AAAAAl80BAAAAAJiaggFAAAAAmN2AAAAAl81BAAAAAJjRQgFAAAAAmN2AAAAAl82BAAAAAJjRgkAAZEAAAACBQAAAAJjRQAAAAAAAAAAAAQAAAACY0cJAAGRAAAAAgUAAAACY0UAAAAAAAAAAAEEAAAAAmJhCQEAAAACYUQAAAAABAAAAAFLCQABkQAAAAIFAAAAAmJhBQAAAAF6BAAAAAJiTAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB8AAAABCQEAAAACYXoAAAABBQAAAAJiZQAAAAAAAAAAAAQAAAACY0gJAABkAAAAAgUAAAACY0cFAAAAAmJMBAAAAAJjSQkBAAAAAmJxAAAABAUAAAABSwUAAAACYmUFAAAAAmJyCQABkQAAAAIFAAAAAmNuBQAAAAJhTAQAAAACYk0IBQAAAAJjSQAAAAJfMQQAAAACYkoIBQAAAAJjSQAAAAJfMgQAAAACYksIBQAAAAJjSQAAAAJfMwQAAAACYnMIBQAAAAJjSQAAAAJfNAQAAAACYk4IBQAAAAJjSQAAAAJfNQQAAAACYlkIBQAAAAJjSQAAAAJfNgQAAAACYloIBQAAAAJjSQAAAAJfNwQAAAACYkMIBQAAAAJjSQAAAAJfOAQAAAACYkQIBQAAAAJjSQAAAAJfOQQAAAACYkYIBQAAAAJjSQAAAANfMTAEAAAAAmNKCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAEJAQAAAAJhcQAAAAEFAAAAAmJDAAAAAAAAAAAABAAAAAJjSwMJAABmAAAAAgUAAAAGaGVpZ2h0BQAAAAJjSgQAAAACY0wJAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQkBAAAAAmFtAAAAAAQAAAACY00JAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQkBAAAAAmF1AAAAAQUAAAABSwQAAAACY04JAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQkBAAAAAmFzAAAAAQUAAAABSwkABLkAAAACCQAETAAAAAICAAAADCVkJWQlZCVkJWQlZAkABEwAAAACCQABpAAAAAEFAAAAAmNICQAETAAAAAIJAAGkAAAAAQUAAAACY00JAARMAAAAAgkAAaQAAAABBQAAAAJjTgkABEwAAAACCQABpAAAAAEFAAAAAmJOCQAETAAAAAIJAAGkAAAAAQUAAAACYlkJAARMAAAAAgkAAaQAAAABBQAAAAJjTAkABEwAAAACCQABpAAAAAEFAAAAAmJyCQAETAAAAAIJAAGkAAAAAQUAAAACYk0JAARMAAAAAgkAAaQAAAABBQAAAAJiSwUAAAADbmlsBQAAAAFjCQAEuQAAAAIJAARMAAAAAgIAAAAMJWQlZCVkJWQlZCVkCQAETAAAAAIJAAGkAAAAAQUAAAACY0gJAARMAAAAAgkAAaQAAAABBQAAAAJiTQkABEwAAAACCQABpAAAAAEFAAAAAmJKCQAETAAAAAIJAAGkAAAAAQUAAAACYk4JAARMAAAAAgkAAaQAAAABBQAAAAJiWQkABEwAAAACCQABpAAAAAEFAAAAAmJaCQAETAAAAAIJAAGkAAAAAQUAAAACYnIJAARMAAAAAgkAAaQAAAABBQAAAAJiTQkABEwAAAACCQABpAAAAAEFAAAAAmJLBQAAAANuaWwFAAAAAWMJAAUUAAAAAgUAAAADbmlsBQAAAAJjSwAAAAJjZgEAAAAKc2V0TWFuYWdlcgAAAAEAAAACY08EAAAAAmNQCQEAAAACY2UAAAABBQAAAAJjZgMJAAAAAAAAAgUAAAACY1AFAAAAAmNQBAAAAAJjUQkAAlkAAAABBQAAAAJjTwMJAAAAAAAAAgUAAAACY1EFAAAAAmNRCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAJhQwAAAAAFAAAAAmNPBQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAJjZgEAAAAOY29uZmlybU1hbmFnZXIAAAAABAAAAAJjUgkBAAAAAmNkAAAAAAQAAAACY1MDCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAACY1IGCQAAAgAAAAECAAAAEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAAAAAAAAgUAAAACY1MFAAAAAmNTBAAAAAJjVAMJAAAAAAAAAggFAAAAAmNmAAAAD2NhbGxlclB1YmxpY0tleQkBAAAABXZhbHVlAAAAAQUAAAACY1IGCQAAAgAAAAECAAAAG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAAAAAAAAgUAAAACY1QFAAAAAmNUCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAJhQgAAAAAJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQUAAAACY1IJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQkBAAAAAmFDAAAAAAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABAAAAAmNVAQAAAAJjVgAAAAAEAAAAAmNXBAAAAAJjYgkBAAAAAmNhAAAAAAMJAAABAAAAAgUAAAACY2ICAAAACkJ5dGVWZWN0b3IEAAAAAmNoBQAAAAJjYgUAAAACY2gDCQAAAQAAAAIFAAAAAmNiAgAAAARVbml0CAUAAAACY1UAAAAPc2VuZGVyUHVibGljS2V5CQAAAgAAAAECAAAAC01hdGNoIGVycm9yCQAB9AAAAAMIBQAAAAJjVQAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAmNVAAAABnByb29mcwAAAAAAAAAAAAUAAAACY1fM4Zm2",
    "chainId": 84,
    "height": 2301002,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: cdVWkGWzxLhzR8fdcwxzHUAB4KoBojtBRhz9HPVvV7g
Next: 5cBxHbsytTubZBggMkSrKBi6qMdnd3oM9n3w4Goo3QTF

Diff: 
Old New Differences
7 7  let SEP = "__"
8 8  
9 9  let BUFSCALE = toBigInt(1000000000000000000)
10 + 
11 + let scale8 = 100000000
12 + 
13 + func throwErr (msg) = throw(makeString(["ido.ride:", msg], " "))
14 + 
10 15  
11 16  func convertPriceAssetIntoIdoAsset (priceAssetAmount,priceAssetMULT,price,priceMULT,idoAssetMULT) = {
12 17      let bPriceAssetMULT = toBigInt(priceAssetMULT)
80 85  
81 86  
82 87  func keyUSDNClaimEndHeight () = "%s__usdnClaimEndHeight"
88 + 
89 + 
90 + func keyPeriodLength () = makeString(["%s", "periodLength"], SEP)
91 + 
92 + 
93 + func keyCurrentPeriod () = makeString(["%s", "currentPeriod"], SEP)
94 + 
95 + 
96 + func keyPeriodStartHeight (periodNum) = makeString(["%s%s", "periodStartHeight", toString(periodNum)], SEP)
97 + 
98 + 
99 + func keyPeriodEndHeight (periodNum) = makeString(["%s%s", "periodEndHeight", toString(periodNum)], SEP)
100 + 
101 + 
102 + func keyUsdtPriceAssetAllowableRatio () = makeString(["%s", "usdtPriceAssetAllowableRatio"], SEP)
103 + 
104 + 
105 + func keyTotalPeriodAllowance (assetId) = makeString(["%s%s", "totalPeriodAllowance", assetId], SEP)
106 + 
107 + 
108 + func keyUserPeriodAllowance (assetId) = makeString(["%s%s", "userPeriodAllowance", assetId], SEP)
109 + 
110 + 
111 + func keyPeriodTotalAvailableToClaim (assetId,periodNum) = makeString(["%s%s%s", "periodTotalAvailableToClaim", assetId, toString(periodNum)], SEP)
112 + 
113 + 
114 + func keyPeriodUserAvailableToClaim (assetId,periodNum,userAddress) = makeString(["%s%s%s%s", "periodUserAvailableToClaim", assetId, toString(periodNum), userAddress], SEP)
115 + 
116 + 
117 + func keyUsdtPriceAssetStablePool () = makeString(["%s", "usdtPriceAssetStablePool"], SEP)
118 + 
119 + 
120 + func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], SEP)
121 + 
122 + 
123 + func keyPriceAssetBalance (address) = makeString(["%s%s", "priceAssetBalance", address], SEP)
83 124  
84 125  
85 126  func keyManagerPublicKey () = "%s__managerPublicKey"
163 204      let claimingIdoAssetAmount = convertPriceAssetIntoIdoAsset(claimingPriceAssetAmount, priceAssetMult, price, priceMult, idoAssetMult)
164 205      let isUSDN = (claimedAssetId58 == priceAssetId58)
165 206      let isUSDNClaimDisabled = valueOrElse(getBoolean(keyUSDNClaimDisabled()), false)
166 -     let isUSDNClaimEnded =     match getInteger(keyUSDNClaimEndHeight()) {
167 -         case end: Int => 
168 -             (height > end)
169 -         case _: Unit => 
170 -             false
171 -         case _ => 
172 -             throw("Match error")
173 -     }
174 207      let checks = [if (!(if (isUSDN)
175 208          then isUSDNClaimDisabled
176 209          else false))
177 210          then true
178 -         else throw("USDN claim is disabled"), if (!(if (isUSDN)
179 -         then isUSDNClaimEnded
180 -         else false))
181 -         then true
182 -         else throw("USDN claim is ended")]
211 +         else throw("USDN claim is disabled")]
183 212      if ((checks == checks))
184 213          then if ((claimedAssetId58 == priceAssetId58))
185 214              then $Tuple6([0, -(claimingPriceAssetAmount), claimingPriceAssetAmount, 0], claimingPriceAssetAmount, priceAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
186 215              else if ((claimedAssetId58 == idoAssetId58))
187 216                  then $Tuple6([0, -(claimingPriceAssetAmount), 0, claimingIdoAssetAmount], claimingIdoAssetAmount, idoAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
188 217                  else throw(("unsupported assetId: " + claimedAssetId58))
218 +         else throw("Strict value is not equal to itself.")
219 +     }
220 + 
221 + 
222 + func internalClaimV2 (priceAssetId58,userAddress58,outAmount,totalUserAvailableToClaim) = {
223 +     let totalPeriodPriceAssetAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
224 +     let userPeriodPriceAssetAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
225 +     let periodLength = value(getInteger(keyPeriodLength()))
226 +     let currentPeriod = valueOrElse(getInteger(keyCurrentPeriod()), 0)
227 +     let zeroPeriodEndHeighIsDefined = isDefined(getInteger(keyPeriodEndHeight(0)))
228 +     let $t01183513705 = if ((currentPeriod > 0))
229 +         then {
230 +             let lastPeriodStartHeight = value(getInteger(keyPeriodStartHeight(currentPeriod)))
231 +             let lastPeriodEndHeight = value(getInteger(keyPeriodEndHeight(currentPeriod)))
232 +             let $t01209512800 = if ((height > lastPeriodEndHeight))
233 +                 then {
234 +                     let updatedCurrentPeriod = (currentPeriod + 1)
235 +                     let periodStart = if ((height > (lastPeriodEndHeight + periodLength)))
236 +                         then {
237 +                             let blocksToLastPeriodStart = ((height - lastPeriodEndHeight) % periodLength)
238 +                             if ((blocksToLastPeriodStart == 0))
239 +                                 then ((height - periodLength) + 1)
240 +                                 else (height - blocksToLastPeriodStart)
241 +                             }
242 +                         else (lastPeriodEndHeight + 1)
243 +                     let periodEnd = ((periodStart + periodLength) - 1)
244 +                     $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
245 +                     }
246 +                 else $Tuple3(currentPeriod, lastPeriodStartHeight, lastPeriodEndHeight)
247 +             let updatedCurrentPeriod = $t01209512800._1
248 +             let periodStart = $t01209512800._2
249 +             let periodEnd = $t01209512800._3
250 +             $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
251 +             }
252 +         else if (zeroPeriodEndHeighIsDefined)
253 +             then {
254 +                 let zeroPeriodStartHeight = value(getInteger(keyPeriodStartHeight(0)))
255 +                 let zeroPeriodEndHeight = value(getInteger(keyPeriodEndHeight(0)))
256 +                 let $t01305513437 = if ((height > zeroPeriodEndHeight))
257 +                     then {
258 +                         let updatedCurrentPeriod = (currentPeriod + 1)
259 +                         let periodStart = (zeroPeriodEndHeight + 1)
260 +                         let periodEnd = ((periodStart + periodLength) - 1)
261 +                         $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
262 +                         }
263 +                     else $Tuple3(currentPeriod, zeroPeriodStartHeight, zeroPeriodEndHeight)
264 +                 let updatedCurrentPeriod = $t01305513437._1
265 +                 let periodStart = $t01305513437._2
266 +                 let periodEnd = $t01305513437._3
267 +                 $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
268 +                 }
269 +             else $Tuple3(currentPeriod, valueOrElse(getInteger(keyPeriodStartHeight(currentPeriod)), height), valueOrElse(getInteger(keyPeriodEndHeight(currentPeriod)), ((height + periodLength) - 1)))
270 +     let updatedCurrentPeriod = $t01183513705._1
271 +     let periodStart = $t01183513705._2
272 +     let periodEnd = $t01183513705._3
273 +     let periodTotalAvailableToClaim = valueOrElse(getInteger(keyPeriodTotalAvailableToClaim(priceAssetId58, updatedCurrentPeriod)), totalPeriodPriceAssetAllowance)
274 +     let periodUserAvailableToClaim = valueOrElse(getInteger(keyPeriodUserAvailableToClaim(priceAssetId58, updatedCurrentPeriod, userAddress58)), userPeriodPriceAssetAllowance)
275 +     let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
276 +     let periodMinAvailableToClaim = min([(outAmount + priceAssetBalance), periodTotalAvailableToClaim, periodUserAvailableToClaim])
277 +     let usdtPriceAssetAllowableRatio = value(getInteger(keyUsdtPriceAssetAllowableRatio()))
278 +     let putOneTknV2PriceAssetAmount = scale8
279 +     let $t01446014713 = {
280 +         let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "putOneTknV2WithoutTakeFeeREADONLY", [putOneTknV2PriceAssetAmount, priceAssetId58], nil)
281 +         if ($isInstanceOf(@, "(Int, Int, Int)"))
282 +             then @
283 +             else throw("Couldn't cast Any to (Int, Int, Int)")
284 +         }
285 +     if (($t01446014713 == $t01446014713))
286 +         then {
287 +             let bonus = $t01446014713._3
288 +             let feeAmount = $t01446014713._2
289 +             let lpAmount = $t01446014713._1
290 +             let usdtAssetId = value(getString(keyUsdtAssetId()))
291 +             let $t01477514993 = {
292 +                 let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "getOneTknV2READONLY", [usdtAssetId, lpAmount], nil)
293 +                 if ($isInstanceOf(@, "(Int, Int)"))
294 +                     then @
295 +                     else throw("Couldn't cast Any to (Int, Int)")
296 +                 }
297 +             if (($t01477514993 == $t01477514993))
298 +                 then {
299 +                     let getOneTknV2FeeAmount = $t01477514993._2
300 +                     let usdtAmount = $t01477514993._1
301 +                     let currentUsdtPriceAssetRatio = fraction(usdtAmount, putOneTknV2PriceAssetAmount, scale8)
302 +                     let endPeriodBlocksLeft = (periodEnd - height)
303 +                     $Tuple10(periodMinAvailableToClaim, periodTotalAvailableToClaim, periodUserAvailableToClaim, totalUserAvailableToClaim, usdtPriceAssetAllowableRatio, currentUsdtPriceAssetRatio, endPeriodBlocksLeft, updatedCurrentPeriod, periodStart, periodEnd)
304 +                     }
305 +                 else throw("Strict value is not equal to itself.")
306 +             }
189 307          else throw("Strict value is not equal to itself.")
190 308      }
191 309  
233 351      let idoEnd = (idoStart + idoDuration)
234 352      if (isDefined(getString(keyConfig())))
235 353          then throw("already initialized")
236 -         else if (("3N4nTJ5sSp5X5ChS2bBBmwNMn1eeRzT1FoP" != toString(i.caller)))
354 +         else if (("3PMEHLx1j6zerarZTYfsGqDeeZqQoMpxq5S" != toString(i.caller)))
237 355              then throw("not authorized")
238 356              else if ((size(i.payments) != 1))
239 357                  then throw("exactly 1 payment must be attached")
309 427      if ((userAddress58 != callerAddress58))
310 428          then throw("not authorized")
311 429          else {
430 +             let cfgArray = readConfigArray()
431 +             let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
312 432              let claimResultTuple = internalClaim(claimedAssetId58, i.caller, i.transactionId)
313 433              let totalsDiff = claimResultTuple._1
314 434              let outAmount = claimResultTuple._2
317 437              let newClaimPeriodHeight = claimResultTuple._5
318 438              let claimedPriceAmountFromDiff = totalsDiff[IdxDiffClaimedPriceAmountIncrement]
319 439              let claimedIdoAssetAmountFromDiff = totalsDiff[IdxDiffClaimedIdoAssetAmountIncrement]
320 -             $Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
440 +             let entries = if ((claimedAssetId58 == priceAssetId58))
441 +                 then {
442 +                     let $t02064921093 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
443 +                     let periodMinAvailableToClaim = $t02064921093._1
444 +                     let periodTotalAvailableToClaim = $t02064921093._2
445 +                     let periodUserAvailableToClaim = $t02064921093._3
446 +                     let totalUserAvailableToClaim = $t02064921093._4
447 +                     let usdtPriceAssetAllowableRatio = $t02064921093._5
448 +                     let currentUsdtPriceAssetRatio = $t02064921093._6
449 +                     let endPeriodBlocksLeft = $t02064921093._7
450 +                     let updatedCurrentPeriod = $t02064921093._8
451 +                     let periodStart = $t02064921093._9
452 +                     let periodEnd = $t02064921093._10
453 +                     let checks = [if ((periodUserAvailableToClaim > 0))
454 +                         then true
455 +                         else throwErr("unavailable to claim because user period allowance reached"), if ((periodTotalAvailableToClaim > 0))
456 +                         then true
457 +                         else throwErr("unavailable to claim because total period allowance reached"), if ((periodMinAvailableToClaim > 0))
458 +                         then true
459 +                         else throwErr("nothing to claim"), if ((usdtPriceAssetAllowableRatio > currentUsdtPriceAssetRatio))
460 +                         then true
461 +                         else throwErr("unavailable to claim because usdn price lower than usdtPriceAssetAllowableRatio")]
462 +                     if ((checks == checks))
463 +                         then {
464 +                             let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
465 +                             let updatedPeriodTotalAvailableToClaim = (periodTotalAvailableToClaim - periodMinAvailableToClaim)
466 +                             let updatedPeriodUserAvailableToClaim = (periodUserAvailableToClaim - periodMinAvailableToClaim)
467 +                             let entries = if ((priceAssetBalance >= periodMinAvailableToClaim))
468 +                                 then [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), (priceAssetBalance - periodMinAvailableToClaim))]
469 +                                 else {
470 +                                     let updatedPriceAssetBalance = ((priceAssetBalance + outAmount) - periodMinAvailableToClaim)
471 + [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), IntegerEntry(keyPriceAssetBalance(userAddress58), updatedPriceAssetBalance)]
472 +                                     }
473 +                             $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)
474 +                             }
475 +                         else throw("Strict value is not equal to itself.")
476 +                     }
477 +                 else $Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), 0), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
478 +             entries
321 479              }
322 480      }
323 481  
335 493      let availablePriceAmountToClaim = availableToClaimArray[0]
336 494      let availableIdoAmountToClaim = availableToClaimArray[1]
337 495      $Tuple2(nil, makeString(["%s%d%d", userAddress58, toString(availablePriceAmountToClaim), toString(availableIdoAmountToClaim)], SEP))
496 +     }
497 + 
498 + 
499 + 
500 + @Callable(i)
501 + func claimV2READONLY (claimedAssetId58,userAddress58) = {
502 +     let claimResultTuple = internalClaim(claimedAssetId58, addressFromStringValue(userAddress58), fromBase58String(""))
503 +     let totalsDiff = claimResultTuple._1
504 +     let outAmount = claimResultTuple._2
505 +     let outAssetId = claimResultTuple._3
506 +     let origInvestArray = claimResultTuple._4
507 +     let newClaimPeriodHeight = claimResultTuple._5
508 +     let availableToClaimArray = claimResultTuple._6
509 +     let availablePriceAmountToClaim = availableToClaimArray[0]
510 +     let availableIdoAmountToClaim = availableToClaimArray[1]
511 +     let cfgArray = readConfigArray()
512 +     let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
513 +     let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
514 +     let availableIdoAmountToClaimWithPriceAssetBalance = (availableIdoAmountToClaim + priceAssetBalance)
515 +     let $t02712027532 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
516 +     let periodMinAvailableToClaim = $t02712027532._1
517 +     let periodTotalAvailableToClaim = $t02712027532._2
518 +     let periodUserAvailableToClaim = $t02712027532._3
519 +     let totalUserAvailableToClaim = $t02712027532._4
520 +     let usdtPriceAssetAllowableRatio = $t02712027532._5
521 +     let currentUsdtPriceAssetRatio = $t02712027532._6
522 +     let endPeriodBlocksLeft = $t02712027532._7
523 +     let updatedCurrentPeriod = $t02712027532._8
524 +     let periodStart = $t02712027532._9
525 +     let periodEnd = $t02712027532._10
526 +     let currentPeriodEndHeight = valueOrElse(getInteger(keyPeriodEndHeight(updatedCurrentPeriod)), 0)
527 +     let resultString = if ((height > currentPeriodEndHeight))
528 +         then {
529 +             let periodLenght = value(getInteger(keyPeriodLength()))
530 +             let userPeriodAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
531 +             let totalPeriodAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
532 +             makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(userPeriodAllowance), toString(totalPeriodAllowance), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(periodLenght), toString(outAmount), toString(periodMinAvailableToClaim), toString(periodUserAvailableToClaim)], SEP)
533 +             }
534 +         else makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(periodMinAvailableToClaim), toString(periodTotalAvailableToClaim), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(endPeriodBlocksLeft), toString(outAmount), toString(periodMinAvailableToClaim), toString(periodUserAvailableToClaim)], SEP)
535 +     $Tuple2(nil, resultString)
338 536      }
339 537  
340 538  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
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 + 
11 + let scale8 = 100000000
12 + 
13 + func throwErr (msg) = throw(makeString(["ido.ride:", msg], " "))
14 + 
10 15  
11 16  func convertPriceAssetIntoIdoAsset (priceAssetAmount,priceAssetMULT,price,priceMULT,idoAssetMULT) = {
12 17      let bPriceAssetMULT = toBigInt(priceAssetMULT)
13 18      let bIdoAssetMULT = toBigInt(idoAssetMULT)
14 19      let bPriceAssetBUF = fraction(toBigInt(priceAssetAmount), BUFSCALE, bPriceAssetMULT)
15 20      let bAmountAssetBUF = fraction(bPriceAssetBUF, toBigInt(priceMULT), toBigInt(price))
16 21      toInt(fraction(bAmountAssetBUF, toBigInt(idoAssetMULT), BUFSCALE))
17 22      }
18 23  
19 24  
20 25  let IdxCfgIdoStart = 1
21 26  
22 27  let IdxCfgIdoDuration = 2
23 28  
24 29  let IdxCfgClaimStart = 3
25 30  
26 31  let IdxCfgClaimDuration = 4
27 32  
28 33  let IdxCfgPrice = 5
29 34  
30 35  let IdxCfgPriceMult = 6
31 36  
32 37  let IdxCfgIdoAssetId = 7
33 38  
34 39  let IdxCfgIdoAssetMult = 8
35 40  
36 41  let IdxCfgPriceAssetId = 9
37 42  
38 43  let IdxCfgPriceAssetMult = 10
39 44  
40 45  let IdxCfgMinInvestAmount = 11
41 46  
42 47  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)
43 48  
44 49  
45 50  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))
46 51  
47 52  
48 53  let IdxInvTotalAmount = 1
49 54  
50 55  let IdxInvRemainingAmount = 2
51 56  
52 57  let IdxInvClaimedPriceAssetAmount = 3
53 58  
54 59  let IdxInvClaimedIdoAssetAmount = 4
55 60  
56 61  let IdxInvLastClaimedHeight = 5
57 62  
58 63  func formatInvestorS (totalAmount,remainingAmount,claimedPriceAssetAmount,claimedIdoAssetAmount,lastClaimedHeight) = makeString(["%d%d%d%d%d", totalAmount, remainingAmount, claimedPriceAssetAmount, claimedIdoAssetAmount, lastClaimedHeight], SEP)
59 64  
60 65  
61 66  func formatInvestor (totalAmount,remainingAmount,claimedPriceAssetAmount,claimedIdoAssetAmount,lastClaimedHeight) = formatInvestorS(toString(totalAmount), toString(remainingAmount), toString(claimedPriceAssetAmount), toString(claimedIdoAssetAmount), toString(lastClaimedHeight))
62 67  
63 68  
64 69  func formatHistoryRecord (priceAssetAmount,idoAssetAmount) = makeString(["%d%d%d%d", toString(height), toString(lastBlock.timestamp), toString(priceAssetAmount), toString(idoAssetAmount)], SEP)
65 70  
66 71  
67 72  func keyConfig () = "%s__config"
68 73  
69 74  
70 75  func keyInvestor (userAddress) = ("%s__" + userAddress)
71 76  
72 77  
73 78  func keyTotals () = "%s__totals"
74 79  
75 80  
76 81  func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
77 82  
78 83  
79 84  func keyUSDNClaimDisabled () = "%s__usdnClaimDisabled"
80 85  
81 86  
82 87  func keyUSDNClaimEndHeight () = "%s__usdnClaimEndHeight"
88 + 
89 + 
90 + func keyPeriodLength () = makeString(["%s", "periodLength"], SEP)
91 + 
92 + 
93 + func keyCurrentPeriod () = makeString(["%s", "currentPeriod"], SEP)
94 + 
95 + 
96 + func keyPeriodStartHeight (periodNum) = makeString(["%s%s", "periodStartHeight", toString(periodNum)], SEP)
97 + 
98 + 
99 + func keyPeriodEndHeight (periodNum) = makeString(["%s%s", "periodEndHeight", toString(periodNum)], SEP)
100 + 
101 + 
102 + func keyUsdtPriceAssetAllowableRatio () = makeString(["%s", "usdtPriceAssetAllowableRatio"], SEP)
103 + 
104 + 
105 + func keyTotalPeriodAllowance (assetId) = makeString(["%s%s", "totalPeriodAllowance", assetId], SEP)
106 + 
107 + 
108 + func keyUserPeriodAllowance (assetId) = makeString(["%s%s", "userPeriodAllowance", assetId], SEP)
109 + 
110 + 
111 + func keyPeriodTotalAvailableToClaim (assetId,periodNum) = makeString(["%s%s%s", "periodTotalAvailableToClaim", assetId, toString(periodNum)], SEP)
112 + 
113 + 
114 + func keyPeriodUserAvailableToClaim (assetId,periodNum,userAddress) = makeString(["%s%s%s%s", "periodUserAvailableToClaim", assetId, toString(periodNum), userAddress], SEP)
115 + 
116 + 
117 + func keyUsdtPriceAssetStablePool () = makeString(["%s", "usdtPriceAssetStablePool"], SEP)
118 + 
119 + 
120 + func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], SEP)
121 + 
122 + 
123 + func keyPriceAssetBalance (address) = makeString(["%s%s", "priceAssetBalance", address], SEP)
83 124  
84 125  
85 126  func keyManagerPublicKey () = "%s__managerPublicKey"
86 127  
87 128  
88 129  func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
89 130  
90 131  
91 132  func readConfigArray () = split(getStringOrFail(keyConfig()), SEP)
92 133  
93 134  
94 135  func readTotalsArrayOrDefaultByCustomKey (customKey) = split(valueOrElse(getString(customKey), formatInvestorS("0", "0", "0", "0", "0")), SEP)
95 136  
96 137  
97 138  func readTotalsArrayOrDefault () = readTotalsArrayOrDefaultByCustomKey(keyTotals())
98 139  
99 140  
100 141  func readInvestorArrayOrDefault (userAddress) = readTotalsArrayOrDefaultByCustomKey(keyInvestor(userAddress))
101 142  
102 143  
103 144  func readInvestorArrayOrFail (userAddress) = split(getStringOrFail(keyInvestor(userAddress)), SEP)
104 145  
105 146  
106 147  let IdxDiffTotalIncrement = 0
107 148  
108 149  let IdxDiffRemainingPriceAmountIncrement = 1
109 150  
110 151  let IdxDiffClaimedPriceAmountIncrement = 2
111 152  
112 153  let IdxDiffClaimedIdoAssetAmountIncrement = 3
113 154  
114 155  func TotalsEntry (key,origArray,incrementDiff,newLastClaimedHeight) = {
115 156      let totalAmount = parseIntValue(origArray[IdxInvTotalAmount])
116 157      let remainingAmount = parseIntValue(origArray[IdxInvRemainingAmount])
117 158      let claimedPriceAssetAmount = parseIntValue(origArray[IdxInvClaimedPriceAssetAmount])
118 159      let claimedIdoAssetAmount = parseIntValue(origArray[IdxInvClaimedIdoAssetAmount])
119 160      let lastClaimedHeight = parseIntValue(origArray[IdxInvLastClaimedHeight])
120 161      let newTotalAmount = (totalAmount + incrementDiff[IdxDiffTotalIncrement])
121 162      let newRemainingAmount = (remainingAmount + incrementDiff[IdxDiffRemainingPriceAmountIncrement])
122 163      let newClaimedPriceAssetAmount = (claimedPriceAssetAmount + incrementDiff[IdxDiffClaimedPriceAmountIncrement])
123 164      let newClaimedIdoAssetAmount = (claimedIdoAssetAmount + incrementDiff[IdxDiffClaimedIdoAssetAmountIncrement])
124 165      if ((0 > newRemainingAmount))
125 166          then throw("invalid math")
126 167          else StringEntry(key, formatInvestor(newTotalAmount, newRemainingAmount, newClaimedPriceAssetAmount, newClaimedIdoAssetAmount, newLastClaimedHeight))
127 168      }
128 169  
129 170  
130 171  func InvestOperationHistoryEntry (userAddress,priceAssetAmount,idoAssetAmount,txId) = StringEntry(keyOperationHistoryRecord("invest", userAddress, toBase58String(txId)), formatHistoryRecord(priceAssetAmount, idoAssetAmount))
131 172  
132 173  
133 174  func ClaimOperationHistoryEntry (userAddress,priceAssetAmount,idoAssetAmount,txId) = StringEntry(keyOperationHistoryRecord("claim", userAddress, toBase58String(txId)), formatHistoryRecord(priceAssetAmount, idoAssetAmount))
134 175  
135 176  
136 177  func internalClaim (claimedAssetId58,userAddress,txId) = {
137 178      let cfgArray = readConfigArray()
138 179      let claimStart = parseIntValue(cfgArray[IdxCfgClaimStart])
139 180      let claimDuration = parseIntValue(cfgArray[IdxCfgClaimDuration])
140 181      let claimEnd = (claimStart + claimDuration)
141 182      let price = parseIntValue(cfgArray[IdxCfgPrice])
142 183      let priceMult = parseIntValue(cfgArray[IdxCfgPriceMult])
143 184      let idoAssetId58 = cfgArray[IdxCfgIdoAssetId]
144 185      let idoAssetId = fromBase58String(idoAssetId58)
145 186      let idoAssetMult = parseIntValue(cfgArray[IdxCfgIdoAssetMult])
146 187      let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
147 188      let priceAssetId = fromBase58String(priceAssetId58)
148 189      let priceAssetMult = parseIntValue(cfgArray[IdxCfgPriceAssetMult])
149 190      let userAddress58 = toString(userAddress)
150 191      let origInvestArray = readInvestorArrayOrFail(userAddress58)
151 192      let investTotalAmount = parseIntValue(origInvestArray[IdxInvTotalAmount])
152 193      let investLastClaimedHeightTMP = parseIntValue(origInvestArray[IdxInvLastClaimedHeight])
153 194      let investLastClaimedHeight = if ((claimStart >= investLastClaimedHeightTMP))
154 195          then claimStart
155 196          else investLastClaimedHeightTMP
156 197      let newClaimPeriodHeight = if ((height > claimEnd))
157 198          then claimEnd
158 199          else if ((claimStart > height))
159 200              then claimStart
160 201              else height
161 202      let claimingBlocks = (newClaimPeriodHeight - investLastClaimedHeight)
162 203      let claimingPriceAssetAmount = fraction(investTotalAmount, claimingBlocks, claimDuration)
163 204      let claimingIdoAssetAmount = convertPriceAssetIntoIdoAsset(claimingPriceAssetAmount, priceAssetMult, price, priceMult, idoAssetMult)
164 205      let isUSDN = (claimedAssetId58 == priceAssetId58)
165 206      let isUSDNClaimDisabled = valueOrElse(getBoolean(keyUSDNClaimDisabled()), false)
166 -     let isUSDNClaimEnded =     match getInteger(keyUSDNClaimEndHeight()) {
167 -         case end: Int => 
168 -             (height > end)
169 -         case _: Unit => 
170 -             false
171 -         case _ => 
172 -             throw("Match error")
173 -     }
174 207      let checks = [if (!(if (isUSDN)
175 208          then isUSDNClaimDisabled
176 209          else false))
177 210          then true
178 -         else throw("USDN claim is disabled"), if (!(if (isUSDN)
179 -         then isUSDNClaimEnded
180 -         else false))
181 -         then true
182 -         else throw("USDN claim is ended")]
211 +         else throw("USDN claim is disabled")]
183 212      if ((checks == checks))
184 213          then if ((claimedAssetId58 == priceAssetId58))
185 214              then $Tuple6([0, -(claimingPriceAssetAmount), claimingPriceAssetAmount, 0], claimingPriceAssetAmount, priceAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
186 215              else if ((claimedAssetId58 == idoAssetId58))
187 216                  then $Tuple6([0, -(claimingPriceAssetAmount), 0, claimingIdoAssetAmount], claimingIdoAssetAmount, idoAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
188 217                  else throw(("unsupported assetId: " + claimedAssetId58))
218 +         else throw("Strict value is not equal to itself.")
219 +     }
220 + 
221 + 
222 + func internalClaimV2 (priceAssetId58,userAddress58,outAmount,totalUserAvailableToClaim) = {
223 +     let totalPeriodPriceAssetAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
224 +     let userPeriodPriceAssetAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
225 +     let periodLength = value(getInteger(keyPeriodLength()))
226 +     let currentPeriod = valueOrElse(getInteger(keyCurrentPeriod()), 0)
227 +     let zeroPeriodEndHeighIsDefined = isDefined(getInteger(keyPeriodEndHeight(0)))
228 +     let $t01183513705 = if ((currentPeriod > 0))
229 +         then {
230 +             let lastPeriodStartHeight = value(getInteger(keyPeriodStartHeight(currentPeriod)))
231 +             let lastPeriodEndHeight = value(getInteger(keyPeriodEndHeight(currentPeriod)))
232 +             let $t01209512800 = if ((height > lastPeriodEndHeight))
233 +                 then {
234 +                     let updatedCurrentPeriod = (currentPeriod + 1)
235 +                     let periodStart = if ((height > (lastPeriodEndHeight + periodLength)))
236 +                         then {
237 +                             let blocksToLastPeriodStart = ((height - lastPeriodEndHeight) % periodLength)
238 +                             if ((blocksToLastPeriodStart == 0))
239 +                                 then ((height - periodLength) + 1)
240 +                                 else (height - blocksToLastPeriodStart)
241 +                             }
242 +                         else (lastPeriodEndHeight + 1)
243 +                     let periodEnd = ((periodStart + periodLength) - 1)
244 +                     $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
245 +                     }
246 +                 else $Tuple3(currentPeriod, lastPeriodStartHeight, lastPeriodEndHeight)
247 +             let updatedCurrentPeriod = $t01209512800._1
248 +             let periodStart = $t01209512800._2
249 +             let periodEnd = $t01209512800._3
250 +             $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
251 +             }
252 +         else if (zeroPeriodEndHeighIsDefined)
253 +             then {
254 +                 let zeroPeriodStartHeight = value(getInteger(keyPeriodStartHeight(0)))
255 +                 let zeroPeriodEndHeight = value(getInteger(keyPeriodEndHeight(0)))
256 +                 let $t01305513437 = if ((height > zeroPeriodEndHeight))
257 +                     then {
258 +                         let updatedCurrentPeriod = (currentPeriod + 1)
259 +                         let periodStart = (zeroPeriodEndHeight + 1)
260 +                         let periodEnd = ((periodStart + periodLength) - 1)
261 +                         $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
262 +                         }
263 +                     else $Tuple3(currentPeriod, zeroPeriodStartHeight, zeroPeriodEndHeight)
264 +                 let updatedCurrentPeriod = $t01305513437._1
265 +                 let periodStart = $t01305513437._2
266 +                 let periodEnd = $t01305513437._3
267 +                 $Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
268 +                 }
269 +             else $Tuple3(currentPeriod, valueOrElse(getInteger(keyPeriodStartHeight(currentPeriod)), height), valueOrElse(getInteger(keyPeriodEndHeight(currentPeriod)), ((height + periodLength) - 1)))
270 +     let updatedCurrentPeriod = $t01183513705._1
271 +     let periodStart = $t01183513705._2
272 +     let periodEnd = $t01183513705._3
273 +     let periodTotalAvailableToClaim = valueOrElse(getInteger(keyPeriodTotalAvailableToClaim(priceAssetId58, updatedCurrentPeriod)), totalPeriodPriceAssetAllowance)
274 +     let periodUserAvailableToClaim = valueOrElse(getInteger(keyPeriodUserAvailableToClaim(priceAssetId58, updatedCurrentPeriod, userAddress58)), userPeriodPriceAssetAllowance)
275 +     let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
276 +     let periodMinAvailableToClaim = min([(outAmount + priceAssetBalance), periodTotalAvailableToClaim, periodUserAvailableToClaim])
277 +     let usdtPriceAssetAllowableRatio = value(getInteger(keyUsdtPriceAssetAllowableRatio()))
278 +     let putOneTknV2PriceAssetAmount = scale8
279 +     let $t01446014713 = {
280 +         let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "putOneTknV2WithoutTakeFeeREADONLY", [putOneTknV2PriceAssetAmount, priceAssetId58], nil)
281 +         if ($isInstanceOf(@, "(Int, Int, Int)"))
282 +             then @
283 +             else throw("Couldn't cast Any to (Int, Int, Int)")
284 +         }
285 +     if (($t01446014713 == $t01446014713))
286 +         then {
287 +             let bonus = $t01446014713._3
288 +             let feeAmount = $t01446014713._2
289 +             let lpAmount = $t01446014713._1
290 +             let usdtAssetId = value(getString(keyUsdtAssetId()))
291 +             let $t01477514993 = {
292 +                 let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "getOneTknV2READONLY", [usdtAssetId, lpAmount], nil)
293 +                 if ($isInstanceOf(@, "(Int, Int)"))
294 +                     then @
295 +                     else throw("Couldn't cast Any to (Int, Int)")
296 +                 }
297 +             if (($t01477514993 == $t01477514993))
298 +                 then {
299 +                     let getOneTknV2FeeAmount = $t01477514993._2
300 +                     let usdtAmount = $t01477514993._1
301 +                     let currentUsdtPriceAssetRatio = fraction(usdtAmount, putOneTknV2PriceAssetAmount, scale8)
302 +                     let endPeriodBlocksLeft = (periodEnd - height)
303 +                     $Tuple10(periodMinAvailableToClaim, periodTotalAvailableToClaim, periodUserAvailableToClaim, totalUserAvailableToClaim, usdtPriceAssetAllowableRatio, currentUsdtPriceAssetRatio, endPeriodBlocksLeft, updatedCurrentPeriod, periodStart, periodEnd)
304 +                     }
305 +                 else throw("Strict value is not equal to itself.")
306 +             }
189 307          else throw("Strict value is not equal to itself.")
190 308      }
191 309  
192 310  
193 311  func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
194 312      case s: String => 
195 313          fromBase58String(s)
196 314      case _: Unit => 
197 315          unit
198 316      case _ => 
199 317          throw("Match error")
200 318  }
201 319  
202 320  
203 321  func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
204 322      case s: String => 
205 323          fromBase58String(s)
206 324      case _: Unit => 
207 325          unit
208 326      case _ => 
209 327          throw("Match error")
210 328  }
211 329  
212 330  
213 331  func mustManager (i) = {
214 332      let pd = throw("Permission denied")
215 333      match managerPublicKeyOrUnit() {
216 334          case pk: ByteVector => 
217 335              if ((i.callerPublicKey == pk))
218 336                  then true
219 337                  else pd
220 338          case _: Unit => 
221 339              if ((i.caller == this))
222 340                  then true
223 341                  else pd
224 342          case _ => 
225 343              throw("Match error")
226 344      }
227 345      }
228 346  
229 347  
230 348  @Callable(i)
231 349  func constructor (idoStart,idoDuration,claimStart,claimDuration,price,priceAssetId58,minInvestAmount) = {
232 350      let priceMult = ((100 * 1000) * 1000)
233 351      let idoEnd = (idoStart + idoDuration)
234 352      if (isDefined(getString(keyConfig())))
235 353          then throw("already initialized")
236 -         else if (("3N4nTJ5sSp5X5ChS2bBBmwNMn1eeRzT1FoP" != toString(i.caller)))
354 +         else if (("3PMEHLx1j6zerarZTYfsGqDeeZqQoMpxq5S" != toString(i.caller)))
237 355              then throw("not authorized")
238 356              else if ((size(i.payments) != 1))
239 357                  then throw("exactly 1 payment must be attached")
240 358                  else if ((idoEnd >= claimStart))
241 359                      then throw("claimStart must be greater than idoEnd")
242 360                      else {
243 361                          let pmt = value(i.payments[0])
244 362                          let idoAssetId = value(pmt.assetId)
245 363                          let idoAssetInfo = valueOrErrorMessage(assetInfo(idoAssetId), "fail to load ido asset info")
246 364                          let idoAssetId58 = toBase58String(idoAssetId)
247 365                          let idoAssetMult = pow(10, 0, idoAssetInfo.decimals, 0, 0, DOWN)
248 366                          let priceAssetId = fromBase58String(priceAssetId58)
249 367                          let priceAssetInfo = valueOrErrorMessage(assetInfo(priceAssetId), "fail to load price asset info")
250 368                          let priceAssetMult = pow(10, 0, priceAssetInfo.decimals, 0, 0, DOWN)
251 369                          let origTotalsArray = readTotalsArrayOrDefault()
252 370                          let totalsDiff = [0, 0, 0, 0]
253 371  [StringEntry(keyConfig(), fromatConfig(idoStart, idoDuration, claimStart, claimDuration, price, priceMult, idoAssetId58, idoAssetMult, priceAssetId58, priceAssetMult, minInvestAmount, pmt.amount)), TotalsEntry(keyTotals(), origTotalsArray, totalsDiff, claimStart)]
254 372                          }
255 373      }
256 374  
257 375  
258 376  
259 377  @Callable(i)
260 378  func invest () = {
261 379      let cfgArray = readConfigArray()
262 380      let idoStart = parseIntValue(cfgArray[IdxCfgIdoStart])
263 381      let idoDuration = parseIntValue(cfgArray[IdxCfgIdoDuration])
264 382      let idoEnd = (idoStart + idoDuration)
265 383      let claimStart = parseIntValue(cfgArray[IdxCfgClaimStart])
266 384      let claimDuration = parseIntValue(cfgArray[IdxCfgClaimDuration])
267 385      let price = parseIntValue(cfgArray[IdxCfgPrice])
268 386      let priceMult = parseIntValue(cfgArray[IdxCfgPriceMult])
269 387      let idoAssetId58 = cfgArray[IdxCfgIdoAssetId]
270 388      let idoAssetId = fromBase58String(idoAssetId58)
271 389      let idoAssetMult = parseIntValue(cfgArray[IdxCfgIdoAssetMult])
272 390      let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
273 391      let priceAssetId = fromBase58String(priceAssetId58)
274 392      let priceAssetMult = parseIntValue(cfgArray[IdxCfgPriceAssetMult])
275 393      let minIvestAmount = parseIntValue(cfgArray[IdxCfgMinInvestAmount])
276 394      let userAddress = toString(i.caller)
277 395      if ((idoStart > height))
278 396          then throw("ido has not been started yet")
279 397          else if ((height > idoEnd))
280 398              then throw("ido has been already ended")
281 399              else if ((size(i.payments) != 1))
282 400                  then throw("exactly 1 payment is expected")
283 401                  else {
284 402                      let pmt = value(i.payments[0])
285 403                      let pmtAssetId = value(pmt.assetId)
286 404                      let pmtAmount = pmt.amount
287 405                      if ((pmtAssetId != priceAssetId))
288 406                          then throw((("invalid payment asset id: " + toBase58String(pmtAssetId)) + " is expected"))
289 407                          else {
290 408                              let origInvestorArray = readInvestorArrayOrDefault(userAddress)
291 409                              let origTotalsArray = readTotalsArrayOrDefault()
292 410                              let newPriceTotalAmount = (parseIntValue(origTotalsArray[IdxInvTotalAmount]) + pmtAmount)
293 411                              let requiredIdoAssetAmount = (newPriceTotalAmount * 100)
294 412                              if ((requiredIdoAssetAmount > assetBalance(this, idoAssetId)))
295 413                                  then throw("IDO asset has been - sold consider to use smaller payment")
296 414                                  else {
297 415                                      let totalsDiff = [pmtAmount, pmtAmount, 0, 0]
298 416  [TotalsEntry(keyInvestor(userAddress), origInvestorArray, totalsDiff, claimStart), TotalsEntry(keyTotals(), origTotalsArray, totalsDiff, claimStart), InvestOperationHistoryEntry(userAddress, pmtAmount, 0, i.transactionId)]
299 417                                      }
300 418                              }
301 419                      }
302 420      }
303 421  
304 422  
305 423  
306 424  @Callable(i)
307 425  func claim (claimedAssetId58,userAddress58) = {
308 426      let callerAddress58 = toString(i.caller)
309 427      if ((userAddress58 != callerAddress58))
310 428          then throw("not authorized")
311 429          else {
430 +             let cfgArray = readConfigArray()
431 +             let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
312 432              let claimResultTuple = internalClaim(claimedAssetId58, i.caller, i.transactionId)
313 433              let totalsDiff = claimResultTuple._1
314 434              let outAmount = claimResultTuple._2
315 435              let outAssetId = claimResultTuple._3
316 436              let origInvestArray = claimResultTuple._4
317 437              let newClaimPeriodHeight = claimResultTuple._5
318 438              let claimedPriceAmountFromDiff = totalsDiff[IdxDiffClaimedPriceAmountIncrement]
319 439              let claimedIdoAssetAmountFromDiff = totalsDiff[IdxDiffClaimedIdoAssetAmountIncrement]
320 -             $Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
440 +             let entries = if ((claimedAssetId58 == priceAssetId58))
441 +                 then {
442 +                     let $t02064921093 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
443 +                     let periodMinAvailableToClaim = $t02064921093._1
444 +                     let periodTotalAvailableToClaim = $t02064921093._2
445 +                     let periodUserAvailableToClaim = $t02064921093._3
446 +                     let totalUserAvailableToClaim = $t02064921093._4
447 +                     let usdtPriceAssetAllowableRatio = $t02064921093._5
448 +                     let currentUsdtPriceAssetRatio = $t02064921093._6
449 +                     let endPeriodBlocksLeft = $t02064921093._7
450 +                     let updatedCurrentPeriod = $t02064921093._8
451 +                     let periodStart = $t02064921093._9
452 +                     let periodEnd = $t02064921093._10
453 +                     let checks = [if ((periodUserAvailableToClaim > 0))
454 +                         then true
455 +                         else throwErr("unavailable to claim because user period allowance reached"), if ((periodTotalAvailableToClaim > 0))
456 +                         then true
457 +                         else throwErr("unavailable to claim because total period allowance reached"), if ((periodMinAvailableToClaim > 0))
458 +                         then true
459 +                         else throwErr("nothing to claim"), if ((usdtPriceAssetAllowableRatio > currentUsdtPriceAssetRatio))
460 +                         then true
461 +                         else throwErr("unavailable to claim because usdn price lower than usdtPriceAssetAllowableRatio")]
462 +                     if ((checks == checks))
463 +                         then {
464 +                             let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
465 +                             let updatedPeriodTotalAvailableToClaim = (periodTotalAvailableToClaim - periodMinAvailableToClaim)
466 +                             let updatedPeriodUserAvailableToClaim = (periodUserAvailableToClaim - periodMinAvailableToClaim)
467 +                             let entries = if ((priceAssetBalance >= periodMinAvailableToClaim))
468 +                                 then [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), (priceAssetBalance - periodMinAvailableToClaim))]
469 +                                 else {
470 +                                     let updatedPriceAssetBalance = ((priceAssetBalance + outAmount) - periodMinAvailableToClaim)
471 + [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), IntegerEntry(keyPriceAssetBalance(userAddress58), updatedPriceAssetBalance)]
472 +                                     }
473 +                             $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)
474 +                             }
475 +                         else throw("Strict value is not equal to itself.")
476 +                     }
477 +                 else $Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), 0), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
478 +             entries
321 479              }
322 480      }
323 481  
324 482  
325 483  
326 484  @Callable(i)
327 485  func claimREADONLY (claimedAssetId58,userAddress58) = {
328 486      let claimResultTuple = internalClaim(claimedAssetId58, addressFromStringValue(userAddress58), fromBase58String(""))
329 487      let totalsDiff = claimResultTuple._1
330 488      let outAmount = claimResultTuple._2
331 489      let outAssetId = claimResultTuple._3
332 490      let origInvestArray = claimResultTuple._4
333 491      let newClaimPeriodHeight = claimResultTuple._5
334 492      let availableToClaimArray = claimResultTuple._6
335 493      let availablePriceAmountToClaim = availableToClaimArray[0]
336 494      let availableIdoAmountToClaim = availableToClaimArray[1]
337 495      $Tuple2(nil, makeString(["%s%d%d", userAddress58, toString(availablePriceAmountToClaim), toString(availableIdoAmountToClaim)], SEP))
496 +     }
497 + 
498 + 
499 + 
500 + @Callable(i)
501 + func claimV2READONLY (claimedAssetId58,userAddress58) = {
502 +     let claimResultTuple = internalClaim(claimedAssetId58, addressFromStringValue(userAddress58), fromBase58String(""))
503 +     let totalsDiff = claimResultTuple._1
504 +     let outAmount = claimResultTuple._2
505 +     let outAssetId = claimResultTuple._3
506 +     let origInvestArray = claimResultTuple._4
507 +     let newClaimPeriodHeight = claimResultTuple._5
508 +     let availableToClaimArray = claimResultTuple._6
509 +     let availablePriceAmountToClaim = availableToClaimArray[0]
510 +     let availableIdoAmountToClaim = availableToClaimArray[1]
511 +     let cfgArray = readConfigArray()
512 +     let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
513 +     let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
514 +     let availableIdoAmountToClaimWithPriceAssetBalance = (availableIdoAmountToClaim + priceAssetBalance)
515 +     let $t02712027532 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
516 +     let periodMinAvailableToClaim = $t02712027532._1
517 +     let periodTotalAvailableToClaim = $t02712027532._2
518 +     let periodUserAvailableToClaim = $t02712027532._3
519 +     let totalUserAvailableToClaim = $t02712027532._4
520 +     let usdtPriceAssetAllowableRatio = $t02712027532._5
521 +     let currentUsdtPriceAssetRatio = $t02712027532._6
522 +     let endPeriodBlocksLeft = $t02712027532._7
523 +     let updatedCurrentPeriod = $t02712027532._8
524 +     let periodStart = $t02712027532._9
525 +     let periodEnd = $t02712027532._10
526 +     let currentPeriodEndHeight = valueOrElse(getInteger(keyPeriodEndHeight(updatedCurrentPeriod)), 0)
527 +     let resultString = if ((height > currentPeriodEndHeight))
528 +         then {
529 +             let periodLenght = value(getInteger(keyPeriodLength()))
530 +             let userPeriodAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
531 +             let totalPeriodAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
532 +             makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(userPeriodAllowance), toString(totalPeriodAllowance), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(periodLenght), toString(outAmount), toString(periodMinAvailableToClaim), toString(periodUserAvailableToClaim)], SEP)
533 +             }
534 +         else makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(periodMinAvailableToClaim), toString(periodTotalAvailableToClaim), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(endPeriodBlocksLeft), toString(outAmount), toString(periodMinAvailableToClaim), toString(periodUserAvailableToClaim)], SEP)
535 +     $Tuple2(nil, resultString)
338 536      }
339 537  
340 538  
341 539  
342 540  @Callable(i)
343 541  func setManager (pendingManagerPublicKey) = {
344 542      let checkCaller = mustManager(i)
345 543      if ((checkCaller == checkCaller))
346 544          then {
347 545              let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
348 546              if ((checkManagerPublicKey == checkManagerPublicKey))
349 547                  then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
350 548                  else throw("Strict value is not equal to itself.")
351 549              }
352 550          else throw("Strict value is not equal to itself.")
353 551      }
354 552  
355 553  
356 554  
357 555  @Callable(i)
358 556  func confirmManager () = {
359 557      let pm = pendingManagerPublicKeyOrUnit()
360 558      let hasPM = if (isDefined(pm))
361 559          then true
362 560          else throw("No pending manager")
363 561      if ((hasPM == hasPM))
364 562          then {
365 563              let checkPM = if ((i.callerPublicKey == value(pm)))
366 564                  then true
367 565                  else throw("You are not pending manager")
368 566              if ((checkPM == checkPM))
369 567                  then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
370 568                  else throw("Strict value is not equal to itself.")
371 569              }
372 570          else throw("Strict value is not equal to itself.")
373 571      }
374 572  
375 573  
376 574  @Verifier(tx)
377 575  func verify () = {
378 576      let targetPublicKey =     match managerPublicKeyOrUnit() {
379 577          case pk: ByteVector => 
380 578              pk
381 579          case _: Unit => 
382 580              tx.senderPublicKey
383 581          case _ => 
384 582              throw("Match error")
385 583      }
386 584      sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
387 585      }
388 586

Old	New		Differences
7	7		let SEP = "__"
8	8
9	9		let BUFSCALE = toBigInt(1000000000000000000)
	10	+
	11	+	let scale8 = 100000000
	12	+
	13	+	func throwErr (msg) = throw(makeString(["ido.ride:", msg], " "))
	14	+
10	15
11	16		func convertPriceAssetIntoIdoAsset (priceAssetAmount,priceAssetMULT,price,priceMULT,idoAssetMULT) = {
12	17		let bPriceAssetMULT = toBigInt(priceAssetMULT)

80	85
81	86
82	87		func keyUSDNClaimEndHeight () = "%s__usdnClaimEndHeight"
	88	+
	89	+
	90	+	func keyPeriodLength () = makeString(["%s", "periodLength"], SEP)
	91	+
	92	+
	93	+	func keyCurrentPeriod () = makeString(["%s", "currentPeriod"], SEP)
	94	+
	95	+
	96	+	func keyPeriodStartHeight (periodNum) = makeString(["%s%s", "periodStartHeight", toString(periodNum)], SEP)
	97	+
	98	+
	99	+	func keyPeriodEndHeight (periodNum) = makeString(["%s%s", "periodEndHeight", toString(periodNum)], SEP)
	100	+
	101	+
	102	+	func keyUsdtPriceAssetAllowableRatio () = makeString(["%s", "usdtPriceAssetAllowableRatio"], SEP)
	103	+
	104	+
	105	+	func keyTotalPeriodAllowance (assetId) = makeString(["%s%s", "totalPeriodAllowance", assetId], SEP)
	106	+
	107	+
	108	+	func keyUserPeriodAllowance (assetId) = makeString(["%s%s", "userPeriodAllowance", assetId], SEP)
	109	+
	110	+
	111	+	func keyPeriodTotalAvailableToClaim (assetId,periodNum) = makeString(["%s%s%s", "periodTotalAvailableToClaim", assetId, toString(periodNum)], SEP)
	112	+
	113	+
	114	+	func keyPeriodUserAvailableToClaim (assetId,periodNum,userAddress) = makeString(["%s%s%s%s", "periodUserAvailableToClaim", assetId, toString(periodNum), userAddress], SEP)
	115	+
	116	+
	117	+	func keyUsdtPriceAssetStablePool () = makeString(["%s", "usdtPriceAssetStablePool"], SEP)
	118	+
	119	+
	120	+	func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], SEP)
	121	+
	122	+
	123	+	func keyPriceAssetBalance (address) = makeString(["%s%s", "priceAssetBalance", address], SEP)
83	124
84	125
85	126		func keyManagerPublicKey () = "%s__managerPublicKey"

163	204		let claimingIdoAssetAmount = convertPriceAssetIntoIdoAsset(claimingPriceAssetAmount, priceAssetMult, price, priceMult, idoAssetMult)
164	205		let isUSDN = (claimedAssetId58 == priceAssetId58)
165	206		let isUSDNClaimDisabled = valueOrElse(getBoolean(keyUSDNClaimDisabled()), false)
166		-	let isUSDNClaimEnded = match getInteger(keyUSDNClaimEndHeight()) {
167		-	case end: Int =>
168		-	(height > end)
169		-	case _: Unit =>
170		-	false
171		-	case _ =>
172		-	throw("Match error")
173		-	}
174	207		let checks = [if (!(if (isUSDN)
175	208		then isUSDNClaimDisabled
176	209		else false))
177	210		then true
178		-	else throw("USDN claim is disabled"), if (!(if (isUSDN)
179		-	then isUSDNClaimEnded
180		-	else false))
181		-	then true
182		-	else throw("USDN claim is ended")]
	211	+	else throw("USDN claim is disabled")]
183	212		if ((checks == checks))
184	213		then if ((claimedAssetId58 == priceAssetId58))
185	214		then $Tuple6([0, -(claimingPriceAssetAmount), claimingPriceAssetAmount, 0], claimingPriceAssetAmount, priceAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
186	215		else if ((claimedAssetId58 == idoAssetId58))
187	216		then $Tuple6([0, -(claimingPriceAssetAmount), 0, claimingIdoAssetAmount], claimingIdoAssetAmount, idoAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
188	217		else throw(("unsupported assetId: " + claimedAssetId58))
	218	+	else throw("Strict value is not equal to itself.")
	219	+	}
	220	+
	221	+
	222	+	func internalClaimV2 (priceAssetId58,userAddress58,outAmount,totalUserAvailableToClaim) = {
	223	+	let totalPeriodPriceAssetAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
	224	+	let userPeriodPriceAssetAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
	225	+	let periodLength = value(getInteger(keyPeriodLength()))
	226	+	let currentPeriod = valueOrElse(getInteger(keyCurrentPeriod()), 0)
	227	+	let zeroPeriodEndHeighIsDefined = isDefined(getInteger(keyPeriodEndHeight(0)))
	228	+	let $t01183513705 = if ((currentPeriod > 0))
	229	+	then {
	230	+	let lastPeriodStartHeight = value(getInteger(keyPeriodStartHeight(currentPeriod)))
	231	+	let lastPeriodEndHeight = value(getInteger(keyPeriodEndHeight(currentPeriod)))
	232	+	let $t01209512800 = if ((height > lastPeriodEndHeight))
	233	+	then {
	234	+	let updatedCurrentPeriod = (currentPeriod + 1)
	235	+	let periodStart = if ((height > (lastPeriodEndHeight + periodLength)))
	236	+	then {
	237	+	let blocksToLastPeriodStart = ((height - lastPeriodEndHeight) % periodLength)
	238	+	if ((blocksToLastPeriodStart == 0))
	239	+	then ((height - periodLength) + 1)
	240	+	else (height - blocksToLastPeriodStart)
	241	+	}
	242	+	else (lastPeriodEndHeight + 1)
	243	+	let periodEnd = ((periodStart + periodLength) - 1)
	244	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	245	+	}
	246	+	else $Tuple3(currentPeriod, lastPeriodStartHeight, lastPeriodEndHeight)
	247	+	let updatedCurrentPeriod = $t01209512800._1
	248	+	let periodStart = $t01209512800._2
	249	+	let periodEnd = $t01209512800._3
	250	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	251	+	}
	252	+	else if (zeroPeriodEndHeighIsDefined)
	253	+	then {
	254	+	let zeroPeriodStartHeight = value(getInteger(keyPeriodStartHeight(0)))
	255	+	let zeroPeriodEndHeight = value(getInteger(keyPeriodEndHeight(0)))
	256	+	let $t01305513437 = if ((height > zeroPeriodEndHeight))
	257	+	then {
	258	+	let updatedCurrentPeriod = (currentPeriod + 1)
	259	+	let periodStart = (zeroPeriodEndHeight + 1)
	260	+	let periodEnd = ((periodStart + periodLength) - 1)
	261	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	262	+	}
	263	+	else $Tuple3(currentPeriod, zeroPeriodStartHeight, zeroPeriodEndHeight)
	264	+	let updatedCurrentPeriod = $t01305513437._1
	265	+	let periodStart = $t01305513437._2
	266	+	let periodEnd = $t01305513437._3
	267	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	268	+	}
	269	+	else $Tuple3(currentPeriod, valueOrElse(getInteger(keyPeriodStartHeight(currentPeriod)), height), valueOrElse(getInteger(keyPeriodEndHeight(currentPeriod)), ((height + periodLength) - 1)))
	270	+	let updatedCurrentPeriod = $t01183513705._1
	271	+	let periodStart = $t01183513705._2
	272	+	let periodEnd = $t01183513705._3
	273	+	let periodTotalAvailableToClaim = valueOrElse(getInteger(keyPeriodTotalAvailableToClaim(priceAssetId58, updatedCurrentPeriod)), totalPeriodPriceAssetAllowance)
	274	+	let periodUserAvailableToClaim = valueOrElse(getInteger(keyPeriodUserAvailableToClaim(priceAssetId58, updatedCurrentPeriod, userAddress58)), userPeriodPriceAssetAllowance)
	275	+	let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
	276	+	let periodMinAvailableToClaim = min([(outAmount + priceAssetBalance), periodTotalAvailableToClaim, periodUserAvailableToClaim])
	277	+	let usdtPriceAssetAllowableRatio = value(getInteger(keyUsdtPriceAssetAllowableRatio()))
	278	+	let putOneTknV2PriceAssetAmount = scale8
	279	+	let $t01446014713 = {
	280	+	let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "putOneTknV2WithoutTakeFeeREADONLY", [putOneTknV2PriceAssetAmount, priceAssetId58], nil)
	281	+	if ($isInstanceOf(@, "(Int, Int, Int)"))
	282	+	then @
	283	+	else throw("Couldn't cast Any to (Int, Int, Int)")
	284	+	}
	285	+	if (($t01446014713 == $t01446014713))
	286	+	then {
	287	+	let bonus = $t01446014713._3
	288	+	let feeAmount = $t01446014713._2
	289	+	let lpAmount = $t01446014713._1
	290	+	let usdtAssetId = value(getString(keyUsdtAssetId()))
	291	+	let $t01477514993 = {
	292	+	let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "getOneTknV2READONLY", [usdtAssetId, lpAmount], nil)
	293	+	if ($isInstanceOf(@, "(Int, Int)"))
	294	+	then @
	295	+	else throw("Couldn't cast Any to (Int, Int)")
	296	+	}
	297	+	if (($t01477514993 == $t01477514993))
	298	+	then {
	299	+	let getOneTknV2FeeAmount = $t01477514993._2
	300	+	let usdtAmount = $t01477514993._1
	301	+	let currentUsdtPriceAssetRatio = fraction(usdtAmount, putOneTknV2PriceAssetAmount, scale8)
	302	+	let endPeriodBlocksLeft = (periodEnd - height)
	303	+	$Tuple10(periodMinAvailableToClaim, periodTotalAvailableToClaim, periodUserAvailableToClaim, totalUserAvailableToClaim, usdtPriceAssetAllowableRatio, currentUsdtPriceAssetRatio, endPeriodBlocksLeft, updatedCurrentPeriod, periodStart, periodEnd)
	304	+	}
	305	+	else throw("Strict value is not equal to itself.")
	306	+	}
189	307		else throw("Strict value is not equal to itself.")
190	308		}
191	309

233	351		let idoEnd = (idoStart + idoDuration)
234	352		if (isDefined(getString(keyConfig())))
235	353		then throw("already initialized")
236		-	else if (("~~3N4nTJ5sSp5X5ChS2bBBmwNMn1eeRzT1FoP~~" != toString(i.caller)))
	354	+	else if (("3PMEHLx1j6zerarZTYfsGqDeeZqQoMpxq5S" != toString(i.caller)))
237	355		then throw("not authorized")
238	356		else if ((size(i.payments) != 1))
239	357		then throw("exactly 1 payment must be attached")

309	427		if ((userAddress58 != callerAddress58))
310	428		then throw("not authorized")
311	429		else {
	430	+	let cfgArray = readConfigArray()
	431	+	let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
312	432		let claimResultTuple = internalClaim(claimedAssetId58, i.caller, i.transactionId)
313	433		let totalsDiff = claimResultTuple._1
314	434		let outAmount = claimResultTuple._2

317	437		let newClaimPeriodHeight = claimResultTuple._5
318	438		let claimedPriceAmountFromDiff = totalsDiff[IdxDiffClaimedPriceAmountIncrement]
319	439		let claimedIdoAssetAmountFromDiff = totalsDiff[IdxDiffClaimedIdoAssetAmountIncrement]
320		-	$Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
	440	+	let entries = if ((claimedAssetId58 == priceAssetId58))
	441	+	then {
	442	+	let $t02064921093 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
	443	+	let periodMinAvailableToClaim = $t02064921093._1
	444	+	let periodTotalAvailableToClaim = $t02064921093._2
	445	+	let periodUserAvailableToClaim = $t02064921093._3
	446	+	let totalUserAvailableToClaim = $t02064921093._4
	447	+	let usdtPriceAssetAllowableRatio = $t02064921093._5
	448	+	let currentUsdtPriceAssetRatio = $t02064921093._6
	449	+	let endPeriodBlocksLeft = $t02064921093._7
	450	+	let updatedCurrentPeriod = $t02064921093._8
	451	+	let periodStart = $t02064921093._9
	452	+	let periodEnd = $t02064921093._10
	453	+	let checks = [if ((periodUserAvailableToClaim > 0))
	454	+	then true
	455	+	else throwErr("unavailable to claim because user period allowance reached"), if ((periodTotalAvailableToClaim > 0))
	456	+	then true
	457	+	else throwErr("unavailable to claim because total period allowance reached"), if ((periodMinAvailableToClaim > 0))
	458	+	then true
	459	+	else throwErr("nothing to claim"), if ((usdtPriceAssetAllowableRatio > currentUsdtPriceAssetRatio))
	460	+	then true
	461	+	else throwErr("unavailable to claim because usdn price lower than usdtPriceAssetAllowableRatio")]
	462	+	if ((checks == checks))
	463	+	then {
	464	+	let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
	465	+	let updatedPeriodTotalAvailableToClaim = (periodTotalAvailableToClaim - periodMinAvailableToClaim)
	466	+	let updatedPeriodUserAvailableToClaim = (periodUserAvailableToClaim - periodMinAvailableToClaim)
	467	+	let entries = if ((priceAssetBalance >= periodMinAvailableToClaim))
	468	+	then [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), (priceAssetBalance - periodMinAvailableToClaim))]
	469	+	else {
	470	+	let updatedPriceAssetBalance = ((priceAssetBalance + outAmount) - periodMinAvailableToClaim)
	471	+	[ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), IntegerEntry(keyPriceAssetBalance(userAddress58), updatedPriceAssetBalance)]
	472	+	}
	473	+	$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)
	474	+	}
	475	+	else throw("Strict value is not equal to itself.")
	476	+	}
	477	+	else $Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), 0), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
	478	+	entries
321	479		}
322	480		}
323	481

335	493		let availablePriceAmountToClaim = availableToClaimArray[0]
336	494		let availableIdoAmountToClaim = availableToClaimArray[1]
337	495		$Tuple2(nil, makeString(["%s%d%d", userAddress58, toString(availablePriceAmountToClaim), toString(availableIdoAmountToClaim)], SEP))
	496	+	}
	497	+
	498	+
	499	+
	500	+	@Callable(i)
	501	+	func claimV2READONLY (claimedAssetId58,userAddress58) = {
	502	+	let claimResultTuple = internalClaim(claimedAssetId58, addressFromStringValue(userAddress58), fromBase58String(""))
	503	+	let totalsDiff = claimResultTuple._1
	504	+	let outAmount = claimResultTuple._2
	505	+	let outAssetId = claimResultTuple._3
	506	+	let origInvestArray = claimResultTuple._4
	507	+	let newClaimPeriodHeight = claimResultTuple._5
	508	+	let availableToClaimArray = claimResultTuple._6
	509	+	let availablePriceAmountToClaim = availableToClaimArray[0]
	510	+	let availableIdoAmountToClaim = availableToClaimArray[1]
	511	+	let cfgArray = readConfigArray()
	512	+	let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
	513	+	let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
	514	+	let availableIdoAmountToClaimWithPriceAssetBalance = (availableIdoAmountToClaim + priceAssetBalance)
	515	+	let $t02712027532 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
	516	+	let periodMinAvailableToClaim = $t02712027532._1
	517	+	let periodTotalAvailableToClaim = $t02712027532._2
	518	+	let periodUserAvailableToClaim = $t02712027532._3
	519	+	let totalUserAvailableToClaim = $t02712027532._4
	520	+	let usdtPriceAssetAllowableRatio = $t02712027532._5
	521	+	let currentUsdtPriceAssetRatio = $t02712027532._6
	522	+	let endPeriodBlocksLeft = $t02712027532._7
	523	+	let updatedCurrentPeriod = $t02712027532._8
	524	+	let periodStart = $t02712027532._9
	525	+	let periodEnd = $t02712027532._10
	526	+	let currentPeriodEndHeight = valueOrElse(getInteger(keyPeriodEndHeight(updatedCurrentPeriod)), 0)
	527	+	let resultString = if ((height > currentPeriodEndHeight))
	528	+	then {
	529	+	let periodLenght = value(getInteger(keyPeriodLength()))
	530	+	let userPeriodAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
	531	+	let totalPeriodAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
	532	+	makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(userPeriodAllowance), toString(totalPeriodAllowance), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(periodLenght), toString(outAmount), toString(periodMinAvailableToClaim), toString(periodUserAvailableToClaim)], SEP)
	533	+	}
	534	+	else makeString(["%d%d%d%d%d%d", toString(availableIdoAmountToClaimWithPriceAssetBalance), toString(periodMinAvailableToClaim), toString(periodTotalAvailableToClaim), toString(usdtPriceAssetAllowableRatio), toString(currentUsdtPriceAssetRatio), toString(endPeriodBlocksLeft), toString(outAmount), toString(periodMinAvailableToClaim), toString(periodUserAvailableToClaim)], SEP)
	535	+	$Tuple2(nil, resultString)
338	536		}
339	537
340	538

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
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	+
	11	+	let scale8 = 100000000
	12	+
	13	+	func throwErr (msg) = throw(makeString(["ido.ride:", msg], " "))
	14	+
10	15
11	16		func convertPriceAssetIntoIdoAsset (priceAssetAmount,priceAssetMULT,price,priceMULT,idoAssetMULT) = {
12	17		let bPriceAssetMULT = toBigInt(priceAssetMULT)
13	18		let bIdoAssetMULT = toBigInt(idoAssetMULT)
14	19		let bPriceAssetBUF = fraction(toBigInt(priceAssetAmount), BUFSCALE, bPriceAssetMULT)
15	20		let bAmountAssetBUF = fraction(bPriceAssetBUF, toBigInt(priceMULT), toBigInt(price))
16	21		toInt(fraction(bAmountAssetBUF, toBigInt(idoAssetMULT), BUFSCALE))
17	22		}
18	23
19	24
20	25		let IdxCfgIdoStart = 1
21	26
22	27		let IdxCfgIdoDuration = 2
23	28
24	29		let IdxCfgClaimStart = 3
25	30
26	31		let IdxCfgClaimDuration = 4
27	32
28	33		let IdxCfgPrice = 5
29	34
30	35		let IdxCfgPriceMult = 6
31	36
32	37		let IdxCfgIdoAssetId = 7
33	38
34	39		let IdxCfgIdoAssetMult = 8
35	40
36	41		let IdxCfgPriceAssetId = 9
37	42
38	43		let IdxCfgPriceAssetMult = 10
39	44
40	45		let IdxCfgMinInvestAmount = 11
41	46
42	47		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)
43	48
44	49
45	50		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))
46	51
47	52
48	53		let IdxInvTotalAmount = 1
49	54
50	55		let IdxInvRemainingAmount = 2
51	56
52	57		let IdxInvClaimedPriceAssetAmount = 3
53	58
54	59		let IdxInvClaimedIdoAssetAmount = 4
55	60
56	61		let IdxInvLastClaimedHeight = 5
57	62
58	63		func formatInvestorS (totalAmount,remainingAmount,claimedPriceAssetAmount,claimedIdoAssetAmount,lastClaimedHeight) = makeString(["%d%d%d%d%d", totalAmount, remainingAmount, claimedPriceAssetAmount, claimedIdoAssetAmount, lastClaimedHeight], SEP)
59	64
60	65
61	66		func formatInvestor (totalAmount,remainingAmount,claimedPriceAssetAmount,claimedIdoAssetAmount,lastClaimedHeight) = formatInvestorS(toString(totalAmount), toString(remainingAmount), toString(claimedPriceAssetAmount), toString(claimedIdoAssetAmount), toString(lastClaimedHeight))
62	67
63	68
64	69		func formatHistoryRecord (priceAssetAmount,idoAssetAmount) = makeString(["%d%d%d%d", toString(height), toString(lastBlock.timestamp), toString(priceAssetAmount), toString(idoAssetAmount)], SEP)
65	70
66	71
67	72		func keyConfig () = "%s__config"
68	73
69	74
70	75		func keyInvestor (userAddress) = ("%s__" + userAddress)
71	76
72	77
73	78		func keyTotals () = "%s__totals"
74	79
75	80
76	81		func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
77	82
78	83
79	84		func keyUSDNClaimDisabled () = "%s__usdnClaimDisabled"
80	85
81	86
82	87		func keyUSDNClaimEndHeight () = "%s__usdnClaimEndHeight"
	88	+
	89	+
	90	+	func keyPeriodLength () = makeString(["%s", "periodLength"], SEP)
	91	+
	92	+
	93	+	func keyCurrentPeriod () = makeString(["%s", "currentPeriod"], SEP)
	94	+
	95	+
	96	+	func keyPeriodStartHeight (periodNum) = makeString(["%s%s", "periodStartHeight", toString(periodNum)], SEP)
	97	+
	98	+
	99	+	func keyPeriodEndHeight (periodNum) = makeString(["%s%s", "periodEndHeight", toString(periodNum)], SEP)
	100	+
	101	+
	102	+	func keyUsdtPriceAssetAllowableRatio () = makeString(["%s", "usdtPriceAssetAllowableRatio"], SEP)
	103	+
	104	+
	105	+	func keyTotalPeriodAllowance (assetId) = makeString(["%s%s", "totalPeriodAllowance", assetId], SEP)
	106	+
	107	+
	108	+	func keyUserPeriodAllowance (assetId) = makeString(["%s%s", "userPeriodAllowance", assetId], SEP)
	109	+
	110	+
	111	+	func keyPeriodTotalAvailableToClaim (assetId,periodNum) = makeString(["%s%s%s", "periodTotalAvailableToClaim", assetId, toString(periodNum)], SEP)
	112	+
	113	+
	114	+	func keyPeriodUserAvailableToClaim (assetId,periodNum,userAddress) = makeString(["%s%s%s%s", "periodUserAvailableToClaim", assetId, toString(periodNum), userAddress], SEP)
	115	+
	116	+
	117	+	func keyUsdtPriceAssetStablePool () = makeString(["%s", "usdtPriceAssetStablePool"], SEP)
	118	+
	119	+
	120	+	func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], SEP)
	121	+
	122	+
	123	+	func keyPriceAssetBalance (address) = makeString(["%s%s", "priceAssetBalance", address], SEP)
83	124
84	125
85	126		func keyManagerPublicKey () = "%s__managerPublicKey"
86	127
87	128
88	129		func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
89	130
90	131
91	132		func readConfigArray () = split(getStringOrFail(keyConfig()), SEP)
92	133
93	134
94	135		func readTotalsArrayOrDefaultByCustomKey (customKey) = split(valueOrElse(getString(customKey), formatInvestorS("0", "0", "0", "0", "0")), SEP)
95	136
96	137
97	138		func readTotalsArrayOrDefault () = readTotalsArrayOrDefaultByCustomKey(keyTotals())
98	139
99	140
100	141		func readInvestorArrayOrDefault (userAddress) = readTotalsArrayOrDefaultByCustomKey(keyInvestor(userAddress))
101	142
102	143
103	144		func readInvestorArrayOrFail (userAddress) = split(getStringOrFail(keyInvestor(userAddress)), SEP)
104	145
105	146
106	147		let IdxDiffTotalIncrement = 0
107	148
108	149		let IdxDiffRemainingPriceAmountIncrement = 1
109	150
110	151		let IdxDiffClaimedPriceAmountIncrement = 2
111	152
112	153		let IdxDiffClaimedIdoAssetAmountIncrement = 3
113	154
114	155		func TotalsEntry (key,origArray,incrementDiff,newLastClaimedHeight) = {
115	156		let totalAmount = parseIntValue(origArray[IdxInvTotalAmount])
116	157		let remainingAmount = parseIntValue(origArray[IdxInvRemainingAmount])
117	158		let claimedPriceAssetAmount = parseIntValue(origArray[IdxInvClaimedPriceAssetAmount])
118	159		let claimedIdoAssetAmount = parseIntValue(origArray[IdxInvClaimedIdoAssetAmount])
119	160		let lastClaimedHeight = parseIntValue(origArray[IdxInvLastClaimedHeight])
120	161		let newTotalAmount = (totalAmount + incrementDiff[IdxDiffTotalIncrement])
121	162		let newRemainingAmount = (remainingAmount + incrementDiff[IdxDiffRemainingPriceAmountIncrement])
122	163		let newClaimedPriceAssetAmount = (claimedPriceAssetAmount + incrementDiff[IdxDiffClaimedPriceAmountIncrement])
123	164		let newClaimedIdoAssetAmount = (claimedIdoAssetAmount + incrementDiff[IdxDiffClaimedIdoAssetAmountIncrement])
124	165		if ((0 > newRemainingAmount))
125	166		then throw("invalid math")
126	167		else StringEntry(key, formatInvestor(newTotalAmount, newRemainingAmount, newClaimedPriceAssetAmount, newClaimedIdoAssetAmount, newLastClaimedHeight))
127	168		}
128	169
129	170
130	171		func InvestOperationHistoryEntry (userAddress,priceAssetAmount,idoAssetAmount,txId) = StringEntry(keyOperationHistoryRecord("invest", userAddress, toBase58String(txId)), formatHistoryRecord(priceAssetAmount, idoAssetAmount))
131	172
132	173
133	174		func ClaimOperationHistoryEntry (userAddress,priceAssetAmount,idoAssetAmount,txId) = StringEntry(keyOperationHistoryRecord("claim", userAddress, toBase58String(txId)), formatHistoryRecord(priceAssetAmount, idoAssetAmount))
134	175
135	176
136	177		func internalClaim (claimedAssetId58,userAddress,txId) = {
137	178		let cfgArray = readConfigArray()
138	179		let claimStart = parseIntValue(cfgArray[IdxCfgClaimStart])
139	180		let claimDuration = parseIntValue(cfgArray[IdxCfgClaimDuration])
140	181		let claimEnd = (claimStart + claimDuration)
141	182		let price = parseIntValue(cfgArray[IdxCfgPrice])
142	183		let priceMult = parseIntValue(cfgArray[IdxCfgPriceMult])
143	184		let idoAssetId58 = cfgArray[IdxCfgIdoAssetId]
144	185		let idoAssetId = fromBase58String(idoAssetId58)
145	186		let idoAssetMult = parseIntValue(cfgArray[IdxCfgIdoAssetMult])
146	187		let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
147	188		let priceAssetId = fromBase58String(priceAssetId58)
148	189		let priceAssetMult = parseIntValue(cfgArray[IdxCfgPriceAssetMult])
149	190		let userAddress58 = toString(userAddress)
150	191		let origInvestArray = readInvestorArrayOrFail(userAddress58)
151	192		let investTotalAmount = parseIntValue(origInvestArray[IdxInvTotalAmount])
152	193		let investLastClaimedHeightTMP = parseIntValue(origInvestArray[IdxInvLastClaimedHeight])
153	194		let investLastClaimedHeight = if ((claimStart >= investLastClaimedHeightTMP))
154	195		then claimStart
155	196		else investLastClaimedHeightTMP
156	197		let newClaimPeriodHeight = if ((height > claimEnd))
157	198		then claimEnd
158	199		else if ((claimStart > height))
159	200		then claimStart
160	201		else height
161	202		let claimingBlocks = (newClaimPeriodHeight - investLastClaimedHeight)
162	203		let claimingPriceAssetAmount = fraction(investTotalAmount, claimingBlocks, claimDuration)
163	204		let claimingIdoAssetAmount = convertPriceAssetIntoIdoAsset(claimingPriceAssetAmount, priceAssetMult, price, priceMult, idoAssetMult)
164	205		let isUSDN = (claimedAssetId58 == priceAssetId58)
165	206		let isUSDNClaimDisabled = valueOrElse(getBoolean(keyUSDNClaimDisabled()), false)
166		-	let isUSDNClaimEnded = match getInteger(keyUSDNClaimEndHeight()) {
167		-	case end: Int =>
168		-	(height > end)
169		-	case _: Unit =>
170		-	false
171		-	case _ =>
172		-	throw("Match error")
173		-	}
174	207		let checks = [if (!(if (isUSDN)
175	208		then isUSDNClaimDisabled
176	209		else false))
177	210		then true
178		-	else throw("USDN claim is disabled"), if (!(if (isUSDN)
179		-	then isUSDNClaimEnded
180		-	else false))
181		-	then true
182		-	else throw("USDN claim is ended")]
	211	+	else throw("USDN claim is disabled")]
183	212		if ((checks == checks))
184	213		then if ((claimedAssetId58 == priceAssetId58))
185	214		then $Tuple6([0, -(claimingPriceAssetAmount), claimingPriceAssetAmount, 0], claimingPriceAssetAmount, priceAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
186	215		else if ((claimedAssetId58 == idoAssetId58))
187	216		then $Tuple6([0, -(claimingPriceAssetAmount), 0, claimingIdoAssetAmount], claimingIdoAssetAmount, idoAssetId, origInvestArray, newClaimPeriodHeight, [claimingPriceAssetAmount, claimingIdoAssetAmount])
188	217		else throw(("unsupported assetId: " + claimedAssetId58))
	218	+	else throw("Strict value is not equal to itself.")
	219	+	}
	220	+
	221	+
	222	+	func internalClaimV2 (priceAssetId58,userAddress58,outAmount,totalUserAvailableToClaim) = {
	223	+	let totalPeriodPriceAssetAllowance = value(getInteger(keyTotalPeriodAllowance(priceAssetId58)))
	224	+	let userPeriodPriceAssetAllowance = value(getInteger(keyUserPeriodAllowance(priceAssetId58)))
	225	+	let periodLength = value(getInteger(keyPeriodLength()))
	226	+	let currentPeriod = valueOrElse(getInteger(keyCurrentPeriod()), 0)
	227	+	let zeroPeriodEndHeighIsDefined = isDefined(getInteger(keyPeriodEndHeight(0)))
	228	+	let $t01183513705 = if ((currentPeriod > 0))
	229	+	then {
	230	+	let lastPeriodStartHeight = value(getInteger(keyPeriodStartHeight(currentPeriod)))
	231	+	let lastPeriodEndHeight = value(getInteger(keyPeriodEndHeight(currentPeriod)))
	232	+	let $t01209512800 = if ((height > lastPeriodEndHeight))
	233	+	then {
	234	+	let updatedCurrentPeriod = (currentPeriod + 1)
	235	+	let periodStart = if ((height > (lastPeriodEndHeight + periodLength)))
	236	+	then {
	237	+	let blocksToLastPeriodStart = ((height - lastPeriodEndHeight) % periodLength)
	238	+	if ((blocksToLastPeriodStart == 0))
	239	+	then ((height - periodLength) + 1)
	240	+	else (height - blocksToLastPeriodStart)
	241	+	}
	242	+	else (lastPeriodEndHeight + 1)
	243	+	let periodEnd = ((periodStart + periodLength) - 1)
	244	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	245	+	}
	246	+	else $Tuple3(currentPeriod, lastPeriodStartHeight, lastPeriodEndHeight)
	247	+	let updatedCurrentPeriod = $t01209512800._1
	248	+	let periodStart = $t01209512800._2
	249	+	let periodEnd = $t01209512800._3
	250	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	251	+	}
	252	+	else if (zeroPeriodEndHeighIsDefined)
	253	+	then {
	254	+	let zeroPeriodStartHeight = value(getInteger(keyPeriodStartHeight(0)))
	255	+	let zeroPeriodEndHeight = value(getInteger(keyPeriodEndHeight(0)))
	256	+	let $t01305513437 = if ((height > zeroPeriodEndHeight))
	257	+	then {
	258	+	let updatedCurrentPeriod = (currentPeriod + 1)
	259	+	let periodStart = (zeroPeriodEndHeight + 1)
	260	+	let periodEnd = ((periodStart + periodLength) - 1)
	261	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	262	+	}
	263	+	else $Tuple3(currentPeriod, zeroPeriodStartHeight, zeroPeriodEndHeight)
	264	+	let updatedCurrentPeriod = $t01305513437._1
	265	+	let periodStart = $t01305513437._2
	266	+	let periodEnd = $t01305513437._3
	267	+	$Tuple3(updatedCurrentPeriod, periodStart, periodEnd)
	268	+	}
	269	+	else $Tuple3(currentPeriod, valueOrElse(getInteger(keyPeriodStartHeight(currentPeriod)), height), valueOrElse(getInteger(keyPeriodEndHeight(currentPeriod)), ((height + periodLength) - 1)))
	270	+	let updatedCurrentPeriod = $t01183513705._1
	271	+	let periodStart = $t01183513705._2
	272	+	let periodEnd = $t01183513705._3
	273	+	let periodTotalAvailableToClaim = valueOrElse(getInteger(keyPeriodTotalAvailableToClaim(priceAssetId58, updatedCurrentPeriod)), totalPeriodPriceAssetAllowance)
	274	+	let periodUserAvailableToClaim = valueOrElse(getInteger(keyPeriodUserAvailableToClaim(priceAssetId58, updatedCurrentPeriod, userAddress58)), userPeriodPriceAssetAllowance)
	275	+	let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
	276	+	let periodMinAvailableToClaim = min([(outAmount + priceAssetBalance), periodTotalAvailableToClaim, periodUserAvailableToClaim])
	277	+	let usdtPriceAssetAllowableRatio = value(getInteger(keyUsdtPriceAssetAllowableRatio()))
	278	+	let putOneTknV2PriceAssetAmount = scale8
	279	+	let $t01446014713 = {
	280	+	let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "putOneTknV2WithoutTakeFeeREADONLY", [putOneTknV2PriceAssetAmount, priceAssetId58], nil)
	281	+	if ($isInstanceOf(@, "(Int, Int, Int)"))
	282	+	then @
	283	+	else throw("Couldn't cast Any to (Int, Int, Int)")
	284	+	}
	285	+	if (($t01446014713 == $t01446014713))
	286	+	then {
	287	+	let bonus = $t01446014713._3
	288	+	let feeAmount = $t01446014713._2
	289	+	let lpAmount = $t01446014713._1
	290	+	let usdtAssetId = value(getString(keyUsdtAssetId()))
	291	+	let $t01477514993 = {
	292	+	let @ = invoke(addressFromStringValue(value(getString(keyUsdtPriceAssetStablePool()))), "getOneTknV2READONLY", [usdtAssetId, lpAmount], nil)
	293	+	if ($isInstanceOf(@, "(Int, Int)"))
	294	+	then @
	295	+	else throw("Couldn't cast Any to (Int, Int)")
	296	+	}
	297	+	if (($t01477514993 == $t01477514993))
	298	+	then {
	299	+	let getOneTknV2FeeAmount = $t01477514993._2
	300	+	let usdtAmount = $t01477514993._1
	301	+	let currentUsdtPriceAssetRatio = fraction(usdtAmount, putOneTknV2PriceAssetAmount, scale8)
	302	+	let endPeriodBlocksLeft = (periodEnd - height)
	303	+	$Tuple10(periodMinAvailableToClaim, periodTotalAvailableToClaim, periodUserAvailableToClaim, totalUserAvailableToClaim, usdtPriceAssetAllowableRatio, currentUsdtPriceAssetRatio, endPeriodBlocksLeft, updatedCurrentPeriod, periodStart, periodEnd)
	304	+	}
	305	+	else throw("Strict value is not equal to itself.")
	306	+	}
189	307		else throw("Strict value is not equal to itself.")
190	308		}
191	309
192	310
193	311		func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
194	312		case s: String =>
195	313		fromBase58String(s)
196	314		case _: Unit =>
197	315		unit
198	316		case _ =>
199	317		throw("Match error")
200	318		}
201	319
202	320
203	321		func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
204	322		case s: String =>
205	323		fromBase58String(s)
206	324		case _: Unit =>
207	325		unit
208	326		case _ =>
209	327		throw("Match error")
210	328		}
211	329
212	330
213	331		func mustManager (i) = {
214	332		let pd = throw("Permission denied")
215	333		match managerPublicKeyOrUnit() {
216	334		case pk: ByteVector =>
217	335		if ((i.callerPublicKey == pk))
218	336		then true
219	337		else pd
220	338		case _: Unit =>
221	339		if ((i.caller == this))
222	340		then true
223	341		else pd
224	342		case _ =>
225	343		throw("Match error")
226	344		}
227	345		}
228	346
229	347
230	348		@Callable(i)
231	349		func constructor (idoStart,idoDuration,claimStart,claimDuration,price,priceAssetId58,minInvestAmount) = {
232	350		let priceMult = ((100 * 1000) * 1000)
233	351		let idoEnd = (idoStart + idoDuration)
234	352		if (isDefined(getString(keyConfig())))
235	353		then throw("already initialized")
236		-	else if (("~~3N4nTJ5sSp5X5ChS2bBBmwNMn1eeRzT1FoP~~" != toString(i.caller)))
	354	+	else if (("3PMEHLx1j6zerarZTYfsGqDeeZqQoMpxq5S" != toString(i.caller)))
237	355		then throw("not authorized")
238	356		else if ((size(i.payments) != 1))
239	357		then throw("exactly 1 payment must be attached")
240	358		else if ((idoEnd >= claimStart))
241	359		then throw("claimStart must be greater than idoEnd")
242	360		else {
243	361		let pmt = value(i.payments[0])
244	362		let idoAssetId = value(pmt.assetId)
245	363		let idoAssetInfo = valueOrErrorMessage(assetInfo(idoAssetId), "fail to load ido asset info")
246	364		let idoAssetId58 = toBase58String(idoAssetId)
247	365		let idoAssetMult = pow(10, 0, idoAssetInfo.decimals, 0, 0, DOWN)
248	366		let priceAssetId = fromBase58String(priceAssetId58)
249	367		let priceAssetInfo = valueOrErrorMessage(assetInfo(priceAssetId), "fail to load price asset info")
250	368		let priceAssetMult = pow(10, 0, priceAssetInfo.decimals, 0, 0, DOWN)
251	369		let origTotalsArray = readTotalsArrayOrDefault()
252	370		let totalsDiff = [0, 0, 0, 0]
253	371		[StringEntry(keyConfig(), fromatConfig(idoStart, idoDuration, claimStart, claimDuration, price, priceMult, idoAssetId58, idoAssetMult, priceAssetId58, priceAssetMult, minInvestAmount, pmt.amount)), TotalsEntry(keyTotals(), origTotalsArray, totalsDiff, claimStart)]
254	372		}
255	373		}
256	374
257	375
258	376
259	377		@Callable(i)
260	378		func invest () = {
261	379		let cfgArray = readConfigArray()
262	380		let idoStart = parseIntValue(cfgArray[IdxCfgIdoStart])
263	381		let idoDuration = parseIntValue(cfgArray[IdxCfgIdoDuration])
264	382		let idoEnd = (idoStart + idoDuration)
265	383		let claimStart = parseIntValue(cfgArray[IdxCfgClaimStart])
266	384		let claimDuration = parseIntValue(cfgArray[IdxCfgClaimDuration])
267	385		let price = parseIntValue(cfgArray[IdxCfgPrice])
268	386		let priceMult = parseIntValue(cfgArray[IdxCfgPriceMult])
269	387		let idoAssetId58 = cfgArray[IdxCfgIdoAssetId]
270	388		let idoAssetId = fromBase58String(idoAssetId58)
271	389		let idoAssetMult = parseIntValue(cfgArray[IdxCfgIdoAssetMult])
272	390		let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
273	391		let priceAssetId = fromBase58String(priceAssetId58)
274	392		let priceAssetMult = parseIntValue(cfgArray[IdxCfgPriceAssetMult])
275	393		let minIvestAmount = parseIntValue(cfgArray[IdxCfgMinInvestAmount])
276	394		let userAddress = toString(i.caller)
277	395		if ((idoStart > height))
278	396		then throw("ido has not been started yet")
279	397		else if ((height > idoEnd))
280	398		then throw("ido has been already ended")
281	399		else if ((size(i.payments) != 1))
282	400		then throw("exactly 1 payment is expected")
283	401		else {
284	402		let pmt = value(i.payments[0])
285	403		let pmtAssetId = value(pmt.assetId)
286	404		let pmtAmount = pmt.amount
287	405		if ((pmtAssetId != priceAssetId))
288	406		then throw((("invalid payment asset id: " + toBase58String(pmtAssetId)) + " is expected"))
289	407		else {
290	408		let origInvestorArray = readInvestorArrayOrDefault(userAddress)
291	409		let origTotalsArray = readTotalsArrayOrDefault()
292	410		let newPriceTotalAmount = (parseIntValue(origTotalsArray[IdxInvTotalAmount]) + pmtAmount)
293	411		let requiredIdoAssetAmount = (newPriceTotalAmount * 100)
294	412		if ((requiredIdoAssetAmount > assetBalance(this, idoAssetId)))
295	413		then throw("IDO asset has been - sold consider to use smaller payment")
296	414		else {
297	415		let totalsDiff = [pmtAmount, pmtAmount, 0, 0]
298	416		[TotalsEntry(keyInvestor(userAddress), origInvestorArray, totalsDiff, claimStart), TotalsEntry(keyTotals(), origTotalsArray, totalsDiff, claimStart), InvestOperationHistoryEntry(userAddress, pmtAmount, 0, i.transactionId)]
299	417		}
300	418		}
301	419		}
302	420		}
303	421
304	422
305	423
306	424		@Callable(i)
307	425		func claim (claimedAssetId58,userAddress58) = {
308	426		let callerAddress58 = toString(i.caller)
309	427		if ((userAddress58 != callerAddress58))
310	428		then throw("not authorized")
311	429		else {
	430	+	let cfgArray = readConfigArray()
	431	+	let priceAssetId58 = cfgArray[IdxCfgPriceAssetId]
312	432		let claimResultTuple = internalClaim(claimedAssetId58, i.caller, i.transactionId)
313	433		let totalsDiff = claimResultTuple._1
314	434		let outAmount = claimResultTuple._2
315	435		let outAssetId = claimResultTuple._3
316	436		let origInvestArray = claimResultTuple._4
317	437		let newClaimPeriodHeight = claimResultTuple._5
318	438		let claimedPriceAmountFromDiff = totalsDiff[IdxDiffClaimedPriceAmountIncrement]
319	439		let claimedIdoAssetAmountFromDiff = totalsDiff[IdxDiffClaimedIdoAssetAmountIncrement]
320		-	$Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
	440	+	let entries = if ((claimedAssetId58 == priceAssetId58))
	441	+	then {
	442	+	let $t02064921093 = internalClaimV2(priceAssetId58, userAddress58, outAmount, totalsDiff[IdxDiffClaimedPriceAmountIncrement])
	443	+	let periodMinAvailableToClaim = $t02064921093._1
	444	+	let periodTotalAvailableToClaim = $t02064921093._2
	445	+	let periodUserAvailableToClaim = $t02064921093._3
	446	+	let totalUserAvailableToClaim = $t02064921093._4
	447	+	let usdtPriceAssetAllowableRatio = $t02064921093._5
	448	+	let currentUsdtPriceAssetRatio = $t02064921093._6
	449	+	let endPeriodBlocksLeft = $t02064921093._7
	450	+	let updatedCurrentPeriod = $t02064921093._8
	451	+	let periodStart = $t02064921093._9
	452	+	let periodEnd = $t02064921093._10
	453	+	let checks = [if ((periodUserAvailableToClaim > 0))
	454	+	then true
	455	+	else throwErr("unavailable to claim because user period allowance reached"), if ((periodTotalAvailableToClaim > 0))
	456	+	then true
	457	+	else throwErr("unavailable to claim because total period allowance reached"), if ((periodMinAvailableToClaim > 0))
	458	+	then true
	459	+	else throwErr("nothing to claim"), if ((usdtPriceAssetAllowableRatio > currentUsdtPriceAssetRatio))
	460	+	then true
	461	+	else throwErr("unavailable to claim because usdn price lower than usdtPriceAssetAllowableRatio")]
	462	+	if ((checks == checks))
	463	+	then {
	464	+	let priceAssetBalance = valueOrElse(getInteger(keyPriceAssetBalance(userAddress58)), 0)
	465	+	let updatedPeriodTotalAvailableToClaim = (periodTotalAvailableToClaim - periodMinAvailableToClaim)
	466	+	let updatedPeriodUserAvailableToClaim = (periodUserAvailableToClaim - periodMinAvailableToClaim)
	467	+	let entries = if ((priceAssetBalance >= periodMinAvailableToClaim))
	468	+	then [ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), (priceAssetBalance - periodMinAvailableToClaim))]
	469	+	else {
	470	+	let updatedPriceAssetBalance = ((priceAssetBalance + outAmount) - periodMinAvailableToClaim)
	471	+	[ScriptTransfer(i.caller, periodMinAvailableToClaim, outAssetId), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), IntegerEntry(keyPriceAssetBalance(userAddress58), updatedPriceAssetBalance)]
	472	+	}
	473	+	$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)
	474	+	}
	475	+	else throw("Strict value is not equal to itself.")
	476	+	}
	477	+	else $Tuple2([ScriptTransfer(i.caller, outAmount, outAssetId), IntegerEntry(keyPriceAssetBalance(userAddress58), 0), TotalsEntry(keyInvestor(userAddress58), origInvestArray, totalsDiff, newClaimPeriodHeight), TotalsEntry(keyTotals(), readTotalsArrayOrDefault(), totalsDiff, newClaimPeriodHeight), ClaimOperationHistoryEntry(userAddress58, claimedPriceAmountFromDiff, claimedIdoAssetAmountFromDiff, i.transactionId)], unit)
	478	+	entries
321	479		}
322	480		}
323	481
324	482
325	483
326	484		@Callable(i)
327	485		func claimREADONLY (claimedAssetId58,userAddress58) = {

github/deemru/w8io/026f985 
50.83 ms ◑