w8 · tx

2021.07.30 14:26 [2701107] smart account 3P9ZegsKUtsEpdRPNVrMH7nHEEqY5MrmjDp > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Zhqqiw64waexbqNmYJEpfSZw6nCaPjYkaAyAmn7dcyj",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1627643527208,
    "version": 1,
    "sender": "3P9ZegsKUtsEpdRPNVrMH7nHEEqY5MrmjDp",
    "senderPublicKey": "7ziFsWp9eo6kUB6ovqQzJfjgQarifNfpCGNW9DZi8YhN",
    "proofs": [
        "5AWr6yjjfF9fQeFrLbDfw9KM1gwbFy3WDzTEvoGdpgCEZTEo2QPyFs5BHDxCPPxEq947odfGBWjZmookPZ4zhwD6",
        "3EjQ7SGE835GujegfU1KS3oeGGddsMqp138LNdt7jcSHqPSZ6Ng8p1J5MCCrwWYacb9s6eHh3bqVFVRFXbjVu7PR"
    ],
    "script": "base64:AAIFAAAAAAAAACwIAhIDCgEEEgMKAQQSAwoBARIDCgEBEgQKAggBEgASABIAEgASABIAEgASAAAAAG4BAAAAAlNFAAAAAgAAAAFrAAAAAXYJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAWsFAAAAAXYBAAAAAklFAAAAAgAAAAFrAAAAAXYJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAFrBQAAAAF2AQAAAAJTVAAAAAMAAAABYQAAAANhbXQAAAABdAkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAABYQUAAAADYW10BQAAAAF0AAAAAAR0ZW42AAAAAAAAD0JAAAAAAAR0ZW44AAAAAAAF9eEAAAAAAANNQVgAf/////////8AAAAAEWNvbmZpZ1Byb3ZpZGVyS2V5AgAAAA5jb25maWdQcm92aWRlcgAAAAAOY29uZmlnUHJvdmlkZXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAARY29uZmlnUHJvdmlkZXJLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAABcwUAAAAEdGhpcwEAAAAGbG9jYWxJAAAAAgAAAAFrAAAAAWUJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAAFrBQAAAAFlAQAAAAZsb2NhbFMAAAACAAAAAWsAAAABZQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMFAAAAAWsFAAAAAWUBAAAABWNvbmZJAAAAAgAAAAFrAAAAAWUJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAA5jb25maWdQcm92aWRlcgUAAAABawUAAAABZQEAAAAFY29uZlMAAAACAAAAAWsAAAABZQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAADmNvbmZpZ1Byb3ZpZGVyBQAAAAFrBQAAAAFlAAAAAAVCVUxMSwIAAAAGQlVMTElkAAAAAAVCRUFSSwIAAAAGQkVBUklkAAAAAAVVU0ROSwIAAAALbWFpblRva2VuSWQAAAAACEJVTExDT0xLAgAAAA5idWxsQ29sbGF0ZXJhbAAAAAAIQkVBUkNPTEsCAAAADmJlYXJDb2xsYXRlcmFsAAAAAAlCVUxMQ0lSQ0sCAAAAD2J1bGxDaXJjdWxhdGlvbgAAAAAJQkVBUkNJUkNLAgAAAA9iZWFyQ2lyY3VsYXRpb24AAAAACElTU1BFUkNLAgAAAA9pc3N1ZVBlcmNlbnRpbGUAAAAACFJFRFBFUkNLAgAAABByZWRlZW1QZXJjZW50aWxlAAAAAAdNSU5JU1NLAgAAAAhtaW5Jc3N1ZQAAAAAHTUlOUkVESwIAAAAJbWluUmVkZWVtAAAAAAhNSU5QT09MSwIAAAAHbWluUG9vbAAAAAAHRkVFQUNDSwIAAAAPZmVlc0FjY3VtdWxhdGVkAAAAAAZXTElTVEsCAAAADmlzc3VlV2hpdGVMaXN0AAAAAAhSRUJQRVJDSwIAAAATcmViYWxhbmNlUGVyY2VudGlsZQAAAAAHUkVCSURYSwIAAAAVbGFzdFNldHRsZW1lbnRQcmljZUlkAAAAAAVIRUFESwIAAAALaGVhZFBvaW50ZXIAAAAABVRBSUxLAgAAAAt0YWlsUG9pbnRlcgAAAAAGUVNJWkVLAgAAAAlxdWV1ZVNpemUAAAAACVBPT0xVU0ROSwIAAAAScG9vbE1haW5Ub2tlblZhbHVlAAAAAAdQT09MVVBLAgAAAAZwb29sVXAAAAAACFBPT0xEV05LAgAAAAdwb29sRHduAAAAAAlQT09MQ0lSQ0sCAAAAFHBvb2xUb2tlbkNpcmN1bGF0aW9uAAAAAAVQT09MSwIAAAAJcG9vbFRva2VuAAAAAARMRVZLAgAAAAhsZXZlcmFnZQAAAAAJV0FWRVNGRUVLAgAAABF3YXZlc1BhY2VtYWtlckZlZQAAAAAIVVNETkZFRUsCAAAAEHVzZG5QYWNlbWFrZXJGZWUAAAAAC29yYWNsZXYyS2V5AgAAAAhvcmFjbGV2MgAAAAAMYXNzZXRpZHYyS2V5AgAAAAlhc3NldGlkdjIAAAAACG9yYWNsZXYyCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAALb3JhY2xldjJLZXkCAAAAD25vIG9yYWNsZXYyIGtleQAAAAAJYXNzZXRpZHYyCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAAMYXNzZXRpZHYyS2V5AgAAAAxubyBhc3NldGlkdjIAAAAADG1heERldmlhdGlvbgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAA5jb25maWdQcm92aWRlcgkAASwAAAACCQAEJQAAAAEFAAAABHRoaXMCAAAAFF9kZXZpYXRpb25QZXJjZW50aWxlAAAAAAAAAAAAAAAAABFsYXN0UHJpY2VJbmRleEtleQkAASwAAAACAgAAABIlcyVzX19pZHhDdXJyZW50X18FAAAACWFzc2V0aWR2MgAAAAAQcHJpY2VJbmRleFByZWZpeAkAASwAAAACCQABLAAAAAICAAAAFCVzJXMlZF9faWR4MkhlaWdodF9fBQAAAAlhc3NldGlkdjICAAAAAl9fAAAAABFwcmljZUhlaWdodFByZWZpeAkAASwAAAACCQABLAAAAAICAAAAFyVzJXMlZF9fcHJpY2VCeUhlaWdodF9fBQAAAAlhc3NldGlkdjICAAAAAl9fAAAAAAptaW5Vc2RuRmVlCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAADmNvbmZpZ1Byb3ZpZGVyBQAAAAhVU0RORkVFSwAAAAAAAAAAAAAAAAALbWluV2F2ZXNGZWUJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAOY29uZmlnUHJvdmlkZXIFAAAACVdBVkVTRkVFSwAAAAAAAAAAAAAAAAAHYnVsbENvbAkBAAAABmxvY2FsSQAAAAIFAAAACEJVTExDT0xLAgAAAARubyAwAAAAAAdiZWFyQ29sCQEAAAAGbG9jYWxJAAAAAgUAAAAIQkVBUkNPTEsCAAAABG5vIDEAAAAACGJ1bGxDaXJjCQEAAAAGbG9jYWxJAAAAAgUAAAAJQlVMTENJUkNLAgAAAARubyAyAAAAAAhiZWFyQ2lyYwkBAAAABmxvY2FsSQAAAAIFAAAACUJFQVJDSVJDSwIAAAAEbm8gMwAAAAAEQlVMTAkBAAAABmxvY2FsUwAAAAIFAAAABUJVTExLAgAAAAVubyAxNAAAAAAEQkVBUgkBAAAABmxvY2FsUwAAAAIFAAAABUJFQVJLAgAAAAVubyAxNQAAAAAJbWFpblRva2VuCQEAAAAGbG9jYWxTAAAAAgUAAAAFVVNETksCAAAABW5vIDE2AAAAAA9pc3N1ZVBlcmNlbnRpbGUJAQAAAAVjb25mSQAAAAIFAAAACElTU1BFUkNLAgAAAARubyA0AAAAABByZWRlZW1QZXJjZW50aWxlCQEAAAAFY29uZkkAAAACBQAAAAhSRURQRVJDSwIAAAAEbm8gNQAAAAAIbWluSXNzdWUJAQAAAAVjb25mSQAAAAIFAAAAB01JTklTU0sCAAAABG5vIDYAAAAACW1pblJlZGVlbQkBAAAABWNvbmZJAAAAAgUAAAAHTUlOUkVESwIAAAAEbm8gNwAAAAAHbWluUG9vbAkBAAAABWNvbmZJAAAAAgUAAAAITUlOUE9PTEsCAAAABG5vIDgAAAAAE3JlYmFsYW5jZVBlcmNlbnRpbGUJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAOY29uZmlnUHJvdmlkZXIJAAEsAAAAAgkAASwAAAACCQAEJQAAAAEFAAAABHRoaXMCAAAAAV8FAAAACFJFQlBFUkNLAAAAAAAAAAAAAAAAAAl3aGl0ZWxpc3QJAQAAAAVjb25mUwAAAAIFAAAABldMSVNUSwIAAAAEbm8gOQEAAAAHYWxsb3dlZAAAAAEAAAABYQMJAAAAAAAAAgUAAAAJd2hpdGVsaXN0AgAAAAAGCQEAAAAJaXNEZWZpbmVkAAAAAQkABLMAAAACBQAAAAl3aGl0ZWxpc3QJAAQlAAAAAQUAAAABYQAAAAAIcG9vbE1haW4JAQAAAAZsb2NhbEkAAAACBQAAAAlQT09MVVNETksCAAAAAm5vAAAAAAZwb29sVXAJAQAAAAZsb2NhbEkAAAACBQAAAAdQT09MVVBLAgAAAAVubyAxMAAAAAAHcG9vbER3bgkBAAAABmxvY2FsSQAAAAIFAAAACFBPT0xEV05LAgAAAAVubyAxMQAAAAAJcG9vbFRva2VuCQEAAAAGbG9jYWxTAAAAAgUAAAAFUE9PTEsCAAAABW5vIDEyAAAAABRwb29sVG9rZW5DaXJjdWxhdGlvbgkBAAAABmxvY2FsSQAAAAIFAAAACVBPT0xDSVJDSwIAAAAFbm8gMTMAAAAAEHBvb2xCdWxsRXhwb3N1cmUJAABrAAAAAwUAAAAHYnVsbENvbAUAAAAGcG9vbFVwBQAAAAhidWxsQ2lyYwAAAAAQcG9vbEJlYXJFeHBvc3VyZQkAAGsAAAADBQAAAAdiZWFyQ29sBQAAAAdwb29sRHduBQAAAAhiZWFyQ2lyYwAAAAAJcG9vbFZhbHVlCQAAZAAAAAIJAABkAAAAAgUAAAAIcG9vbE1haW4FAAAAEHBvb2xCdWxsRXhwb3N1cmUFAAAAEHBvb2xCZWFyRXhwb3N1cmUAAAAABm9yYWNsZQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEJgAAAAEFAAAACG9yYWNsZXYyAgAAABJiYWQgb3JhY2xlIGFkZHJlc3MAAAAADWNsb3NlSW50ZXJ2YWwJAQAAAAVjb25mSQAAAAICAAAADWNsb3NlSW50ZXJ2YWwCAAAABW5vIENJAAAAABFzZXR0bGVkUHJpY2VJbmRleAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMFAAAAB1JFQklEWEsCAAAAF25vIGxhc3QgcmViYWxhbmNlIHByaWNlAAAAABBvcmFjbGVQcmljZUluZGV4CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAGb3JhY2xlBQAAABFsYXN0UHJpY2VJbmRleEtleQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAATYmFkIG9yYWNsZSBkYXRhIGF0IAkABCUAAAABBQAAAAZvcmFjbGUCAAAAEDogbm8gaW50ZWdlciBhdCAFAAAAEWxhc3RQcmljZUluZGV4S2V5AAAAAAhsZXZlcmFnZQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAARMRVZLAAAAAAAAAAADAQAAAA1oZWlnaHRCeUluZGV4AAAAAQAAAApwcmljZUluZGV4CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAGb3JhY2xlCQABLAAAAAIFAAAAEHByaWNlSW5kZXhQcmVmaXgJAAGkAAAAAQUAAAAKcHJpY2VJbmRleAkAASwAAAACAgAAABFubyBkYXRhIGF0IGluZGV4IAkAAaQAAAABBQAAAApwcmljZUluZGV4AQAAAA1wcmljZUJ5SGVpZ2h0AAAAAQAAAAtwcmljZUhlaWdodAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABm9yYWNsZQkAASwAAAACBQAAABFwcmljZUhlaWdodFByZWZpeAkAAaQAAAABBQAAAAtwcmljZUhlaWdodAkAASwAAAACAgAAABNubyBkYXRhIGZvciBoZWlnaHQgCQABpAAAAAEFAAAAC3ByaWNlSGVpZ2h0AQAAAAxwcmljZUJ5SW5kZXgAAAABAAAACnByaWNlSW5kZXgJAQAAAA1wcmljZUJ5SGVpZ2h0AAAAAQkBAAAADWhlaWdodEJ5SW5kZXgAAAABBQAAAApwcmljZUluZGV4AAAAAAlxdWV1ZVNpemUJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAAGUVNJWkVLAAAAAAAAAAAAAAAAAAtoZWFkUG9pbnRlcgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAAVIRUFESwIAAAAAAAAAAAt0YWlsUG9pbnRlcgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAAVUQUlMSwIAAAAAAAAAAA9mZWVzQWNjdW11bGF0ZWQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAAHRkVFQUNDSwAAAAAAAAAAAAAAAAAKcXVldWVFbXB0eQkAAAAAAAACBQAAAAtoZWFkUG9pbnRlcgIAAAAAAAAAAA9xdWV1ZVByaWNlSW5kZXgDBQAAAApxdWV1ZUVtcHR5BQAAAANNQVgEAAAABGRhdGEJAAS1AAAAAgkBAAAABmxvY2FsUwAAAAIFAAAAC2hlYWRQb2ludGVyAgAAABlzZXR0bGUyOiBiYWQgaGVhZCBwb2ludGVyAgAAAAF8CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAwAAAAAMc2V0dGxlZFByaWNlCQEAAAAMcHJpY2VCeUluZGV4AAAAAQUAAAARc2V0dGxlZFByaWNlSW5kZXgAAAAABUlTU1VFAgAAAAVJU1NVRQAAAAAGUkVERUVNAgAAAAZSRURFRU0AAAAABFBPT0wCAAAABFBPT0wAAAAABlVOUE9PTAIAAAAGVU5QT09MAAAAAApmZWVBZGRyS2V5AgAAAApmZWVBZGRyZXNzAAAAAA5zdGFraW5nQWRkcktleQIAAAAOc3Rha2luZ0FkZHJlc3MAAAAAD2RhZW1vblB1YktleUtleQIAAAAPZGFlbW9uUHVibGljS2V5AAAAAApmZWVBZGRyZXNzCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQkBAAAABWNvbmZTAAAAAgUAAAAKZmVlQWRkcktleQIAAAANbm8gZmVlQWRkcmVzcwIAAAAOYmFkIGZlZUFkZHJlc3MAAAAADnN0YWtpbmdBZGRyZXNzCQEAAAAFY29uZlMAAAACBQAAAA5zdGFraW5nQWRkcktleQIAAAARbm8gc3Rha2luZ0FkZHJlc3MAAAAAD2RhZW1vblB1YmxpY0tleQkAAlkAAAABCQEAAAAFY29uZlMAAAACBQAAAA9kYWVtb25QdWJLZXlLZXkCAAAAEm5vIGRhZW1vblB1YmxpY0tleQAAAAAKcnBkQWRkcmVzcwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEJgAAAAECAAAAIzNQTmlrTTZ5cDROcWNTVThndXhRdG1SNW9ucjJENGU4eVRKAgAAAA9iYWQgcnBkIGFkZHJlc3MAAAAABmFkbWlucwkABEwAAAACAgAAACwySEhxVjhXOURKYXlWNVI2dEJEMlNiOHNycGhwb2JvRGk3cjF0MWFQaXVtQwkABEwAAAACAgAAACw1WlhlODJSUkFTVTdxc2hYTTJKOUpOWWhxSjlHV1lqalZxMmd3VVY1TmF6OQkABEwAAAACAgAAACw1V1JYRlNqd2NUYk5mS2NKczhacVhtU1NXWXNTVkpVdE12TXFaajVoSDROYwUAAAADbmlsAQAAAAxidWlsZE5ld0l0ZW0AAAAHAAAABmFjdGlvbgAAAANhbXQAAAAFdG9rZW4AAAAKcHJpY2VJbmRleAAAAAdpbnZva2VyAAAACW1pblBheW91dAAAAAltYXhQYXlvdXQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGYWN0aW9uAgAAAAF8CQABpAAAAAEFAAAAA2FtdAIAAAABfAUAAAAFdG9rZW4CAAAAAXwJAAGkAAAAAQUAAAAKcHJpY2VJbmRleAIAAAABfAUAAAAHaW52b2tlcgIAAAABfAkAAaQAAAABBQAAAAltaW5QYXlvdXQCAAAAAXwJAAGkAAAAAQUAAAAJbWF4UGF5b3V0AgAAAAF8AQAAAAdkaWZmQWJzAAAAAgAAAAJhMQAAAAJhMgQAAAAEZGlmZgkAAGUAAAACBQAAAAJhMQUAAAACYTIDCQAAZgAAAAIFAAAABGRpZmYAAAAAAAAAAAAFAAAABGRpZmYJAABlAAAAAgAAAAAAAAAAAAUAAAAEZGlmZgEAAAALdXNlckRpZmZBYnMAAAAACQEAAAAHZGlmZkFicwAAAAIJAABlAAAAAgUAAAAHYnVsbENvbAUAAAAQcG9vbEJ1bGxFeHBvc3VyZQkAAGUAAAACBQAAAAdiZWFyQ29sBQAAABBwb29sQmVhckV4cG9zdXJlAQAAAAhtYXhJc3N1ZQAAAAEAAAAHdG9rZW5JZAQAAAAOcG9vbEludmVzdG1lbnQDCQAAZgAAAAIFAAAABnBvb2xVcAAAAAAAAAAAAAUAAAAEQlVMTAUAAAAEQkVBUgMJAQAAAAIhPQAAAAIFAAAAB3Rva2VuSWQFAAAADnBvb2xJbnZlc3RtZW50BQAAAAhwb29sTWFpbgkAAGQAAAACCQEAAAALdXNlckRpZmZBYnMAAAAABQAAAAlwb29sVmFsdWUBAAAADXZhbGlkYXRlUE1GZWUAAAACAAAAAWkAAAAJbWluUGF5b3V0AwkAAGYAAAACAAAAAAAAAAAABQAAAAltaW5QYXlvdXQJAAACAAAAAQIAAAATbmVnYXRpdmUgbWluIHBheW91dAQAAAABcAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQQAAAACb2sEAAAAByRtYXRjaDAIBQAAAAFwAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAmJ2BQAAAAckbWF0Y2gwAwkAAAAAAAACCQACWAAAAAEFAAAAAmJ2BQAAAAltYWluVG9rZW4JAABnAAAAAggFAAAAAXAAAAAGYW1vdW50BQAAAAptaW5Vc2RuRmVlBwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAQAAAAFd2F2ZXMFAAAAByRtYXRjaDAJAABnAAAAAggFAAAAAXAAAAAGYW1vdW50BQAAAAttaW5XYXZlc0ZlZQkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgMJAQAAAAEhAAAAAQUAAAACb2sJAAACAAAAAQIAAAAXaW5jb3JyZWN0IHBhY2VtYWtlciBmZWUGAQAAAAdlbnF1ZXVlAAAACAAAAAJpZAAAAAZhY3Rpb24AAAADYW10AAAABXRva2VuAAAACnByaWNlSW5kZXgAAAAHaW52b2tlcgAAAAltaW5QYXlvdXQAAAAJbWF4UGF5b3V0AwkBAAAAASEAAAABCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGwAAAAIFAAAABHRoaXMCAAAADWVuYWJsZUVucXVldWUGCQAAAgAAAAECAAAADmVucXVldWUgcGF1c2VkBAAAABFpbmNyZWFzZVF1ZXVlU2l6ZQkBAAAAAklFAAAAAgUAAAAGUVNJWkVLCQAAZAAAAAIFAAAACXF1ZXVlU2l6ZQAAAAAAAAAAAQQAAAADaXRtCQEAAAAMYnVpbGROZXdJdGVtAAAABwUAAAAGYWN0aW9uBQAAAANhbXQFAAAABXRva2VuBQAAAApwcmljZUluZGV4BQAAAAdpbnZva2VyBQAAAAltaW5QYXlvdXQFAAAACW1heFBheW91dAMJAAAAAAAAAgUAAAAJcXVldWVTaXplAAAAAAAAAAAACQAETAAAAAIJAQAAAAJTRQAAAAIFAAAABUhFQURLBQAAAAJpZAkABEwAAAACCQEAAAACU0UAAAACBQAAAAVUQUlMSwUAAAACaWQJAARMAAAAAgkBAAAAAlNFAAAAAgUAAAACaWQFAAAAA2l0bQkABEwAAAACBQAAABFpbmNyZWFzZVF1ZXVlU2l6ZQUAAAADbmlsBAAAAAZwcmV2SWQJAQAAAAZsb2NhbFMAAAACBQAAAAVUQUlMSwIAAAAWY2FuJ3QgZ2V0IHRhaWwgcG9pbnRlcgQAAAAHcHJldkl0bQkBAAAABmxvY2FsUwAAAAIFAAAABnByZXZJZAIAAAAVY2FuJ3QgcmVzb2x2ZSBwb2ludGVyBAAAAA51cGRhdGVkUHJldkl0bQkAASwAAAACBQAAAAdwcmV2SXRtBQAAAAJpZAkABEwAAAACCQEAAAACU0UAAAACBQAAAAZwcmV2SWQFAAAADnVwZGF0ZWRQcmV2SXRtCQAETAAAAAIJAQAAAAJTRQAAAAIFAAAAAmlkBQAAAANpdG0JAARMAAAAAgkBAAAAAlNFAAAAAgUAAAAFVEFJTEsFAAAAAmlkCQAETAAAAAIFAAAAEWluY3JlYXNlUXVldWVTaXplBQAAAANuaWwBAAAAC3Bvb2xTdXBwb3J0AAAACAAAAAtjdXJCdWxsQ29sMAAAAAtjdXJCZWFyQ29sMAAAAAxjdXJCdWxsQ2lyYzAAAAAMY3VyQmVhckNpcmMwAAAADGN1clBvb2xNYWluMAAAAApjdXJQb29sVXAwAAAAC2N1clBvb2xEd24wAAAABXN0ZXBzCgEAAAAHY2xvc2VVcAAAAAcAAAACYzEAAAACYzIAAAACYTAAAAACYTEAAAACYzAAAAACcHUAAAACcGQEAAAABGRpZmYJAABlAAAAAgUAAAACYzEFAAAAAmMyBAAAAANleHAJAABrAAAAAwUAAAACYzEFAAAAAnB1BQAAAAJhMAQAAAAQbGlxdWlkYXRlZFRva2VucwMJAABmAAAAAgUAAAAEZGlmZgUAAAADZXhwBQAAAAJwdQkAAGsAAAADBQAAAARkaWZmBQAAAAJhMAUAAAACYzEEAAAAD2xpcXVpZGF0ZWRWYWx1ZQMJAABmAAAAAgUAAAAEZGlmZgUAAAADZXhwBQAAAANleHAJAABrAAAAAwUAAAAQbGlxdWlkYXRlZFRva2VucwUAAAACYzEFAAAAAmEwCQAFGQAAAAcJAABlAAAAAgUAAAACYzEFAAAAD2xpcXVpZGF0ZWRWYWx1ZQUAAAACYzIJAABlAAAAAgUAAAACYTAFAAAAEGxpcXVpZGF0ZWRUb2tlbnMFAAAAAmExCQAAZAAAAAIFAAAAAmMwBQAAAA9saXF1aWRhdGVkVmFsdWUJAABlAAAAAgUAAAACcHUFAAAAEGxpcXVpZGF0ZWRUb2tlbnMFAAAAAnBkCgEAAAAIY2xvc2VEd24AAAAHAAAAAmMxAAAAAmMyAAAAAmEwAAAAAmExAAAAAmMwAAAAAnB1AAAAAnBkBAAAAARkaWZmCQAAZQAAAAIFAAAAAmMyBQAAAAJjMQQAAAADZXhwCQAAawAAAAMFAAAAAmMyBQAAAAJwZAUAAAACYTEEAAAAEGxpcXVpZGF0ZWRUb2tlbnMDCQAAZgAAAAIFAAAABGRpZmYFAAAAA2V4cAUAAAACcGQJAABrAAAAAwUAAAAEZGlmZgUAAAACYTEFAAAAAmMyBAAAAA9saXF1aWRhdGVkVmFsdWUDCQAAZgAAAAIFAAAABGRpZmYFAAAAA2V4cAUAAAADZXhwCQAAawAAAAMFAAAAEGxpcXVpZGF0ZWRUb2tlbnMFAAAAAmMyBQAAAAJhMQkABRkAAAAHBQAAAAJjMQkAAGUAAAACBQAAAAJjMgUAAAAPbGlxdWlkYXRlZFZhbHVlBQAAAAJhMAkAAGUAAAACBQAAAAJhMQUAAAAQbGlxdWlkYXRlZFRva2VucwkAAGQAAAACBQAAAAJjMAUAAAAPbGlxdWlkYXRlZFZhbHVlBQAAAAJwdQkAAGUAAAACBQAAAAJwZAUAAAAQbGlxdWlkYXRlZFRva2VucwoBAAAAB29wZW5Ed24AAAAHAAAAAmMxAAAAAmMyAAAAAmEwAAAAAmExAAAAAmMwAAAAAnB1AAAAAnBkBAAAAARkaWZmCQAAZQAAAAIFAAAAAmMxBQAAAAJjMgQAAAAOc3BlbnRQb29sVmFsdWUDCQAAZgAAAAIFAAAAAmMwBQAAAARkaWZmBQAAAARkaWZmBQAAAAJjMAQAAAAOYWNxdWlyZWRUb2tlbnMJAABrAAAAAwUAAAAOc3BlbnRQb29sVmFsdWUFAAAAAmExBQAAAAJjMgkABRkAAAAHBQAAAAJjMQkAAGQAAAACBQAAAAJjMgUAAAAOc3BlbnRQb29sVmFsdWUFAAAAAmEwCQAAZAAAAAIFAAAAAmExBQAAAA5hY3F1aXJlZFRva2VucwkAAGUAAAACBQAAAAJjMAUAAAAOc3BlbnRQb29sVmFsdWUFAAAAAnB1CQAAZAAAAAIFAAAAAnBkBQAAAA5hY3F1aXJlZFRva2VucwoBAAAABm9wZW5VcAAAAAcAAAACYzEAAAACYzIAAAACYTAAAAACYTEAAAACYzAAAAACcHUAAAACcGQEAAAABGRpZmYJAABlAAAAAgUAAAACYzIFAAAAAmMxBAAAAA5zcGVudFBvb2xWYWx1ZQMJAABmAAAAAgUAAAACYzAFAAAABGRpZmYFAAAABGRpZmYFAAAAAmMwBAAAAA5hY3F1aXJlZFRva2VucwkAAGsAAAADBQAAAA5zcGVudFBvb2xWYWx1ZQUAAAACYTAFAAAAAmMxCQAFGQAAAAcJAABkAAAAAgUAAAACYzEFAAAADnNwZW50UG9vbFZhbHVlBQAAAAJjMgkAAGQAAAACBQAAAAJhMAUAAAAOYWNxdWlyZWRUb2tlbnMFAAAAAmExCQAAZQAAAAIFAAAAAmMwBQAAAA5zcGVudFBvb2xWYWx1ZQkAAGQAAAACBQAAAAJwdQUAAAAOYWNxdWlyZWRUb2tlbnMFAAAAAnBkBAAAAAwkdDA5MjU0MTAyODkDCQAAZgAAAAIFAAAAC2N1ckJ1bGxDb2wwBQAAAAtjdXJCZWFyQ29sMAQAAAAMYWZ0ZXJDbG9zZVVwCQEAAAAHY2xvc2VVcAAAAAcFAAAAC2N1ckJ1bGxDb2wwBQAAAAtjdXJCZWFyQ29sMAUAAAAMY3VyQnVsbENpcmMwBQAAAAxjdXJCZWFyQ2lyYzAFAAAADGN1clBvb2xNYWluMAUAAAAKY3VyUG9vbFVwMAUAAAALY3VyUG9vbER3bjAEAAAACyR0MDk0ODA5NjE3BQAAAAxhZnRlckNsb3NlVXAEAAAAAWEIBQAAAAskdDA5NDgwOTYxNwAAAAJfMQQAAAABYggFAAAACyR0MDk0ODA5NjE3AAAAAl8yBAAAAAFjCAUAAAALJHQwOTQ4MDk2MTcAAAACXzMEAAAAAWQIBQAAAAskdDA5NDgwOTYxNwAAAAJfNAQAAAABZQgFAAAACyR0MDk0ODA5NjE3AAAAAl81BAAAAAFmCAUAAAALJHQwOTQ4MDk2MTcAAAACXzYEAAAAAWcIBQAAAAskdDA5NDgwOTYxNwAAAAJfNwMJAABmAAAAAgUAAAABZgAAAAAAAAAAAAUAAAAMYWZ0ZXJDbG9zZVVwAwkAAAAAAAACBQAAAAFmAAAAAAAAAAAACQEAAAAHb3BlbkR3bgAAAAcFAAAAAWEFAAAAAWIFAAAAAWMFAAAAAWQFAAAAAWUFAAAAAWYFAAAAAWcJAAACAAAAAQIAAAAKcG9vbFVwIDwgMAQAAAANYWZ0ZXJDbG9zZUR3bgkBAAAACGNsb3NlRHduAAAABwUAAAALY3VyQnVsbENvbDAFAAAAC2N1ckJlYXJDb2wwBQAAAAxjdXJCdWxsQ2lyYzAFAAAADGN1ckJlYXJDaXJjMAUAAAAMY3VyUG9vbE1haW4wBQAAAApjdXJQb29sVXAwBQAAAAtjdXJQb29sRHduMAQAAAAMJHQwOTk2ODEwMTA4BQAAAA1hZnRlckNsb3NlRHduBAAAAAFhCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl8xBAAAAAFiCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl8yBAAAAAFjCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl8zBAAAAAFkCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl80BAAAAAFlCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl81BAAAAAFmCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl82BAAAAAFnCAUAAAAMJHQwOTk2ODEwMTA4AAAAAl83AwkAAGYAAAACBQAAAAFnAAAAAAAAAAAABQAAAA1hZnRlckNsb3NlRHduAwkAAAAAAAACBQAAAAFnAAAAAAAAAAAACQEAAAAGb3BlblVwAAAABwUAAAABYQUAAAABYgUAAAABYwUAAAABZAUAAAABZQUAAAABZgUAAAABZwkAAAIAAAABAgAAAAtwb29sRHduIDwgMAQAAAACYzEIBQAAAAwkdDA5MjU0MTAyODkAAAACXzEEAAAAAmMyCAUAAAAMJHQwOTI1NDEwMjg5AAAAAl8yBAAAAAJhMAgFAAAADCR0MDkyNTQxMDI4OQAAAAJfMwQAAAACYTEIBQAAAAwkdDA5MjU0MTAyODkAAAACXzQEAAAAAmMwCAUAAAAMJHQwOTI1NDEwMjg5AAAAAl81BAAAAAJwdQgFAAAADCR0MDkyNTQxMDI4OQAAAAJfNgQAAAACcGQIBQAAAAwkdDA5MjU0MTAyODkAAAACXzcEAAAABmNoYXJnZQkAAGsAAAADCQEAAAALdXNlckRpZmZBYnMAAAAACQAAaAAAAAIFAAAAE3JlYmFsYW5jZVBlcmNlbnRpbGUFAAAABXN0ZXBzCQAAaAAAAAIJAABoAAAAAgAAAAAAAAAFoAAAAAAAAAAAZAAAAAAAAAAAZAQAAAAIYzFTcGxpdFADCQAAZgAAAAIFAAAAAnBkAAAAAAAAAAAABQAAAAZjaGFyZ2UAAAAAAAAAAAAEAAAACGMyU3BsaXRQAwkAAGYAAAACBQAAAAJwdQAAAAAAAAAAAAUAAAAGY2hhcmdlAAAAAAAAAAAACQAFGQAAAAcJAABlAAAAAgUAAAACYzEFAAAACGMxU3BsaXRQCQAAZQAAAAIFAAAAAmMyBQAAAAhjMlNwbGl0UAUAAAACYTAFAAAAAmExCQAAZAAAAAIJAABkAAAAAgUAAAACYzAFAAAACGMxU3BsaXRQBQAAAAhjMlNwbGl0UAUAAAACcHUFAAAAAnBkAQAAAAdwb29sU3VwAAAABAAAAAtjdXJCdWxsQ29sMAAAAAtjdXJCZWFyQ29sMAAAAAxjdXJCdWxsQ2lyYzAAAAAMY3VyQmVhckNpcmMwBAAAAA0kdDAxMDcxNDEwODk5CQEAAAALcG9vbFN1cHBvcnQAAAAIBQAAAAtjdXJCdWxsQ29sMAUAAAALY3VyQmVhckNvbDAFAAAADGN1ckJ1bGxDaXJjMAUAAAAMY3VyQmVhckNpcmMwBQAAAAhwb29sTWFpbgUAAAAGcG9vbFVwBQAAAAdwb29sRHduAAAAAAAAAAAABAAAAAhidWxsQ29sMQgFAAAADSR0MDEwNzE0MTA4OTkAAAACXzEEAAAACGJlYXJDb2wxCAUAAAANJHQwMTA3MTQxMDg5OQAAAAJfMgQAAAAIYnVsbENpYzEIBQAAAA0kdDAxMDcxNDEwODk5AAAAAl8zBAAAAAliZWFyQ2lyYzEIBQAAAA0kdDAxMDcxNDEwODk5AAAAAl80BAAAAAlwb29sTWFpbjEIBQAAAA0kdDAxMDcxNDEwODk5AAAAAl81BAAAAAdwb29sVXAxCAUAAAANJHQwMTA3MTQxMDg5OQAAAAJfNgQAAAAIcG9vbER3bjEIBQAAAA0kdDAxMDcxNDEwODk5AAAAAl83CQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACEJVTExDT0xLBQAAAAhidWxsQ29sMQkABEwAAAACCQEAAAACSUUAAAACBQAAAAlCVUxMQ0lSQ0sFAAAACGJ1bGxDaWMxCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACEJFQVJDT0xLBQAAAAhiZWFyQ29sMQkABEwAAAACCQEAAAACSUUAAAACBQAAAAlCRUFSQ0lSQ0sFAAAACWJlYXJDaXJjMQkABEwAAAACCQEAAAACSUUAAAACBQAAAAlQT09MVVNETksFAAAACXBvb2xNYWluMQkABEwAAAACCQEAAAACSUUAAAACBQAAAAdQT09MVVBLBQAAAAdwb29sVXAxCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACFBPT0xEV05LBQAAAAhwb29sRHduMQUAAAADbmlsAQAAAAdkZXF1ZXVlAAAAAAoBAAAAAnNwAAAAAgAAAAFhAAAAAm14AwkAAGcAAAACBQAAAAJteAUAAAABYQkABRQAAAACBQAAAAFhAAAAAAAAAAAACQAFFAAAAAIFAAAAAm14CQAAZQAAAAIFAAAAAWEFAAAAAm14AwkAAAAAAAACBQAAAAlxdWV1ZVNpemUAAAAAAAAAAAAJAAACAAAAAQIAAAARbm90aGluZyB0byBzZXR0bGUKAQAAAApjb2xsZWN0RmVlAAAAAQAAAARmZWVzCQEAAAACSUUAAAACBQAAAAdGRUVBQ0NLCQAAZAAAAAIFAAAAD2ZlZXNBY2N1bXVsYXRlZAUAAAAEZmVlcwQAAAARZGVjcmVhc2VRdWV1ZVNpemUJAQAAAAJJRQAAAAIFAAAABlFTSVpFSwkAAGUAAAACBQAAAAlxdWV1ZVNpemUAAAAAAAAAAAEEAAAADWlzTGFzdEVsZW1lbnQJAAAAAAAAAgUAAAALaGVhZFBvaW50ZXIFAAAAC3RhaWxQb2ludGVyBAAAAA1vdmVyd3JpdGVUYWlsCQEAAAACU0UAAAACBQAAAAVUQUlMSwIAAAAABAAAAAdkYXRhU3RyCQEAAAAGbG9jYWxTAAAAAgUAAAALaGVhZFBvaW50ZXICAAAAGWJhZCBoZWFkIHBvaW50ZXIoZGVxdWV1ZSkEAAAABGRhdGEJAAS1AAAAAgUAAAAHZGF0YVN0cgIAAAABfAQAAAAGYWN0aW9uCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAAEAAAAA2FtdAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAEEAAAABXRva2VuCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAIEAAAACnByaWNlSW5kZXgJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAADBAAAAAdpbnZva2VyCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAQEAAAACW1pblBheW91dAMJAABmAAAAAgAAAAAAAAAACAkAAZAAAAABBQAAAARkYXRhAAAAAAAAAAAACQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAABQQAAAAJbWF4UGF5b3V0AwkAAGYAAAACAAAAAAAAAAAICQABkAAAAAEFAAAABGRhdGEFAAAAA01BWAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAYEAAAABG5leHQJAAGRAAAAAgUAAAAEZGF0YQkAAGUAAAACCQABkAAAAAEFAAAABGRhdGEAAAAAAAAAAAEKAQAAAAdwYXliYWNrAAAAAQAAAAN0a24JAARMAAAAAgkBAAAAAlNFAAAAAgUAAAAFSEVBREsFAAAABG5leHQJAARMAAAAAgUAAAARZGVjcmVhc2VRdWV1ZVNpemUJAARMAAAAAgkBAAAAAlNUAAAAAwUAAAAHaW52b2tlcgUAAAADYW10CQACWQAAAAEFAAAAA3RrbgUAAAADbmlsBAAAAAVpdGVtcwMJAQAAAAIhPQAAAAIFAAAAEXNldHRsZWRQcmljZUluZGV4BQAAAApwcmljZUluZGV4CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAIWNvcnJ1cHQgc3RhdGUsIHNldHRsZWRQcmljZUluZGV4PQkAAaQAAAABBQAAABFzZXR0bGVkUHJpY2VJbmRleAIAAAATLCByZXF1ZXN0IHByaWNlIGlkPQkAAaQAAAABBQAAAApwcmljZUluZGV4AwkAAAAAAAACBQAAAAZhY3Rpb24FAAAABUlTU1VFBAAAAAdmZWVTaXplCQAAawAAAAMFAAAAA2FtdAUAAAAPaXNzdWVQZXJjZW50aWxlAAAAAAAAACcQBAAAAA9hZGRlZENvbGxhdGVyYWwJAABlAAAAAgUAAAADYW10BQAAAAdmZWVTaXplBAAAABJkZWZhdWx0QWRkZWRUb2tlbnMDCQAAAAAAAAIFAAAABXRva2VuBQAAAARCVUxMCQAAawAAAAMFAAAACGJ1bGxDaXJjBQAAAA9hZGRlZENvbGxhdGVyYWwFAAAAB2J1bGxDb2wDCQAAAAAAAAIFAAAABXRva2VuBQAAAARCRUFSCQAAawAAAAMFAAAACGJlYXJDaXJjBQAAAA9hZGRlZENvbGxhdGVyYWwFAAAAB2JlYXJDb2wJAAACAAAAAQIAAAAMYmFkIHRva2VuIGlkBAAAAA0kdDAxMjkxMTEyOTg0CQEAAAACc3AAAAACBQAAABJkZWZhdWx0QWRkZWRUb2tlbnMFAAAACW1heFBheW91dAQAAAASYWRkZWRUb0NpcmN1bGF0aW9uCAUAAAANJHQwMTI5MTExMjk4NAAAAAJfMQQAAAALZXh0cmFUb2tlbnMIBQAAAA0kdDAxMjkxMTEyOTg0AAAAAl8yBAAAAA0kdDAxMzAwMTEzMTcyAwkAAAAAAAACBQAAAAV0b2tlbgUAAAAEQlVMTAkABRYAAAAEBQAAABJkZWZhdWx0QWRkZWRUb2tlbnMFAAAAD2FkZGVkQ29sbGF0ZXJhbAAAAAAAAAAAAAAAAAAAAAAAAAkABRYAAAAEAAAAAAAAAAAAAAAAAAAAAAAABQAAABJkZWZhdWx0QWRkZWRUb2tlbnMFAAAAD2FkZGVkQ29sbGF0ZXJhbAQAAAAJcGx1c0J1bGxzCAUAAAANJHQwMTMwMDExMzE3MgAAAAJfMQQAAAALcGx1c0J1bGxDb2wIBQAAAA0kdDAxMzAwMTEzMTcyAAAAAl8yBAAAAAlwbHVzQmVhcnMIBQAAAA0kdDAxMzAwMTEzMTcyAAAAAl8zBAAAAAtwbHVzQmVhckNvbAgFAAAADSR0MDEzMDAxMTMxNzIAAAACXzQDCQAAZgAAAAIFAAAACW1pblBheW91dAUAAAASYWRkZWRUb0NpcmN1bGF0aW9uCQEAAAAHcGF5YmFjawAAAAEFAAAACW1haW5Ub2tlbgkABE4AAAACCQEAAAAHcG9vbFN1cAAAAAQJAABkAAAAAgUAAAAHYnVsbENvbAUAAAALcGx1c0J1bGxDb2wJAABkAAAAAgUAAAAHYmVhckNvbAUAAAALcGx1c0JlYXJDb2wJAABkAAAAAgUAAAAIYnVsbENpcmMFAAAACXBsdXNCdWxscwkAAGQAAAACBQAAAAhiZWFyQ2lyYwUAAAAJcGx1c0JlYXJzCQAETAAAAAIJAQAAAAJTRQAAAAIFAAAABUhFQURLBQAAAARuZXh0CQAETAAAAAIJAQAAAApjb2xsZWN0RmVlAAAAAQUAAAAHZmVlU2l6ZQkABEwAAAACBQAAABFkZWNyZWFzZVF1ZXVlU2l6ZQkABEwAAAACCQEAAAACU1QAAAADBQAAAAdpbnZva2VyBQAAABJhZGRlZFRvQ2lyY3VsYXRpb24JAAJZAAAAAQUAAAAFdG9rZW4JAARMAAAAAgkBAAAAAlNUAAAAAwUAAAAKZmVlQWRkcmVzcwUAAAALZXh0cmFUb2tlbnMJAAJZAAAAAQUAAAAFdG9rZW4FAAAAA25pbAMJAAAAAAAAAgUAAAAGYWN0aW9uBQAAAAZSRURFRU0EAAAADXJlbW92ZWRUb2tlbnMFAAAAA2FtdAQAAAAPZXN0aW1hdGVkUGF5b3V0AwkAAAAAAAACBQAAAAV0b2tlbgUAAAAEQlVMTAkAAGsAAAADBQAAAAdidWxsQ29sBQAAAA1yZW1vdmVkVG9rZW5zBQAAAAhidWxsQ2lyYwMJAAAAAAAAAgUAAAAFdG9rZW4FAAAABEJFQVIJAABrAAAAAwUAAAAHYmVhckNvbAUAAAANcmVtb3ZlZFRva2VucwUAAAAIYmVhckNpcmMJAAACAAAAAQIAAAAMYmFkIHRva2VuIGlkBAAAAAdmZWVTaXplCQAAawAAAAMFAAAAD2VzdGltYXRlZFBheW91dAUAAAAQcmVkZWVtUGVyY2VudGlsZQAAAAAAAAAnEAQAAAANZGVmYXVsdFBheW91dAkAAGUAAAACBQAAAA9lc3RpbWF0ZWRQYXlvdXQFAAAAB2ZlZVNpemUEAAAADSR0MDE0MjM5MTQyOTMJAQAAAAJzcAAAAAIFAAAADWRlZmF1bHRQYXlvdXQFAAAACW1heFBheW91dAQAAAAKdXNlclBheW91dAgFAAAADSR0MDE0MjM5MTQyOTMAAAACXzEEAAAABWV4dHJhCAUAAAANJHQwMTQyMzkxNDI5MwAAAAJfMgQAAAANJHQwMTQzMTAxNDQ3NQMJAAAAAAAAAgUAAAAFdG9rZW4FAAAABEJVTEwJAAUWAAAABAUAAAANcmVtb3ZlZFRva2VucwUAAAAPZXN0aW1hdGVkUGF5b3V0AAAAAAAAAAAAAAAAAAAAAAAACQAFFgAAAAQAAAAAAAAAAAAAAAAAAAAAAAAFAAAADXJlbW92ZWRUb2tlbnMFAAAAD2VzdGltYXRlZFBheW91dAQAAAAKbWludXNCdWxscwgFAAAADSR0MDE0MzEwMTQ0NzUAAAACXzEEAAAADG1pbnVzQnVsbENvbAgFAAAADSR0MDE0MzEwMTQ0NzUAAAACXzIEAAAACm1pbnVzQmVhcnMIBQAAAA0kdDAxNDMxMDE0NDc1AAAAAl8zBAAAAAxtaW51c0JlYXJDb2wIBQAAAA0kdDAxNDMxMDE0NDc1AAAAAl80AwkAAGYAAAACBQAAAAltaW5QYXlvdXQFAAAACnVzZXJQYXlvdXQJAQAAAAdwYXliYWNrAAAAAQUAAAAFdG9rZW4JAAROAAAAAgkBAAAAB3Bvb2xTdXAAAAAECQAAZQAAAAIFAAAAB2J1bGxDb2wFAAAADG1pbnVzQnVsbENvbAkAAGUAAAACBQAAAAdiZWFyQ29sBQAAAAxtaW51c0JlYXJDb2wJAABlAAAAAgUAAAAIYnVsbENpcmMFAAAACm1pbnVzQnVsbHMJAABlAAAAAgUAAAAIYmVhckNpcmMFAAAACm1pbnVzQmVhcnMJAARMAAAAAgkBAAAAAlNFAAAAAgUAAAAFSEVBREsFAAAABG5leHQJAARMAAAAAgkBAAAACmNvbGxlY3RGZWUAAAABBQAAAAdmZWVTaXplCQAETAAAAAIFAAAAEWRlY3JlYXNlUXVldWVTaXplCQAETAAAAAIJAQAAAAJTVAAAAAMFAAAAB2ludm9rZXIFAAAACnVzZXJQYXlvdXQJAAJZAAAAAQUAAAAJbWFpblRva2VuCQAETAAAAAIJAQAAAAJTVAAAAAMFAAAACmZlZUFkZHJlc3MFAAAABWV4dHJhCQACWQAAAAEFAAAACW1haW5Ub2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAAZhY3Rpb24FAAAABFBPT0wEAAAAC2lzc3VlVG9rZW5zCQAAawAAAAMFAAAAFHBvb2xUb2tlbkNpcmN1bGF0aW9uBQAAAANhbXQFAAAACXBvb2xWYWx1ZQMJAABmAAAAAgUAAAAJbWluUGF5b3V0BQAAAAtpc3N1ZVRva2VucwkBAAAAB3BheWJhY2sAAAABBQAAAAltYWluVG9rZW4JAARMAAAAAgkBAAAAAklFAAAAAgUAAAAJUE9PTFVTRE5LCQAAZAAAAAIFAAAACHBvb2xNYWluBQAAAANhbXQJAARMAAAAAgkBAAAAAklFAAAAAgUAAAAJUE9PTENJUkNLCQAAZAAAAAIFAAAAFHBvb2xUb2tlbkNpcmN1bGF0aW9uBQAAAAtpc3N1ZVRva2VucwkABEwAAAACCQEAAAACU0UAAAACBQAAAAVIRUFESwUAAAAEbmV4dAkABEwAAAACBQAAABFkZWNyZWFzZVF1ZXVlU2l6ZQkABEwAAAACCQEAAAACU1QAAAADBQAAAAdpbnZva2VyBQAAAAtpc3N1ZVRva2VucwkAAlkAAAABBQAAAAlwb29sVG9rZW4FAAAAA25pbAMJAAAAAAAAAgUAAAAGYWN0aW9uBQAAAAZVTlBPT0wKAQAAAAVzaGFyZQAAAAEAAAABYQkAAGsAAAADBQAAAAFhBQAAAANhbXQFAAAAFHBvb2xUb2tlbkNpcmN1bGF0aW9uBAAAAAx1bnBvb2xlZE1haW4JAQAAAAVzaGFyZQAAAAEFAAAACHBvb2xNYWluBAAAAAp1bnBvb2xlZFVwCQEAAAAFc2hhcmUAAAABBQAAAAZwb29sVXAEAAAAC3VucG9vbGVkRHduCQEAAAAFc2hhcmUAAAABBQAAAAdwb29sRHduBAAAAA91bnBvb2xlZFVwVmFsdWUJAABrAAAAAwUAAAAKdW5wb29sZWRVcAUAAAAHYnVsbENvbAUAAAAIYnVsbENpcmMEAAAAEHVucG9vbGVkRHduVmFsdWUJAABrAAAAAwUAAAALdW5wb29sZWREd24FAAAAB2JlYXJDb2wFAAAACGJlYXJDaXJjBAAAABJ0b3RhbFVucG9vbGVkVmFsdWUJAABkAAAAAgkAAGQAAAACBQAAAAx1bnBvb2xlZE1haW4FAAAAD3VucG9vbGVkVXBWYWx1ZQUAAAAQdW5wb29sZWREd25WYWx1ZQMJAABmAAAAAgUAAAAJbWluUGF5b3V0BQAAABJ0b3RhbFVucG9vbGVkVmFsdWUJAQAAAAdwYXliYWNrAAAAAQUAAAAJcG9vbFRva2VuCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACVBPT0xVU0ROSwkAAGUAAAACBQAAAAhwb29sTWFpbgUAAAAMdW5wb29sZWRNYWluCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACVBPT0xDSVJDSwkAAGUAAAACBQAAABRwb29sVG9rZW5DaXJjdWxhdGlvbgUAAAADYW10CQAETAAAAAIJAQAAAAJJRQAAAAIFAAAAB1BPT0xVUEsJAABlAAAAAgUAAAAGcG9vbFVwBQAAAAp1bnBvb2xlZFVwCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACFBPT0xEV05LCQAAZQAAAAIFAAAAB3Bvb2xEd24FAAAAC3VucG9vbGVkRHduCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACUJVTExDSVJDSwkAAGUAAAACBQAAAAhidWxsQ2lyYwUAAAAKdW5wb29sZWRVcAkABEwAAAACCQEAAAACSUUAAAACBQAAAAlCRUFSQ0lSQ0sJAABlAAAAAgUAAAAIYmVhckNpcmMFAAAAC3VucG9vbGVkRHduCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACEJVTExDT0xLCQAAZQAAAAIFAAAAB2J1bGxDb2wFAAAAD3VucG9vbGVkVXBWYWx1ZQkABEwAAAACCQEAAAACSUUAAAACBQAAAAhCRUFSQ09MSwkAAGUAAAACBQAAAAdiZWFyQ29sBQAAABB1bnBvb2xlZER3blZhbHVlCQAETAAAAAIJAQAAAAJTRQAAAAIFAAAABUhFQURLBQAAAARuZXh0CQAETAAAAAIFAAAAEWRlY3JlYXNlUXVldWVTaXplCQAETAAAAAIJAQAAAAJTVAAAAAMFAAAAB2ludm9rZXIFAAAAEnRvdGFsVW5wb29sZWRWYWx1ZQkAAlkAAAABBQAAAAltYWluVG9rZW4FAAAAA25pbAkAAAIAAAABCQABLAAAAAICAAAADGJhZCBhY3Rpb246IAUAAAAGYWN0aW9uAwUAAAANaXNMYXN0RWxlbWVudAkABEwAAAACBQAAAA1vdmVyd3JpdGVUYWlsBQAAAAVpdGVtcwUAAAAFaXRlbXMBAAAACXJlYmFsYW5jZQAAAAEAAAAGb2Zmc2V0AwkBAAAAASEAAAABCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGwAAAAIFAAAABHRoaXMCAAAAD2VuYWJsZVJlYmFsYW5jZQYJAAACAAAAAQIAAAAQcmViYWxhbmNlIHBhdXNlZAMJAAAAAAAAAgUAAAAGb2Zmc2V0AAAAAAAAAAAACQAAAgAAAAECAAAADVtPS10gb2Zmc2V0PTAKAQAAAAJMVgAAAAQAAAABdgAAAAJwMAAAAAJwMQAAAAFtBAAAAAVkZW5vbQQAAAACbWQJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAAIDCQAAZgAAAAIFAAAAAnAxBQAAAAJwMAUAAAACcDEFAAAAAnAwBQAAAAFtAAAAAAC1BPMzAwkAAGYAAAACAAAAAAAAAAAKBQAAAAJtZAAAAAAAAAAACgMJAABmAAAAAgAAAAAAAAAAZAUAAAACbWQAAAAAAAAAAGQAAAAAAAAAA+gEAAAABHBtYXgJAABpAAAAAgMJAABmAAAAAgUAAAACcDEFAAAAAnAwBQAAAAJwMQUAAAACcDAFAAAABWRlbm9tBAAAAARwbWluCQAAaQAAAAIDCQAAZgAAAAIFAAAAAnAwBQAAAAJwMQUAAAACcDEFAAAAAnAwBQAAAAVkZW5vbQQAAAABYQkAAGgAAAACBQAAAARwbWluBQAAAARwbWluBAAAAAFiCQAAZQAAAAIJAABoAAAAAgkAAGgAAAACCQAAaAAAAAIFAAAAAW0FAAAAAW0FAAAABHBtYXgFAAAABHBtYXgJAABoAAAAAgkAAGgAAAACCQAAZQAAAAIJAABoAAAAAgkAAGgAAAACAAAAAAAAAAACBQAAAAFtBQAAAAFtBQAAAAFtBQAAAARwbWF4BQAAAARwbWluBAAAAAJtYQkAAGUAAAACCQAAaAAAAAIFAAAAAW0FAAAAAW0FAAAAAW0JAABrAAAAAwUAAAABdgkAAGQAAAACCQAAaAAAAAIFAAAAAm1hBQAAAAFhBQAAAAFiCQAAZAAAAAIJAABoAAAAAgkAAGQAAAACBQAAAAJtYQAAAAAAAAAAAQUAAAABYQUAAAABYgQAAAATdW5zZXR0bGVkUHJpY2VJbmRleAkAAGQAAAACBQAAABFzZXR0bGVkUHJpY2VJbmRleAUAAAAGb2Zmc2V0BAAAAAluZXh0UHJpY2UJAQAAAAxwcmljZUJ5SW5kZXgAAAABBQAAABN1bnNldHRsZWRQcmljZUluZGV4BAAAAAZtaW5Wb2wDCQAAZgAAAAIFAAAAB2JlYXJDb2wFAAAAB2J1bGxDb2wFAAAAB2J1bGxDb2wFAAAAB2JlYXJDb2wEAAAABnJlZGlzdAkBAAAAAkxWAAAABAUAAAAGbWluVm9sBQAAAAxzZXR0bGVkUHJpY2UFAAAACW5leHRQcmljZQUAAAAIbGV2ZXJhZ2UEAAAACWJ1bGxzRWFybgkAAGYAAAACBQAAAAluZXh0UHJpY2UFAAAADHNldHRsZWRQcmljZQQAAAAKbmV3QnVsbENvbAMFAAAACWJ1bGxzRWFybgkAAGQAAAACBQAAAAdidWxsQ29sBQAAAAZyZWRpc3QJAABlAAAAAgUAAAAHYnVsbENvbAUAAAAGcmVkaXN0BAAAAApuZXdCZWFyQ29sAwUAAAAJYnVsbHNFYXJuCQAAZQAAAAIFAAAAB2JlYXJDb2wFAAAABnJlZGlzdAkAAGQAAAACBQAAAAdiZWFyQ29sBQAAAAZyZWRpc3QEAAAADSR0MDE4MjY5MTg0NjcJAQAAAAtwb29sU3VwcG9ydAAAAAgFAAAACm5ld0J1bGxDb2wFAAAACm5ld0JlYXJDb2wFAAAACGJ1bGxDaXJjBQAAAAhiZWFyQ2lyYwUAAAAIcG9vbE1haW4FAAAABnBvb2xVcAUAAAAHcG9vbER3bgUAAAAGb2Zmc2V0BAAAAAp1cGRCdWxsQ29sCAUAAAANJHQwMTgyNjkxODQ2NwAAAAJfMQQAAAAKdXBkQmVhckNvbAgFAAAADSR0MDE4MjY5MTg0NjcAAAACXzIEAAAAC3VwZEJ1bGxDaXJjCAUAAAANJHQwMTgyNjkxODQ2NwAAAAJfMwQAAAALdXBkQmVhckNpcmMIBQAAAA0kdDAxODI2OTE4NDY3AAAAAl80BAAAAAt1cGRQb29sTWFpbggFAAAADSR0MDE4MjY5MTg0NjcAAAACXzUEAAAACXVwZFBvb2xVcAgFAAAADSR0MDE4MjY5MTg0NjcAAAACXzYEAAAACnVwZFBvb2xEd24IBQAAAA0kdDAxODI2OTE4NDY3AAAAAl83CQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACEJVTExDT0xLBQAAAAp1cGRCdWxsQ29sCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACEJFQVJDT0xLBQAAAAp1cGRCZWFyQ29sCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAACUJVTExDSVJDSwUAAAALdXBkQnVsbENpcmMJAARMAAAAAgkBAAAAAklFAAAAAgUAAAAJQkVBUkNJUkNLBQAAAAt1cGRCZWFyQ2lyYwkABEwAAAACCQEAAAACSUUAAAACBQAAAAlQT09MVVNETksFAAAAC3VwZFBvb2xNYWluCQAETAAAAAIJAQAAAAJJRQAAAAIFAAAAB1BPT0xVUEsFAAAACXVwZFBvb2xVcAkABEwAAAACCQEAAAACSUUAAAACBQAAAAhQT09MRFdOSwUAAAAKdXBkUG9vbER3bgkABEwAAAACCQEAAAACSUUAAAACBQAAAAdSRUJJRFhLBQAAABN1bnNldHRsZWRQcmljZUluZGV4BQAAAANuaWwBAAAAB2NhbGNNYXgAAAACAAAAA21pbgAAAANhdmcDCQAAZgAAAAIFAAAAA21pbgUAAAADYXZnCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAGXByaWNlIHRvbyBvbGQ6IG1pblBheW91dCAJAAGkAAAAAQUAAAADbWluAgAAAAkgPiBhdmcgPSAJAAGkAAAAAQUAAAADYXZnCQAAZQAAAAIJAABkAAAAAgUAAAADYXZnBQAAAANhdmcFAAAAA21pbgAAAA0AAAABaQEAAAANZW5hYmxlRW5xdWV1ZQAAAAEAAAADYXJnAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAApmZWVBZGRyZXNzCQAAAgAAAAECAAAADm9ubHkgYWRtaW4gY2FuCQAETAAAAAIJAQAAAAxCb29sZWFuRW50cnkAAAACAgAAAA1lbmFibGVFbnF1ZXVlBQAAAANhcmcFAAAAA25pbAAAAAFpAQAAAA9lbmFibGVSZWJhbGFuY2UAAAABAAAAA2FyZwMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAKZmVlQWRkcmVzcwkAAAIAAAABAgAAAA5vbmx5IGFkbWluIGNhbgkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgIAAAAPZW5hYmxlUmViYWxhbmNlBQAAAANhcmcFAAAAA25pbAAAAAFpAQAAAAt3aXRoZHJhd0ZlZQAAAAEAAAAGYW1vdW50AwkAAGYAAAACBQAAAAZhbW91bnQFAAAAD2ZlZXNBY2N1bXVsYXRlZAkAAAIAAAABCQABLAAAAAICAAAAFXRvbyBtdWNoLiBhdmFpbGFibGU6IAkAAaQAAAABBQAAAA9mZWVzQWNjdW11bGF0ZWQJAARMAAAAAgkBAAAAAklFAAAAAgUAAAAHRkVFQUNDSwkAAGUAAAACBQAAAA9mZWVzQWNjdW11bGF0ZWQFAAAABmFtb3VudAkABEwAAAACCQEAAAACU1QAAAADBQAAAApmZWVBZGRyZXNzBQAAAAZhbW91bnQJAAJZAAAAAQUAAAAJbWFpblRva2VuBQAAAANuaWwAAAADaW52AQAAAA9yZXF1ZXN0UmVkZWVtU2wAAAABAAAACW1pblBheW91dAMJAQAAAA12YWxpZGF0ZVBNRmVlAAAAAgUAAAADaW52BQAAAAltaW5QYXlvdXQEAAAAA2FtdAgJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAAB3Rva2VuSWQJAAJYAAAAAQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCAkAAZEAAAACCAUAAAADaW52AAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQCAAAADWJhZCB0b2tlbiBhdHQDAwkBAAAAAiE9AAAAAgUAAAAHdG9rZW5JZAUAAAAEQlVMTAkBAAAAAiE9AAAAAgUAAAAHdG9rZW5JZAUAAAAEQkVBUgcJAAACAAAAAQIAAAANYmFkIHRva2VuIHJlcQQAAAANJHQwMTk5NDIyMDA4MQMJAAAAAAAAAgUAAAAHdG9rZW5JZAUAAAAEQlVMTAkABRQAAAACBQAAAAdidWxsQ29sBQAAAAhidWxsQ2lyYwMJAAAAAAAAAgUAAAAHdG9rZW5JZAUAAAAEQkVBUgkABRQAAAACBQAAAAdiZWFyQ29sBQAAAAhiZWFyQ2lyYwkAAAIAAAABAgAAAA1iYWQgdG9rZW4gcmVxBAAAAANjb2wIBQAAAA0kdDAxOTk0MjIwMDgxAAAAAl8xBAAAAARjaXJjCAUAAAANJHQwMTk5NDIyMDA4MQAAAAJfMgQAAAADZXN0CQAAawAAAAMFAAAAA2FtdAUAAAADY29sBQAAAARjaXJjBAAAAA0kdDAyMDEyOTIwMjIzAwkAAAAAAAACBQAAAAltaW5QYXlvdXQAAAAAAAAAAAAJAAUUAAAAAgAAAAAAAAAAAAUAAAADTUFYCQAFFAAAAAIFAAAACW1pblBheW91dAkBAAAAB2NhbGNNYXgAAAACBQAAAAltaW5QYXlvdXQFAAAAA2VzdAQAAAAEbWluUAgFAAAADSR0MDIwMTI5MjAyMjMAAAACXzEEAAAABG1heFAIBQAAAA0kdDAyMDEyOTIwMjIzAAAAAl8yAwkAAAAAAAACCAUAAAADaW52AAAABmNhbGxlcgUAAAAEdGhpcwkAAAIAAAABAgAAAAhjYW4ndCBkbwQAAAAJZXN0aW1hdGVkCQAAawAAAAMFAAAAA2NvbAUAAAADYW10BQAAAARjaXJjAwkAAGYAAAACBQAAAAltaW5SZWRlZW0FAAAACWVzdGltYXRlZAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAxQXR0YWNoZWQgcGF5bWVudCB0b28gc21hbGwuIE1pbiByZWRlZW0gYW1vdW50IGlzIAkAAaQAAAABCQAAaQAAAAIFAAAACW1pblJlZGVlbQAAAAAAAA9CQAIAAAAFIFVTRE4JAQAAAAdlbnF1ZXVlAAAACAkAAlgAAAABCAUAAAADaW52AAAADXRyYW5zYWN0aW9uSWQFAAAABlJFREVFTQUAAAADYW10BQAAAAd0b2tlbklkCQAAZAAAAAIFAAAAEG9yYWNsZVByaWNlSW5kZXgAAAAAAAAAAAEJAAQlAAAAAQgFAAAAA2ludgAAAAZjYWxsZXIFAAAABG1pblAFAAAABG1heFAJAQAAAAV0aHJvdwAAAAAAAAADaW52AQAAAA5yZXF1ZXN0SXNzdWVTbAAAAAIAAAAHdG9rZW5JZAAAAAltaW5QYXlvdXQDCQEAAAANdmFsaWRhdGVQTUZlZQAAAAIFAAAAA2ludgUAAAAJbWluUGF5b3V0AwMJAQAAAAIhPQAAAAIFAAAAB3Rva2VuSWQFAAAABEJVTEwJAQAAAAIhPQAAAAIFAAAAB3Rva2VuSWQFAAAABEJFQVIHCQAAAgAAAAECAAAADWJhZCB0b2tlbiByZXEDCQEAAAABIQAAAAEJAQAAAAdhbGxvd2VkAAAAAQgFAAAAA2ludgAAAAZjYWxsZXIJAAACAAAAAQIAAAAXb25seSB3aGl0ZWxpc3RlZCBjYW4gZG8DCQEAAAACIT0AAAACCAkAAZEAAAACCAUAAAADaW52AAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQJAAJZAAAAAQUAAAAJbWFpblRva2VuCQAAAgAAAAECAAAADWJhZCB0b2tlbiBhdHQEAAAAA2FtdAgJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAADSR0MDIxMTQ2MjEzMjcDCQAAAAAAAAIFAAAAB3Rva2VuSWQFAAAABEJVTEwJAAUUAAAAAgUAAAAHYnVsbENvbAUAAAAIYnVsbENpcmMDCQAAAAAAAAIFAAAAB3Rva2VuSWQFAAAABEJFQVIJAAUUAAAAAgUAAAAHYmVhckNvbAUAAAAIYmVhckNpcmMJAAACAAAAAQIAAAANYmFkIHRva2VuIHJlcQQAAAADY29sCAUAAAANJHQwMjExNDYyMTMyNwAAAAJfMQQAAAAEY2lyYwgFAAAADSR0MDIxMTQ2MjEzMjcAAAACXzIEAAAAA2VzdAkAAGsAAAADBQAAAANhbXQFAAAABGNpcmMFAAAAA2NvbAQAAAANJHQwMjEzNjkyMTQ2MwMJAAAAAAAAAgUAAAAJbWluUGF5b3V0AAAAAAAAAAAACQAFFAAAAAIAAAAAAAAAAAAFAAAAA01BWAkABRQAAAACBQAAAAltaW5QYXlvdXQJAQAAAAdjYWxjTWF4AAAAAgUAAAAJbWluUGF5b3V0BQAAAANlc3QEAAAABG1pblAIBQAAAA0kdDAyMTM2OTIxNDYzAAAAAl8xBAAAAARtYXhQCAUAAAANJHQwMjEzNjkyMTQ2MwAAAAJfMgMJAABmAAAAAgUAAAAIbWluSXNzdWUFAAAAA2FtdAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAqQXR0YWNoZWQgcGF5bWVudCB0b28gc21hbGwuIE1pbiByZXF1aXJlZDogCQABpAAAAAEJAABpAAAAAgUAAAAIbWluSXNzdWUAAAAAAAAPQkACAAAABSBVU0ROBAAAAAptYXhBbGxvd2VkCQEAAAAIbWF4SXNzdWUAAAABBQAAAAd0b2tlbklkAwMJAAAAAAAAAgUAAAAJd2hpdGVsaXN0AgAAAAAJAABmAAAAAggJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQFAAAACm1heEFsbG93ZWQHCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAER0cnlpbmcgdG8gaXNzdWUgbW9yZSB0aGFuIHBvb2wgY2FuIGhhbmRsZS4gTWF4IGF0dGFjaG1lbnQgYWxsb3dlZCA9IAkAAaQAAAABCQAAaQAAAAIFAAAACm1heEFsbG93ZWQAAAAAAAAPQkACAAAABSBVU0ROCQEAAAAHZW5xdWV1ZQAAAAgJAAJYAAAAAQgFAAAAA2ludgAAAA10cmFuc2FjdGlvbklkBQAAAAVJU1NVRQUAAAADYW10BQAAAAd0b2tlbklkCQAAZAAAAAIFAAAAEG9yYWNsZVByaWNlSW5kZXgAAAAAAAAAAAEJAAQlAAAAAQgFAAAAA2ludgAAAAZjYWxsZXIFAAAABG1pblAFAAAABG1heFAJAQAAAAV0aHJvdwAAAAAAAAADaW52AQAAAAtyZXF1ZXN0UG9vbAAAAAADCQEAAAABIQAAAAEJAQAAAAdhbGxvd2VkAAAAAQgFAAAAA2ludgAAAAZjYWxsZXIJAAACAAAAAQIAAAAXb25seSB3aGl0ZWxpc3RlZCBjYW4gZG8EAAAAA3BtdAkAAZEAAAACCAUAAAADaW52AAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkCQACWQAAAAEFAAAACW1haW5Ub2tlbgkAAAIAAAABAgAAAA1VU0ROIHJlcXVpcmVkAwkAAGYAAAACBQAAAAdtaW5Qb29sCAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABCQABLAAAAAICAAAACnBvb2wgbWluOiAJAAGkAAAAAQUAAAAHbWluUG9vbAQAAAAIZXN0aW1hdGUJAABrAAAAAwUAAAAUcG9vbFRva2VuQ2lyY3VsYXRpb24IBQAAAANwbXQAAAAGYW1vdW50BQAAAAlwb29sVmFsdWUJAQAAAAdlbnF1ZXVlAAAACAkAAlgAAAABCAUAAAADaW52AAAADXRyYW5zYWN0aW9uSWQFAAAABFBPT0wICQABkQAAAAIIBQAAAANpbnYAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50AgAAAAAJAABkAAAAAgUAAAAQb3JhY2xlUHJpY2VJbmRleAAAAAAAAAAAAQkABCUAAAABCAUAAAADaW52AAAABmNhbGxlcgAAAAAAAAAAAAUAAAADTUFYAAAAA2ludgEAAAANcmVxdWVzdFVucG9vbAAAAAAEAAAAA3BtdAkAAZEAAAACCAUAAAADaW52AAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkCQACWQAAAAEFAAAACXBvb2xUb2tlbgkAAAIAAAABAgAAAA1iYWQgdG9rZW4gYXR0BAAAAAhlc3RpbWF0ZQkAAGsAAAADBQAAAAlwb29sVmFsdWUIBQAAAANwbXQAAAAGYW1vdW50BQAAABRwb29sVG9rZW5DaXJjdWxhdGlvbgMJAABmAAAAAgUAAAAHbWluUG9vbAUAAAAIZXN0aW1hdGUJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAATdW5wb29sIGF0IGxlYXN0IGZvcgkAAaQAAAABBQAAAAdtaW5Qb29sAgAAAAEgBQAAAAltYWluVG9rZW4JAQAAAAdlbnF1ZXVlAAAACAkAAlgAAAABCAUAAAADaW52AAAADXRyYW5zYWN0aW9uSWQFAAAABlVOUE9PTAgJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQCAAAAAAkAAGQAAAACBQAAABBvcmFjbGVQcmljZUluZGV4AAAAAAAAAAABCQAEJQAAAAEIBQAAAANpbnYAAAAGY2FsbGVyAAAAAAAAAAAABQAAAANNQVgAAAADaW52AQAAAAZzZXR0bGUAAAAABAAAAAxjYW5SZWJhbGFuY2UJAABmAAAAAgUAAAAQb3JhY2xlUHJpY2VJbmRleAUAAAARc2V0dGxlZFByaWNlSW5kZXgDBQAAAApxdWV1ZUVtcHR5AwUAAAAMY2FuUmViYWxhbmNlCQEAAAAJcmViYWxhbmNlAAAAAQAAAAAAAAAAAQkAAAIAAAABAgAAABdbT0tdIGFsbCBkb25lLCBjYXJyeSBvbgMJAABmAAAAAgUAAAAPcXVldWVQcmljZUluZGV4BQAAABFzZXR0bGVkUHJpY2VJbmRleAMFAAAADGNhblJlYmFsYW5jZQkBAAAACXJlYmFsYW5jZQAAAAEAAAAAAAAAAAEJAAACAAAAAQIAAAARW09LXSBuZWVkIHRvIHdhaXQDCQAAAAAAAAIFAAAAD3F1ZXVlUHJpY2VJbmRleAUAAAARc2V0dGxlZFByaWNlSW5kZXgJAQAAAAdkZXF1ZXVlAAAAAAkAAAIAAAABAgAAAB9mdXR1cmUgcHJpY2UgYWxyZWFkeSByZWJhbGFuY2VkAAAAA2ludgEAAAAHc2V0dGxlMgAAAAAKAQAAAAxoYXNEZXZpYXRpb24AAAABAAAACnByaWNlSW5kZXgEAAAAAXAJAQAAAAxwcmljZUJ5SW5kZXgAAAABBQAAAApwcmljZUluZGV4CQAAZwAAAAIJAABrAAAAAwkBAAAAB2RpZmZBYnMAAAACBQAAAAxzZXR0bGVkUHJpY2UFAAAAAXAAAAAAAAAPQkAFAAAADHNldHRsZWRQcmljZQUAAAAMbWF4RGV2aWF0aW9uBAAAABBtYXhQb3NzaWJsZVNoaWZ0CQAAZQAAAAIJAAGXAAAAAQkABEwAAAACBQAAAA9xdWV1ZVByaWNlSW5kZXgJAARMAAAAAgUAAAAQb3JhY2xlUHJpY2VJbmRleAUAAAADbmlsBQAAABFzZXR0bGVkUHJpY2VJbmRleAoBAAAAAWYAAAACAAAAA2FjYwAAAAVzaGlmdAMDCAUAAAADYWNjAAAAAl8yBgkAAGYAAAACBQAAAAVzaGlmdAUAAAAQbWF4UG9zc2libGVTaGlmdAUAAAADYWNjCQAFFAAAAAIFAAAABXNoaWZ0AwkAAAAAAAACBQAAAAVzaGlmdAAAAAAAAAAABwYJAQAAAAxoYXNEZXZpYXRpb24AAAABCQAAZAAAAAIFAAAAEXNldHRsZWRQcmljZUluZGV4BQAAAAVzaGlmdAQAAAANJHQwMjQ0NzUyNDU3NAQAAAAPJGxpc3QyNDUxOTI0NTc0CQAETAAAAAIAAAAAAAAAAAEJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAADCQAETAAAAAIAAAAAAAAAAAQJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAAGCQAETAAAAAIAAAAAAAAAAAcFAAAAA25pbAQAAAAPJHNpemUyNDUxOTI0NTc0CQABkAAAAAEFAAAADyRsaXN0MjQ1MTkyNDU3NAQAAAAPJGFjYzAyNDUxOTI0NTc0CQAFFAAAAAIFAAAAEXNldHRsZWRQcmljZUluZGV4BwMJAAAAAAAAAgUAAAAPJHNpemUyNDUxOTI0NTc0AAAAAAAAAAAABQAAAA8kYWNjMDI0NTE5MjQ1NzQEAAAADyRhY2MxMjQ1MTkyNDU3NAkBAAAAAWYAAAACBQAAAA8kYWNjMDI0NTE5MjQ1NzQJAAGRAAAAAgUAAAAPJGxpc3QyNDUxOTI0NTc0AAAAAAAAAAAAAwkAAAAAAAACBQAAAA8kc2l6ZTI0NTE5MjQ1NzQAAAAAAAAAAAEFAAAADyRhY2MxMjQ1MTkyNDU3NAQAAAAPJGFjYzIyNDUxOTI0NTc0CQEAAAABZgAAAAIFAAAADyRhY2MxMjQ1MTkyNDU3NAkAAZEAAAACBQAAAA8kbGlzdDI0NTE5MjQ1NzQAAAAAAAAAAAEDCQAAAAAAAAIFAAAADyRzaXplMjQ1MTkyNDU3NAAAAAAAAAAAAgUAAAAPJGFjYzIyNDUxOTI0NTc0BAAAAA8kYWNjMzI0NTE5MjQ1NzQJAQAAAAFmAAAAAgUAAAAPJGFjYzIyNDUxOTI0NTc0CQABkQAAAAIFAAAADyRsaXN0MjQ1MTkyNDU3NAAAAAAAAAAAAgMJAAAAAAAAAgUAAAAPJHNpemUyNDUxOTI0NTc0AAAAAAAAAAADBQAAAA8kYWNjMzI0NTE5MjQ1NzQEAAAADyRhY2M0MjQ1MTkyNDU3NAkBAAAAAWYAAAACBQAAAA8kYWNjMzI0NTE5MjQ1NzQJAAGRAAAAAgUAAAAPJGxpc3QyNDUxOTI0NTc0AAAAAAAAAAADAwkAAAAAAAACBQAAAA8kc2l6ZTI0NTE5MjQ1NzQAAAAAAAAAAAQFAAAADyRhY2M0MjQ1MTkyNDU3NAQAAAAPJGFjYzUyNDUxOTI0NTc0CQEAAAABZgAAAAIFAAAADyRhY2M0MjQ1MTkyNDU3NAkAAZEAAAACBQAAAA8kbGlzdDI0NTE5MjQ1NzQAAAAAAAAAAAQDCQAAAAAAAAIFAAAADyRzaXplMjQ1MTkyNDU3NAAAAAAAAAAABQUAAAAPJGFjYzUyNDUxOTI0NTc0BAAAAA8kYWNjNjI0NTE5MjQ1NzQJAQAAAAFmAAAAAgUAAAAPJGFjYzUyNDUxOTI0NTc0CQABkQAAAAIFAAAADyRsaXN0MjQ1MTkyNDU3NAAAAAAAAAAABQMJAAAAAAAAAgUAAAAPJHNpemUyNDUxOTI0NTc0AAAAAAAAAAAGBQAAAA8kYWNjNjI0NTE5MjQ1NzQEAAAADyRhY2M3MjQ1MTkyNDU3NAkBAAAAAWYAAAACBQAAAA8kYWNjNjI0NTE5MjQ1NzQJAAGRAAAAAgUAAAAPJGxpc3QyNDUxOTI0NTc0AAAAAAAAAAAGAwkAAAAAAAACBQAAAA8kc2l6ZTI0NTE5MjQ1NzQAAAAAAAAAAAcFAAAADyRhY2M3MjQ1MTkyNDU3NAQAAAAPJGFjYzgyNDUxOTI0NTc0CQEAAAABZgAAAAIFAAAADyRhY2M3MjQ1MTkyNDU3NAkAAZEAAAACBQAAAA8kbGlzdDI0NTE5MjQ1NzQAAAAAAAAAAAcJAAACAAAAAQIAAAASTGlzdCBzaXplIGV4Y2VlZCA3BAAAAAdva1NoaWZ0CAUAAAANJHQwMjQ0NzUyNDU3NAAAAAJfMQQAAAAaZm9yY2VkQnlEZXZpYXRpb25PclRpbWVvdXQIBQAAAA0kdDAyNDQ3NTI0NTc0AAAAAl8yBAAAAApxdWV1ZVdhaXRzCQAAZwAAAAIFAAAAEG9yYWNsZVByaWNlSW5kZXgFAAAAD3F1ZXVlUHJpY2VJbmRleAMJAABmAAAAAgUAAAARc2V0dGxlZFByaWNlSW5kZXgFAAAAD3F1ZXVlUHJpY2VJbmRleAkAAAIAAAABAgAAADBzZXR0bGUyOiBmdXR1cmUgcHJpY2UgYWxyZWFkeSBzZXR0bGVkL3JlYmFsYW5jZWQDCQAAAAAAAAIFAAAAEXNldHRsZWRQcmljZUluZGV4BQAAAA9xdWV1ZVByaWNlSW5kZXgJAQAAAAdkZXF1ZXVlAAAAAAMDCQAAZgAAAAIFAAAAB29rU2hpZnQAAAAAAAAAAAADBQAAABpmb3JjZWRCeURldmlhdGlvbk9yVGltZW91dAYFAAAACnF1ZXVlV2FpdHMHCQEAAAAJcmViYWxhbmNlAAAAAQUAAAAHb2tTaGlmdAkAAAIAAAABCQABLAAAAAICAAAAM3NldHRsZTI6IFtPS10gYWxsIGRvbmUsIGNhcnJ5IG9uLiBhdmFpbGFibGUgc2hpZnQ6IAkAAaQAAAABBQAAAAdva1NoaWZ0AAAAA2ludgEAAAAHc2V0dGxlMwAAAAAEAAAAEG1heFBvc3NpYmxlU2hpZnQJAABlAAAAAgkAAZcAAAABCQAETAAAAAIFAAAAD3F1ZXVlUHJpY2VJbmRleAkABEwAAAACBQAAABBvcmFjbGVQcmljZUluZGV4BQAAAANuaWwFAAAAEXNldHRsZWRQcmljZUluZGV4BAAAAAdva1NoaWZ0CQABlwAAAAEJAARMAAAAAgUAAAAQbWF4UG9zc2libGVTaGlmdAkABEwAAAACAAAAAAAAAAAHBQAAAANuaWwDCQAAZgAAAAIFAAAAEXNldHRsZWRQcmljZUluZGV4BQAAAA9xdWV1ZVByaWNlSW5kZXgJAAACAAAAAQIAAAAwc2V0dGxlMzogZnV0dXJlIHByaWNlIGFscmVhZHkgc2V0dGxlZC9yZWJhbGFuY2VkAwkAAAAAAAACBQAAABFzZXR0bGVkUHJpY2VJbmRleAUAAAAPcXVldWVQcmljZUluZGV4CQEAAAAHZGVxdWV1ZQAAAAADCQAAZgAAAAIFAAAAB29rU2hpZnQAAAAAAAAAAAAJAQAAAAlyZWJhbGFuY2UAAAABBQAAAAdva1NoaWZ0BQAAAANuaWwAAAABaQEAAAAIc3Rha2VBbGwAAAAAAwMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzAgAAAAtwYWNld3JhcHBlcgcJAAACAAAAAQIAAAAJZm9yYmlkZGVuBAAAAAN0a24JAAJZAAAAAQUAAAAJbWFpblRva2VuBAAAAA5jdXJyZW50QmFsYW5jZQkAA/AAAAACBQAAAAR0aGlzBQAAAAN0a24EAAAABXN0YWtlCQAD/AAAAAQFAAAACnJwZEFkZHJlc3MCAAAADmxvY2tOZXV0cmlub1NQCQAETAAAAAIFAAAACmZlZUFkZHJlc3MJAARMAAAAAgAAAAAAAAAAZAUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAN0a24FAAAADmN1cnJlbnRCYWxhbmNlBQAAAANuaWwDCQAAAAAAAAIFAAAABXN0YWtlBQAAAAVzdGFrZQkABRQAAAACBQAAAANuaWwFAAAADmN1cnJlbnRCYWxhbmNlCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAAp1bnN0YWtlQWxsAAAAAAMDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwIAAAALcGFjZXdyYXBwZXIHCQAAAgAAAAECAAAACWZvcmJpZGRlbgQAAAANY3VycmVudFN0YWtlZAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAApycGRBZGRyZXNzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAxycGRfYmFsYW5jZV8FAAAACW1haW5Ub2tlbgIAAAABXwkABCUAAAABBQAAAAR0aGlzAAAAAAAAAAAABAAAAAd1bnN0YWtlCQAD/AAAAAQFAAAACnJwZEFkZHJlc3MCAAAADnVubG9ja05ldXRyaW5vCQAETAAAAAIFAAAADWN1cnJlbnRTdGFrZWQJAARMAAAAAgUAAAAJbWFpblRva2VuBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAHdW5zdGFrZQUAAAAHdW5zdGFrZQkABRQAAAACBQAAAANuaWwFAAAADWN1cnJlbnRTdGFrZWQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAABXN0YXRlAAAAAAkABRQAAAACBQAAAANuaWwJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAD21heElzc3VlQnVsbCA9IAkAAaQAAAABCQEAAAAIbWF4SXNzdWUAAAABBQAAAARCVUxMAgAAABEsIG1heElzc3VlQmVhciA9IAkAAaQAAAABCQEAAAAIbWF4SXNzdWUAAAABBQAAAARCRUFSAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAGYAAAACCQAAZAAAAAIJAABkAAAAAgMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACQACWQAAAAEJAAGRAAAAAgUAAAAGYWRtaW5zAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAwkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEJAAJZAAAAAQkAAZEAAAACBQAAAAZhZG1pbnMAAAAAAAAAAAEAAAAAAAAAAAEAAAAAAAAAAAADCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAgkAAlkAAAABCQABkQAAAAIFAAAABmFkbWlucwAAAAAAAAAAAgAAAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAfHMd2Y=",
    "chainId": 87,
    "height": 2701107,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4dSn7PaFxXxLGBwvUxRqQUyHYST8PviT4z8zdo7EUDdr
Next: 6xRvfMwhet4mo8TLFuGMguxKvpvDCEJ244KQpnyo1R6c

Diff: 
Old New Differences
218 218  
219 219  let daemonPublicKey = fromBase58String(confS(daemonPubKeyKey, "no daemonPublicKey"))
220 220  
221 - let rpdAddress = addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ")
221 + let rpdAddress = valueOrErrorMessage(addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ"), "bad rpd address")
222 222  
223 223  let admins = ["2HHqV8W9DJayV5R6tBD2Sb8srphpoboDi7r1t1aPiumC", "5ZXe82RRASU7qshXM2J9JNYhqJ9GWYjjVq2gwUV5Naz9", "5WRXFSjwcTbNfKcJs8ZqXmSSWYsSVJUtMvMqZj5hH4Nc"]
224 224  
325 325          $Tuple7((c1 + spentPoolValue), c2, (a0 + acquiredTokens), a1, (c0 - spentPoolValue), (pu + acquiredTokens), pd)
326 326          }
327 327  
328 -     let $t0921610251 = if ((curBullCol0 > curBearCol0))
328 +     let $t0925410289 = if ((curBullCol0 > curBearCol0))
329 329          then {
330 330              let afterCloseUp = closeUp(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
331 -             let $t094429579 = afterCloseUp
332 -             let a = $t094429579._1
333 -             let b = $t094429579._2
334 -             let c = $t094429579._3
335 -             let d = $t094429579._4
336 -             let e = $t094429579._5
337 -             let f = $t094429579._6
338 -             let g = $t094429579._7
331 +             let $t094809617 = afterCloseUp
332 +             let a = $t094809617._1
333 +             let b = $t094809617._2
334 +             let c = $t094809617._3
335 +             let d = $t094809617._4
336 +             let e = $t094809617._5
337 +             let f = $t094809617._6
338 +             let g = $t094809617._7
339 339              if ((f > 0))
340 340                  then afterCloseUp
341 341                  else if ((f == 0))
344 344              }
345 345          else {
346 346              let afterCloseDwn = closeDwn(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
347 -             let $t0993010070 = afterCloseDwn
348 -             let a = $t0993010070._1
349 -             let b = $t0993010070._2
350 -             let c = $t0993010070._3
351 -             let d = $t0993010070._4
352 -             let e = $t0993010070._5
353 -             let f = $t0993010070._6
354 -             let g = $t0993010070._7
347 +             let $t0996810108 = afterCloseDwn
348 +             let a = $t0996810108._1
349 +             let b = $t0996810108._2
350 +             let c = $t0996810108._3
351 +             let d = $t0996810108._4
352 +             let e = $t0996810108._5
353 +             let f = $t0996810108._6
354 +             let g = $t0996810108._7
355 355              if ((g > 0))
356 356                  then afterCloseDwn
357 357                  else if ((g == 0))
358 358                      then openUp(a, b, c, d, e, f, g)
359 359                      else throw("poolDwn < 0")
360 360              }
361 -     let c1 = $t0921610251._1
362 -     let c2 = $t0921610251._2
363 -     let a0 = $t0921610251._3
364 -     let a1 = $t0921610251._4
365 -     let c0 = $t0921610251._5
366 -     let pu = $t0921610251._6
367 -     let pd = $t0921610251._7
361 +     let c1 = $t0925410289._1
362 +     let c2 = $t0925410289._2
363 +     let a0 = $t0925410289._3
364 +     let a1 = $t0925410289._4
365 +     let c0 = $t0925410289._5
366 +     let pu = $t0925410289._6
367 +     let pd = $t0925410289._7
368 368      let charge = fraction(userDiffAbs(), (rebalancePercentile * steps), ((1440 * 100) * 100))
369 369      let c1SplitP = if ((pd > 0))
370 370          then charge
377 377  
378 378  
379 379  func poolSup (curBullCol0,curBearCol0,curBullCirc0,curBearCirc0) = {
380 -     let $t01067610861 = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
381 -     let bullCol1 = $t01067610861._1
382 -     let bearCol1 = $t01067610861._2
383 -     let bullCic1 = $t01067610861._3
384 -     let bearCirc1 = $t01067610861._4
385 -     let poolMain1 = $t01067610861._5
386 -     let poolUp1 = $t01067610861._6
387 -     let poolDwn1 = $t01067610861._7
380 +     let $t01071410899 = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
381 +     let bullCol1 = $t01071410899._1
382 +     let bearCol1 = $t01071410899._2
383 +     let bullCic1 = $t01071410899._3
384 +     let bearCirc1 = $t01071410899._4
385 +     let poolMain1 = $t01071410899._5
386 +     let poolUp1 = $t01071410899._6
387 +     let poolDwn1 = $t01071410899._7
388 388  [IE(BULLCOLK, bullCol1), IE(BULLCIRCK, bullCic1), IE(BEARCOLK, bearCol1), IE(BEARCIRCK, bearCirc1), IE(POOLUSDNK, poolMain1), IE(POOLUPK, poolUp1), IE(POOLDWNK, poolDwn1)]
389 389      }
390 390  
429 429                              else if ((token == BEAR))
430 430                                  then fraction(bearCirc, addedCollateral, bearCol)
431 431                                  else throw("bad token id")
432 -                         let $t01287312946 = sp(defaultAddedTokens, maxPayout)
433 -                         let addedToCirculation = $t01287312946._1
434 -                         let extraTokens = $t01287312946._2
435 -                         let $t01296313134 = if ((token == BULL))
432 +                         let $t01291112984 = sp(defaultAddedTokens, maxPayout)
433 +                         let addedToCirculation = $t01291112984._1
434 +                         let extraTokens = $t01291112984._2
435 +                         let $t01300113172 = if ((token == BULL))
436 436                              then $Tuple4(defaultAddedTokens, addedCollateral, 0, 0)
437 437                              else $Tuple4(0, 0, defaultAddedTokens, addedCollateral)
438 -                         let plusBulls = $t01296313134._1
439 -                         let plusBullCol = $t01296313134._2
440 -                         let plusBears = $t01296313134._3
441 -                         let plusBearCol = $t01296313134._4
438 +                         let plusBulls = $t01300113172._1
439 +                         let plusBullCol = $t01300113172._2
440 +                         let plusBears = $t01300113172._3
441 +                         let plusBearCol = $t01300113172._4
442 442                          if ((minPayout > addedToCirculation))
443 443                              then payback(mainToken)
444 444                              else (poolSup((bullCol + plusBullCol), (bearCol + plusBearCol), (bullCirc + plusBulls), (bearCirc + plusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, addedToCirculation, fromBase58String(token)), ST(feeAddress, extraTokens, fromBase58String(token))])
453 453                                      else throw("bad token id")
454 454                              let feeSize = fraction(estimatedPayout, redeemPercentile, 10000)
455 455                              let defaultPayout = (estimatedPayout - feeSize)
456 -                             let $t01420114255 = sp(defaultPayout, maxPayout)
457 -                             let userPayout = $t01420114255._1
458 -                             let extra = $t01420114255._2
459 -                             let $t01427214437 = if ((token == BULL))
456 +                             let $t01423914293 = sp(defaultPayout, maxPayout)
457 +                             let userPayout = $t01423914293._1
458 +                             let extra = $t01423914293._2
459 +                             let $t01431014475 = if ((token == BULL))
460 460                                  then $Tuple4(removedTokens, estimatedPayout, 0, 0)
461 461                                  else $Tuple4(0, 0, removedTokens, estimatedPayout)
462 -                             let minusBulls = $t01427214437._1
463 -                             let minusBullCol = $t01427214437._2
464 -                             let minusBears = $t01427214437._3
465 -                             let minusBearCol = $t01427214437._4
462 +                             let minusBulls = $t01431014475._1
463 +                             let minusBullCol = $t01431014475._2
464 +                             let minusBears = $t01431014475._3
465 +                             let minusBearCol = $t01431014475._4
466 466                              if ((minPayout > userPayout))
467 467                                  then payback(token)
468 468                                  else (poolSup((bullCol - minusBullCol), (bearCol - minusBearCol), (bullCirc - minusBulls), (bearCirc - minusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, userPayout, fromBase58String(mainToken)), ST(feeAddress, extra, fromBase58String(mainToken))])
537 537              let newBearCol = if (bullsEarn)
538 538                  then (bearCol - redist)
539 539                  else (bearCol + redist)
540 -             let $t01823118429 = poolSupport(newBullCol, newBearCol, bullCirc, bearCirc, poolMain, poolUp, poolDwn, offset)
541 -             let updBullCol = $t01823118429._1
542 -             let updBearCol = $t01823118429._2
543 -             let updBullCirc = $t01823118429._3
544 -             let updBearCirc = $t01823118429._4
545 -             let updPoolMain = $t01823118429._5
546 -             let updPoolUp = $t01823118429._6
547 -             let updPoolDwn = $t01823118429._7
540 +             let $t01826918467 = poolSupport(newBullCol, newBearCol, bullCirc, bearCirc, poolMain, poolUp, poolDwn, offset)
541 +             let updBullCol = $t01826918467._1
542 +             let updBearCol = $t01826918467._2
543 +             let updBullCirc = $t01826918467._3
544 +             let updBearCirc = $t01826918467._4
545 +             let updPoolMain = $t01826918467._5
546 +             let updPoolUp = $t01826918467._6
547 +             let updPoolDwn = $t01826918467._7
548 548  [IE(BULLCOLK, updBullCol), IE(BEARCOLK, updBearCol), IE(BULLCIRCK, updBullCirc), IE(BEARCIRCK, updBearCirc), IE(POOLUSDNK, updPoolMain), IE(POOLUPK, updPoolUp), IE(POOLDWNK, updPoolDwn), IE(REBIDXK, unsettledPriceIndex)]
549 549              }
550 550  
552 552  func calcMax (min,avg) = if ((min > avg))
553 553      then throw(((("price too old: minPayout " + toString(min)) + " > avg = ") + toString(avg)))
554 554      else ((avg + avg) - min)
555 - 
556 - 
557 - @Callable(inv)
558 - func init (config,oracleAddress,nameup,namedwn,descUp,descDwn,poolName,poolDesc,assetName,denom,lev) = if (isDefined(getString(this, BULLK)))
559 -     then throw("already initialized")
560 -     else {
561 -         let totalOwnedMainToken = inv.payments[0].amount
562 -         let bulls = (totalOwnedMainToken / 3)
563 -         let bears = bulls
564 -         let pools = ((totalOwnedMainToken - bulls) - bears)
565 -         if (if (if ((bears == 0))
566 -             then true
567 -             else (bulls == 0))
568 -             then true
569 -             else (pools == 0))
570 -             then throw("can't init balances")
571 -             else {
572 -                 let oracleCurrentPriceIndex = valueOrErrorMessage(getInteger(valueOrErrorMessage(addressFromString(oracleAddress), "bad oracle address"), ("%s%s__idxCurrent__" + assetName)), ("no last price index for " + assetName))
573 -                 let bull = Issue(nameup, descUp, ((100 * ten6) * ten6), 6, true)
574 -                 let bear = Issue(namedwn, descDwn, ((100 * ten6) * ten6), 6, true)
575 -                 let pool = Issue(poolName, poolDesc, ((100 * ten6) * ten6), 6, true)
576 -                 let buid = calculateAssetId(bull)
577 -                 let beid = calculateAssetId(bear)
578 -                 let poid = calculateAssetId(pool)
579 - [bull, bear, pool, SE(BULLK, toBase58String(buid)), SE(BEARK, toBase58String(beid)), SE(USDNK, toBase58String(value(inv.payments[0].assetId))), SE(POOLK, toBase58String(poid)), SE(assetidv2Key, assetName), SE(oraclev2Key, oracleAddress), IE(REBIDXK, oracleCurrentPriceIndex), IE(BULLCOLK, bulls), IE(BEARCOLK, bears), IE(BULLCIRCK, (bulls / denom)), IE(BEARCIRCK, (bears / denom)), IE(POOLCIRCK, (pools / denom)), IE(POOLDWNK, 0), IE(POOLUPK, 0), IE(POOLUSDNK, pools), SE(configProviderKey, config), IE(LEVK, lev), ST(inv.caller, (bulls / denom), buid), ST(inv.caller, (bears / denom), beid), ST(inv.caller, (pools / denom), poid)]
580 -                 }
581 -         }
582 - 
583 555  
584 556  
585 557  @Callable(i)
613 585              else false)
614 586              then throw("bad token req")
615 587              else {
616 -                 let $t02240922548 = if ((tokenId == BULL))
588 +                 let $t01994220081 = if ((tokenId == BULL))
617 589                      then $Tuple2(bullCol, bullCirc)
618 590                      else if ((tokenId == BEAR))
619 591                          then $Tuple2(bearCol, bearCirc)
620 592                          else throw("bad token req")
621 -                 let col = $t02240922548._1
622 -                 let circ = $t02240922548._2
593 +                 let col = $t01994220081._1
594 +                 let circ = $t01994220081._2
623 595                  let est = fraction(amt, col, circ)
624 -                 let $t02259622690 = if ((minPayout == 0))
596 +                 let $t02012920223 = if ((minPayout == 0))
625 597                      then $Tuple2(0, MAX)
626 598                      else $Tuple2(minPayout, calcMax(minPayout, est))
627 -                 let minP = $t02259622690._1
628 -                 let maxP = $t02259622690._2
599 +                 let minP = $t02012920223._1
600 +                 let maxP = $t02012920223._2
629 601                  if ((inv.caller == this))
630 602                      then throw("can't do")
631 603                      else {
652 624                  then throw("bad token att")
653 625                  else {
654 626                      let amt = inv.payments[0].amount
655 -                     let $t02361323794 = if ((tokenId == BULL))
627 +                     let $t02114621327 = if ((tokenId == BULL))
656 628                          then $Tuple2(bullCol, bullCirc)
657 629                          else if ((tokenId == BEAR))
658 630                              then $Tuple2(bearCol, bearCirc)
659 631                              else throw("bad token req")
660 -                     let col = $t02361323794._1
661 -                     let circ = $t02361323794._2
632 +                     let col = $t02114621327._1
633 +                     let circ = $t02114621327._2
662 634                      let est = fraction(amt, circ, col)
663 -                     let $t02383623930 = if ((minPayout == 0))
635 +                     let $t02136921463 = if ((minPayout == 0))
664 636                          then $Tuple2(0, MAX)
665 637                          else $Tuple2(minPayout, calcMax(minPayout, est))
666 -                     let minP = $t02383623930._1
667 -                     let maxP = $t02383623930._2
638 +                     let minP = $t02136921463._1
639 +                     let maxP = $t02136921463._2
668 640                      if ((minIssue > amt))
669 641                          then throw((("Attached payment too small. Min required: " + toString((minIssue / 1000000))) + " USDN"))
670 642                          else {
746 718              then true
747 719              else hasDeviation((settledPriceIndex + shift)))
748 720  
749 -     let $t02694227041 = {
750 -         let $list2698627041 = [1, 2, 3, 4, 5, 6, 7]
751 -         let $size2698627041 = size($list2698627041)
752 -         let $acc02698627041 = $Tuple2(settledPriceIndex, false)
753 -         if (($size2698627041 == 0))
754 -             then $acc02698627041
721 +     let $t02447524574 = {
722 +         let $list2451924574 = [1, 2, 3, 4, 5, 6, 7]
723 +         let $size2451924574 = size($list2451924574)
724 +         let $acc02451924574 = $Tuple2(settledPriceIndex, false)
725 +         if (($size2451924574 == 0))
726 +             then $acc02451924574
755 727              else {
756 -                 let $acc12698627041 = f($acc02698627041, $list2698627041[0])
757 -                 if (($size2698627041 == 1))
758 -                     then $acc12698627041
728 +                 let $acc12451924574 = f($acc02451924574, $list2451924574[0])
729 +                 if (($size2451924574 == 1))
730 +                     then $acc12451924574
759 731                      else {
760 -                         let $acc22698627041 = f($acc12698627041, $list2698627041[1])
761 -                         if (($size2698627041 == 2))
762 -                             then $acc22698627041
732 +                         let $acc22451924574 = f($acc12451924574, $list2451924574[1])
733 +                         if (($size2451924574 == 2))
734 +                             then $acc22451924574
763 735                              else {
764 -                                 let $acc32698627041 = f($acc22698627041, $list2698627041[2])
765 -                                 if (($size2698627041 == 3))
766 -                                     then $acc32698627041
736 +                                 let $acc32451924574 = f($acc22451924574, $list2451924574[2])
737 +                                 if (($size2451924574 == 3))
738 +                                     then $acc32451924574
767 739                                      else {
768 -                                         let $acc42698627041 = f($acc32698627041, $list2698627041[3])
769 -                                         if (($size2698627041 == 4))
770 -                                             then $acc42698627041
740 +                                         let $acc42451924574 = f($acc32451924574, $list2451924574[3])
741 +                                         if (($size2451924574 == 4))
742 +                                             then $acc42451924574
771 743                                              else {
772 -                                                 let $acc52698627041 = f($acc42698627041, $list2698627041[4])
773 -                                                 if (($size2698627041 == 5))
774 -                                                     then $acc52698627041
744 +                                                 let $acc52451924574 = f($acc42451924574, $list2451924574[4])
745 +                                                 if (($size2451924574 == 5))
746 +                                                     then $acc52451924574
775 747                                                      else {
776 -                                                         let $acc62698627041 = f($acc52698627041, $list2698627041[5])
777 -                                                         if (($size2698627041 == 6))
778 -                                                             then $acc62698627041
748 +                                                         let $acc62451924574 = f($acc52451924574, $list2451924574[5])
749 +                                                         if (($size2451924574 == 6))
750 +                                                             then $acc62451924574
779 751                                                              else {
780 -                                                                 let $acc72698627041 = f($acc62698627041, $list2698627041[6])
781 -                                                                 if (($size2698627041 == 7))
782 -                                                                     then $acc72698627041
752 +                                                                 let $acc72451924574 = f($acc62451924574, $list2451924574[6])
753 +                                                                 if (($size2451924574 == 7))
754 +                                                                     then $acc72451924574
783 755                                                                      else {
784 -                                                                         let $acc82698627041 = f($acc72698627041, $list2698627041[7])
756 +                                                                         let $acc82451924574 = f($acc72451924574, $list2451924574[7])
785 757                                                                          throw("List size exceed 7")
786 758                                                                          }
787 759                                                                  }
792 764                          }
793 765                  }
794 766          }
795 -     let okShift = $t02694227041._1
796 -     let forcedByDeviationOrTimeout = $t02694227041._2
767 +     let okShift = $t02447524574._1
768 +     let forcedByDeviationOrTimeout = $t02447524574._2
797 769      let queueWaits = (oraclePriceIndex >= queuePriceIndex)
798 770      if ((settledPriceIndex > queuePriceIndex))
799 771          then throw("settle2: future price already settled/rebalanced")
824 796      }
825 797  
826 798  
799 + 
800 + @Callable(i)
801 + func stakeAll () = if (if ((i.caller != this))
802 +     then (i.caller != addressFromStringValue(getStringValue(this, "pacewrapper")))
803 +     else false)
804 +     then throw("forbidden")
805 +     else {
806 +         let tkn = fromBase58String(mainToken)
807 +         let currentBalance = assetBalance(this, tkn)
808 +         let stake = invoke(rpdAddress, "lockNeutrinoSP", [feeAddress, 100], [AttachedPayment(tkn, currentBalance)])
809 +         if ((stake == stake))
810 +             then $Tuple2(nil, currentBalance)
811 +             else throw("Strict value is not equal to itself.")
812 +         }
813 + 
814 + 
815 + 
816 + @Callable(i)
817 + func unstakeAll () = if (if ((i.caller != this))
818 +     then (i.caller != addressFromStringValue(getStringValue(this, "pacewrapper")))
819 +     else false)
820 +     then throw("forbidden")
821 +     else {
822 +         let currentStaked = valueOrElse(getInteger(rpdAddress, ((("rpd_balance_" + mainToken) + "_") + toString(this))), 0)
823 +         let unstake = invoke(rpdAddress, "unlockNeutrino", [currentStaked, mainToken], nil)
824 +         if ((unstake == unstake))
825 +             then $Tuple2(nil, currentStaked)
826 +             else throw("Strict value is not equal to itself.")
827 +         }
828 + 
829 + 
830 + 
831 + @Callable(i)
832 + func state () = $Tuple2(nil, ((("maxIssueBull = " + toString(maxIssue(BULL))) + ", maxIssueBear = ") + toString(maxIssue(BEAR))))
833 + 
834 + 
827 835  @Verifier(tx)
828 - func verify () = {
829 -     let adminAction = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(admins[0])))
830 -         then 1
831 -         else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(admins[1])))
832 -         then 1
833 -         else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(admins[2])))
834 -         then 1
835 -         else 0)) > 1)
836 -     let stakingAction =     match tx {
837 -         case tx: InvokeScriptTransaction => 
838 -             let signedCorrectly = sigVerify(tx.bodyBytes, tx.proofs[0], daemonPublicKey)
839 -             let feesCorrect = if ((tx.feeAssetId == unit))
840 -                 then ((1000 * 1000) >= tx.fee)
841 -                 else false
842 -             let dappCorrect = (tx.dApp == rpdAddress)
843 -             let unlock = (tx.function == "unlockNeutrino")
844 -             let lock = if (if ((tx.function == "lockNeutrinoSP"))
845 -                 then (tx.args[0] == stakingAddress)
846 -                 else false)
847 -                 then (wavesBalance(this).available >= ten8)
848 -                 else false
849 -             let funcCorrect = if (lock)
850 -                 then true
851 -                 else unlock
852 -             if (if (if (signedCorrectly)
853 -                 then feesCorrect
854 -                 else false)
855 -                 then dappCorrect
856 -                 else false)
857 -                 then funcCorrect
858 -                 else false
859 -         case _ => 
860 -             false
861 -     }
862 -     if (adminAction)
863 -         then true
864 -         else stakingAction
865 -     }
836 + func verify () = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(admins[0])))
837 +     then 1
838 +     else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(admins[1])))
839 +     then 1
840 +     else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(admins[2])))
841 +     then 1
842 +     else 0)) > 1)
866 843  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func SE (k,v) = StringEntry(k, v)
5 5  
6 6  
7 7  func IE (k,v) = IntegerEntry(k, v)
8 8  
9 9  
10 10  func ST (a,amt,t) = ScriptTransfer(a, amt, t)
11 11  
12 12  
13 13  let ten6 = 1000000
14 14  
15 15  let ten8 = 100000000
16 16  
17 17  let MAX = 9223372036854775807
18 18  
19 19  let configProviderKey = "configProvider"
20 20  
21 21  let configProvider = match getString(this, configProviderKey) {
22 22      case s: String => 
23 23          addressFromStringValue(s)
24 24      case _ => 
25 25          this
26 26  }
27 27  
28 28  func localI (k,e) = valueOrErrorMessage(getInteger(this, k), e)
29 29  
30 30  
31 31  func localS (k,e) = valueOrErrorMessage(getString(this, k), e)
32 32  
33 33  
34 34  func confI (k,e) = valueOrErrorMessage(getInteger(configProvider, k), e)
35 35  
36 36  
37 37  func confS (k,e) = valueOrErrorMessage(getString(configProvider, k), e)
38 38  
39 39  
40 40  let BULLK = "BULLId"
41 41  
42 42  let BEARK = "BEARId"
43 43  
44 44  let USDNK = "mainTokenId"
45 45  
46 46  let BULLCOLK = "bullCollateral"
47 47  
48 48  let BEARCOLK = "bearCollateral"
49 49  
50 50  let BULLCIRCK = "bullCirculation"
51 51  
52 52  let BEARCIRCK = "bearCirculation"
53 53  
54 54  let ISSPERCK = "issuePercentile"
55 55  
56 56  let REDPERCK = "redeemPercentile"
57 57  
58 58  let MINISSK = "minIssue"
59 59  
60 60  let MINREDK = "minRedeem"
61 61  
62 62  let MINPOOLK = "minPool"
63 63  
64 64  let FEEACCK = "feesAccumulated"
65 65  
66 66  let WLISTK = "issueWhiteList"
67 67  
68 68  let REBPERCK = "rebalancePercentile"
69 69  
70 70  let REBIDXK = "lastSettlementPriceId"
71 71  
72 72  let HEADK = "headPointer"
73 73  
74 74  let TAILK = "tailPointer"
75 75  
76 76  let QSIZEK = "queueSize"
77 77  
78 78  let POOLUSDNK = "poolMainTokenValue"
79 79  
80 80  let POOLUPK = "poolUp"
81 81  
82 82  let POOLDWNK = "poolDwn"
83 83  
84 84  let POOLCIRCK = "poolTokenCirculation"
85 85  
86 86  let POOLK = "poolToken"
87 87  
88 88  let LEVK = "leverage"
89 89  
90 90  let WAVESFEEK = "wavesPacemakerFee"
91 91  
92 92  let USDNFEEK = "usdnPacemakerFee"
93 93  
94 94  let oraclev2Key = "oraclev2"
95 95  
96 96  let assetidv2Key = "assetidv2"
97 97  
98 98  let oraclev2 = valueOrErrorMessage(getString(this, oraclev2Key), "no oraclev2 key")
99 99  
100 100  let assetidv2 = valueOrErrorMessage(getString(this, assetidv2Key), "no assetidv2")
101 101  
102 102  let maxDeviation = valueOrElse(getInteger(configProvider, (toString(this) + "_deviationPercentile")), 0)
103 103  
104 104  let lastPriceIndexKey = ("%s%s__idxCurrent__" + assetidv2)
105 105  
106 106  let priceIndexPrefix = (("%s%s%d__idx2Height__" + assetidv2) + "__")
107 107  
108 108  let priceHeightPrefix = (("%s%s%d__priceByHeight__" + assetidv2) + "__")
109 109  
110 110  let minUsdnFee = valueOrElse(getInteger(configProvider, USDNFEEK), 0)
111 111  
112 112  let minWavesFee = valueOrElse(getInteger(configProvider, WAVESFEEK), 0)
113 113  
114 114  let bullCol = localI(BULLCOLK, "no 0")
115 115  
116 116  let bearCol = localI(BEARCOLK, "no 1")
117 117  
118 118  let bullCirc = localI(BULLCIRCK, "no 2")
119 119  
120 120  let bearCirc = localI(BEARCIRCK, "no 3")
121 121  
122 122  let BULL = localS(BULLK, "no 14")
123 123  
124 124  let BEAR = localS(BEARK, "no 15")
125 125  
126 126  let mainToken = localS(USDNK, "no 16")
127 127  
128 128  let issuePercentile = confI(ISSPERCK, "no 4")
129 129  
130 130  let redeemPercentile = confI(REDPERCK, "no 5")
131 131  
132 132  let minIssue = confI(MINISSK, "no 6")
133 133  
134 134  let minRedeem = confI(MINREDK, "no 7")
135 135  
136 136  let minPool = confI(MINPOOLK, "no 8")
137 137  
138 138  let rebalancePercentile = valueOrElse(getInteger(configProvider, ((toString(this) + "_") + REBPERCK)), 0)
139 139  
140 140  let whitelist = confS(WLISTK, "no 9")
141 141  
142 142  func allowed (a) = if ((whitelist == ""))
143 143      then true
144 144      else isDefined(indexOf(whitelist, toString(a)))
145 145  
146 146  
147 147  let poolMain = localI(POOLUSDNK, "no")
148 148  
149 149  let poolUp = localI(POOLUPK, "no 10")
150 150  
151 151  let poolDwn = localI(POOLDWNK, "no 11")
152 152  
153 153  let poolToken = localS(POOLK, "no 12")
154 154  
155 155  let poolTokenCirculation = localI(POOLCIRCK, "no 13")
156 156  
157 157  let poolBullExposure = fraction(bullCol, poolUp, bullCirc)
158 158  
159 159  let poolBearExposure = fraction(bearCol, poolDwn, bearCirc)
160 160  
161 161  let poolValue = ((poolMain + poolBullExposure) + poolBearExposure)
162 162  
163 163  let oracle = valueOrErrorMessage(addressFromString(oraclev2), "bad oracle address")
164 164  
165 165  let closeInterval = confI("closeInterval", "no CI")
166 166  
167 167  let settledPriceIndex = valueOrErrorMessage(getInteger(this, REBIDXK), "no last rebalance price")
168 168  
169 169  let oraclePriceIndex = valueOrErrorMessage(getInteger(oracle, lastPriceIndexKey), ((("bad oracle data at " + toString(oracle)) + ": no integer at ") + lastPriceIndexKey))
170 170  
171 171  let leverage = valueOrElse(getInteger(this, LEVK), 3)
172 172  
173 173  func heightByIndex (priceIndex) = valueOrErrorMessage(getInteger(oracle, (priceIndexPrefix + toString(priceIndex))), ("no data at index " + toString(priceIndex)))
174 174  
175 175  
176 176  func priceByHeight (priceHeight) = valueOrErrorMessage(getInteger(oracle, (priceHeightPrefix + toString(priceHeight))), ("no data for height " + toString(priceHeight)))
177 177  
178 178  
179 179  func priceByIndex (priceIndex) = priceByHeight(heightByIndex(priceIndex))
180 180  
181 181  
182 182  let queueSize = valueOrElse(getInteger(this, QSIZEK), 0)
183 183  
184 184  let headPointer = valueOrElse(getString(this, HEADK), "")
185 185  
186 186  let tailPointer = valueOrElse(getString(this, TAILK), "")
187 187  
188 188  let feesAccumulated = valueOrElse(getInteger(this, FEEACCK), 0)
189 189  
190 190  let queueEmpty = (headPointer == "")
191 191  
192 192  let queuePriceIndex = if (queueEmpty)
193 193      then MAX
194 194      else {
195 195          let data = split(localS(headPointer, "settle2: bad head pointer"), "|")
196 196          parseIntValue(data[3])
197 197          }
198 198  
199 199  let settledPrice = priceByIndex(settledPriceIndex)
200 200  
201 201  let ISSUE = "ISSUE"
202 202  
203 203  let REDEEM = "REDEEM"
204 204  
205 205  let POOL = "POOL"
206 206  
207 207  let UNPOOL = "UNPOOL"
208 208  
209 209  let feeAddrKey = "feeAddress"
210 210  
211 211  let stakingAddrKey = "stakingAddress"
212 212  
213 213  let daemonPubKeyKey = "daemonPublicKey"
214 214  
215 215  let feeAddress = valueOrErrorMessage(addressFromString(confS(feeAddrKey, "no feeAddress")), "bad feeAddress")
216 216  
217 217  let stakingAddress = confS(stakingAddrKey, "no stakingAddress")
218 218  
219 219  let daemonPublicKey = fromBase58String(confS(daemonPubKeyKey, "no daemonPublicKey"))
220 220  
221 - let rpdAddress = addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ")
221 + let rpdAddress = valueOrErrorMessage(addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ"), "bad rpd address")
222 222  
223 223  let admins = ["2HHqV8W9DJayV5R6tBD2Sb8srphpoboDi7r1t1aPiumC", "5ZXe82RRASU7qshXM2J9JNYhqJ9GWYjjVq2gwUV5Naz9", "5WRXFSjwcTbNfKcJs8ZqXmSSWYsSVJUtMvMqZj5hH4Nc"]
224 224  
225 225  func buildNewItem (action,amt,token,priceIndex,invoker,minPayout,maxPayout) = (((((((((((((action + "|") + toString(amt)) + "|") + token) + "|") + toString(priceIndex)) + "|") + invoker) + "|") + toString(minPayout)) + "|") + toString(maxPayout)) + "|")
226 226  
227 227  
228 228  func diffAbs (a1,a2) = {
229 229      let diff = (a1 - a2)
230 230      if ((diff > 0))
231 231          then diff
232 232          else (0 - diff)
233 233      }
234 234  
235 235  
236 236  func userDiffAbs () = diffAbs((bullCol - poolBullExposure), (bearCol - poolBearExposure))
237 237  
238 238  
239 239  func maxIssue (tokenId) = {
240 240      let poolInvestment = if ((poolUp > 0))
241 241          then BULL
242 242          else BEAR
243 243      if ((tokenId != poolInvestment))
244 244          then poolMain
245 245          else (userDiffAbs() + poolValue)
246 246      }
247 247  
248 248  
249 249  func validatePMFee (i,minPayout) = if ((0 > minPayout))
250 250      then throw("negative min payout")
251 251      else {
252 252          let p = i.payments[1]
253 253          let ok =         match p.assetId {
254 254              case bv: ByteVector => 
255 255                  if ((toBase58String(bv) == mainToken))
256 256                      then (p.amount >= minUsdnFee)
257 257                      else false
258 258              case waves: Unit => 
259 259                  (p.amount >= minWavesFee)
260 260              case _ => 
261 261                  throw("Match error")
262 262          }
263 263          if (!(ok))
264 264              then throw("incorrect pacemaker fee")
265 265              else true
266 266          }
267 267  
268 268  
269 269  func enqueue (id,action,amt,token,priceIndex,invoker,minPayout,maxPayout) = if (!(valueOrElse(getBoolean(this, "enableEnqueue"), true)))
270 270      then throw("enqueue paused")
271 271      else {
272 272          let increaseQueueSize = IE(QSIZEK, (queueSize + 1))
273 273          let itm = buildNewItem(action, amt, token, priceIndex, invoker, minPayout, maxPayout)
274 274          if ((queueSize == 0))
275 275              then [SE(HEADK, id), SE(TAILK, id), SE(id, itm), increaseQueueSize]
276 276              else {
277 277                  let prevId = localS(TAILK, "can't get tail pointer")
278 278                  let prevItm = localS(prevId, "can't resolve pointer")
279 279                  let updatedPrevItm = (prevItm + id)
280 280  [SE(prevId, updatedPrevItm), SE(id, itm), SE(TAILK, id), increaseQueueSize]
281 281                  }
282 282          }
283 283  
284 284  
285 285  func poolSupport (curBullCol0,curBearCol0,curBullCirc0,curBearCirc0,curPoolMain0,curPoolUp0,curPoolDwn0,steps) = {
286 286      func closeUp (c1,c2,a0,a1,c0,pu,pd) =     {
287 287          let diff = (c1 - c2)
288 288          let exp = fraction(c1, pu, a0)
289 289          let liquidatedTokens = if ((diff > exp))
290 290              then pu
291 291              else fraction(diff, a0, c1)
292 292          let liquidatedValue = if ((diff > exp))
293 293              then exp
294 294              else fraction(liquidatedTokens, c1, a0)
295 295          $Tuple7((c1 - liquidatedValue), c2, (a0 - liquidatedTokens), a1, (c0 + liquidatedValue), (pu - liquidatedTokens), pd)
296 296          }
297 297  
298 298      func closeDwn (c1,c2,a0,a1,c0,pu,pd) =     {
299 299          let diff = (c2 - c1)
300 300          let exp = fraction(c2, pd, a1)
301 301          let liquidatedTokens = if ((diff > exp))
302 302              then pd
303 303              else fraction(diff, a1, c2)
304 304          let liquidatedValue = if ((diff > exp))
305 305              then exp
306 306              else fraction(liquidatedTokens, c2, a1)
307 307          $Tuple7(c1, (c2 - liquidatedValue), a0, (a1 - liquidatedTokens), (c0 + liquidatedValue), pu, (pd - liquidatedTokens))
308 308          }
309 309  
310 310      func openDwn (c1,c2,a0,a1,c0,pu,pd) =     {
311 311          let diff = (c1 - c2)
312 312          let spentPoolValue = if ((c0 > diff))
313 313              then diff
314 314              else c0
315 315          let acquiredTokens = fraction(spentPoolValue, a1, c2)
316 316          $Tuple7(c1, (c2 + spentPoolValue), a0, (a1 + acquiredTokens), (c0 - spentPoolValue), pu, (pd + acquiredTokens))
317 317          }
318 318  
319 319      func openUp (c1,c2,a0,a1,c0,pu,pd) =     {
320 320          let diff = (c2 - c1)
321 321          let spentPoolValue = if ((c0 > diff))
322 322              then diff
323 323              else c0
324 324          let acquiredTokens = fraction(spentPoolValue, a0, c1)
325 325          $Tuple7((c1 + spentPoolValue), c2, (a0 + acquiredTokens), a1, (c0 - spentPoolValue), (pu + acquiredTokens), pd)
326 326          }
327 327  
328 -     let $t0921610251 = if ((curBullCol0 > curBearCol0))
328 +     let $t0925410289 = if ((curBullCol0 > curBearCol0))
329 329          then {
330 330              let afterCloseUp = closeUp(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
331 -             let $t094429579 = afterCloseUp
332 -             let a = $t094429579._1
333 -             let b = $t094429579._2
334 -             let c = $t094429579._3
335 -             let d = $t094429579._4
336 -             let e = $t094429579._5
337 -             let f = $t094429579._6
338 -             let g = $t094429579._7
331 +             let $t094809617 = afterCloseUp
332 +             let a = $t094809617._1
333 +             let b = $t094809617._2
334 +             let c = $t094809617._3
335 +             let d = $t094809617._4
336 +             let e = $t094809617._5
337 +             let f = $t094809617._6
338 +             let g = $t094809617._7
339 339              if ((f > 0))
340 340                  then afterCloseUp
341 341                  else if ((f == 0))
342 342                      then openDwn(a, b, c, d, e, f, g)
343 343                      else throw("poolUp < 0")
344 344              }
345 345          else {
346 346              let afterCloseDwn = closeDwn(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
347 -             let $t0993010070 = afterCloseDwn
348 -             let a = $t0993010070._1
349 -             let b = $t0993010070._2
350 -             let c = $t0993010070._3
351 -             let d = $t0993010070._4
352 -             let e = $t0993010070._5
353 -             let f = $t0993010070._6
354 -             let g = $t0993010070._7
347 +             let $t0996810108 = afterCloseDwn
348 +             let a = $t0996810108._1
349 +             let b = $t0996810108._2
350 +             let c = $t0996810108._3
351 +             let d = $t0996810108._4
352 +             let e = $t0996810108._5
353 +             let f = $t0996810108._6
354 +             let g = $t0996810108._7
355 355              if ((g > 0))
356 356                  then afterCloseDwn
357 357                  else if ((g == 0))
358 358                      then openUp(a, b, c, d, e, f, g)
359 359                      else throw("poolDwn < 0")
360 360              }
361 -     let c1 = $t0921610251._1
362 -     let c2 = $t0921610251._2
363 -     let a0 = $t0921610251._3
364 -     let a1 = $t0921610251._4
365 -     let c0 = $t0921610251._5
366 -     let pu = $t0921610251._6
367 -     let pd = $t0921610251._7
361 +     let c1 = $t0925410289._1
362 +     let c2 = $t0925410289._2
363 +     let a0 = $t0925410289._3
364 +     let a1 = $t0925410289._4
365 +     let c0 = $t0925410289._5
366 +     let pu = $t0925410289._6
367 +     let pd = $t0925410289._7
368 368      let charge = fraction(userDiffAbs(), (rebalancePercentile * steps), ((1440 * 100) * 100))
369 369      let c1SplitP = if ((pd > 0))
370 370          then charge
371 371          else 0
372 372      let c2SplitP = if ((pu > 0))
373 373          then charge
374 374          else 0
375 375      $Tuple7((c1 - c1SplitP), (c2 - c2SplitP), a0, a1, ((c0 + c1SplitP) + c2SplitP), pu, pd)
376 376      }
377 377  
378 378  
379 379  func poolSup (curBullCol0,curBearCol0,curBullCirc0,curBearCirc0) = {
380 -     let $t01067610861 = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
381 -     let bullCol1 = $t01067610861._1
382 -     let bearCol1 = $t01067610861._2
383 -     let bullCic1 = $t01067610861._3
384 -     let bearCirc1 = $t01067610861._4
385 -     let poolMain1 = $t01067610861._5
386 -     let poolUp1 = $t01067610861._6
387 -     let poolDwn1 = $t01067610861._7
380 +     let $t01071410899 = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
381 +     let bullCol1 = $t01071410899._1
382 +     let bearCol1 = $t01071410899._2
383 +     let bullCic1 = $t01071410899._3
384 +     let bearCirc1 = $t01071410899._4
385 +     let poolMain1 = $t01071410899._5
386 +     let poolUp1 = $t01071410899._6
387 +     let poolDwn1 = $t01071410899._7
388 388  [IE(BULLCOLK, bullCol1), IE(BULLCIRCK, bullCic1), IE(BEARCOLK, bearCol1), IE(BEARCIRCK, bearCirc1), IE(POOLUSDNK, poolMain1), IE(POOLUPK, poolUp1), IE(POOLDWNK, poolDwn1)]
389 389      }
390 390  
391 391  
392 392  func dequeue () = {
393 393      func sp (a,mx) =     if ((mx >= a))
394 394          then $Tuple2(a, 0)
395 395          else $Tuple2(mx, (a - mx))
396 396  
397 397      if ((queueSize == 0))
398 398          then throw("nothing to settle")
399 399          else {
400 400              func collectFee (fees) =             IE(FEEACCK, (feesAccumulated + fees))
401 401  
402 402              let decreaseQueueSize = IE(QSIZEK, (queueSize - 1))
403 403              let isLastElement = (headPointer == tailPointer)
404 404              let overwriteTail = SE(TAILK, "")
405 405              let dataStr = localS(headPointer, "bad head pointer(dequeue)")
406 406              let data = split(dataStr, "|")
407 407              let action = data[0]
408 408              let amt = parseIntValue(data[1])
409 409              let token = data[2]
410 410              let priceIndex = parseIntValue(data[3])
411 411              let invoker = addressFromStringValue(data[4])
412 412              let minPayout = if ((8 > size(data)))
413 413                  then 0
414 414                  else parseIntValue(data[5])
415 415              let maxPayout = if ((8 > size(data)))
416 416                  then MAX
417 417                  else parseIntValue(data[6])
418 418              let next = data[(size(data) - 1)]
419 419              func payback (tkn) =             [SE(HEADK, next), decreaseQueueSize, ST(invoker, amt, fromBase58String(tkn))]
420 420  
421 421              let items = if ((settledPriceIndex != priceIndex))
422 422                  then throw(((("corrupt state, settledPriceIndex=" + toString(settledPriceIndex)) + ", request price id=") + toString(priceIndex)))
423 423                  else if ((action == ISSUE))
424 424                      then {
425 425                          let feeSize = fraction(amt, issuePercentile, 10000)
426 426                          let addedCollateral = (amt - feeSize)
427 427                          let defaultAddedTokens = if ((token == BULL))
428 428                              then fraction(bullCirc, addedCollateral, bullCol)
429 429                              else if ((token == BEAR))
430 430                                  then fraction(bearCirc, addedCollateral, bearCol)
431 431                                  else throw("bad token id")
432 -                         let $t01287312946 = sp(defaultAddedTokens, maxPayout)
433 -                         let addedToCirculation = $t01287312946._1
434 -                         let extraTokens = $t01287312946._2
435 -                         let $t01296313134 = if ((token == BULL))
432 +                         let $t01291112984 = sp(defaultAddedTokens, maxPayout)
433 +                         let addedToCirculation = $t01291112984._1
434 +                         let extraTokens = $t01291112984._2
435 +                         let $t01300113172 = if ((token == BULL))
436 436                              then $Tuple4(defaultAddedTokens, addedCollateral, 0, 0)
437 437                              else $Tuple4(0, 0, defaultAddedTokens, addedCollateral)
438 -                         let plusBulls = $t01296313134._1
439 -                         let plusBullCol = $t01296313134._2
440 -                         let plusBears = $t01296313134._3
441 -                         let plusBearCol = $t01296313134._4
438 +                         let plusBulls = $t01300113172._1
439 +                         let plusBullCol = $t01300113172._2
440 +                         let plusBears = $t01300113172._3
441 +                         let plusBearCol = $t01300113172._4
442 442                          if ((minPayout > addedToCirculation))
443 443                              then payback(mainToken)
444 444                              else (poolSup((bullCol + plusBullCol), (bearCol + plusBearCol), (bullCirc + plusBulls), (bearCirc + plusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, addedToCirculation, fromBase58String(token)), ST(feeAddress, extraTokens, fromBase58String(token))])
445 445                          }
446 446                      else if ((action == REDEEM))
447 447                          then {
448 448                              let removedTokens = amt
449 449                              let estimatedPayout = if ((token == BULL))
450 450                                  then fraction(bullCol, removedTokens, bullCirc)
451 451                                  else if ((token == BEAR))
452 452                                      then fraction(bearCol, removedTokens, bearCirc)
453 453                                      else throw("bad token id")
454 454                              let feeSize = fraction(estimatedPayout, redeemPercentile, 10000)
455 455                              let defaultPayout = (estimatedPayout - feeSize)
456 -                             let $t01420114255 = sp(defaultPayout, maxPayout)
457 -                             let userPayout = $t01420114255._1
458 -                             let extra = $t01420114255._2
459 -                             let $t01427214437 = if ((token == BULL))
456 +                             let $t01423914293 = sp(defaultPayout, maxPayout)
457 +                             let userPayout = $t01423914293._1
458 +                             let extra = $t01423914293._2
459 +                             let $t01431014475 = if ((token == BULL))
460 460                                  then $Tuple4(removedTokens, estimatedPayout, 0, 0)
461 461                                  else $Tuple4(0, 0, removedTokens, estimatedPayout)
462 -                             let minusBulls = $t01427214437._1
463 -                             let minusBullCol = $t01427214437._2
464 -                             let minusBears = $t01427214437._3
465 -                             let minusBearCol = $t01427214437._4
462 +                             let minusBulls = $t01431014475._1
463 +                             let minusBullCol = $t01431014475._2
464 +                             let minusBears = $t01431014475._3
465 +                             let minusBearCol = $t01431014475._4
466 466                              if ((minPayout > userPayout))
467 467                                  then payback(token)
468 468                                  else (poolSup((bullCol - minusBullCol), (bearCol - minusBearCol), (bullCirc - minusBulls), (bearCirc - minusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, userPayout, fromBase58String(mainToken)), ST(feeAddress, extra, fromBase58String(mainToken))])
469 469                              }
470 470                          else if ((action == POOL))
471 471                              then {
472 472                                  let issueTokens = fraction(poolTokenCirculation, amt, poolValue)
473 473                                  if ((minPayout > issueTokens))
474 474                                      then payback(mainToken)
475 475                                      else [IE(POOLUSDNK, (poolMain + amt)), IE(POOLCIRCK, (poolTokenCirculation + issueTokens)), SE(HEADK, next), decreaseQueueSize, ST(invoker, issueTokens, fromBase58String(poolToken))]
476 476                                  }
477 477                              else if ((action == UNPOOL))
478 478                                  then {
479 479                                      func share (a) =                                     fraction(a, amt, poolTokenCirculation)
480 480  
481 481                                      let unpooledMain = share(poolMain)
482 482                                      let unpooledUp = share(poolUp)
483 483                                      let unpooledDwn = share(poolDwn)
484 484                                      let unpooledUpValue = fraction(unpooledUp, bullCol, bullCirc)
485 485                                      let unpooledDwnValue = fraction(unpooledDwn, bearCol, bearCirc)
486 486                                      let totalUnpooledValue = ((unpooledMain + unpooledUpValue) + unpooledDwnValue)
487 487                                      if ((minPayout > totalUnpooledValue))
488 488                                          then payback(poolToken)
489 489                                          else [IE(POOLUSDNK, (poolMain - unpooledMain)), IE(POOLCIRCK, (poolTokenCirculation - amt)), IE(POOLUPK, (poolUp - unpooledUp)), IE(POOLDWNK, (poolDwn - unpooledDwn)), IE(BULLCIRCK, (bullCirc - unpooledUp)), IE(BEARCIRCK, (bearCirc - unpooledDwn)), IE(BULLCOLK, (bullCol - unpooledUpValue)), IE(BEARCOLK, (bearCol - unpooledDwnValue)), SE(HEADK, next), decreaseQueueSize, ST(invoker, totalUnpooledValue, fromBase58String(mainToken))]
490 490                                      }
491 491                                  else throw(("bad action: " + action))
492 492              if (isLastElement)
493 493                  then overwriteTail :: items
494 494                  else items
495 495              }
496 496      }
497 497  
498 498  
499 499  func rebalance (offset) = if (!(valueOrElse(getBoolean(this, "enableRebalance"), true)))
500 500      then throw("rebalance paused")
501 501      else if ((offset == 0))
502 502          then throw("[OK] offset=0")
503 503          else {
504 504              func LV (v,p0,p1,m) =             {
505 505                  let denom = {
506 506                      let md = (((2 * (if ((p1 > p0))
507 507                          then p1
508 508                          else p0)) * m) / 3037000499)
509 509                      if ((10 > md))
510 510                          then 10
511 511                          else if ((100 > md))
512 512                              then 100
513 513                              else 1000
514 514                      }
515 515                  let pmax = ((if ((p1 > p0))
516 516                      then p1
517 517                      else p0) / denom)
518 518                  let pmin = ((if ((p0 > p1))
519 519                      then p1
520 520                      else p0) / denom)
521 521                  let a = (pmin * pmin)
522 522                  let b = ((((m * m) * pmax) * pmax) - (((((2 * m) * m) - m) * pmax) * pmin))
523 523                  let ma = ((m * m) - m)
524 524                  fraction(v, ((ma * a) + b), (((ma + 1) * a) + b))
525 525                  }
526 526  
527 527              let unsettledPriceIndex = (settledPriceIndex + offset)
528 528              let nextPrice = priceByIndex(unsettledPriceIndex)
529 529              let minVol = if ((bearCol > bullCol))
530 530                  then bullCol
531 531                  else bearCol
532 532              let redist = LV(minVol, settledPrice, nextPrice, leverage)
533 533              let bullsEarn = (nextPrice > settledPrice)
534 534              let newBullCol = if (bullsEarn)
535 535                  then (bullCol + redist)
536 536                  else (bullCol - redist)
537 537              let newBearCol = if (bullsEarn)
538 538                  then (bearCol - redist)
539 539                  else (bearCol + redist)
540 -             let $t01823118429 = poolSupport(newBullCol, newBearCol, bullCirc, bearCirc, poolMain, poolUp, poolDwn, offset)
541 -             let updBullCol = $t01823118429._1
542 -             let updBearCol = $t01823118429._2
543 -             let updBullCirc = $t01823118429._3
544 -             let updBearCirc = $t01823118429._4
545 -             let updPoolMain = $t01823118429._5
546 -             let updPoolUp = $t01823118429._6
547 -             let updPoolDwn = $t01823118429._7
540 +             let $t01826918467 = poolSupport(newBullCol, newBearCol, bullCirc, bearCirc, poolMain, poolUp, poolDwn, offset)
541 +             let updBullCol = $t01826918467._1
542 +             let updBearCol = $t01826918467._2
543 +             let updBullCirc = $t01826918467._3
544 +             let updBearCirc = $t01826918467._4
545 +             let updPoolMain = $t01826918467._5
546 +             let updPoolUp = $t01826918467._6
547 +             let updPoolDwn = $t01826918467._7
548 548  [IE(BULLCOLK, updBullCol), IE(BEARCOLK, updBearCol), IE(BULLCIRCK, updBullCirc), IE(BEARCIRCK, updBearCirc), IE(POOLUSDNK, updPoolMain), IE(POOLUPK, updPoolUp), IE(POOLDWNK, updPoolDwn), IE(REBIDXK, unsettledPriceIndex)]
549 549              }
550 550  
551 551  
552 552  func calcMax (min,avg) = if ((min > avg))
553 553      then throw(((("price too old: minPayout " + toString(min)) + " > avg = ") + toString(avg)))
554 554      else ((avg + avg) - min)
555 - 
556 - 
557 - @Callable(inv)
558 - func init (config,oracleAddress,nameup,namedwn,descUp,descDwn,poolName,poolDesc,assetName,denom,lev) = if (isDefined(getString(this, BULLK)))
559 -     then throw("already initialized")
560 -     else {
561 -         let totalOwnedMainToken = inv.payments[0].amount
562 -         let bulls = (totalOwnedMainToken / 3)
563 -         let bears = bulls
564 -         let pools = ((totalOwnedMainToken - bulls) - bears)
565 -         if (if (if ((bears == 0))
566 -             then true
567 -             else (bulls == 0))
568 -             then true
569 -             else (pools == 0))
570 -             then throw("can't init balances")
571 -             else {
572 -                 let oracleCurrentPriceIndex = valueOrErrorMessage(getInteger(valueOrErrorMessage(addressFromString(oracleAddress), "bad oracle address"), ("%s%s__idxCurrent__" + assetName)), ("no last price index for " + assetName))
573 -                 let bull = Issue(nameup, descUp, ((100 * ten6) * ten6), 6, true)
574 -                 let bear = Issue(namedwn, descDwn, ((100 * ten6) * ten6), 6, true)
575 -                 let pool = Issue(poolName, poolDesc, ((100 * ten6) * ten6), 6, true)
576 -                 let buid = calculateAssetId(bull)
577 -                 let beid = calculateAssetId(bear)
578 -                 let poid = calculateAssetId(pool)
579 - [bull, bear, pool, SE(BULLK, toBase58String(buid)), SE(BEARK, toBase58String(beid)), SE(USDNK, toBase58String(value(inv.payments[0].assetId))), SE(POOLK, toBase58String(poid)), SE(assetidv2Key, assetName), SE(oraclev2Key, oracleAddress), IE(REBIDXK, oracleCurrentPriceIndex), IE(BULLCOLK, bulls), IE(BEARCOLK, bears), IE(BULLCIRCK, (bulls / denom)), IE(BEARCIRCK, (bears / denom)), IE(POOLCIRCK, (pools / denom)), IE(POOLDWNK, 0), IE(POOLUPK, 0), IE(POOLUSDNK, pools), SE(configProviderKey, config), IE(LEVK, lev), ST(inv.caller, (bulls / denom), buid), ST(inv.caller, (bears / denom), beid), ST(inv.caller, (pools / denom), poid)]
580 -                 }
581 -         }
582 - 
583 555  
584 556  
585 557  @Callable(i)
586 558  func enableEnqueue (arg) = if ((i.caller != feeAddress))
587 559      then throw("only admin can")
588 560      else [BooleanEntry("enableEnqueue", arg)]
589 561  
590 562  
591 563  
592 564  @Callable(i)
593 565  func enableRebalance (arg) = if ((i.caller != feeAddress))
594 566      then throw("only admin can")
595 567      else [BooleanEntry("enableRebalance", arg)]
596 568  
597 569  
598 570  
599 571  @Callable(i)
600 572  func withdrawFee (amount) = if ((amount > feesAccumulated))
601 573      then throw(("too much. available: " + toString(feesAccumulated)))
602 574      else [IE(FEEACCK, (feesAccumulated - amount)), ST(feeAddress, amount, fromBase58String(mainToken))]
603 575  
604 576  
605 577  
606 578  @Callable(inv)
607 579  func requestRedeemSl (minPayout) = if (validatePMFee(inv, minPayout))
608 580      then {
609 581          let amt = inv.payments[0].amount
610 582          let tokenId = toBase58String(valueOrErrorMessage(inv.payments[0].assetId, "bad token att"))
611 583          if (if ((tokenId != BULL))
612 584              then (tokenId != BEAR)
613 585              else false)
614 586              then throw("bad token req")
615 587              else {
616 -                 let $t02240922548 = if ((tokenId == BULL))
588 +                 let $t01994220081 = if ((tokenId == BULL))
617 589                      then $Tuple2(bullCol, bullCirc)
618 590                      else if ((tokenId == BEAR))
619 591                          then $Tuple2(bearCol, bearCirc)
620 592                          else throw("bad token req")
621 -                 let col = $t02240922548._1
622 -                 let circ = $t02240922548._2
593 +                 let col = $t01994220081._1
594 +                 let circ = $t01994220081._2
623 595                  let est = fraction(amt, col, circ)
624 -                 let $t02259622690 = if ((minPayout == 0))
596 +                 let $t02012920223 = if ((minPayout == 0))
625 597                      then $Tuple2(0, MAX)
626 598                      else $Tuple2(minPayout, calcMax(minPayout, est))
627 -                 let minP = $t02259622690._1
628 -                 let maxP = $t02259622690._2
599 +                 let minP = $t02012920223._1
600 +                 let maxP = $t02012920223._2
629 601                  if ((inv.caller == this))
630 602                      then throw("can't do")
631 603                      else {
632 604                          let estimated = fraction(col, amt, circ)
633 605                          if ((minRedeem > estimated))
634 606                              then throw((("Attached payment too small. Min redeem amount is " + toString((minRedeem / 1000000))) + " USDN"))
635 607                              else enqueue(toBase58String(inv.transactionId), REDEEM, amt, tokenId, (oraclePriceIndex + 1), toString(inv.caller), minP, maxP)
636 608                          }
637 609                  }
638 610          }
639 611      else throw()
640 612  
641 613  
642 614  
643 615  @Callable(inv)
644 616  func requestIssueSl (tokenId,minPayout) = if (validatePMFee(inv, minPayout))
645 617      then if (if ((tokenId != BULL))
646 618          then (tokenId != BEAR)
647 619          else false)
648 620          then throw("bad token req")
649 621          else if (!(allowed(inv.caller)))
650 622              then throw("only whitelisted can do")
651 623              else if ((inv.payments[0].assetId != fromBase58String(mainToken)))
652 624                  then throw("bad token att")
653 625                  else {
654 626                      let amt = inv.payments[0].amount
655 -                     let $t02361323794 = if ((tokenId == BULL))
627 +                     let $t02114621327 = if ((tokenId == BULL))
656 628                          then $Tuple2(bullCol, bullCirc)
657 629                          else if ((tokenId == BEAR))
658 630                              then $Tuple2(bearCol, bearCirc)
659 631                              else throw("bad token req")
660 -                     let col = $t02361323794._1
661 -                     let circ = $t02361323794._2
632 +                     let col = $t02114621327._1
633 +                     let circ = $t02114621327._2
662 634                      let est = fraction(amt, circ, col)
663 -                     let $t02383623930 = if ((minPayout == 0))
635 +                     let $t02136921463 = if ((minPayout == 0))
664 636                          then $Tuple2(0, MAX)
665 637                          else $Tuple2(minPayout, calcMax(minPayout, est))
666 -                     let minP = $t02383623930._1
667 -                     let maxP = $t02383623930._2
638 +                     let minP = $t02136921463._1
639 +                     let maxP = $t02136921463._2
668 640                      if ((minIssue > amt))
669 641                          then throw((("Attached payment too small. Min required: " + toString((minIssue / 1000000))) + " USDN"))
670 642                          else {
671 643                              let maxAllowed = maxIssue(tokenId)
672 644                              if (if ((whitelist == ""))
673 645                                  then (inv.payments[0].amount > maxAllowed)
674 646                                  else false)
675 647                                  then throw((("trying to issue more than pool can handle. Max attachment allowed = " + toString((maxAllowed / 1000000))) + " USDN"))
676 648                                  else enqueue(toBase58String(inv.transactionId), ISSUE, amt, tokenId, (oraclePriceIndex + 1), toString(inv.caller), minP, maxP)
677 649                              }
678 650                      }
679 651      else throw()
680 652  
681 653  
682 654  
683 655  @Callable(inv)
684 656  func requestPool () = if (!(allowed(inv.caller)))
685 657      then throw("only whitelisted can do")
686 658      else {
687 659          let pmt = inv.payments[0]
688 660          if ((pmt.assetId != fromBase58String(mainToken)))
689 661              then throw("USDN required")
690 662              else if ((minPool > pmt.amount))
691 663                  then throw(("pool min: " + toString(minPool)))
692 664                  else {
693 665                      let estimate = fraction(poolTokenCirculation, pmt.amount, poolValue)
694 666                      enqueue(toBase58String(inv.transactionId), POOL, inv.payments[0].amount, "", (oraclePriceIndex + 1), toString(inv.caller), 0, MAX)
695 667                      }
696 668          }
697 669  
698 670  
699 671  
700 672  @Callable(inv)
701 673  func requestUnpool () = {
702 674      let pmt = inv.payments[0]
703 675      if ((pmt.assetId != fromBase58String(poolToken)))
704 676          then throw("bad token att")
705 677          else {
706 678              let estimate = fraction(poolValue, pmt.amount, poolTokenCirculation)
707 679              if ((minPool > estimate))
708 680                  then throw(((("unpool at least for" + toString(minPool)) + " ") + mainToken))
709 681                  else enqueue(toBase58String(inv.transactionId), UNPOOL, inv.payments[0].amount, "", (oraclePriceIndex + 1), toString(inv.caller), 0, MAX)
710 682              }
711 683      }
712 684  
713 685  
714 686  
715 687  @Callable(inv)
716 688  func settle () = {
717 689      let canRebalance = (oraclePriceIndex > settledPriceIndex)
718 690      if (queueEmpty)
719 691          then if (canRebalance)
720 692              then rebalance(1)
721 693              else throw("[OK] all done, carry on")
722 694          else if ((queuePriceIndex > settledPriceIndex))
723 695              then if (canRebalance)
724 696                  then rebalance(1)
725 697                  else throw("[OK] need to wait")
726 698              else if ((queuePriceIndex == settledPriceIndex))
727 699                  then dequeue()
728 700                  else throw("future price already rebalanced")
729 701      }
730 702  
731 703  
732 704  
733 705  @Callable(inv)
734 706  func settle2 () = {
735 707      func hasDeviation (priceIndex) =     {
736 708          let p = priceByIndex(priceIndex)
737 709          (fraction(diffAbs(settledPrice, p), 1000000, settledPrice) >= maxDeviation)
738 710          }
739 711  
740 712      let maxPossibleShift = (min([queuePriceIndex, oraclePriceIndex]) - settledPriceIndex)
741 713      func f (acc,shift) =     if (if (acc._2)
742 714          then true
743 715          else (shift > maxPossibleShift))
744 716          then acc
745 717          else $Tuple2(shift, if ((shift == 7))
746 718              then true
747 719              else hasDeviation((settledPriceIndex + shift)))
748 720  
749 -     let $t02694227041 = {
750 -         let $list2698627041 = [1, 2, 3, 4, 5, 6, 7]
751 -         let $size2698627041 = size($list2698627041)
752 -         let $acc02698627041 = $Tuple2(settledPriceIndex, false)
753 -         if (($size2698627041 == 0))
754 -             then $acc02698627041
721 +     let $t02447524574 = {
722 +         let $list2451924574 = [1, 2, 3, 4, 5, 6, 7]
723 +         let $size2451924574 = size($list2451924574)
724 +         let $acc02451924574 = $Tuple2(settledPriceIndex, false)
725 +         if (($size2451924574 == 0))
726 +             then $acc02451924574
755 727              else {
756 -                 let $acc12698627041 = f($acc02698627041, $list2698627041[0])
757 -                 if (($size2698627041 == 1))
758 -                     then $acc12698627041
728 +                 let $acc12451924574 = f($acc02451924574, $list2451924574[0])
729 +                 if (($size2451924574 == 1))
730 +                     then $acc12451924574
759 731                      else {
760 -                         let $acc22698627041 = f($acc12698627041, $list2698627041[1])
761 -                         if (($size2698627041 == 2))
762 -                             then $acc22698627041
732 +                         let $acc22451924574 = f($acc12451924574, $list2451924574[1])
733 +                         if (($size2451924574 == 2))
734 +                             then $acc22451924574
763 735                              else {
764 -                                 let $acc32698627041 = f($acc22698627041, $list2698627041[2])
765 -                                 if (($size2698627041 == 3))
766 -                                     then $acc32698627041
736 +                                 let $acc32451924574 = f($acc22451924574, $list2451924574[2])
737 +                                 if (($size2451924574 == 3))
738 +                                     then $acc32451924574
767 739                                      else {
768 -                                         let $acc42698627041 = f($acc32698627041, $list2698627041[3])
769 -                                         if (($size2698627041 == 4))
770 -                                             then $acc42698627041
740 +                                         let $acc42451924574 = f($acc32451924574, $list2451924574[3])
741 +                                         if (($size2451924574 == 4))
742 +                                             then $acc42451924574
771 743                                              else {
772 -                                                 let $acc52698627041 = f($acc42698627041, $list2698627041[4])
773 -                                                 if (($size2698627041 == 5))
774 -                                                     then $acc52698627041
744 +                                                 let $acc52451924574 = f($acc42451924574, $list2451924574[4])
745 +                                                 if (($size2451924574 == 5))
746 +                                                     then $acc52451924574
775 747                                                      else {
776 -                                                         let $acc62698627041 = f($acc52698627041, $list2698627041[5])
777 -                                                         if (($size2698627041 == 6))
778 -                                                             then $acc62698627041
748 +                                                         let $acc62451924574 = f($acc52451924574, $list2451924574[5])
749 +                                                         if (($size2451924574 == 6))
750 +                                                             then $acc62451924574
779 751                                                              else {
780 -                                                                 let $acc72698627041 = f($acc62698627041, $list2698627041[6])
781 -                                                                 if (($size2698627041 == 7))
782 -                                                                     then $acc72698627041
752 +                                                                 let $acc72451924574 = f($acc62451924574, $list2451924574[6])
753 +                                                                 if (($size2451924574 == 7))
754 +                                                                     then $acc72451924574
783 755                                                                      else {
784 -                                                                         let $acc82698627041 = f($acc72698627041, $list2698627041[7])
756 +                                                                         let $acc82451924574 = f($acc72451924574, $list2451924574[7])
785 757                                                                          throw("List size exceed 7")
786 758                                                                          }
787 759                                                                  }
788 760                                                          }
789 761                                                  }
790 762                                          }
791 763                                  }
792 764                          }
793 765                  }
794 766          }
795 -     let okShift = $t02694227041._1
796 -     let forcedByDeviationOrTimeout = $t02694227041._2
767 +     let okShift = $t02447524574._1
768 +     let forcedByDeviationOrTimeout = $t02447524574._2
797 769      let queueWaits = (oraclePriceIndex >= queuePriceIndex)
798 770      if ((settledPriceIndex > queuePriceIndex))
799 771          then throw("settle2: future price already settled/rebalanced")
800 772          else if ((settledPriceIndex == queuePriceIndex))
801 773              then dequeue()
802 774              else if (if ((okShift > 0))
803 775                  then if (forcedByDeviationOrTimeout)
804 776                      then true
805 777                      else queueWaits
806 778                  else false)
807 779                  then rebalance(okShift)
808 780                  else throw(("settle2: [OK] all done, carry on. available shift: " + toString(okShift)))
809 781      }
810 782  
811 783  
812 784  
813 785  @Callable(inv)
814 786  func settle3 () = {
815 787      let maxPossibleShift = (min([queuePriceIndex, oraclePriceIndex]) - settledPriceIndex)
816 788      let okShift = min([maxPossibleShift, 7])
817 789      if ((settledPriceIndex > queuePriceIndex))
818 790          then throw("settle3: future price already settled/rebalanced")
819 791          else if ((settledPriceIndex == queuePriceIndex))
820 792              then dequeue()
821 793              else if ((okShift > 0))
822 794                  then rebalance(okShift)
823 795                  else nil
824 796      }
825 797  
826 798  
799 + 
800 + @Callable(i)
801 + func stakeAll () = if (if ((i.caller != this))
802 +     then (i.caller != addressFromStringValue(getStringValue(this, "pacewrapper")))
803 +     else false)
804 +     then throw("forbidden")
805 +     else {
806 +         let tkn = fromBase58String(mainToken)
807 +         let currentBalance = assetBalance(this, tkn)
808 +         let stake = invoke(rpdAddress, "lockNeutrinoSP", [feeAddress, 100], [AttachedPayment(tkn, currentBalance)])
809 +         if ((stake == stake))
810 +             then $Tuple2(nil, currentBalance)
811 +             else throw("Strict value is not equal to itself.")
812 +         }
813 + 
814 + 
815 + 
816 + @Callable(i)
817 + func unstakeAll () = if (if ((i.caller != this))
818 +     then (i.caller != addressFromStringValue(getStringValue(this, "pacewrapper")))
819 +     else false)
820 +     then throw("forbidden")
821 +     else {
822 +         let currentStaked = valueOrElse(getInteger(rpdAddress, ((("rpd_balance_" + mainToken) + "_") + toString(this))), 0)
823 +         let unstake = invoke(rpdAddress, "unlockNeutrino", [currentStaked, mainToken], nil)
824 +         if ((unstake == unstake))
825 +             then $Tuple2(nil, currentStaked)
826 +             else throw("Strict value is not equal to itself.")
827 +         }
828 + 
829 + 
830 + 
831 + @Callable(i)
832 + func state () = $Tuple2(nil, ((("maxIssueBull = " + toString(maxIssue(BULL))) + ", maxIssueBear = ") + toString(maxIssue(BEAR))))
833 + 
834 + 
827 835  @Verifier(tx)
828 - func verify () = {
829 -     let adminAction = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(admins[0])))
830 -         then 1
831 -         else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(admins[1])))
832 -         then 1
833 -         else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(admins[2])))
834 -         then 1
835 -         else 0)) > 1)
836 -     let stakingAction =     match tx {
837 -         case tx: InvokeScriptTransaction => 
838 -             let signedCorrectly = sigVerify(tx.bodyBytes, tx.proofs[0], daemonPublicKey)
839 -             let feesCorrect = if ((tx.feeAssetId == unit))
840 -                 then ((1000 * 1000) >= tx.fee)
841 -                 else false
842 -             let dappCorrect = (tx.dApp == rpdAddress)
843 -             let unlock = (tx.function == "unlockNeutrino")
844 -             let lock = if (if ((tx.function == "lockNeutrinoSP"))
845 -                 then (tx.args[0] == stakingAddress)
846 -                 else false)
847 -                 then (wavesBalance(this).available >= ten8)
848 -                 else false
849 -             let funcCorrect = if (lock)
850 -                 then true
851 -                 else unlock
852 -             if (if (if (signedCorrectly)
853 -                 then feesCorrect
854 -                 else false)
855 -                 then dappCorrect
856 -                 else false)
857 -                 then funcCorrect
858 -                 else false
859 -         case _ => 
860 -             false
861 -     }
862 -     if (adminAction)
863 -         then true
864 -         else stakingAction
865 -     }
836 + func verify () = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(admins[0])))
837 +     then 1
838 +     else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(admins[1])))
839 +     then 1
840 +     else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(admins[2])))
841 +     then 1
842 +     else 0)) > 1)
866 843

Old	New		Differences
218	218
219	219		let daemonPublicKey = fromBase58String(confS(daemonPubKeyKey, "no daemonPublicKey"))
220	220
221		-	let rpdAddress = addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ")
	221	+	let rpdAddress = valueOrErrorMessage(addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ"), "bad rpd address")
222	222
223	223		let admins = ["2HHqV8W9DJayV5R6tBD2Sb8srphpoboDi7r1t1aPiumC", "5ZXe82RRASU7qshXM2J9JNYhqJ9GWYjjVq2gwUV5Naz9", "5WRXFSjwcTbNfKcJs8ZqXmSSWYsSVJUtMvMqZj5hH4Nc"]
224	224

325	325		$Tuple7((c1 + spentPoolValue), c2, (a0 + acquiredTokens), a1, (c0 - spentPoolValue), (pu + acquiredTokens), pd)
326	326		}
327	327
328		-	let $~~t0921610251~~ = if ((curBullCol0 > curBearCol0))
	328	+	let $t0925410289 = if ((curBullCol0 > curBearCol0))
329	329		then {
330	330		let afterCloseUp = closeUp(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
331		-	let $~~t094429579~~ = afterCloseUp
332		-	let a = $~~t094429579~~._1
333		-	let b = $~~t094429579~~._2
334		-	let c = $~~t094429579~~._3
335		-	let d = $~~t094429579~~._4
336		-	let e = $~~t094429579~~._5
337		-	let f = $~~t094429579~~._6
338		-	let g = $~~t094429579~~._7
	331	+	let $t094809617 = afterCloseUp
	332	+	let a = $t094809617._1
	333	+	let b = $t094809617._2
	334	+	let c = $t094809617._3
	335	+	let d = $t094809617._4
	336	+	let e = $t094809617._5
	337	+	let f = $t094809617._6
	338	+	let g = $t094809617._7
339	339		if ((f > 0))
340	340		then afterCloseUp
341	341		else if ((f == 0))

344	344		}
345	345		else {
346	346		let afterCloseDwn = closeDwn(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
347		-	let $~~t0993010070~~ = afterCloseDwn
348		-	let a = $~~t0993010070~~._1
349		-	let b = $~~t0993010070~~._2
350		-	let c = $~~t0993010070~~._3
351		-	let d = $~~t0993010070~~._4
352		-	let e = $~~t0993010070~~._5
353		-	let f = $~~t0993010070~~._6
354		-	let g = $~~t0993010070~~._7
	347	+	let $t0996810108 = afterCloseDwn
	348	+	let a = $t0996810108._1
	349	+	let b = $t0996810108._2
	350	+	let c = $t0996810108._3
	351	+	let d = $t0996810108._4
	352	+	let e = $t0996810108._5
	353	+	let f = $t0996810108._6
	354	+	let g = $t0996810108._7
355	355		if ((g > 0))
356	356		then afterCloseDwn
357	357		else if ((g == 0))
358	358		then openUp(a, b, c, d, e, f, g)
359	359		else throw("poolDwn < 0")
360	360		}
361		-	let c1 = $~~t0921610251~~._1
362		-	let c2 = $~~t0921610251~~._2
363		-	let a0 = $~~t0921610251~~._3
364		-	let a1 = $~~t0921610251~~._4
365		-	let c0 = $~~t0921610251~~._5
366		-	let pu = $~~t0921610251~~._6
367		-	let pd = $~~t0921610251~~._7
	361	+	let c1 = $t0925410289._1
	362	+	let c2 = $t0925410289._2
	363	+	let a0 = $t0925410289._3
	364	+	let a1 = $t0925410289._4
	365	+	let c0 = $t0925410289._5
	366	+	let pu = $t0925410289._6
	367	+	let pd = $t0925410289._7
368	368		let charge = fraction(userDiffAbs(), (rebalancePercentile * steps), ((1440 * 100) * 100))
369	369		let c1SplitP = if ((pd > 0))
370	370		then charge

377	377
378	378
379	379		func poolSup (curBullCol0,curBearCol0,curBullCirc0,curBearCirc0) = {
380		-	let $~~t01067610861~~ = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
381		-	let bullCol1 = $~~t01067610861~~._1
382		-	let bearCol1 = $~~t01067610861~~._2
383		-	let bullCic1 = $~~t01067610861~~._3
384		-	let bearCirc1 = $~~t01067610861~~._4
385		-	let poolMain1 = $~~t01067610861~~._5
386		-	let poolUp1 = $~~t01067610861~~._6
387		-	let poolDwn1 = $~~t01067610861~~._7
	380	+	let $t01071410899 = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
	381	+	let bullCol1 = $t01071410899._1
	382	+	let bearCol1 = $t01071410899._2
	383	+	let bullCic1 = $t01071410899._3
	384	+	let bearCirc1 = $t01071410899._4
	385	+	let poolMain1 = $t01071410899._5
	386	+	let poolUp1 = $t01071410899._6
	387	+	let poolDwn1 = $t01071410899._7
388	388		[IE(BULLCOLK, bullCol1), IE(BULLCIRCK, bullCic1), IE(BEARCOLK, bearCol1), IE(BEARCIRCK, bearCirc1), IE(POOLUSDNK, poolMain1), IE(POOLUPK, poolUp1), IE(POOLDWNK, poolDwn1)]
389	389		}
390	390

429	429		else if ((token == BEAR))
430	430		then fraction(bearCirc, addedCollateral, bearCol)
431	431		else throw("bad token id")
432		-	let $~~t01287312946~~ = sp(defaultAddedTokens, maxPayout)
433		-	let addedToCirculation = $~~t01287312946~~._1
434		-	let extraTokens = $~~t01287312946~~._2
435		-	let $~~t01296313134~~ = if ((token == BULL))
	432	+	let $t01291112984 = sp(defaultAddedTokens, maxPayout)
	433	+	let addedToCirculation = $t01291112984._1
	434	+	let extraTokens = $t01291112984._2
	435	+	let $t01300113172 = if ((token == BULL))
436	436		then $Tuple4(defaultAddedTokens, addedCollateral, 0, 0)
437	437		else $Tuple4(0, 0, defaultAddedTokens, addedCollateral)
438		-	let plusBulls = $~~t01296313134~~._1
439		-	let plusBullCol = $~~t01296313134~~._2
440		-	let plusBears = $~~t01296313134~~._3
441		-	let plusBearCol = $~~t01296313134~~._4
	438	+	let plusBulls = $t01300113172._1
	439	+	let plusBullCol = $t01300113172._2
	440	+	let plusBears = $t01300113172._3
	441	+	let plusBearCol = $t01300113172._4
442	442		if ((minPayout > addedToCirculation))
443	443		then payback(mainToken)
444	444		else (poolSup((bullCol + plusBullCol), (bearCol + plusBearCol), (bullCirc + plusBulls), (bearCirc + plusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, addedToCirculation, fromBase58String(token)), ST(feeAddress, extraTokens, fromBase58String(token))])

453	453		else throw("bad token id")
454	454		let feeSize = fraction(estimatedPayout, redeemPercentile, 10000)
455	455		let defaultPayout = (estimatedPayout - feeSize)
456		-	let $~~t01420114255~~ = sp(defaultPayout, maxPayout)
457		-	let userPayout = $~~t01420114255~~._1
458		-	let extra = $~~t01420114255~~._2
459		-	let $~~t01427214437~~ = if ((token == BULL))
	456	+	let $t01423914293 = sp(defaultPayout, maxPayout)
	457	+	let userPayout = $t01423914293._1
	458	+	let extra = $t01423914293._2
	459	+	let $t01431014475 = if ((token == BULL))
460	460		then $Tuple4(removedTokens, estimatedPayout, 0, 0)
461	461		else $Tuple4(0, 0, removedTokens, estimatedPayout)
462		-	let minusBulls = $~~t01427214437~~._1
463		-	let minusBullCol = $~~t01427214437~~._2
464		-	let minusBears = $~~t01427214437~~._3
465		-	let minusBearCol = $~~t01427214437~~._4
	462	+	let minusBulls = $t01431014475._1
	463	+	let minusBullCol = $t01431014475._2
	464	+	let minusBears = $t01431014475._3
	465	+	let minusBearCol = $t01431014475._4
466	466		if ((minPayout > userPayout))
467	467		then payback(token)
468	468		else (poolSup((bullCol - minusBullCol), (bearCol - minusBearCol), (bullCirc - minusBulls), (bearCirc - minusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, userPayout, fromBase58String(mainToken)), ST(feeAddress, extra, fromBase58String(mainToken))])

537	537		let newBearCol = if (bullsEarn)
538	538		then (bearCol - redist)
539	539		else (bearCol + redist)
540		-	let $~~t01823118429~~ = poolSupport(newBullCol, newBearCol, bullCirc, bearCirc, poolMain, poolUp, poolDwn, offset)
541		-	let updBullCol = $~~t01823118429~~._1
542		-	let updBearCol = $~~t01823118429~~._2
543		-	let updBullCirc = $~~t01823118429~~._3
544		-	let updBearCirc = $~~t01823118429~~._4
545		-	let updPoolMain = $~~t01823118429~~._5
546		-	let updPoolUp = $~~t01823118429~~._6
547		-	let updPoolDwn = $~~t01823118429~~._7
	540	+	let $t01826918467 = poolSupport(newBullCol, newBearCol, bullCirc, bearCirc, poolMain, poolUp, poolDwn, offset)
	541	+	let updBullCol = $t01826918467._1
	542	+	let updBearCol = $t01826918467._2
	543	+	let updBullCirc = $t01826918467._3
	544	+	let updBearCirc = $t01826918467._4
	545	+	let updPoolMain = $t01826918467._5
	546	+	let updPoolUp = $t01826918467._6
	547	+	let updPoolDwn = $t01826918467._7
548	548		[IE(BULLCOLK, updBullCol), IE(BEARCOLK, updBearCol), IE(BULLCIRCK, updBullCirc), IE(BEARCIRCK, updBearCirc), IE(POOLUSDNK, updPoolMain), IE(POOLUPK, updPoolUp), IE(POOLDWNK, updPoolDwn), IE(REBIDXK, unsettledPriceIndex)]
549	549		}
550	550

552	552		func calcMax (min,avg) = if ((min > avg))
553	553		then throw(((("price too old: minPayout " + toString(min)) + " > avg = ") + toString(avg)))
554	554		else ((avg + avg) - min)
555		-
556		-
557		-	@Callable(inv)
558		-	func init (config,oracleAddress,nameup,namedwn,descUp,descDwn,poolName,poolDesc,assetName,denom,lev) = if (isDefined(getString(this, BULLK)))
559		-	then throw("already initialized")
560		-	else {
561		-	let totalOwnedMainToken = inv.payments[0].amount
562		-	let bulls = (totalOwnedMainToken / 3)
563		-	let bears = bulls
564		-	let pools = ((totalOwnedMainToken - bulls) - bears)
565		-	if (if (if ((bears == 0))
566		-	then true
567		-	else (bulls == 0))
568		-	then true
569		-	else (pools == 0))
570		-	then throw("can't init balances")
571		-	else {
572		-	let oracleCurrentPriceIndex = valueOrErrorMessage(getInteger(valueOrErrorMessage(addressFromString(oracleAddress), "bad oracle address"), ("%s%s__idxCurrent__" + assetName)), ("no last price index for " + assetName))
573		-	let bull = Issue(nameup, descUp, ((100 * ten6) * ten6), 6, true)
574		-	let bear = Issue(namedwn, descDwn, ((100 * ten6) * ten6), 6, true)
575		-	let pool = Issue(poolName, poolDesc, ((100 * ten6) * ten6), 6, true)
576		-	let buid = calculateAssetId(bull)
577		-	let beid = calculateAssetId(bear)
578		-	let poid = calculateAssetId(pool)
579		-	[bull, bear, pool, SE(BULLK, toBase58String(buid)), SE(BEARK, toBase58String(beid)), SE(USDNK, toBase58String(value(inv.payments[0].assetId))), SE(POOLK, toBase58String(poid)), SE(assetidv2Key, assetName), SE(oraclev2Key, oracleAddress), IE(REBIDXK, oracleCurrentPriceIndex), IE(BULLCOLK, bulls), IE(BEARCOLK, bears), IE(BULLCIRCK, (bulls / denom)), IE(BEARCIRCK, (bears / denom)), IE(POOLCIRCK, (pools / denom)), IE(POOLDWNK, 0), IE(POOLUPK, 0), IE(POOLUSDNK, pools), SE(configProviderKey, config), IE(LEVK, lev), ST(inv.caller, (bulls / denom), buid), ST(inv.caller, (bears / denom), beid), ST(inv.caller, (pools / denom), poid)]
580		-	}
581		-	}
582		-
583	555
584	556
585	557		@Callable(i)

613	585		else false)
614	586		then throw("bad token req")
615	587		else {
616		-	let $~~t02240922548~~ = if ((tokenId == BULL))
	588	+	let $t01994220081 = if ((tokenId == BULL))
617	589		then $Tuple2(bullCol, bullCirc)
618	590		else if ((tokenId == BEAR))
619	591		then $Tuple2(bearCol, bearCirc)
620	592		else throw("bad token req")
621		-	let col = $~~t02240922548~~._1
622		-	let circ = $~~t02240922548~~._2
	593	+	let col = $t01994220081._1
	594	+	let circ = $t01994220081._2
623	595		let est = fraction(amt, col, circ)
624		-	let $~~t02259622690~~ = if ((minPayout == 0))
	596	+	let $t02012920223 = if ((minPayout == 0))
625	597		then $Tuple2(0, MAX)
626	598		else $Tuple2(minPayout, calcMax(minPayout, est))
627		-	let minP = $~~t02259622690~~._1
628		-	let maxP = $~~t02259622690~~._2
	599	+	let minP = $t02012920223._1
	600	+	let maxP = $t02012920223._2
629	601		if ((inv.caller == this))
630	602		then throw("can't do")
631	603		else {

652	624		then throw("bad token att")
653	625		else {
654	626		let amt = inv.payments[0].amount
655		-	let $~~t02361323794~~ = if ((tokenId == BULL))
	627	+	let $t02114621327 = if ((tokenId == BULL))
656	628		then $Tuple2(bullCol, bullCirc)
657	629		else if ((tokenId == BEAR))
658	630		then $Tuple2(bearCol, bearCirc)
659	631		else throw("bad token req")
660		-	let col = $~~t02361323794~~._1
661		-	let circ = $~~t02361323794~~._2
	632	+	let col = $t02114621327._1
	633	+	let circ = $t02114621327._2
662	634		let est = fraction(amt, circ, col)
663		-	let $~~t02383623930~~ = if ((minPayout == 0))
	635	+	let $t02136921463 = if ((minPayout == 0))
664	636		then $Tuple2(0, MAX)
665	637		else $Tuple2(minPayout, calcMax(minPayout, est))
666		-	let minP = $~~t02383623930~~._1
667		-	let maxP = $~~t02383623930~~._2
	638	+	let minP = $t02136921463._1
	639	+	let maxP = $t02136921463._2
668	640		if ((minIssue > amt))
669	641		then throw((("Attached payment too small. Min required: " + toString((minIssue / 1000000))) + " USDN"))
670	642		else {

746	718		then true
747	719		else hasDeviation((settledPriceIndex + shift)))
748	720
749		-	let $~~t02694227041~~ = {
750		-	let $~~list2698627041~~ = [1, 2, 3, 4, 5, 6, 7]
751		-	let $~~size2698627041~~ = size($~~list2698627041~~)
752		-	let $~~acc02698627041~~ = $Tuple2(settledPriceIndex, false)
753		-	if (($~~size2698627041~~ == 0))
754		-	then $~~acc02698627041~~
	721	+	let $t02447524574 = {
	722	+	let $list2451924574 = [1, 2, 3, 4, 5, 6, 7]
	723	+	let $size2451924574 = size($list2451924574)
	724	+	let $acc02451924574 = $Tuple2(settledPriceIndex, false)
	725	+	if (($size2451924574 == 0))
	726	+	then $acc02451924574
755	727		else {
756		-	let $~~acc12698627041~~ = f($~~acc02698627041~~, $~~list2698627041~~[0])
757		-	if (($~~size2698627041~~ == 1))
758		-	then $~~acc12698627041~~
	728	+	let $acc12451924574 = f($acc02451924574, $list2451924574[0])
	729	+	if (($size2451924574 == 1))
	730	+	then $acc12451924574
759	731		else {
760		-	let $~~acc22698627041~~ = f($~~acc12698627041~~, $~~list2698627041~~[1])
761		-	if (($~~size2698627041~~ == 2))
762		-	then $~~acc22698627041~~
	732	+	let $acc22451924574 = f($acc12451924574, $list2451924574[1])
	733	+	if (($size2451924574 == 2))
	734	+	then $acc22451924574
763	735		else {
764		-	let $~~acc32698627041~~ = f($~~acc22698627041~~, $~~list2698627041~~[2])
765		-	if (($~~size2698627041~~ == 3))
766		-	then $~~acc32698627041~~
	736	+	let $acc32451924574 = f($acc22451924574, $list2451924574[2])
	737	+	if (($size2451924574 == 3))
	738	+	then $acc32451924574
767	739		else {
768		-	let $~~acc42698627041~~ = f($~~acc32698627041~~, $~~list2698627041~~[3])
769		-	if (($~~size2698627041~~ == 4))
770		-	then $~~acc42698627041~~
	740	+	let $acc42451924574 = f($acc32451924574, $list2451924574[3])
	741	+	if (($size2451924574 == 4))
	742	+	then $acc42451924574
771	743		else {
772		-	let $~~acc52698627041~~ = f($~~acc42698627041~~, $~~list2698627041~~[4])
773		-	if (($~~size2698627041~~ == 5))
774		-	then $~~acc52698627041~~
	744	+	let $acc52451924574 = f($acc42451924574, $list2451924574[4])
	745	+	if (($size2451924574 == 5))
	746	+	then $acc52451924574
775	747		else {
776		-	let $~~acc62698627041~~ = f($~~acc52698627041~~, $~~list2698627041~~[5])
777		-	if (($~~size2698627041~~ == 6))
778		-	then $~~acc62698627041~~
	748	+	let $acc62451924574 = f($acc52451924574, $list2451924574[5])
	749	+	if (($size2451924574 == 6))
	750	+	then $acc62451924574
779	751		else {
780		-	let $~~acc72698627041~~ = f($~~acc62698627041~~, $~~list2698627041~~[6])
781		-	if (($~~size2698627041~~ == 7))
782		-	then $~~acc72698627041~~
	752	+	let $acc72451924574 = f($acc62451924574, $list2451924574[6])
	753	+	if (($size2451924574 == 7))
	754	+	then $acc72451924574
783	755		else {
784		-	let $~~acc82698627041~~ = f($~~acc72698627041~~, $~~list2698627041~~[7])
	756	+	let $acc82451924574 = f($acc72451924574, $list2451924574[7])
785	757		throw("List size exceed 7")
786	758		}
787	759		}

792	764		}
793	765		}
794	766		}
795		-	let okShift = $~~t02694227041~~._1
796		-	let forcedByDeviationOrTimeout = $~~t02694227041~~._2
	767	+	let okShift = $t02447524574._1
	768	+	let forcedByDeviationOrTimeout = $t02447524574._2
797	769		let queueWaits = (oraclePriceIndex >= queuePriceIndex)
798	770		if ((settledPriceIndex > queuePriceIndex))
799	771		then throw("settle2: future price already settled/rebalanced")

824	796		}
825	797
826	798
	799	+
	800	+	@Callable(i)
	801	+	func stakeAll () = if (if ((i.caller != this))
	802	+	then (i.caller != addressFromStringValue(getStringValue(this, "pacewrapper")))
	803	+	else false)
	804	+	then throw("forbidden")
	805	+	else {
	806	+	let tkn = fromBase58String(mainToken)
	807	+	let currentBalance = assetBalance(this, tkn)
	808	+	let stake = invoke(rpdAddress, "lockNeutrinoSP", [feeAddress, 100], [AttachedPayment(tkn, currentBalance)])
	809	+	if ((stake == stake))
	810	+	then $Tuple2(nil, currentBalance)
	811	+	else throw("Strict value is not equal to itself.")
	812	+	}
	813	+
	814	+
	815	+
	816	+	@Callable(i)
	817	+	func unstakeAll () = if (if ((i.caller != this))
	818	+	then (i.caller != addressFromStringValue(getStringValue(this, "pacewrapper")))
	819	+	else false)
	820	+	then throw("forbidden")
	821	+	else {
	822	+	let currentStaked = valueOrElse(getInteger(rpdAddress, ((("rpd_balance_" + mainToken) + "_") + toString(this))), 0)
	823	+	let unstake = invoke(rpdAddress, "unlockNeutrino", [currentStaked, mainToken], nil)
	824	+	if ((unstake == unstake))
	825	+	then $Tuple2(nil, currentStaked)
	826	+	else throw("Strict value is not equal to itself.")
	827	+	}
	828	+
	829	+
	830	+
	831	+	@Callable(i)
	832	+	func state () = $Tuple2(nil, ((("maxIssueBull = " + toString(maxIssue(BULL))) + ", maxIssueBear = ") + toString(maxIssue(BEAR))))
	833	+
	834	+
827	835		@Verifier(tx)
828		-	func verify () = {
829		-	let adminAction = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(admins[0])))
830		-	then 1
831		-	else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(admins[1])))
832		-	then 1
833		-	else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(admins[2])))
834		-	then 1
835		-	else 0)) > 1)
836		-	let stakingAction = match tx {
837		-	case tx: InvokeScriptTransaction =>
838		-	let signedCorrectly = sigVerify(tx.bodyBytes, tx.proofs[0], daemonPublicKey)
839		-	let feesCorrect = if ((tx.feeAssetId == unit))
840		-	then ((1000 * 1000) >= tx.fee)
841		-	else false
842		-	let dappCorrect = (tx.dApp == rpdAddress)
843		-	let unlock = (tx.function == "unlockNeutrino")
844		-	let lock = if (if ((tx.function == "lockNeutrinoSP"))
845		-	then (tx.args[0] == stakingAddress)
846		-	else false)
847		-	then (wavesBalance(this).available >= ten8)
848		-	else false
849		-	let funcCorrect = if (lock)
850		-	then true
851		-	else unlock
852		-	if (if (if (signedCorrectly)
853		-	then feesCorrect
854		-	else false)
855		-	then dappCorrect
856		-	else false)
857		-	then funcCorrect
858		-	else false
859		-	case _ =>
860		-	false
861		-	}
862		-	if (adminAction)
863		-	then true
864		-	else stakingAction
865		-	}
	836	+	func verify () = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(admins[0])))
	837	+	then 1
	838	+	else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(admins[1])))
	839	+	then 1
	840	+	else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(admins[2])))
	841	+	then 1
	842	+	else 0)) > 1)
866	843

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func SE (k,v) = StringEntry(k, v)
5	5
6	6
7	7		func IE (k,v) = IntegerEntry(k, v)
8	8
9	9
10	10		func ST (a,amt,t) = ScriptTransfer(a, amt, t)
11	11
12	12
13	13		let ten6 = 1000000
14	14
15	15		let ten8 = 100000000
16	16
17	17		let MAX = 9223372036854775807
18	18
19	19		let configProviderKey = "configProvider"
20	20
21	21		let configProvider = match getString(this, configProviderKey) {
22	22		case s: String =>
23	23		addressFromStringValue(s)
24	24		case _ =>
25	25		this
26	26		}
27	27
28	28		func localI (k,e) = valueOrErrorMessage(getInteger(this, k), e)
29	29
30	30
31	31		func localS (k,e) = valueOrErrorMessage(getString(this, k), e)
32	32
33	33
34	34		func confI (k,e) = valueOrErrorMessage(getInteger(configProvider, k), e)
35	35
36	36
37	37		func confS (k,e) = valueOrErrorMessage(getString(configProvider, k), e)
38	38
39	39
40	40		let BULLK = "BULLId"
41	41
42	42		let BEARK = "BEARId"
43	43
44	44		let USDNK = "mainTokenId"
45	45
46	46		let BULLCOLK = "bullCollateral"
47	47
48	48		let BEARCOLK = "bearCollateral"
49	49
50	50		let BULLCIRCK = "bullCirculation"
51	51
52	52		let BEARCIRCK = "bearCirculation"
53	53
54	54		let ISSPERCK = "issuePercentile"
55	55
56	56		let REDPERCK = "redeemPercentile"
57	57
58	58		let MINISSK = "minIssue"
59	59
60	60		let MINREDK = "minRedeem"
61	61
62	62		let MINPOOLK = "minPool"
63	63
64	64		let FEEACCK = "feesAccumulated"
65	65
66	66		let WLISTK = "issueWhiteList"
67	67
68	68		let REBPERCK = "rebalancePercentile"
69	69
70	70		let REBIDXK = "lastSettlementPriceId"
71	71
72	72		let HEADK = "headPointer"
73	73
74	74		let TAILK = "tailPointer"
75	75
76	76		let QSIZEK = "queueSize"
77	77
78	78		let POOLUSDNK = "poolMainTokenValue"
79	79
80	80		let POOLUPK = "poolUp"
81	81
82	82		let POOLDWNK = "poolDwn"
83	83
84	84		let POOLCIRCK = "poolTokenCirculation"
85	85
86	86		let POOLK = "poolToken"
87	87
88	88		let LEVK = "leverage"
89	89
90	90		let WAVESFEEK = "wavesPacemakerFee"
91	91
92	92		let USDNFEEK = "usdnPacemakerFee"
93	93
94	94		let oraclev2Key = "oraclev2"
95	95
96	96		let assetidv2Key = "assetidv2"
97	97
98	98		let oraclev2 = valueOrErrorMessage(getString(this, oraclev2Key), "no oraclev2 key")
99	99
100	100		let assetidv2 = valueOrErrorMessage(getString(this, assetidv2Key), "no assetidv2")
101	101
102	102		let maxDeviation = valueOrElse(getInteger(configProvider, (toString(this) + "_deviationPercentile")), 0)
103	103
104	104		let lastPriceIndexKey = ("%s%s__idxCurrent__" + assetidv2)
105	105
106	106		let priceIndexPrefix = (("%s%s%d__idx2Height__" + assetidv2) + "__")
107	107
108	108		let priceHeightPrefix = (("%s%s%d__priceByHeight__" + assetidv2) + "__")
109	109
110	110		let minUsdnFee = valueOrElse(getInteger(configProvider, USDNFEEK), 0)
111	111
112	112		let minWavesFee = valueOrElse(getInteger(configProvider, WAVESFEEK), 0)
113	113
114	114		let bullCol = localI(BULLCOLK, "no 0")
115	115
116	116		let bearCol = localI(BEARCOLK, "no 1")
117	117
118	118		let bullCirc = localI(BULLCIRCK, "no 2")
119	119
120	120		let bearCirc = localI(BEARCIRCK, "no 3")
121	121
122	122		let BULL = localS(BULLK, "no 14")
123	123
124	124		let BEAR = localS(BEARK, "no 15")
125	125
126	126		let mainToken = localS(USDNK, "no 16")
127	127
128	128		let issuePercentile = confI(ISSPERCK, "no 4")
129	129
130	130		let redeemPercentile = confI(REDPERCK, "no 5")
131	131
132	132		let minIssue = confI(MINISSK, "no 6")
133	133
134	134		let minRedeem = confI(MINREDK, "no 7")
135	135
136	136		let minPool = confI(MINPOOLK, "no 8")
137	137
138	138		let rebalancePercentile = valueOrElse(getInteger(configProvider, ((toString(this) + "_") + REBPERCK)), 0)
139	139
140	140		let whitelist = confS(WLISTK, "no 9")
141	141
142	142		func allowed (a) = if ((whitelist == ""))
143	143		then true
144	144		else isDefined(indexOf(whitelist, toString(a)))
145	145
146	146
147	147		let poolMain = localI(POOLUSDNK, "no")
148	148
149	149		let poolUp = localI(POOLUPK, "no 10")
150	150
151	151		let poolDwn = localI(POOLDWNK, "no 11")
152	152
153	153		let poolToken = localS(POOLK, "no 12")
154	154
155	155		let poolTokenCirculation = localI(POOLCIRCK, "no 13")
156	156
157	157		let poolBullExposure = fraction(bullCol, poolUp, bullCirc)
158	158
159	159		let poolBearExposure = fraction(bearCol, poolDwn, bearCirc)
160	160
161	161		let poolValue = ((poolMain + poolBullExposure) + poolBearExposure)
162	162
163	163		let oracle = valueOrErrorMessage(addressFromString(oraclev2), "bad oracle address")
164	164
165	165		let closeInterval = confI("closeInterval", "no CI")
166	166
167	167		let settledPriceIndex = valueOrErrorMessage(getInteger(this, REBIDXK), "no last rebalance price")
168	168
169	169		let oraclePriceIndex = valueOrErrorMessage(getInteger(oracle, lastPriceIndexKey), ((("bad oracle data at " + toString(oracle)) + ": no integer at ") + lastPriceIndexKey))
170	170
171	171		let leverage = valueOrElse(getInteger(this, LEVK), 3)
172	172
173	173		func heightByIndex (priceIndex) = valueOrErrorMessage(getInteger(oracle, (priceIndexPrefix + toString(priceIndex))), ("no data at index " + toString(priceIndex)))
174	174
175	175
176	176		func priceByHeight (priceHeight) = valueOrErrorMessage(getInteger(oracle, (priceHeightPrefix + toString(priceHeight))), ("no data for height " + toString(priceHeight)))
177	177
178	178
179	179		func priceByIndex (priceIndex) = priceByHeight(heightByIndex(priceIndex))
180	180
181	181
182	182		let queueSize = valueOrElse(getInteger(this, QSIZEK), 0)
183	183
184	184		let headPointer = valueOrElse(getString(this, HEADK), "")
185	185
186	186		let tailPointer = valueOrElse(getString(this, TAILK), "")
187	187
188	188		let feesAccumulated = valueOrElse(getInteger(this, FEEACCK), 0)
189	189
190	190		let queueEmpty = (headPointer == "")
191	191
192	192		let queuePriceIndex = if (queueEmpty)
193	193		then MAX
194	194		else {
195	195		let data = split(localS(headPointer, "settle2: bad head pointer"), "\|")
196	196		parseIntValue(data[3])
197	197		}
198	198
199	199		let settledPrice = priceByIndex(settledPriceIndex)
200	200
201	201		let ISSUE = "ISSUE"
202	202
203	203		let REDEEM = "REDEEM"
204	204
205	205		let POOL = "POOL"
206	206
207	207		let UNPOOL = "UNPOOL"
208	208
209	209		let feeAddrKey = "feeAddress"
210	210
211	211		let stakingAddrKey = "stakingAddress"
212	212
213	213		let daemonPubKeyKey = "daemonPublicKey"
214	214
215	215		let feeAddress = valueOrErrorMessage(addressFromString(confS(feeAddrKey, "no feeAddress")), "bad feeAddress")
216	216
217	217		let stakingAddress = confS(stakingAddrKey, "no stakingAddress")
218	218
219	219		let daemonPublicKey = fromBase58String(confS(daemonPubKeyKey, "no daemonPublicKey"))
220	220
221		-	let rpdAddress = addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ")
	221	+	let rpdAddress = valueOrErrorMessage(addressFromString("3PNikM6yp4NqcSU8guxQtmR5onr2D4e8yTJ"), "bad rpd address")
222	222
223	223		let admins = ["2HHqV8W9DJayV5R6tBD2Sb8srphpoboDi7r1t1aPiumC", "5ZXe82RRASU7qshXM2J9JNYhqJ9GWYjjVq2gwUV5Naz9", "5WRXFSjwcTbNfKcJs8ZqXmSSWYsSVJUtMvMqZj5hH4Nc"]
224	224
225	225		func buildNewItem (action,amt,token,priceIndex,invoker,minPayout,maxPayout) = (((((((((((((action + "\|") + toString(amt)) + "\|") + token) + "\|") + toString(priceIndex)) + "\|") + invoker) + "\|") + toString(minPayout)) + "\|") + toString(maxPayout)) + "\|")
226	226
227	227
228	228		func diffAbs (a1,a2) = {
229	229		let diff = (a1 - a2)
230	230		if ((diff > 0))
231	231		then diff
232	232		else (0 - diff)
233	233		}
234	234
235	235
236	236		func userDiffAbs () = diffAbs((bullCol - poolBullExposure), (bearCol - poolBearExposure))
237	237
238	238
239	239		func maxIssue (tokenId) = {
240	240		let poolInvestment = if ((poolUp > 0))
241	241		then BULL
242	242		else BEAR
243	243		if ((tokenId != poolInvestment))
244	244		then poolMain
245	245		else (userDiffAbs() + poolValue)
246	246		}
247	247
248	248
249	249		func validatePMFee (i,minPayout) = if ((0 > minPayout))
250	250		then throw("negative min payout")
251	251		else {
252	252		let p = i.payments[1]
253	253		let ok = match p.assetId {
254	254		case bv: ByteVector =>
255	255		if ((toBase58String(bv) == mainToken))
256	256		then (p.amount >= minUsdnFee)
257	257		else false
258	258		case waves: Unit =>
259	259		(p.amount >= minWavesFee)
260	260		case _ =>
261	261		throw("Match error")
262	262		}
263	263		if (!(ok))
264	264		then throw("incorrect pacemaker fee")
265	265		else true
266	266		}
267	267
268	268
269	269		func enqueue (id,action,amt,token,priceIndex,invoker,minPayout,maxPayout) = if (!(valueOrElse(getBoolean(this, "enableEnqueue"), true)))
270	270		then throw("enqueue paused")
271	271		else {
272	272		let increaseQueueSize = IE(QSIZEK, (queueSize + 1))
273	273		let itm = buildNewItem(action, amt, token, priceIndex, invoker, minPayout, maxPayout)
274	274		if ((queueSize == 0))
275	275		then [SE(HEADK, id), SE(TAILK, id), SE(id, itm), increaseQueueSize]
276	276		else {
277	277		let prevId = localS(TAILK, "can't get tail pointer")
278	278		let prevItm = localS(prevId, "can't resolve pointer")
279	279		let updatedPrevItm = (prevItm + id)
280	280		[SE(prevId, updatedPrevItm), SE(id, itm), SE(TAILK, id), increaseQueueSize]
281	281		}
282	282		}
283	283
284	284
285	285		func poolSupport (curBullCol0,curBearCol0,curBullCirc0,curBearCirc0,curPoolMain0,curPoolUp0,curPoolDwn0,steps) = {
286	286		func closeUp (c1,c2,a0,a1,c0,pu,pd) = {
287	287		let diff = (c1 - c2)
288	288		let exp = fraction(c1, pu, a0)
289	289		let liquidatedTokens = if ((diff > exp))
290	290		then pu
291	291		else fraction(diff, a0, c1)
292	292		let liquidatedValue = if ((diff > exp))
293	293		then exp
294	294		else fraction(liquidatedTokens, c1, a0)
295	295		$Tuple7((c1 - liquidatedValue), c2, (a0 - liquidatedTokens), a1, (c0 + liquidatedValue), (pu - liquidatedTokens), pd)
296	296		}
297	297
298	298		func closeDwn (c1,c2,a0,a1,c0,pu,pd) = {
299	299		let diff = (c2 - c1)
300	300		let exp = fraction(c2, pd, a1)
301	301		let liquidatedTokens = if ((diff > exp))
302	302		then pd
303	303		else fraction(diff, a1, c2)
304	304		let liquidatedValue = if ((diff > exp))
305	305		then exp
306	306		else fraction(liquidatedTokens, c2, a1)
307	307		$Tuple7(c1, (c2 - liquidatedValue), a0, (a1 - liquidatedTokens), (c0 + liquidatedValue), pu, (pd - liquidatedTokens))
308	308		}
309	309
310	310		func openDwn (c1,c2,a0,a1,c0,pu,pd) = {
311	311		let diff = (c1 - c2)
312	312		let spentPoolValue = if ((c0 > diff))
313	313		then diff
314	314		else c0
315	315		let acquiredTokens = fraction(spentPoolValue, a1, c2)
316	316		$Tuple7(c1, (c2 + spentPoolValue), a0, (a1 + acquiredTokens), (c0 - spentPoolValue), pu, (pd + acquiredTokens))
317	317		}
318	318
319	319		func openUp (c1,c2,a0,a1,c0,pu,pd) = {
320	320		let diff = (c2 - c1)
321	321		let spentPoolValue = if ((c0 > diff))
322	322		then diff
323	323		else c0
324	324		let acquiredTokens = fraction(spentPoolValue, a0, c1)
325	325		$Tuple7((c1 + spentPoolValue), c2, (a0 + acquiredTokens), a1, (c0 - spentPoolValue), (pu + acquiredTokens), pd)
326	326		}
327	327
328		-	let $~~t0921610251~~ = if ((curBullCol0 > curBearCol0))
	328	+	let $t0925410289 = if ((curBullCol0 > curBearCol0))
329	329		then {
330	330		let afterCloseUp = closeUp(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
331		-	let $~~t094429579~~ = afterCloseUp
332		-	let a = $~~t094429579~~._1
333		-	let b = $~~t094429579~~._2
334		-	let c = $~~t094429579~~._3
335		-	let d = $~~t094429579~~._4
336		-	let e = $~~t094429579~~._5
337		-	let f = $~~t094429579~~._6
338		-	let g = $~~t094429579~~._7
	331	+	let $t094809617 = afterCloseUp
	332	+	let a = $t094809617._1
	333	+	let b = $t094809617._2
	334	+	let c = $t094809617._3
	335	+	let d = $t094809617._4
	336	+	let e = $t094809617._5
	337	+	let f = $t094809617._6
	338	+	let g = $t094809617._7
339	339		if ((f > 0))
340	340		then afterCloseUp
341	341		else if ((f == 0))
342	342		then openDwn(a, b, c, d, e, f, g)
343	343		else throw("poolUp < 0")
344	344		}
345	345		else {
346	346		let afterCloseDwn = closeDwn(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, curPoolMain0, curPoolUp0, curPoolDwn0)
347		-	let $~~t0993010070~~ = afterCloseDwn
348		-	let a = $~~t0993010070~~._1
349		-	let b = $~~t0993010070~~._2
350		-	let c = $~~t0993010070~~._3
351		-	let d = $~~t0993010070~~._4
352		-	let e = $~~t0993010070~~._5
353		-	let f = $~~t0993010070~~._6
354		-	let g = $~~t0993010070~~._7
	347	+	let $t0996810108 = afterCloseDwn
	348	+	let a = $t0996810108._1
	349	+	let b = $t0996810108._2
	350	+	let c = $t0996810108._3
	351	+	let d = $t0996810108._4
	352	+	let e = $t0996810108._5
	353	+	let f = $t0996810108._6
	354	+	let g = $t0996810108._7
355	355		if ((g > 0))
356	356		then afterCloseDwn
357	357		else if ((g == 0))
358	358		then openUp(a, b, c, d, e, f, g)
359	359		else throw("poolDwn < 0")
360	360		}
361		-	let c1 = $~~t0921610251~~._1
362		-	let c2 = $~~t0921610251~~._2
363		-	let a0 = $~~t0921610251~~._3
364		-	let a1 = $~~t0921610251~~._4
365		-	let c0 = $~~t0921610251~~._5
366		-	let pu = $~~t0921610251~~._6
367		-	let pd = $~~t0921610251~~._7
	361	+	let c1 = $t0925410289._1
	362	+	let c2 = $t0925410289._2
	363	+	let a0 = $t0925410289._3
	364	+	let a1 = $t0925410289._4
	365	+	let c0 = $t0925410289._5
	366	+	let pu = $t0925410289._6
	367	+	let pd = $t0925410289._7
368	368		let charge = fraction(userDiffAbs(), (rebalancePercentile * steps), ((1440 * 100) * 100))
369	369		let c1SplitP = if ((pd > 0))
370	370		then charge
371	371		else 0
372	372		let c2SplitP = if ((pu > 0))
373	373		then charge
374	374		else 0
375	375		$Tuple7((c1 - c1SplitP), (c2 - c2SplitP), a0, a1, ((c0 + c1SplitP) + c2SplitP), pu, pd)
376	376		}
377	377
378	378
379	379		func poolSup (curBullCol0,curBearCol0,curBullCirc0,curBearCirc0) = {
380		-	let $~~t01067610861~~ = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
381		-	let bullCol1 = $~~t01067610861~~._1
382		-	let bearCol1 = $~~t01067610861~~._2
383		-	let bullCic1 = $~~t01067610861~~._3
384		-	let bearCirc1 = $~~t01067610861~~._4
385		-	let poolMain1 = $~~t01067610861~~._5
386		-	let poolUp1 = $~~t01067610861~~._6
387		-	let poolDwn1 = $~~t01067610861~~._7
	380	+	let $t01071410899 = poolSupport(curBullCol0, curBearCol0, curBullCirc0, curBearCirc0, poolMain, poolUp, poolDwn, 0)
	381	+	let bullCol1 = $t01071410899._1
	382	+	let bearCol1 = $t01071410899._2
	383	+	let bullCic1 = $t01071410899._3
	384	+	let bearCirc1 = $t01071410899._4
	385	+	let poolMain1 = $t01071410899._5
	386	+	let poolUp1 = $t01071410899._6
	387	+	let poolDwn1 = $t01071410899._7
388	388		[IE(BULLCOLK, bullCol1), IE(BULLCIRCK, bullCic1), IE(BEARCOLK, bearCol1), IE(BEARCIRCK, bearCirc1), IE(POOLUSDNK, poolMain1), IE(POOLUPK, poolUp1), IE(POOLDWNK, poolDwn1)]
389	389		}
390	390
391	391
392	392		func dequeue () = {
393	393		func sp (a,mx) = if ((mx >= a))
394	394		then $Tuple2(a, 0)
395	395		else $Tuple2(mx, (a - mx))
396	396
397	397		if ((queueSize == 0))
398	398		then throw("nothing to settle")
399	399		else {
400	400		func collectFee (fees) = IE(FEEACCK, (feesAccumulated + fees))
401	401
402	402		let decreaseQueueSize = IE(QSIZEK, (queueSize - 1))
403	403		let isLastElement = (headPointer == tailPointer)
404	404		let overwriteTail = SE(TAILK, "")
405	405		let dataStr = localS(headPointer, "bad head pointer(dequeue)")
406	406		let data = split(dataStr, "\|")
407	407		let action = data[0]
408	408		let amt = parseIntValue(data[1])
409	409		let token = data[2]
410	410		let priceIndex = parseIntValue(data[3])
411	411		let invoker = addressFromStringValue(data[4])
412	412		let minPayout = if ((8 > size(data)))
413	413		then 0
414	414		else parseIntValue(data[5])
415	415		let maxPayout = if ((8 > size(data)))
416	416		then MAX
417	417		else parseIntValue(data[6])
418	418		let next = data[(size(data) - 1)]
419	419		func payback (tkn) = [SE(HEADK, next), decreaseQueueSize, ST(invoker, amt, fromBase58String(tkn))]
420	420
421	421		let items = if ((settledPriceIndex != priceIndex))
422	422		then throw(((("corrupt state, settledPriceIndex=" + toString(settledPriceIndex)) + ", request price id=") + toString(priceIndex)))
423	423		else if ((action == ISSUE))
424	424		then {
425	425		let feeSize = fraction(amt, issuePercentile, 10000)
426	426		let addedCollateral = (amt - feeSize)
427	427		let defaultAddedTokens = if ((token == BULL))
428	428		then fraction(bullCirc, addedCollateral, bullCol)
429	429		else if ((token == BEAR))
430	430		then fraction(bearCirc, addedCollateral, bearCol)
431	431		else throw("bad token id")
432		-	let $~~t01287312946~~ = sp(defaultAddedTokens, maxPayout)
433		-	let addedToCirculation = $~~t01287312946~~._1
434		-	let extraTokens = $~~t01287312946~~._2
435		-	let $~~t01296313134~~ = if ((token == BULL))
	432	+	let $t01291112984 = sp(defaultAddedTokens, maxPayout)
	433	+	let addedToCirculation = $t01291112984._1
	434	+	let extraTokens = $t01291112984._2
	435	+	let $t01300113172 = if ((token == BULL))
436	436		then $Tuple4(defaultAddedTokens, addedCollateral, 0, 0)
437	437		else $Tuple4(0, 0, defaultAddedTokens, addedCollateral)
438		-	let plusBulls = $~~t01296313134~~._1
439		-	let plusBullCol = $~~t01296313134~~._2
440		-	let plusBears = $~~t01296313134~~._3
441		-	let plusBearCol = $~~t01296313134~~._4
	438	+	let plusBulls = $t01300113172._1
	439	+	let plusBullCol = $t01300113172._2
	440	+	let plusBears = $t01300113172._3
	441	+	let plusBearCol = $t01300113172._4
442	442		if ((minPayout > addedToCirculation))
443	443		then payback(mainToken)
444	444		else (poolSup((bullCol + plusBullCol), (bearCol + plusBearCol), (bullCirc + plusBulls), (bearCirc + plusBears)) ++ [SE(HEADK, next), collectFee(feeSize), decreaseQueueSize, ST(invoker, addedToCirculation, fromBase58String(token)), ST(feeAddress, extraTokens, fromBase58String(token))])
445	445		}
446	446		else if ((action == REDEEM))
447	447		then {
448	448		let removedTokens = amt
449	449		let estimatedPayout = if ((token == BULL))
450	450		then fraction(bullCol, removedTokens, bullCirc)
451	451		else if ((token == BEAR))
452	452		then fraction(bearCol, removedTokens, bearCirc)
453	453		else throw("bad token id")
454	454		let feeSize = fraction(estimatedPayout, redeemPercentile, 10000)
455	455		let defaultPayout = (estimatedPayout - feeSize)
456		-	let $~~t01420114255~~ = sp(defaultPayout, maxPayout)
457		-	let userPayout = $~~t01420114255~~._1
458		-	let extra = $~~t01420114255~~._2
459		-	let $~~t01427214437~~ = if ((token == BULL))

github/deemru/w8io/786bc32 
160.67 ms ◑