w8 · tx · 8Au···QeN

tx · 8AuaVNPo7iDLwAstfa4Qmt9MiXWXfznN2NXdLJvZsQeN

3N2M4PztorHwrfENp7D6LhYGgGodjiD1fjn:  -0.02400000 Waves

2023.08.18 13:37 [2715930] smart account 3N2M4PztorHwrfENp7D6LhYGgGodjiD1fjn > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8AuaVNPo7iDLwAstfa4Qmt9MiXWXfznN2NXdLJvZsQeN",
    "fee": 2400000,
    "feeAssetId": null,
    "timestamp": 1692355070401,
    "version": 2,
    "chainId": 84,
    "sender": "3N2M4PztorHwrfENp7D6LhYGgGodjiD1fjn",
    "senderPublicKey": "Fj9LPkCtmW3pDnVU6wPQnvqpZJCBieWSvZqY5FAGeCyp",
    "proofs": [
        "TuZo9hzscHqPVsxjre9k1tPeKeKqDX3SMd5KvV6AgopHKVAd6yzjtNqeaZhoriwHSyqEKNQbuBRd9PtBpJhJ4WA",
        "2E7HqLTF2Fr5qt1RUvwAdeYbb7DvWymNYxaZBfgHJhq4Ak7gxK3bQ5p3FG2afQqnSrvDMJc34cGJy3GsJgg42mFx"
    ],
    "script": "base64:BgIhCAISABIAEgQKAggIEgMKAQgSBwoFCAgIAQESAwoBCBIAUQAGU0NBTEU4AIDC1y8AC0xFTkRFUlNfQVBSCQDMCAIAlgEJAMwIAgB4CQDMCAIAZAkAzAgCAFAJAMwIAgA8CQDMCAIAKAkAzAgCAB4JAMwIAgAUCQDMCAIACgUDbmlsABNMRU5ERVJTX0FQUl9QRVJJT0RTCQDMCAICAzEtMQkAzAgCAgMyLTIJAMwIAgIDMy0zCQDMCAICAzQtNAkAzAgCAgM1LTgJAMwIAgIEOS0xMgkAzAgCAgUxNC0xNgkAzAgCAgUxNy0yMAkAzAgCAgYyMC0xMDQFA25pbAATTEVOREVSU19NQVhfUEVSSU9EUwBoAAZMUF9BUFIJAMwIAgCWAQkAzAgCAHgJAMwIAgBkCQDMCAIAUAkAzAgCADwJAMwIAgAoBQNuaWwADkxQX0FQUl9QRVJJT0RTCQDMCAICAzEtMQkAzAgCAgMyLTIJAMwIAgIDMy0zCQDMCAICAzQtNAkAzAgCAgM1LTgJAMwIAgIEOS0xMgUDbmlsAA5MUF9NQVhfUEVSSU9EUwAMAAxrU3RhcnRIZWlnaHQCC3N0YXJ0SGVpZ2h0AA1rUGVyaW9kTGVuZ3RoAgxwZXJpb2RMZW5ndGgAEWtMZW5kZXJzTWF4QW1vdW50AhFsZW5kUmV3YXJkc0Ftb3VudAAMa0xQTWF4QW1vdW50Ag5scFJld2FyZEFtb3VudAAHa1Rva2VucwIGdG9rZW5zAAtrVXNlclN1cHBseQIQX3VzZXJUb3RhbFN1cHBseQAOa1Rva2VuSW50ZXJlc3QCDl90b2tlbkludGVyZXN0ABRrVG9rZW5JbnRlcmVzdEhlaWdodAIUX3Rva2VuSW50ZXJlc3RIZWlnaHQAFGtUb2tlblJld2FyZFBlckJsb2NrAhRfdG9rZW5SZXdhcmRQZXJCbG9jawATa1Jld2FyZFVwZGF0ZUhlaWdodAIScmV3YXJkVXBkYXRlSGVpZ2h0ABFrVXNlckxlbmRJbnRlcmVzdAIRX3VzZXJMYW5kSW50ZXJlc3QAF2tVc2VyTGVuZEF2YWlsYWJsZUNsYWltAhdfdXNlckxlbmRBdmFpbGFibGVDbGFpbQAVa1VzZXJMcEF2YWlsYWJsZUNsYWltAhVfdXNlckxwQXZhaWxhYmxlQ2xhaW0AC2tMcEludGVyZXN0AgpscEludGVyZXN0ABFrTHBJbnRlcmVzdEhlaWdodAIQbHBJbnRlcmVzdEhlaWdodAANa1ByZXZMUFN1cHBseQIRcHJldkxQVG90YWxTdXBwbHkAEWtMcFJld2FyZFBlckJsb2NrAhBscFJld2FyZFBlckJsb2NrAA9rVXNlckxwSW50ZXJlc3QCD191c2VyTHBJbnRlcmVzdAAOa1ByaWNlSW5PcmFjbGUCB190d2FwNUIAFGtQcmV2TGVuZFRva2VuU3VwcGx5AhRfcHJldkxlbmRUb3RhbFN1cHBseQAMa0FYTFlUb2tlbklkAgtheGx5VG9rZW5JZAAQa0xlbmRUb2tlblN1cHBseQIPdG90YWxfc3VwcGxpZWRfAA9rTGVuZFVzZXJTdXBwbHkCCl9zdXBwbGllZF8AEGtMZW5kU2V0dXBUb2tlbnMCDHNldHVwX3Rva2VucwAOa1NGVG90YWxTdXBwbHkCGl90b3RhbF9zaGFyZV90b2tlbnNfbG9ja2VkABJrU0ZVc2VyVG90YWxTdXBwbHkCFF9zaGFyZV90b2tlbnNfbG9ja2VkAAlrQXhseVBvb2wCCGF4bHlQb29sAAVrTHBJZAIOc2hhcmVfYXNzZXRfaWQADGtQcmljZU9yYWNsZQIMcHJpY2Vfb3JhY2xlABFrQXhseU1haW5Db250cmFjdAIMbWFpbkNvbnRyYWN0ABZrQXhseVRva2Vub21pY0NvbnRyYWN0AhF0b2tlbm9taWNDb250cmFjdAASa1NGRmFybWluZ0NvbnRyYWN0AhNzd29wZmlfZmFybWluZ19hZGRyAA1rTGVuZENvbnRyYWN0AhFsZW5kX3NlcnZpY2VfYWRkcgAJa0FkbWluMVBLAhVncm91cDFfYWRtaW4xX3B1Yl9rZXkACWtBZG1pbjJQSwIVZ3JvdXAxX2FkbWluMl9wdWJfa2V5AAlrQWRtaW4zUEsCFWdyb3VwMV9hZG1pbjNfcHViX2tleQAPa09wZXJhdG9yQ2FsbFBLAhJhZG1pbl9jYWxsX3B1Yl9rZXkACGF4bHlQb29sCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUJa0F4bHlQb29sAhZDYW4ndCBnZXQgYXhseVBvb2wga2V5AAxtYWluQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBRFrQXhseU1haW5Db250cmFjdAIZQ2FuJ3QgZ2V0IG1haW5Db250YWN0IGtleQANdG9rZW5Db250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFFmtBeGx5VG9rZW5vbWljQ29udHJhY3QCH0Nhbid0IGdldCB0b2tlbm9taWNDb250cmFjdCBrZXkADGxlbmRDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFDG1haW5Db250cmFjdAUNa0xlbmRDb250cmFjdAIfQ2FuJ3QgZ2V0IGxlbmRfc2VydmljZV9hZGRyIGtleQARc2ZGYXJtaW5nQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQxtYWluQ29udHJhY3QFEmtTRkZhcm1pbmdDb250cmFjdAIhQ2FuJ3QgZ2V0IHN3b3BmaV9mYXJtaW5nX2FkZHIga2V5AA9wcmljZU9yYWNsZUFkZHIJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQxtYWluQ29udHJhY3QFDGtQcmljZU9yYWNsZQIaQ2FuJ3QgZ2V0IHByaWNlX29yYWNsZSBrZXkACGFkbWluMVBLCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQxtYWluQ29udHJhY3QFCWtBZG1pbjFQSwISQ2FuJ3QgZ2V0IGFkbWluMVBLAAhhZG1pbjJQSwkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMbWFpbkNvbnRyYWN0BQlrQWRtaW4yUEsCEkNhbid0IGdldCBhZG1pbjJQSwAIYWRtaW4zUEsJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFDG1haW5Db250cmFjdAUJa0FkbWluM1BLAhRDYW4ndCBnZXQgb3BlcmF0b3JQSwAKb3BlcmF0b3JQSwkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUPa09wZXJhdG9yQ2FsbFBLAhRDYW4ndCBnZXQgb3BlcmF0b3JQSwAGYXhseUlkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUNdG9rZW5Db250cmFjdAUMa0FYTFlUb2tlbklkAhdDYW4ndCBnZXQgQXhseSB0b2tlbiBpZAALc3RhcnRIZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFDGtTdGFydEhlaWdodAAMcGVyaW9kTGVuZ3RoCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ1rUGVyaW9kTGVuZ3RoAAljdXJQZXJpb2QJAJYDAQkAzAgCAAEJAMwIAgkAaQIJAGUCBQZoZWlnaHQFC3N0YXJ0SGVpZ2h0BQxwZXJpb2RMZW5ndGgFA25pbAANbGVuZE1heEFtb3VudAkBEUBleHRyTmF0aXZlKDEwNTApAgUNdG9rZW5Db250cmFjdAURa0xlbmRlcnNNYXhBbW91bnQAE2xlbmRNYXhQZXJpb2RBbW91bnQJAGkCBQ1sZW5kTWF4QW1vdW50BRNMRU5ERVJTX01BWF9QRVJJT0RTAAtscE1heEFtb3VudAkBEUBleHRyTmF0aXZlKDEwNTApAgUNdG9rZW5Db250cmFjdAUMa0xQTWF4QW1vdW50ABFscE1heFBlcmlvZEFtb3VudAkAaQIFC2xwTWF4QW1vdW50BQ5MUF9NQVhfUEVSSU9EUwELaXNBZG1pbkNhbGwBAWkDCQEPY29udGFpbnNFbGVtZW50AgkAzAgCBQhhZG1pbjFQSwkAzAgCBQhhZG1pbjJQSwkAzAgCBQhhZG1pbjNQSwUDbmlsCAUBaQ9jYWxsZXJQdWJsaWNLZXkFBHVuaXQJAAIBAihPbmx5IGFkbWluIGdyb3VwMSBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQppc1NlbGZDYWxsAQFpAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECK09ubHkgY29udHJhY3QgaXRzZWxmIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BDmlzT3BlcmF0b3JDYWxsAQFpAwkAAAIIBQFpD2NhbGxlclB1YmxpY0tleQUKb3BlcmF0b3JQSwUEdW5pdAkAAgECJE9ubHkgb3BlcmF0b3IgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEKaXNMYW5kQ2FsbAEBaQMJAAACCAUBaQZjYWxsZXIFDGxlbmRDb250cmFjdAUEdW5pdAkAAgECKU9ubHkgbGFuZCBjb250cmFjdCBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQ9pc1NGRmFybWluZ0NhbGwBAWkDCQAAAggFAWkGY2FsbGVyBRFzZkZhcm1pbmdDb250cmFjdAUEdW5pdAkAAgECKU9ubHkgbGFuZCBjb250cmFjdCBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQxnZXRBbGxUb2tlbnMABAZ0b2tlbnMJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUHa1Rva2VucwIAAwkAAAIFBnRva2VucwIABQNuaWwJALUJAgUGdG9rZW5zAgEsAQ1nZXRBc3NldFByaWNlAQdhc3NldElkCQERQGV4dHJOYXRpdmUoMTA1MCkCBQ9wcmljZU9yYWNsZUFkZHIJAKwCAgUHYXNzZXRJZAUOa1ByaWNlSW5PcmFjbGUBEGdldEFzc2V0RGVjaW1hbHMBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMACAQHJG1hdGNoMAkA7AcBCQDZBAEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBWFzc2V0BQckbWF0Y2gwCAUFYXNzZXQIZGVjaW1hbHMJAAIBAhBDYW4ndCBmaW5kIGFzc2V0ARFnZXRBc3NldFByZWNpc2lvbgEHYXNzZXRJZAkAbAYACgAACQEQZ2V0QXNzZXREZWNpbWFscwEFB2Fzc2V0SWQAAAAABQRET1dOARVnZXRBZG9wdGVkQVBSQnlQZXJpb2QDBnBlcmlvZAphcHJQZXJpb2RzA2FwcgoBA2ZvcgIBYQdhcGVyaW9kBAskdDA1NDI5NTQ1MQUBYQQFaW5kZXgIBQskdDA1NDI5NTQ1MQJfMQQFZm91bmQIBQskdDA1NDI5NTQ1MQJfMgQCZnQJALUJAgUHYXBlcmlvZAIBLQQLJHQwNTQ4ODU1NTEJAJQKAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmZ0AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJmdAABBARmcm9tCAULJHQwNTQ4ODU1NTECXzEEAnRvCAULJHQwNTQ4ODU1NTECXzIDBQVmb3VuZAUBYQMDCQBnAgUGcGVyaW9kBQRmcm9tCQBnAgUCdG8FBnBlcmlvZAcJAJQKAgUFaW5kZXgGCQCUCgIJAGQCBQVpbmRleAABBwQLJHQwNTY4ODU3NTQKAAIkbAUTTEVOREVSU19BUFJfUEVSSU9EUwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAABwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDZm9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA5CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJBAVpbmRleAgFCyR0MDU2ODg1NzU0Al8xBAVmb3VuZAgFCyR0MDU2ODg1NzU0Al8yAwUFZm91bmQJAGsDCQBoAgkAkQMCBQtMRU5ERVJTX0FQUgUFaW5kZXgFBlNDQUxFOAAHAO0CAAABF2dldFRvdGFsU3VwcGx5QWxsVG9rZW5zAAoBA2ZvcgIBYQd0b2tlbklkBAskdDA1OTQyNTk5OAUBYQQLdG90YWxTdXBwbHkIBQskdDA1OTQyNTk5OAJfMQQOdG90YWxTdXBwbHlVc2QIBQskdDA1OTQyNTk5OAJfMgQRdG90YWxTdXBwbHlVc2RBbGwIBQskdDA1OTQyNTk5OAJfMwQHdFN1cHBseQkBC3ZhbHVlT3JFbHNlAgkAmggCBQxsZW5kQ29udHJhY3QJAKwCAgUQa0xlbmRUb2tlblN1cHBseQUHdG9rZW5JZAAABAphc3NldFByaWNlCQENZ2V0QXNzZXRQcmljZQEFB3Rva2VuSWQEDmFzc2V0UHJlY2lzaW9uCQERZ2V0QXNzZXRQcmVjaXNpb24BBQd0b2tlbklkBAp0U3VwcGx5VXNkCQBrAwUHdFN1cHBseQUKYXNzZXRQcmljZQUOYXNzZXRQcmVjaXNpb24JAJUKAwkAzQgCBQt0b3RhbFN1cHBseQUHdFN1cHBseQkAzQgCBQ50b3RhbFN1cHBseVVzZAUKdFN1cHBseVVzZAkAZAIFEXRvdGFsU3VwcGx5VXNkQWxsBQp0U3VwcGx5VXNkCgACJGwJAQxnZXRBbGxUb2tlbnMACgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNmb3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDMwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeARFnZXRUb3RhbFN1cHBseVVzZAEHdG9rZW5JZAQHdFN1cHBseQkBC3ZhbHVlT3JFbHNlAgkAmggCBQxsZW5kQ29udHJhY3QJAKwCAgUQa0xlbmRUb2tlblN1cHBseQUHdG9rZW5JZAAABAphc3NldFByaWNlCQENZ2V0QXNzZXRQcmljZQEFB3Rva2VuSWQEDmFzc2V0UHJlY2lzaW9uCQERZ2V0QXNzZXRQcmVjaXNpb24BBQd0b2tlbklkCQBrAwUHdFN1cHBseQUKYXNzZXRQcmljZQUOYXNzZXRQcmVjaXNpb24BFGNhbGNOZXdUb2tlbkludGVyZXN0Agd0b2tlbklkC3RvdGFsU3VwcGx5AwkAZwIFC3N0YXJ0SGVpZ2h0BQZoZWlnaHQAAAQOcmV3YXJkUGVyQmxvY2sJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHdG9rZW5JZAUUa1Rva2VuUmV3YXJkUGVyQmxvY2sEC29sZEludGVyZXN0CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB3Rva2VuSWQFDmtUb2tlbkludGVyZXN0BAx1cGRhdGVIZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHdG9rZW5JZAUUa1Rva2VuSW50ZXJlc3RIZWlnaHQEBnJld2FyZAkAaAIJAGUCBQZoZWlnaHQFDHVwZGF0ZUhlaWdodAUOcmV3YXJkUGVyQmxvY2sECGludGVyZXN0AwkAZgIFC3RvdGFsU3VwcGx5AAAJAGsDBQZyZXdhcmQFBlNDQUxFOAULdG90YWxTdXBwbHkAAAkAZAIFC29sZEludGVyZXN0BQhpbnRlcmVzdAERY2FsY05ld0xwSW50ZXJlc3QBC3RvdGFsU3VwcGx5AwkAZwIFC3N0YXJ0SGVpZ2h0BQZoZWlnaHQAAAQOcmV3YXJkUGVyQmxvY2sJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwURa0xwUmV3YXJkUGVyQmxvY2sAAAQLb2xkSW50ZXJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwULa0xwSW50ZXJlc3QAAAQMdXBkYXRlSGVpZ2h0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFEWtMcEludGVyZXN0SGVpZ2h0BQZoZWlnaHQEBnJld2FyZAkAaAIJAGUCBQZoZWlnaHQFDHVwZGF0ZUhlaWdodAUOcmV3YXJkUGVyQmxvY2sECGludGVyZXN0AwkAZgIFC3RvdGFsU3VwcGx5AAAJAGsDBQZyZXdhcmQFBlNDQUxFOAULdG90YWxTdXBwbHkAAAkAZAIFC29sZEludGVyZXN0BQhpbnRlcmVzdAESY2FsY0xlbmRVc2VyUmV3YXJkAgR1c2VyB3Rva2VuSWQEC3RvdGFsU3VwcGx5CQELdmFsdWVPckVsc2UCCQCaCAIFDGxlbmRDb250cmFjdAkArAICBRBrTGVuZFRva2VuU3VwcGx5BQd0b2tlbklkAAAEDXRva2VuSW50ZXJlc3QJARRjYWxjTmV3VG9rZW5JbnRlcmVzdAIFB3Rva2VuSWQFC3RvdGFsU3VwcGx5BAp1c2VyU3VwcGx5CQELdmFsdWVPckVsc2UCCQCaCAIFDGxlbmRDb250cmFjdAkArAICCQCsAgIFBHVzZXIFD2tMZW5kVXNlclN1cHBseQUHdG9rZW5JZAAABBF1c2VyVG9rZW5JbnRlcmVzdAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQd0b2tlbklkAgFfBQR1c2VyBRFrVXNlckxlbmRJbnRlcmVzdAMJAAACBQp1c2VyU3VwcGx5AAAFDXRva2VuSW50ZXJlc3QAAAQGcmV3YXJkCQBrAwUKdXNlclN1cHBseQkAZQIFDXRva2VuSW50ZXJlc3QFEXVzZXJUb2tlbkludGVyZXN0BQZTQ0FMRTgJAJUKAwUGcmV3YXJkBQ10b2tlbkludGVyZXN0BQp1c2VyU3VwcGx5ARBjYWxjTHBVc2VyUmV3YXJkAQR1c2VyBAt0b3RhbFN1cHBseQkBC3ZhbHVlT3JFbHNlAgkAmggCBRFzZkZhcm1pbmdDb250cmFjdAkArAICBQhheGx5UG9vbAUOa1NGVG90YWxTdXBwbHkAAAQNdG9rZW5JbnRlcmVzdAkBEWNhbGNOZXdMcEludGVyZXN0AQULdG90YWxTdXBwbHkECnVzZXJTdXBwbHkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUMbGVuZENvbnRyYWN0CQCsAgIJAKwCAgkArAICBQhheGx5UG9vbAIBXwUEdXNlcgUSa1NGVXNlclRvdGFsU3VwcGx5AAAEEXVzZXJUb2tlbkludGVyZXN0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEdXNlcgUPa1VzZXJMcEludGVyZXN0AwkAAAIFCnVzZXJTdXBwbHkAAAUNdG9rZW5JbnRlcmVzdAAABAZyZXdhcmQJAGsDBQp1c2VyU3VwcGx5CQBlAgUNdG9rZW5JbnRlcmVzdAURdXNlclRva2VuSW50ZXJlc3QFBlNDQUxFOAkAlQoDBQZyZXdhcmQFDXRva2VuSW50ZXJlc3QFCnVzZXJTdXBwbHkBGGNsYWltTGVuZGVyUmV3YXJkc0NvbW1vbgIEdXNlcghyZWFkT25seQoBBWNsYWltAgFhB3Rva2VuSWQECyR0MDg4ODI4OTI2BQFhBAh0b2tlbklkcwgFCyR0MDg4ODI4OTI2Al8xBAdjQW1vdW50CAULJHQwODg4Mjg5MjYCXzIEBXRvdGFsCAULJHQwODg4Mjg5MjYCXzMECGVudGVyaWVzCAULJHQwODg4Mjg5MjYCXzQEEnVzZXJBdmFpbGFibGVDbGFpbQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQd0b2tlbklkAgFfBQR1c2VyBRdrVXNlckxlbmRBdmFpbGFibGVDbGFpbQAABAskdDA5MDM5OTExOAkBEmNhbGNMZW5kVXNlclJld2FyZAIFBHVzZXIFB3Rva2VuSWQEB3VSZXdhcmQIBQskdDA5MDM5OTExOAJfMQQQbmV3VG9rZW5JbnRlcmVzdAgFCyR0MDkwMzk5MTE4Al8yBAp1c2VyU3VwcGx5CAULJHQwOTAzOTkxMTgCXzMEDHRvdGFsVG9DbGFpbQkAZAIFEnVzZXJBdmFpbGFibGVDbGFpbQUHdVJld2FyZAMDCQBmAgUMdG90YWxUb0NsYWltAAAGCQBmAgUKdXNlclN1cHBseQAABAxuZXdFbnRyZXJpZXMDAwUIcmVhZE9ubHkGCQAAAgUMdG90YWxUb0NsYWltAAAFCGVudGVyaWVzCQDOCAIFCGVudGVyaWVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQd0b2tlbklkAgFfBQR1c2VyBRFrVXNlckxlbmRJbnRlcmVzdAUQbmV3VG9rZW5JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUHdG9rZW5JZAIBXwUEdXNlcgUXa1VzZXJMZW5kQXZhaWxhYmxlQ2xhaW0AAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBQ5rVG9rZW5JbnRlcmVzdAUQbmV3VG9rZW5JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBRRrVG9rZW5JbnRlcmVzdEhlaWdodAUGaGVpZ2h0BQNuaWwJAJYKBAkAzQgCBQh0b2tlbklkcwUHdG9rZW5JZAkAzQgCBQdjQW1vdW50BQx0b3RhbFRvQ2xhaW0JAGQCBQV0b3RhbAUMdG90YWxUb0NsYWltBQxuZXdFbnRyZXJpZXMJAJYKBAUIdG9rZW5JZHMFB2NBbW91bnQFBXRvdGFsBQhlbnRlcmllcwoAAiRsCQEMZ2V0QWxsVG9rZW5zAAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAUDbmlsBQNuaWwAAAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVjbGFpbQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMzAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4BFGNsYWltTHBSZXdhcmRzQ29tbW9uAgR1c2VyCHJlYWRPbmx5BBJ1c2VyQXZhaWxhYmxlQ2xhaW0JAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQR1c2VyBRVrVXNlckxwQXZhaWxhYmxlQ2xhaW0AAAQNJHQwMTAwNTAxMDExNQkBEGNhbGNMcFVzZXJSZXdhcmQBBQR1c2VyBAd1UmV3YXJkCAUNJHQwMTAwNTAxMDExNQJfMQQNbmV3THBJbnRlcmVzdAgFDSR0MDEwMDUwMTAxMTUCXzIECnVzZXJTdXBwbHkIBQ0kdDAxMDA1MDEwMTE1Al8zBAx0b3RhbFRvQ2xhaW0JAGQCBRJ1c2VyQXZhaWxhYmxlQ2xhaW0FB3VSZXdhcmQDAwUIcmVhZE9ubHkGCQAAAgUMdG90YWxUb0NsYWltAAAJAJQKAgUMdG90YWxUb0NsYWltBQNuaWwJAJQKAgUMdG90YWxUb0NsYWltCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHVzZXIFD2tVc2VyTHBJbnRlcmVzdAUNbmV3THBJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyBRVrVXNlckxwQXZhaWxhYmxlQ2xhaW0AAAkAzAgCCQEMSW50ZWdlckVudHJ5AgULa0xwSW50ZXJlc3QFDW5ld0xwSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIFEWtMcEludGVyZXN0SGVpZ2h0BQZoZWlnaHQFA25pbAENZ2V0VG9rZW5zQVBScwAECWF4bHlQcmljZQkBDWdldEFzc2V0UHJpY2UBBQZheGx5SWQEDWF4bHlQcmVjaXNpb24JARFnZXRBc3NldFByZWNpc2lvbgEFBmF4bHlJZAoBCnRva2Vuc0FwcnMCA2Fwcgd0b2tlbklkBARyd3BiCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUHdG9rZW5JZAUUa1Rva2VuUmV3YXJkUGVyQmxvY2sAAAQHcndwYlVzZAkAawMFBHJ3cGIFCWF4bHlQcmljZQUNYXhseVByZWNpc2lvbgQGcndZZWFyCQBoAgkAaAIFB3J3cGJVc2QFDHBlcmlvZExlbmd0aAA0BA50b3RhbFN1cHBseVVzZAkBEWdldFRvdGFsU3VwcGx5VXNkAQUHdG9rZW5JZAkAzQgCBQNhcHIJAGsDBQZyd1llYXIFBlNDQUxFOAUOdG90YWxTdXBwbHlVc2QEBGFwcnMKAAIkbAkBDGdldEFsbFRva2VucwAKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnRva2Vuc0FwcnMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDMwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeBA1scFRvdGFsU3VwcGx5CQERQGV4dHJOYXRpdmUoMTA1MCkCBRFzZkZhcm1pbmdDb250cmFjdAkArAICBQhheGx5UG9vbAUOa1NGVG90YWxTdXBwbHkEBGxwSWQJARFAZXh0ck5hdGl2ZSgxMDUzKQIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCGF4bHlQb29sBQVrTHBJZAQLbHBQcmVjaXNpb24JARFnZXRBc3NldFByZWNpc2lvbgEFBGxwSWQEB2xwUHJpY2UKAAFACQCRAwIKAAFACQD8BwQFDG1haW5Db250cmFjdAIaZ2V0U2hhcmVBc3NldFByaWNlUkVBRE9OTFkJAMwIAgkAzAgCBQRscElkBQNuaWwFA25pbAUDbmlsAwkAAQIFAUACCUxpc3RbQW55XQUBQAkAAgEJAKwCAgkAAwEFAUACHiBjb3VsZG4ndCBiZSBjYXN0IHRvIExpc3RbQW55XQAAAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAQQbHBUb3RhbFN1cHBseVVzZAkAawMFDWxwVG90YWxTdXBwbHkFB2xwUHJpY2UFC2xwUHJlY2lzaW9uBARyd3BiCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFEWtMcFJld2FyZFBlckJsb2NrAAAEB3J3cGJVc2QJAGsDBQRyd3BiBQlheGx5UHJpY2UFDWF4bHlQcmVjaXNpb24EBnJ3WWVhcgkAaAIJAGgCBQdyd3BiVXNkBQxwZXJpb2RMZW5ndGgANAQFbHBBcHIJAGsDBQZyd1llYXIFBlNDQUxFOAUQbHBUb3RhbFN1cHBseVVzZAkAlQoDCQEMZ2V0QWxsVG9rZW5zAAUEYXBycwUFbHBBcHIHAWkBEmNsYWltTGVuZGVyUmV3YXJkcwAECGNsYWltUmVzCQEYY2xhaW1MZW5kZXJSZXdhcmRzQ29tbW9uAgkApQgBCAUBaQZjYWxsZXIHAwkAAAIIBQhjbGFpbVJlcwJfMwAACQACAQIjY2xhaW0gYW1vdW50IG11c3QgYmUgZ3JlYXRlciB0aGFuIDAEA2ludgkA/AcEBQ10b2tlbkNvbnRyYWN0AhJ3aXRoZHJhd0xlbmRSZXdhcmQJAMwIAggFCGNsYWltUmVzAl8zCQDMCAIJAKUIAQgFAWkGY2FsbGVyBQNuaWwFA25pbAMJAAACBQNpbnYFA2ludggFCGNsYWltUmVzAl80CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDmNsYWltTHBSZXdhcmRzAAQIY2xhaW1SZXMJARRjbGFpbUxwUmV3YXJkc0NvbW1vbgIJAKUIAQgFAWkGY2FsbGVyBwMJAAACCAUIY2xhaW1SZXMCXzEAAAkAAgECI2NsYWltIGFtb3VudCBtdXN0IGJlIGdyZWF0ZXIgdGhhbiAwBANpbnYJAPwHBAUNdG9rZW5Db250cmFjdAIQd2l0aGRyYXdMcFJld2FyZAkAzAgCCAUIY2xhaW1SZXMCXzEJAMwIAgkApQgBCAUBaQZjYWxsZXIFA25pbAUDbmlsAwkAAAIFA2ludgUDaW52CAUIY2xhaW1SZXMCXzIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKbGVuZEFjdGlvbgIEdXNlcgd0b2tlbklkCQELdmFsdWVPckVsc2UCCQEKaXNMYW5kQ2FsbAEFAWkEEnVzZXJBdmFpbGFibGVDbGFpbQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFB3Rva2VuSWQFF2tVc2VyTGVuZEF2YWlsYWJsZUNsYWltAAAEDSR0MDEyNDg3MTI1NTQJARJjYWxjTGVuZFVzZXJSZXdhcmQCBQR1c2VyBQd0b2tlbklkBAd1UmV3YXJkCAUNJHQwMTI0ODcxMjU1NAJfMQQQbmV3VG9rZW5JbnRlcmVzdAgFDSR0MDEyNDg3MTI1NTQCXzIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FB3Rva2VuSWQFEWtVc2VyTGVuZEludGVyZXN0BRBuZXdUb2tlbkludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQd0b2tlbklkBRdrVXNlckxlbmRBdmFpbGFibGVDbGFpbQkAZAIFEnVzZXJBdmFpbGFibGVDbGFpbQUHdVJld2FyZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBQ5rVG9rZW5JbnRlcmVzdAUQbmV3VG9rZW5JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBRRrVG9rZW5JbnRlcmVzdEhlaWdodAUGaGVpZ2h0BQNuaWwBaQEIbHBBY3Rpb24BBHVzZXIJAQt2YWx1ZU9yRWxzZQIJAQ9pc1NGRmFybWluZ0NhbGwBBQFpBBJ1c2VyQXZhaWxhYmxlQ2xhaW0JAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUVa1VzZXJMcEF2YWlsYWJsZUNsYWltAAAEDSR0MDEzMDE5MTMwNzIJARBjYWxjTHBVc2VyUmV3YXJkAQUEdXNlcgQHdVJld2FyZAgFDSR0MDEzMDE5MTMwNzICXzEEDW5ld0xwSW50ZXJlc3QIBQ0kdDAxMzAxOTEzMDcyAl8yCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHVzZXIFD2tVc2VyTHBJbnRlcmVzdAUNbmV3THBJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyBRVrVXNlckxwQXZhaWxhYmxlQ2xhaW0JAGQCBRJ1c2VyQXZhaWxhYmxlQ2xhaW0FB3VSZXdhcmQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgULa0xwSW50ZXJlc3QFDW5ld0xwSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgURa0xwSW50ZXJlc3RIZWlnaHQFBmhlaWdodAUDbmlsAWkBBGluaXQFFGF4bHlNYWluQ29udHJhY3RBZGRyGWF4bHlUb2tlbm9taWNDb250cmFjdEFkZHIMYXhseVBvb2xBZGRyEmZhcm1pbmdTdGFydEhlaWdodAxwZXJpb2RMZW5ndGgJAQt2YWx1ZU9yRWxzZQIJAQppc1NlbGZDYWxsAQUBaQMJAQEhAQkBCWlzRGVmaW5lZAEJAKYIAQUUYXhseU1haW5Db250cmFjdEFkZHIJAAIBAhVXcm9uZyBmYXJtaW5nIGFkZHJlc3MDCQEBIQEJAQlpc0RlZmluZWQBCQCmCAEFGWF4bHlUb2tlbm9taWNDb250cmFjdEFkZHIJAAIBAhtXcm9uZyBtYWluIGNvbnRyYWN0IGFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgURa0F4bHlNYWluQ29udHJhY3QFFGF4bHlNYWluQ29udHJhY3RBZGRyCQDMCAIJAQtTdHJpbmdFbnRyeQIFFmtBeGx5VG9rZW5vbWljQ29udHJhY3QFGWF4bHlUb2tlbm9taWNDb250cmFjdEFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgUJa0F4bHlQb29sBQxheGx5UG9vbEFkZHIJAMwIAgkBDEludGVnZXJFbnRyeQIFDGtTdGFydEhlaWdodAUSZmFybWluZ1N0YXJ0SGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ1rUGVyaW9kTGVuZ3RoBQxwZXJpb2RMZW5ndGgFA25pbAFpAQxpbml0TmV3VG9rZW4BB3Rva2VuSWQJAQt2YWx1ZU9yRWxzZQIJAQtpc0FkbWluQ2FsbAEFAWkDCQEJaXNEZWZpbmVkAQkAmggCBQR0aGlzCQCsAgIFB3Rva2VuSWQFDmtUb2tlbkludGVyZXN0CQACAQIUdG9rZW4gYWxyZWFkeSBpbml0ZWQDCQEBIQEJAQhjb250YWlucwIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDGxlbmRDb250cmFjdAUQa0xlbmRTZXR1cFRva2VucwUHdG9rZW5JZAkAAgECE25vIHRva2VuIG9uIGxhbmRpbmcEDG5ld0FsbFRva2VucwkAzQgCCQEMZ2V0QWxsVG9rZW5zAAUHdG9rZW5JZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBQ5rVG9rZW5JbnRlcmVzdAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB3Rva2VuSWQFFGtUb2tlbkludGVyZXN0SGVpZ2h0CQCWAwEJAMwIAgULc3RhcnRIZWlnaHQJAMwIAgUGaGVpZ2h0BQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgUHa1Rva2VucwkAuQkCBQxuZXdBbGxUb2tlbnMCASwJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHdG9rZW5JZAUUa1Rva2VuUmV3YXJkUGVyQmxvY2sAAAUDbmlsAWkBDXVwZGF0ZVJld2FyZHMACQELdmFsdWVPckVsc2UCCQEOaXNPcGVyYXRvckNhbGwBBQFpBBBsYXN0VXBkYXRlSGVpZ2h0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFE2tSZXdhcmRVcGRhdGVIZWlnaHQAAAMJAGYCCQBkAgUQbGFzdFVwZGF0ZUhlaWdodAUMcGVyaW9kTGVuZ3RoBQZoZWlnaHQJAAIBAiVyZXdhcmRzIGFscmVkeSB1cGRhdGVkIGluIHRoaXMgcGVyaW9kBA0kdDAxNDgzOTE0OTE5CQEXZ2V0VG90YWxTdXBwbHlBbGxUb2tlbnMABAt0b3RhbFN1cHBseQgFDSR0MDE0ODM5MTQ5MTkCXzEEDnRvdGFsU3VwcGx5VXNkCAUNJHQwMTQ4MzkxNDkxOQJfMgQRdG90YWxTdXBwbHlVc2RBbGwIBQ0kdDAxNDgzOTE0OTE5Al8zBAlheGx5UHJpY2UJAQ1nZXRBc3NldFByaWNlAQUGYXhseUlkBA1heGx5UHJlY2lzaW9uCQERZ2V0QXNzZXRQcmVjaXNpb24BBQZheGx5SWQEBm1heEFQUgkBFWdldEFkb3B0ZWRBUFJCeVBlcmlvZAMFCWN1clBlcmlvZAUTTEVOREVSU19BUFJfUEVSSU9EUwULTEVOREVSU19BUFIKAQx1cGRhdGVSZXdhcmQCAWEHdG9rZW5JZAQNJHQwMTUxNjgxNTIxMgUBYQQIZW50ZXJpZXMIBQ0kdDAxNTE2ODE1MjEyAl8xBBF0b3RhbFBlcmlvZFJld2FyZAgFDSR0MDE1MTY4MTUyMTICXzIEBWluZGV4CAUNJHQwMTUxNjgxNTIxMgJfMwMJAAACCQCRAwIFC3RvdGFsU3VwcGx5BQVpbmRleAAACQCVCgMJAM4IAgUIZW50ZXJpZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHdG9rZW5JZAUUa1ByZXZMZW5kVG9rZW5TdXBwbHkJAJEDAgULdG90YWxTdXBwbHkFBWluZGV4CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB3Rva2VuSWQFFGtUb2tlblJld2FyZFBlckJsb2NrAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHdG9rZW5JZAUOa1Rva2VuSW50ZXJlc3QJARRjYWxjTmV3VG9rZW5JbnRlcmVzdAIFB3Rva2VuSWQJAJEDAgULdG90YWxTdXBwbHkFBWluZGV4CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB3Rva2VuSWQFFGtUb2tlbkludGVyZXN0SGVpZ2h0CQCWAwEJAMwIAgULc3RhcnRIZWlnaHQJAMwIAgUGaGVpZ2h0BQNuaWwFA25pbAURdG90YWxQZXJpb2RSZXdhcmQJAGQCBQVpbmRleAABBAVzaGFyZQkAawMJAJEDAgUOdG90YWxTdXBwbHlVc2QFBWluZGV4BQZTQ0FMRTgFEXRvdGFsU3VwcGx5VXNkQWxsBAltYXhSZXdhcmQJAGsDBQVzaGFyZQUTbGVuZE1heFBlcmlvZEFtb3VudAUGU0NBTEU4BAxtYXhSZXdhcmRVc2QJAGsDBQltYXhSZXdhcmQFCWF4bHlQcmljZQUNYXhseVByZWNpc2lvbgQPcHJldlRvdGFsU3VwcGx5CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFFGtQcmV2TGVuZFRva2VuU3VwcGx5AAAEBnJ0Q29lZgMDCQAAAgUPcHJldlRvdGFsU3VwcGx5AAAGCQAAAgkAkQMCBQt0b3RhbFN1cHBseQUFaW5kZXgAAAAACQBrAwUPcHJldlRvdGFsU3VwcGx5BQZTQ0FMRTgJAJEDAgULdG90YWxTdXBwbHkFBWluZGV4BAZyZXdhcmQJAGkCCQBpAgkAlwMBCQDMCAIJAGgCBQZtYXhBUFIJAGQCBQZTQ0FMRTgFBnJ0Q29lZgkAzAgCCQBrAwUGbWF4QVBSCQBoAgAPBQZTQ0FMRTgACgUDbmlsBQZTQ0FMRTgAZAQJcmV3YXJkVXNkCQCXAwEJAMwIAgUMbWF4UmV3YXJkVXNkCQDMCAIJAGsDCQCRAwIFDnRvdGFsU3VwcGx5VXNkBQVpbmRleAUGcmV3YXJkBQZTQ0FMRTgFA25pbAQMcmV3YXJkUGVyaW9kCQBrAwUJcmV3YXJkVXNkBQ1heGx5UHJlY2lzaW9uBQlheGx5UHJpY2UEDnJld2FyZFBlckJsb2NrCQBpAgUMcmV3YXJkUGVyaW9kBQxwZXJpb2RMZW5ndGgJAJUKAwkAzggCBQhlbnRlcmllcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBRRrUHJldkxlbmRUb2tlblN1cHBseQkAkQMCBQt0b3RhbFN1cHBseQUFaW5kZXgJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHdG9rZW5JZAUUa1Rva2VuUmV3YXJkUGVyQmxvY2sFDnJld2FyZFBlckJsb2NrCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB3Rva2VuSWQFDmtUb2tlbkludGVyZXN0CQEUY2FsY05ld1Rva2VuSW50ZXJlc3QCBQd0b2tlbklkCQCRAwIFC3RvdGFsU3VwcGx5BQVpbmRleAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQd0b2tlbklkBRRrVG9rZW5JbnRlcmVzdEhlaWdodAkAlgMBCQDMCAIFC3N0YXJ0SGVpZ2h0CQDMCAIFBmhlaWdodAUDbmlsBQNuaWwJAGQCBRF0b3RhbFBlcmlvZFJld2FyZAUMcmV3YXJkUGVyaW9kCQBkAgUFaW5kZXgAAQQNJHQwMTY4NzQxNjk3MgoAAiRsCQEMZ2V0QWxsVG9rZW5zAAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMdXBkYXRlUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAzMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgQOdG9rZW5zRW50ZXJpZXMIBQ0kdDAxNjg3NDE2OTcyAl8xBBB0b3RhbFRva2VuUmV3YXJkCAUNJHQwMTY4NzQxNjk3MgJfMgQFaW5kZXgIBQ0kdDAxNjg3NDE2OTcyAl8zBAhscE1heEFQUgkBFWdldEFkb3B0ZWRBUFJCeVBlcmlvZAMFCWN1clBlcmlvZAUOTFBfQVBSX1BFUklPRFMFBkxQX0FQUgQNbHBUb3RhbFN1cHBseQkBEUBleHRyTmF0aXZlKDEwNTApAgURc2ZGYXJtaW5nQ29udHJhY3QJAKwCAgUIYXhseVBvb2wFDmtTRlRvdGFsU3VwcGx5BAtwcmVMUFN1cHBseQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQ1rUHJldkxQU3VwcGx5AAAEBGxwSWQJARFAZXh0ck5hdGl2ZSgxMDUzKQIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCGF4bHlQb29sBQVrTHBJZAQLbHBQcmVjaXNpb24JARFnZXRBc3NldFByZWNpc2lvbgEFBGxwSWQEB2xwUHJpY2UKAAFACQD8BwQFDG1haW5Db250cmFjdAIaZ2V0U2hhcmVBc3NldFByaWNlUkVBRE9OTFkJAMwIAgUEbHBJZAUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQUBQAIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50BBBscFRvdGFsU3VwcGx5VXNkCQBrAwUNbHBUb3RhbFN1cHBseQUHbHBQcmljZQULbHBQcmVjaXNpb24EDm1heExQUmV3YXJkVXNkCQBrAwURbHBNYXhQZXJpb2RBbW91bnQFCWF4bHlQcmljZQUNYXhseVByZWNpc2lvbgQIcnRMUENvZWYDAwkAAAIFC3ByZUxQU3VwcGx5AAAGCQAAAgUNbHBUb3RhbFN1cHBseQAAAAAJAGsDBQtwcmVMUFN1cHBseQUGU0NBTEU4BQ1scFRvdGFsU3VwcGx5BAhyZXdhcmRMcAkAaQIJAGkCCQCXAwEJAMwIAgkAaAIFCGxwTWF4QVBSCQBkAgUGU0NBTEU4BQhydExQQ29lZgkAzAgCCQBrAwUIbHBNYXhBUFIJAGgCAA8FBlNDQUxFOAAKBQNuaWwFBlNDQUxFOABkBAtyZXdhcmRMcFVzZAkAlwMBCQDMCAIFDm1heExQUmV3YXJkVXNkCQDMCAIJAGsDBRBscFRvdGFsU3VwcGx5VXNkBQhyZXdhcmRMcAUGU0NBTEU4BQNuaWwEDnJld2FyZExwUGVyaW9kCQBrAwULcmV3YXJkTHBVc2QFDWF4bHlQcmVjaXNpb24FCWF4bHlQcmljZQQQcmV3YXJkTHBQZXJCbG9jawkAaQIFDnJld2FyZExwUGVyaW9kBQxwZXJpb2RMZW5ndGgECGJ1cm5MZW5kCQBlAgUTbGVuZE1heFBlcmlvZEFtb3VudAUQdG90YWxUb2tlblJld2FyZAQGYnVybkxwCQBlAgURbHBNYXhQZXJpb2RBbW91bnQFDnJld2FyZExwUGVyaW9kBANpbnYJAPwHBAUNdG9rZW5Db250cmFjdAIQd2l0aGRyYXdMcFJld2FyZAkAzAgCCQBkAgUIYnVybkxlbmQFBmJ1cm5McAkAzAgCCQClCAEFBHRoaXMFA25pbAUDbmlsAwkAAAIFA2ludgUDaW52BApscEVudGVyaWVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ1rUHJldkxQU3VwcGx5BQ1scFRvdGFsU3VwcGx5CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFrTHBSZXdhcmRQZXJCbG9jawUQcmV3YXJkTHBQZXJCbG9jawkAzAgCCQEMSW50ZWdlckVudHJ5AgULa0xwSW50ZXJlc3QJARFjYWxjTmV3THBJbnRlcmVzdAEFDWxwVG90YWxTdXBwbHkJAMwIAgkBDEludGVnZXJFbnRyeQIFEWtMcEludGVyZXN0SGVpZ2h0CQCWAwEJAMwIAgULc3RhcnRIZWlnaHQJAMwIAgUGaGVpZ2h0BQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBARoBVCeRLDw6Cc0O274F1dPN7wpIGPs2Az2GuwUIYnVybkxlbmQJANkEAQUGYXhseUlkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQEaAVQnkSw8OgnNDtu+BdXTze8KSBj7NgM9hrsFBmJ1cm5McAkA2QQBBQZheGx5SWQFA25pbAkAzQgCCQDOCAIFCmxwRW50ZXJpZXMFDnRva2Vuc0VudGVyaWVzCQEMSW50ZWdlckVudHJ5AgUTa1Jld2FyZFVwZGF0ZUhlaWdodAkAlgMBCQDMCAIFC3N0YXJ0SGVpZ2h0CQDMCAIFBmhlaWdodAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAQTbXVsdGlTaWduZWRCeUFkbWlucwQSYWRtaW5QdWJLZXkxU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUIYWRtaW4xUEsAAQAABBJhZG1pblB1YktleTJTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQhhZG1pbjJQSwABAAAEEmFkbWluUHViS2V5M1NpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFCGFkbWluM1BLAAEAAAkAZwIJAGQCCQBkAgUSYWRtaW5QdWJLZXkxU2lnbmVkBRJhZG1pblB1YktleTJTaWduZWQFEmFkbWluUHViS2V5M1NpZ25lZAACBAckbWF0Y2gwBQJ0eAMJAAECBQckbWF0Y2gwAhdJbnZva2VTY3JpcHRUcmFuc2FjdGlvbgQDaW52BQckbWF0Y2gwBAZpc1NlbGYJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXkECmlzUmlnaHRGZWUDCQAAAggFA2ludgNmZWUAoPc2CQAAAggFA2ludgpmZWVBc3NldElkBQR1bml0BwQKaXNJbml0Q2FsbAkAAAIIBQNpbnYIZnVuY3Rpb24CBGluaXQEDGlzbm9QYXltZW50cwkAAAIJAJADAQgFA2ludghwYXltZW50cwAAAwMDAwUKaXNSaWdodEZlZQUKaXNJbml0Q2FsbAcFBmlzU2VsZgcFDGlzbm9QYXltZW50cwcGBRNtdWx0aVNpZ25lZEJ5QWRtaW5zBRNtdWx0aVNpZ25lZEJ5QWRtaW5zmB287g==",
    "height": 2715930,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7ykTKbLEcRtaFDPrcdb5cTFjiVT4HqnaX2qt9kUNwz5C
Next: 9qikQpxQPDTk39w9Dj9TghbyidC8J4XQbYAjrGBzoVSv

Diff: 
Old New Differences
250 250      }
251 251  
252 252  
253 - func calcNewTokenInterest (tokenId,totalSupply) = if ((height >= startHeight))
253 + func calcNewTokenInterest (tokenId,totalSupply) = if ((startHeight >= height))
254 254      then 0
255 255      else {
256 256          let rewardPerBlock = getIntegerValue(this, (tokenId + kTokenRewardPerBlock))
264 264          }
265 265  
266 266  
267 - func calcNewLpInterest (totalSupply) = if ((height >= startHeight))
267 + func calcNewLpInterest (totalSupply) = if ((startHeight >= height))
268 268      then 0
269 269      else {
270 270          let rewardPerBlock = valueOrElse(getInteger(this, kLpRewardPerBlock), 0)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SCALE8 = 100000000
5 5  
6 6  let LENDERS_APR = [150, 120, 100, 80, 60, 40, 30, 20, 10]
7 7  
8 8  let LENDERS_APR_PERIODS = ["1-1", "2-2", "3-3", "4-4", "5-8", "9-12", "14-16", "17-20", "20-104"]
9 9  
10 10  let LENDERS_MAX_PERIODS = 104
11 11  
12 12  let LP_APR = [150, 120, 100, 80, 60, 40]
13 13  
14 14  let LP_APR_PERIODS = ["1-1", "2-2", "3-3", "4-4", "5-8", "9-12"]
15 15  
16 16  let LP_MAX_PERIODS = 12
17 17  
18 18  let kStartHeight = "startHeight"
19 19  
20 20  let kPeriodLength = "periodLength"
21 21  
22 22  let kLendersMaxAmount = "lendRewardsAmount"
23 23  
24 24  let kLPMaxAmount = "lpRewardAmount"
25 25  
26 26  let kTokens = "tokens"
27 27  
28 28  let kUserSupply = "_userTotalSupply"
29 29  
30 30  let kTokenInterest = "_tokenInterest"
31 31  
32 32  let kTokenInterestHeight = "_tokenInterestHeight"
33 33  
34 34  let kTokenRewardPerBlock = "_tokenRewardPerBlock"
35 35  
36 36  let kRewardUpdateHeight = "rewardUpdateHeight"
37 37  
38 38  let kUserLendInterest = "_userLandInterest"
39 39  
40 40  let kUserLendAvailableClaim = "_userLendAvailableClaim"
41 41  
42 42  let kUserLpAvailableClaim = "_userLpAvailableClaim"
43 43  
44 44  let kLpInterest = "lpInterest"
45 45  
46 46  let kLpInterestHeight = "lpInterestHeight"
47 47  
48 48  let kPrevLPSupply = "prevLPTotalSupply"
49 49  
50 50  let kLpRewardPerBlock = "lpRewardPerBlock"
51 51  
52 52  let kUserLpInterest = "_userLpInterest"
53 53  
54 54  let kPriceInOracle = "_twap5B"
55 55  
56 56  let kPrevLendTokenSupply = "_prevLendTotalSupply"
57 57  
58 58  let kAXLYTokenId = "axlyTokenId"
59 59  
60 60  let kLendTokenSupply = "total_supplied_"
61 61  
62 62  let kLendUserSupply = "_supplied_"
63 63  
64 64  let kLendSetupTokens = "setup_tokens"
65 65  
66 66  let kSFTotalSupply = "_total_share_tokens_locked"
67 67  
68 68  let kSFUserTotalSupply = "_share_tokens_locked"
69 69  
70 70  let kAxlyPool = "axlyPool"
71 71  
72 72  let kLpId = "share_asset_id"
73 73  
74 74  let kPriceOracle = "price_oracle"
75 75  
76 76  let kAxlyMainContract = "mainContract"
77 77  
78 78  let kAxlyTokenomicContract = "tokenomicContract"
79 79  
80 80  let kSFFarmingContract = "swopfi_farming_addr"
81 81  
82 82  let kLendContract = "lend_service_addr"
83 83  
84 84  let kAdmin1PK = "group1_admin1_pub_key"
85 85  
86 86  let kAdmin2PK = "group1_admin2_pub_key"
87 87  
88 88  let kAdmin3PK = "group1_admin3_pub_key"
89 89  
90 90  let kOperatorCallPK = "admin_call_pub_key"
91 91  
92 92  let axlyPool = valueOrErrorMessage(getString(this, kAxlyPool), "Can't get axlyPool key")
93 93  
94 94  let mainContract = addressFromStringValue(valueOrErrorMessage(getString(this, kAxlyMainContract), "Can't get mainContact key"))
95 95  
96 96  let tokenContract = addressFromStringValue(valueOrErrorMessage(getString(this, kAxlyTokenomicContract), "Can't get tokenomicContract key"))
97 97  
98 98  let lendContract = addressFromStringValue(valueOrErrorMessage(getString(mainContract, kLendContract), "Can't get lend_service_addr key"))
99 99  
100 100  let sfFarmingContract = addressFromStringValue(valueOrErrorMessage(getString(mainContract, kSFFarmingContract), "Can't get swopfi_farming_addr key"))
101 101  
102 102  let priceOracleAddr = addressFromStringValue(valueOrErrorMessage(getString(mainContract, kPriceOracle), "Can't get price_oracle key"))
103 103  
104 104  let admin1PK = fromBase58String(valueOrErrorMessage(getString(mainContract, kAdmin1PK), "Can't get admin1PK"))
105 105  
106 106  let admin2PK = fromBase58String(valueOrErrorMessage(getString(mainContract, kAdmin2PK), "Can't get admin2PK"))
107 107  
108 108  let admin3PK = fromBase58String(valueOrErrorMessage(getString(mainContract, kAdmin3PK), "Can't get operatorPK"))
109 109  
110 110  let operatorPK = fromBase58String(valueOrErrorMessage(getString(this, kOperatorCallPK), "Can't get operatorPK"))
111 111  
112 112  let axlyId = valueOrErrorMessage(getString(tokenContract, kAXLYTokenId), "Can't get Axly token id")
113 113  
114 114  let startHeight = getIntegerValue(this, kStartHeight)
115 115  
116 116  let periodLength = getIntegerValue(this, kPeriodLength)
117 117  
118 118  let curPeriod = max([1, ((height - startHeight) / periodLength)])
119 119  
120 120  let lendMaxAmount = getIntegerValue(tokenContract, kLendersMaxAmount)
121 121  
122 122  let lendMaxPeriodAmount = (lendMaxAmount / LENDERS_MAX_PERIODS)
123 123  
124 124  let lpMaxAmount = getIntegerValue(tokenContract, kLPMaxAmount)
125 125  
126 126  let lpMaxPeriodAmount = (lpMaxAmount / LP_MAX_PERIODS)
127 127  
128 128  func isAdminCall (i) = if (containsElement([admin1PK, admin2PK, admin3PK], i.callerPublicKey))
129 129      then unit
130 130      else throw("Only admin group1 can call this function")
131 131  
132 132  
133 133  func isSelfCall (i) = if ((i.caller == this))
134 134      then unit
135 135      else throw("Only contract itself can call this function")
136 136  
137 137  
138 138  func isOperatorCall (i) = if ((i.callerPublicKey == operatorPK))
139 139      then unit
140 140      else throw("Only operator can call this function")
141 141  
142 142  
143 143  func isLandCall (i) = if ((i.caller == lendContract))
144 144      then unit
145 145      else throw("Only land contract can call this function")
146 146  
147 147  
148 148  func isSFFarmingCall (i) = if ((i.caller == sfFarmingContract))
149 149      then unit
150 150      else throw("Only land contract can call this function")
151 151  
152 152  
153 153  func getAllTokens () = {
154 154      let tokens = valueOrElse(getString(this, kTokens), "")
155 155      if ((tokens == ""))
156 156          then nil
157 157          else split(tokens, ",")
158 158      }
159 159  
160 160  
161 161  func getAssetPrice (assetId) = getIntegerValue(priceOracleAddr, (assetId + kPriceInOracle))
162 162  
163 163  
164 164  func getAssetDecimals (assetId) = if ((assetId == "WAVES"))
165 165      then 8
166 166      else     match assetInfo(fromBase58String(assetId)) {
167 167          case asset: Asset => 
168 168              asset.decimals
169 169          case _ => 
170 170              throw("Can't find asset")
171 171      }
172 172  
173 173  
174 174  func getAssetPrecision (assetId) = pow(10, 0, getAssetDecimals(assetId), 0, 0, DOWN)
175 175  
176 176  
177 177  func getAdoptedAPRByPeriod (period,aprPeriods,apr) = {
178 178      func for (a,aperiod) =     {
179 179          let $t054295451 = a
180 180          let index = $t054295451._1
181 181          let found = $t054295451._2
182 182          let ft = split(aperiod, "-")
183 183          let $t054885551 = $Tuple2(parseIntValue(ft[0]), parseIntValue(ft[1]))
184 184          let from = $t054885551._1
185 185          let to = $t054885551._2
186 186          if (found)
187 187              then a
188 188              else if (if ((period >= from))
189 189                  then (to >= period)
190 190                  else false)
191 191                  then $Tuple2(index, true)
192 192                  else $Tuple2((index + 1), false)
193 193          }
194 194  
195 195      let $t056885754 = {
196 196          let $l = LENDERS_APR_PERIODS
197 197          let $s = size($l)
198 198          let $acc0 = $Tuple2(0, false)
199 199          func $f0_1 ($a,$i) =         if (($i >= $s))
200 200              then $a
201 201              else for($a, $l[$i])
202 202  
203 203          func $f0_2 ($a,$i) =         if (($i >= $s))
204 204              then $a
205 205              else throw("List size exceeds 9")
206 206  
207 207          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
208 208          }
209 209      let index = $t056885754._1
210 210      let found = $t056885754._2
211 211      if (found)
212 212          then fraction((LENDERS_APR[index] * SCALE8), 7, 365)
213 213          else 0
214 214      }
215 215  
216 216  
217 217  func getTotalSupplyAllTokens () = {
218 218      func for (a,tokenId) =     {
219 219          let $t059425998 = a
220 220          let totalSupply = $t059425998._1
221 221          let totalSupplyUsd = $t059425998._2
222 222          let totalSupplyUsdAll = $t059425998._3
223 223          let tSupply = valueOrElse(getInteger(lendContract, (kLendTokenSupply + tokenId)), 0)
224 224          let assetPrice = getAssetPrice(tokenId)
225 225          let assetPrecision = getAssetPrecision(tokenId)
226 226          let tSupplyUsd = fraction(tSupply, assetPrice, assetPrecision)
227 227          $Tuple3((totalSupply :+ tSupply), (totalSupplyUsd :+ tSupplyUsd), (totalSupplyUsdAll + tSupplyUsd))
228 228          }
229 229  
230 230      let $l = getAllTokens()
231 231      let $s = size($l)
232 232      let $acc0 = $Tuple3(nil, nil, 0)
233 233      func $f0_1 ($a,$i) =     if (($i >= $s))
234 234          then $a
235 235          else for($a, $l[$i])
236 236  
237 237      func $f0_2 ($a,$i) =     if (($i >= $s))
238 238          then $a
239 239          else throw("List size exceeds 30")
240 240  
241 241      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
242 242      }
243 243  
244 244  
245 245  func getTotalSupplyUsd (tokenId) = {
246 246      let tSupply = valueOrElse(getInteger(lendContract, (kLendTokenSupply + tokenId)), 0)
247 247      let assetPrice = getAssetPrice(tokenId)
248 248      let assetPrecision = getAssetPrecision(tokenId)
249 249      fraction(tSupply, assetPrice, assetPrecision)
250 250      }
251 251  
252 252  
253 - func calcNewTokenInterest (tokenId,totalSupply) = if ((height >= startHeight))
253 + func calcNewTokenInterest (tokenId,totalSupply) = if ((startHeight >= height))
254 254      then 0
255 255      else {
256 256          let rewardPerBlock = getIntegerValue(this, (tokenId + kTokenRewardPerBlock))
257 257          let oldInterest = getIntegerValue(this, (tokenId + kTokenInterest))
258 258          let updateHeight = getIntegerValue(this, (tokenId + kTokenInterestHeight))
259 259          let reward = ((height - updateHeight) * rewardPerBlock)
260 260          let interest = if ((totalSupply > 0))
261 261              then fraction(reward, SCALE8, totalSupply)
262 262              else 0
263 263          (oldInterest + interest)
264 264          }
265 265  
266 266  
267 - func calcNewLpInterest (totalSupply) = if ((height >= startHeight))
267 + func calcNewLpInterest (totalSupply) = if ((startHeight >= height))
268 268      then 0
269 269      else {
270 270          let rewardPerBlock = valueOrElse(getInteger(this, kLpRewardPerBlock), 0)
271 271          let oldInterest = valueOrElse(getInteger(this, kLpInterest), 0)
272 272          let updateHeight = valueOrElse(getInteger(this, kLpInterestHeight), height)
273 273          let reward = ((height - updateHeight) * rewardPerBlock)
274 274          let interest = if ((totalSupply > 0))
275 275              then fraction(reward, SCALE8, totalSupply)
276 276              else 0
277 277          (oldInterest + interest)
278 278          }
279 279  
280 280  
281 281  func calcLendUserReward (user,tokenId) = {
282 282      let totalSupply = valueOrElse(getInteger(lendContract, (kLendTokenSupply + tokenId)), 0)
283 283      let tokenInterest = calcNewTokenInterest(tokenId, totalSupply)
284 284      let userSupply = valueOrElse(getInteger(lendContract, ((user + kLendUserSupply) + tokenId)), 0)
285 285      let userTokenInterest = valueOrElse(getInteger(this, (((tokenId + "_") + user) + kUserLendInterest)), if ((userSupply == 0))
286 286          then tokenInterest
287 287          else 0)
288 288      let reward = fraction(userSupply, (tokenInterest - userTokenInterest), SCALE8)
289 289      $Tuple3(reward, tokenInterest, userSupply)
290 290      }
291 291  
292 292  
293 293  func calcLpUserReward (user) = {
294 294      let totalSupply = valueOrElse(getInteger(sfFarmingContract, (axlyPool + kSFTotalSupply)), 0)
295 295      let tokenInterest = calcNewLpInterest(totalSupply)
296 296      let userSupply = valueOrElse(getInteger(lendContract, (((axlyPool + "_") + user) + kSFUserTotalSupply)), 0)
297 297      let userTokenInterest = valueOrElse(getInteger(this, (user + kUserLpInterest)), if ((userSupply == 0))
298 298          then tokenInterest
299 299          else 0)
300 300      let reward = fraction(userSupply, (tokenInterest - userTokenInterest), SCALE8)
301 301      $Tuple3(reward, tokenInterest, userSupply)
302 302      }
303 303  
304 304  
305 305  func claimLenderRewardsCommon (user,readOnly) = {
306 306      func claim (a,tokenId) =     {
307 307          let $t088828926 = a
308 308          let tokenIds = $t088828926._1
309 309          let cAmount = $t088828926._2
310 310          let total = $t088828926._3
311 311          let enteries = $t088828926._4
312 312          let userAvailableClaim = valueOrElse(getInteger(this, (((tokenId + "_") + user) + kUserLendAvailableClaim)), 0)
313 313          let $t090399118 = calcLendUserReward(user, tokenId)
314 314          let uReward = $t090399118._1
315 315          let newTokenInterest = $t090399118._2
316 316          let userSupply = $t090399118._3
317 317          let totalToClaim = (userAvailableClaim + uReward)
318 318          if (if ((totalToClaim > 0))
319 319              then true
320 320              else (userSupply > 0))
321 321              then {
322 322                  let newEntreries = if (if (readOnly)
323 323                      then true
324 324                      else (totalToClaim == 0))
325 325                      then enteries
326 326                      else (enteries ++ [IntegerEntry((((tokenId + "_") + user) + kUserLendInterest), newTokenInterest), IntegerEntry((((tokenId + "_") + user) + kUserLendAvailableClaim), 0), IntegerEntry((tokenId + kTokenInterest), newTokenInterest), IntegerEntry((tokenId + kTokenInterestHeight), height)])
327 327                  $Tuple4((tokenIds :+ tokenId), (cAmount :+ totalToClaim), (total + totalToClaim), newEntreries)
328 328                  }
329 329              else $Tuple4(tokenIds, cAmount, total, enteries)
330 330          }
331 331  
332 332      let $l = getAllTokens()
333 333      let $s = size($l)
334 334      let $acc0 = $Tuple4(nil, nil, 0, nil)
335 335      func $f0_1 ($a,$i) =     if (($i >= $s))
336 336          then $a
337 337          else claim($a, $l[$i])
338 338  
339 339      func $f0_2 ($a,$i) =     if (($i >= $s))
340 340          then $a
341 341          else throw("List size exceeds 30")
342 342  
343 343      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
344 344      }
345 345  
346 346  
347 347  func claimLpRewardsCommon (user,readOnly) = {
348 348      let userAvailableClaim = valueOrElse(getInteger(this, (user + kUserLpAvailableClaim)), 0)
349 349      let $t01005010115 = calcLpUserReward(user)
350 350      let uReward = $t01005010115._1
351 351      let newLpInterest = $t01005010115._2
352 352      let userSupply = $t01005010115._3
353 353      let totalToClaim = (userAvailableClaim + uReward)
354 354      if (if (readOnly)
355 355          then true
356 356          else (totalToClaim == 0))
357 357          then $Tuple2(totalToClaim, nil)
358 358          else $Tuple2(totalToClaim, [IntegerEntry((user + kUserLpInterest), newLpInterest), IntegerEntry((user + kUserLpAvailableClaim), 0), IntegerEntry(kLpInterest, newLpInterest), IntegerEntry(kLpInterestHeight, height)])
359 359      }
360 360  
361 361  
362 362  func getTokensAPRs () = {
363 363      let axlyPrice = getAssetPrice(axlyId)
364 364      let axlyPrecision = getAssetPrecision(axlyId)
365 365      func tokensAprs (apr,tokenId) =     {
366 366          let rwpb = valueOrElse(getInteger(this, (tokenId + kTokenRewardPerBlock)), 0)
367 367          let rwpbUsd = fraction(rwpb, axlyPrice, axlyPrecision)
368 368          let rwYear = ((rwpbUsd * periodLength) * 52)
369 369          let totalSupplyUsd = getTotalSupplyUsd(tokenId)
370 370          (apr :+ fraction(rwYear, SCALE8, totalSupplyUsd))
371 371          }
372 372  
373 373      let aprs = {
374 374          let $l = getAllTokens()
375 375          let $s = size($l)
376 376          let $acc0 = nil
377 377          func $f0_1 ($a,$i) =         if (($i >= $s))
378 378              then $a
379 379              else tokensAprs($a, $l[$i])
380 380  
381 381          func $f0_2 ($a,$i) =         if (($i >= $s))
382 382              then $a
383 383              else throw("List size exceeds 30")
384 384  
385 385          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
386 386          }
387 387      let lpTotalSupply = getIntegerValue(sfFarmingContract, (axlyPool + kSFTotalSupply))
388 388      let lpId = getStringValue(addressFromStringValue(axlyPool), kLpId)
389 389      let lpPrecision = getAssetPrecision(lpId)
390 390      let lpPrice = {
391 391          let @ = ({
392 392              let @ = invoke(mainContract, "getShareAssetPriceREADONLY", [[lpId]], nil)
393 393              if ($isInstanceOf(@, "List[Any]"))
394 394                  then @
395 395                  else throw(($getType(@) + " couldn't be cast to List[Any]"))
396 396              })[0]
397 397          if ($isInstanceOf(@, "Int"))
398 398              then @
399 399              else throw(($getType(@) + " couldn't be cast to Int"))
400 400          }
401 401      let lpTotalSupplyUsd = fraction(lpTotalSupply, lpPrice, lpPrecision)
402 402      let rwpb = valueOrElse(getInteger(this, kLpRewardPerBlock), 0)
403 403      let rwpbUsd = fraction(rwpb, axlyPrice, axlyPrecision)
404 404      let rwYear = ((rwpbUsd * periodLength) * 52)
405 405      let lpApr = fraction(rwYear, SCALE8, lpTotalSupplyUsd)
406 406      $Tuple3(getAllTokens(), aprs, lpApr)
407 407      }
408 408  
409 409  
410 410  @Callable(i)
411 411  func claimLenderRewards () = {
412 412      let claimRes = claimLenderRewardsCommon(toString(i.caller), false)
413 413      if ((claimRes._3 == 0))
414 414          then throw("claim amount must be greater than 0")
415 415          else {
416 416              let inv = invoke(tokenContract, "withdrawLendReward", [claimRes._3, toString(i.caller)], nil)
417 417              if ((inv == inv))
418 418                  then claimRes._4
419 419                  else throw("Strict value is not equal to itself.")
420 420              }
421 421      }
422 422  
423 423  
424 424  
425 425  @Callable(i)
426 426  func claimLpRewards () = {
427 427      let claimRes = claimLpRewardsCommon(toString(i.caller), false)
428 428      if ((claimRes._1 == 0))
429 429          then throw("claim amount must be greater than 0")
430 430          else {
431 431              let inv = invoke(tokenContract, "withdrawLpReward", [claimRes._1, toString(i.caller)], nil)
432 432              if ((inv == inv))
433 433                  then claimRes._2
434 434                  else throw("Strict value is not equal to itself.")
435 435              }
436 436      }
437 437  
438 438  
439 439  
440 440  @Callable(i)
441 441  func lendAction (user,tokenId) = valueOrElse(isLandCall(i), {
442 442      let userAvailableClaim = valueOrElse(getInteger(this, (tokenId + kUserLendAvailableClaim)), 0)
443 443      let $t01248712554 = calcLendUserReward(user, tokenId)
444 444      let uReward = $t01248712554._1
445 445      let newTokenInterest = $t01248712554._2
446 446  [IntegerEntry((((user + "_") + tokenId) + kUserLendInterest), newTokenInterest), IntegerEntry((((user + "_") + tokenId) + kUserLendAvailableClaim), (userAvailableClaim + uReward)), IntegerEntry((tokenId + kTokenInterest), newTokenInterest), IntegerEntry((tokenId + kTokenInterestHeight), height)]
447 447      })
448 448  
449 449  
450 450  
451 451  @Callable(i)
452 452  func lpAction (user) = valueOrElse(isSFFarmingCall(i), {
453 453      let userAvailableClaim = valueOrElse(getInteger(this, kUserLpAvailableClaim), 0)
454 454      let $t01301913072 = calcLpUserReward(user)
455 455      let uReward = $t01301913072._1
456 456      let newLpInterest = $t01301913072._2
457 457  [IntegerEntry((user + kUserLpInterest), newLpInterest), IntegerEntry((user + kUserLpAvailableClaim), (userAvailableClaim + uReward)), IntegerEntry((user + kLpInterest), newLpInterest), IntegerEntry((user + kLpInterestHeight), height)]
458 458      })
459 459  
460 460  
461 461  
462 462  @Callable(i)
463 463  func init (axlyMainContractAddr,axlyTokenomicContractAddr,axlyPoolAddr,farmingStartHeight,periodLength) = valueOrElse(isSelfCall(i), if (!(isDefined(addressFromString(axlyMainContractAddr))))
464 464      then throw("Wrong farming address")
465 465      else if (!(isDefined(addressFromString(axlyTokenomicContractAddr))))
466 466          then throw("Wrong main contract address")
467 467          else [StringEntry(kAxlyMainContract, axlyMainContractAddr), StringEntry(kAxlyTokenomicContract, axlyTokenomicContractAddr), StringEntry(kAxlyPool, axlyPoolAddr), IntegerEntry(kStartHeight, farmingStartHeight), IntegerEntry(kPeriodLength, periodLength)])
468 468  
469 469  
470 470  
471 471  @Callable(i)
472 472  func initNewToken (tokenId) = valueOrElse(isAdminCall(i), if (isDefined(getInteger(this, (tokenId + kTokenInterest))))
473 473      then throw("token already inited")
474 474      else if (!(contains(getStringValue(lendContract, kLendSetupTokens), tokenId)))
475 475          then throw("no token on landing")
476 476          else {
477 477              let newAllTokens = (getAllTokens() :+ tokenId)
478 478  [IntegerEntry((tokenId + kTokenInterest), 0), IntegerEntry((tokenId + kTokenInterestHeight), max([startHeight, height])), StringEntry(kTokens, makeString(newAllTokens, ",")), IntegerEntry((tokenId + kTokenRewardPerBlock), 0)]
479 479              })
480 480  
481 481  
482 482  
483 483  @Callable(i)
484 484  func updateRewards () = valueOrElse(isOperatorCall(i), {
485 485      let lastUpdateHeight = valueOrElse(getInteger(this, kRewardUpdateHeight), 0)
486 486      if (((lastUpdateHeight + periodLength) > height))
487 487          then throw("rewards alredy updated in this period")
488 488          else {
489 489              let $t01483914919 = getTotalSupplyAllTokens()
490 490              let totalSupply = $t01483914919._1
491 491              let totalSupplyUsd = $t01483914919._2
492 492              let totalSupplyUsdAll = $t01483914919._3
493 493              let axlyPrice = getAssetPrice(axlyId)
494 494              let axlyPrecision = getAssetPrecision(axlyId)
495 495              let maxAPR = getAdoptedAPRByPeriod(curPeriod, LENDERS_APR_PERIODS, LENDERS_APR)
496 496              func updateReward (a,tokenId) =             {
497 497                  let $t01516815212 = a
498 498                  let enteries = $t01516815212._1
499 499                  let totalPeriodReward = $t01516815212._2
500 500                  let index = $t01516815212._3
501 501                  if ((totalSupply[index] == 0))
502 502                      then $Tuple3((enteries ++ [IntegerEntry((tokenId + kPrevLendTokenSupply), totalSupply[index]), IntegerEntry((tokenId + kTokenRewardPerBlock), 0), IntegerEntry((tokenId + kTokenInterest), calcNewTokenInterest(tokenId, totalSupply[index])), IntegerEntry((tokenId + kTokenInterestHeight), max([startHeight, height]))]), totalPeriodReward, (index + 1))
503 503                      else {
504 504                          let share = fraction(totalSupplyUsd[index], SCALE8, totalSupplyUsdAll)
505 505                          let maxReward = fraction(share, lendMaxPeriodAmount, SCALE8)
506 506                          let maxRewardUsd = fraction(maxReward, axlyPrice, axlyPrecision)
507 507                          let prevTotalSupply = valueOrElse(getInteger(this, kPrevLendTokenSupply), 0)
508 508                          let rtCoef = if (if ((prevTotalSupply == 0))
509 509                              then true
510 510                              else (totalSupply[index] == 0))
511 511                              then 0
512 512                              else fraction(prevTotalSupply, SCALE8, totalSupply[index])
513 513                          let reward = ((min([(maxAPR * (SCALE8 + rtCoef)), fraction(maxAPR, (15 * SCALE8), 10)]) / SCALE8) / 100)
514 514                          let rewardUsd = min([maxRewardUsd, fraction(totalSupplyUsd[index], reward, SCALE8)])
515 515                          let rewardPeriod = fraction(rewardUsd, axlyPrecision, axlyPrice)
516 516                          let rewardPerBlock = (rewardPeriod / periodLength)
517 517                          $Tuple3((enteries ++ [IntegerEntry((tokenId + kPrevLendTokenSupply), totalSupply[index]), IntegerEntry((tokenId + kTokenRewardPerBlock), rewardPerBlock), IntegerEntry((tokenId + kTokenInterest), calcNewTokenInterest(tokenId, totalSupply[index])), IntegerEntry((tokenId + kTokenInterestHeight), max([startHeight, height]))]), (totalPeriodReward + rewardPeriod), (index + 1))
518 518                          }
519 519                  }
520 520  
521 521              let $t01687416972 = {
522 522                  let $l = getAllTokens()
523 523                  let $s = size($l)
524 524                  let $acc0 = $Tuple3(nil, 0, 0)
525 525                  func $f0_1 ($a,$i) =                 if (($i >= $s))
526 526                      then $a
527 527                      else updateReward($a, $l[$i])
528 528  
529 529                  func $f0_2 ($a,$i) =                 if (($i >= $s))
530 530                      then $a
531 531                      else throw("List size exceeds 30")
532 532  
533 533                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
534 534                  }
535 535              let tokensEnteries = $t01687416972._1
536 536              let totalTokenReward = $t01687416972._2
537 537              let index = $t01687416972._3
538 538              let lpMaxAPR = getAdoptedAPRByPeriod(curPeriod, LP_APR_PERIODS, LP_APR)
539 539              let lpTotalSupply = getIntegerValue(sfFarmingContract, (axlyPool + kSFTotalSupply))
540 540              let preLPSupply = valueOrElse(getInteger(this, kPrevLPSupply), 0)
541 541              let lpId = getStringValue(addressFromStringValue(axlyPool), kLpId)
542 542              let lpPrecision = getAssetPrecision(lpId)
543 543              let lpPrice = {
544 544                  let @ = invoke(mainContract, "getShareAssetPriceREADONLY", [lpId], nil)
545 545                  if ($isInstanceOf(@, "Int"))
546 546                      then @
547 547                      else throw(($getType(@) + " couldn't be cast to Int"))
548 548                  }
549 549              let lpTotalSupplyUsd = fraction(lpTotalSupply, lpPrice, lpPrecision)
550 550              let maxLPRewardUsd = fraction(lpMaxPeriodAmount, axlyPrice, axlyPrecision)
551 551              let rtLPCoef = if (if ((preLPSupply == 0))
552 552                  then true
553 553                  else (lpTotalSupply == 0))
554 554                  then 0
555 555                  else fraction(preLPSupply, SCALE8, lpTotalSupply)
556 556              let rewardLp = ((min([(lpMaxAPR * (SCALE8 + rtLPCoef)), fraction(lpMaxAPR, (15 * SCALE8), 10)]) / SCALE8) / 100)
557 557              let rewardLpUsd = min([maxLPRewardUsd, fraction(lpTotalSupplyUsd, rewardLp, SCALE8)])
558 558              let rewardLpPeriod = fraction(rewardLpUsd, axlyPrecision, axlyPrice)
559 559              let rewardLpPerBlock = (rewardLpPeriod / periodLength)
560 560              let burnLend = (lendMaxPeriodAmount - totalTokenReward)
561 561              let burnLp = (lpMaxPeriodAmount - rewardLpPeriod)
562 562              let inv = invoke(tokenContract, "withdrawLpReward", [(burnLend + burnLp), toString(this)], nil)
563 563              if ((inv == inv))
564 564                  then {
565 565                      let lpEnteries = [IntegerEntry(kPrevLPSupply, lpTotalSupply), IntegerEntry(kLpRewardPerBlock, rewardLpPerBlock), IntegerEntry(kLpInterest, calcNewLpInterest(lpTotalSupply)), IntegerEntry(kLpInterestHeight, max([startHeight, height])), ScriptTransfer(Address(base58'3MsXJ3BesPECkYejzBQGHZPJT8GVYy4Fd3Q'), burnLend, fromBase58String(axlyId)), ScriptTransfer(Address(base58'3MsXJ3BesPECkYejzBQGHZPJT8GVYy4Fd3Q'), burnLp, fromBase58String(axlyId))]
566 566                      ((lpEnteries ++ tokensEnteries) :+ IntegerEntry(kRewardUpdateHeight, max([startHeight, height])))
567 567                      }
568 568                  else throw("Strict value is not equal to itself.")
569 569              }
570 570      })
571 571  
572 572  
573 573  @Verifier(tx)
574 574  func verify () = {
575 575      let multiSignedByAdmins = {
576 576          let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], admin1PK))
577 577              then 1
578 578              else 0
579 579          let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], admin2PK))
580 580              then 1
581 581              else 0
582 582          let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], admin3PK))
583 583              then 1
584 584              else 0
585 585          (((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
586 586          }
587 587      match tx {
588 588          case inv: InvokeScriptTransaction => 
589 589              let isSelf = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
590 590              let isRightFee = if ((inv.fee == 900000))
591 591                  then (inv.feeAssetId == unit)
592 592                  else false
593 593              let isInitCall = (inv.function == "init")
594 594              let isnoPayments = (size(inv.payments) == 0)
595 595              if (if (if (if (isRightFee)
596 596                  then isInitCall
597 597                  else false)
598 598                  then isSelf
599 599                  else false)
600 600                  then isnoPayments
601 601                  else false)
602 602                  then true
603 603                  else multiSignedByAdmins
604 604          case _ => 
605 605              multiSignedByAdmins
606 606      }
607 607      }
608 608

Old	New		Differences
250	250		}
251	251
252	252
253		-	func calcNewTokenInterest (tokenId,totalSupply) = if ((~~height~~ >= ~~startHeight~~))
	253	+	func calcNewTokenInterest (tokenId,totalSupply) = if ((startHeight >= height))
254	254		then 0
255	255		else {
256	256		let rewardPerBlock = getIntegerValue(this, (tokenId + kTokenRewardPerBlock))

264	264		}
265	265
266	266
267		-	func calcNewLpInterest (totalSupply) = if ((~~height~~ >= ~~startHeight~~))
	267	+	func calcNewLpInterest (totalSupply) = if ((startHeight >= height))
268	268		then 0
269	269		else {
270	270		let rewardPerBlock = valueOrElse(getInteger(this, kLpRewardPerBlock), 0)

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SCALE8 = 100000000
5	5
6	6		let LENDERS_APR = [150, 120, 100, 80, 60, 40, 30, 20, 10]
7	7
8	8		let LENDERS_APR_PERIODS = ["1-1", "2-2", "3-3", "4-4", "5-8", "9-12", "14-16", "17-20", "20-104"]
9	9
10	10		let LENDERS_MAX_PERIODS = 104
11	11
12	12		let LP_APR = [150, 120, 100, 80, 60, 40]
13	13
14	14		let LP_APR_PERIODS = ["1-1", "2-2", "3-3", "4-4", "5-8", "9-12"]
15	15
16	16		let LP_MAX_PERIODS = 12
17	17
18	18		let kStartHeight = "startHeight"
19	19
20	20		let kPeriodLength = "periodLength"
21	21
22	22		let kLendersMaxAmount = "lendRewardsAmount"
23	23
24	24		let kLPMaxAmount = "lpRewardAmount"
25	25
26	26		let kTokens = "tokens"
27	27
28	28		let kUserSupply = "_userTotalSupply"
29	29
30	30		let kTokenInterest = "_tokenInterest"
31	31
32	32		let kTokenInterestHeight = "_tokenInterestHeight"
33	33
34	34		let kTokenRewardPerBlock = "_tokenRewardPerBlock"
35	35
36	36		let kRewardUpdateHeight = "rewardUpdateHeight"
37	37
38	38		let kUserLendInterest = "_userLandInterest"
39	39
40	40		let kUserLendAvailableClaim = "_userLendAvailableClaim"
41	41
42	42		let kUserLpAvailableClaim = "_userLpAvailableClaim"
43	43
44	44		let kLpInterest = "lpInterest"
45	45
46	46		let kLpInterestHeight = "lpInterestHeight"
47	47
48	48		let kPrevLPSupply = "prevLPTotalSupply"
49	49
50	50		let kLpRewardPerBlock = "lpRewardPerBlock"
51	51
52	52		let kUserLpInterest = "_userLpInterest"
53	53
54	54		let kPriceInOracle = "_twap5B"
55	55
56	56		let kPrevLendTokenSupply = "_prevLendTotalSupply"
57	57
58	58		let kAXLYTokenId = "axlyTokenId"
59	59
60	60		let kLendTokenSupply = "total_supplied_"
61	61
62	62		let kLendUserSupply = "_supplied_"
63	63
64	64		let kLendSetupTokens = "setup_tokens"
65	65
66	66		let kSFTotalSupply = "_total_share_tokens_locked"
67	67
68	68		let kSFUserTotalSupply = "_share_tokens_locked"
69	69
70	70		let kAxlyPool = "axlyPool"
71	71
72	72		let kLpId = "share_asset_id"
73	73
74	74		let kPriceOracle = "price_oracle"
75	75
76	76		let kAxlyMainContract = "mainContract"
77	77
78	78		let kAxlyTokenomicContract = "tokenomicContract"
79	79
80	80		let kSFFarmingContract = "swopfi_farming_addr"
81	81
82	82		let kLendContract = "lend_service_addr"
83	83
84	84		let kAdmin1PK = "group1_admin1_pub_key"
85	85
86	86		let kAdmin2PK = "group1_admin2_pub_key"
87	87
88	88		let kAdmin3PK = "group1_admin3_pub_key"
89	89
90	90		let kOperatorCallPK = "admin_call_pub_key"
91	91
92	92		let axlyPool = valueOrErrorMessage(getString(this, kAxlyPool), "Can't get axlyPool key")
93	93
94	94		let mainContract = addressFromStringValue(valueOrErrorMessage(getString(this, kAxlyMainContract), "Can't get mainContact key"))
95	95
96	96		let tokenContract = addressFromStringValue(valueOrErrorMessage(getString(this, kAxlyTokenomicContract), "Can't get tokenomicContract key"))
97	97
98	98		let lendContract = addressFromStringValue(valueOrErrorMessage(getString(mainContract, kLendContract), "Can't get lend_service_addr key"))
99	99
100	100		let sfFarmingContract = addressFromStringValue(valueOrErrorMessage(getString(mainContract, kSFFarmingContract), "Can't get swopfi_farming_addr key"))
101	101
102	102		let priceOracleAddr = addressFromStringValue(valueOrErrorMessage(getString(mainContract, kPriceOracle), "Can't get price_oracle key"))
103	103
104	104		let admin1PK = fromBase58String(valueOrErrorMessage(getString(mainContract, kAdmin1PK), "Can't get admin1PK"))
105	105
106	106		let admin2PK = fromBase58String(valueOrErrorMessage(getString(mainContract, kAdmin2PK), "Can't get admin2PK"))
107	107
108	108		let admin3PK = fromBase58String(valueOrErrorMessage(getString(mainContract, kAdmin3PK), "Can't get operatorPK"))
109	109
110	110		let operatorPK = fromBase58String(valueOrErrorMessage(getString(this, kOperatorCallPK), "Can't get operatorPK"))
111	111
112	112		let axlyId = valueOrErrorMessage(getString(tokenContract, kAXLYTokenId), "Can't get Axly token id")
113	113
114	114		let startHeight = getIntegerValue(this, kStartHeight)
115	115
116	116		let periodLength = getIntegerValue(this, kPeriodLength)
117	117
118	118		let curPeriod = max([1, ((height - startHeight) / periodLength)])
119	119
120	120		let lendMaxAmount = getIntegerValue(tokenContract, kLendersMaxAmount)
121	121
122	122		let lendMaxPeriodAmount = (lendMaxAmount / LENDERS_MAX_PERIODS)
123	123
124	124		let lpMaxAmount = getIntegerValue(tokenContract, kLPMaxAmount)
125	125
126	126		let lpMaxPeriodAmount = (lpMaxAmount / LP_MAX_PERIODS)
127	127
128	128		func isAdminCall (i) = if (containsElement([admin1PK, admin2PK, admin3PK], i.callerPublicKey))
129	129		then unit
130	130		else throw("Only admin group1 can call this function")
131	131
132	132
133	133		func isSelfCall (i) = if ((i.caller == this))
134	134		then unit
135	135		else throw("Only contract itself can call this function")
136	136
137	137
138	138		func isOperatorCall (i) = if ((i.callerPublicKey == operatorPK))
139	139		then unit
140	140		else throw("Only operator can call this function")
141	141
142	142
143	143		func isLandCall (i) = if ((i.caller == lendContract))
144	144		then unit
145	145		else throw("Only land contract can call this function")
146	146
147	147
148	148		func isSFFarmingCall (i) = if ((i.caller == sfFarmingContract))
149	149		then unit
150	150		else throw("Only land contract can call this function")
151	151
152	152
153	153		func getAllTokens () = {
154	154		let tokens = valueOrElse(getString(this, kTokens), "")
155	155		if ((tokens == ""))
156	156		then nil
157	157		else split(tokens, ",")
158	158		}
159	159
160	160
161	161		func getAssetPrice (assetId) = getIntegerValue(priceOracleAddr, (assetId + kPriceInOracle))
162	162
163	163
164	164		func getAssetDecimals (assetId) = if ((assetId == "WAVES"))
165	165		then 8
166	166		else match assetInfo(fromBase58String(assetId)) {
167	167		case asset: Asset =>
168	168		asset.decimals
169	169		case _ =>
170	170		throw("Can't find asset")
171	171		}
172	172
173	173
174	174		func getAssetPrecision (assetId) = pow(10, 0, getAssetDecimals(assetId), 0, 0, DOWN)
175	175
176	176
177	177		func getAdoptedAPRByPeriod (period,aprPeriods,apr) = {
178	178		func for (a,aperiod) = {
179	179		let $t054295451 = a
180	180		let index = $t054295451._1
181	181		let found = $t054295451._2
182	182		let ft = split(aperiod, "-")
183	183		let $t054885551 = $Tuple2(parseIntValue(ft[0]), parseIntValue(ft[1]))
184	184		let from = $t054885551._1
185	185		let to = $t054885551._2
186	186		if (found)
187	187		then a
188	188		else if (if ((period >= from))
189	189		then (to >= period)
190	190		else false)
191	191		then $Tuple2(index, true)
192	192		else $Tuple2((index + 1), false)
193	193		}
194	194
195	195		let $t056885754 = {
196	196		let $l = LENDERS_APR_PERIODS
197	197		let $s = size($l)
198	198		let $acc0 = $Tuple2(0, false)
199	199		func $f0_1 ($a,$i) = if (($i >= $s))
200	200		then $a
201	201		else for($a, $l[$i])
202	202
203	203		func $f0_2 ($a,$i) = if (($i >= $s))
204	204		then $a
205	205		else throw("List size exceeds 9")
206	206
207	207		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
208	208		}
209	209		let index = $t056885754._1
210	210		let found = $t056885754._2
211	211		if (found)
212	212		then fraction((LENDERS_APR[index] * SCALE8), 7, 365)
213	213		else 0
214	214		}
215	215
216	216
217	217		func getTotalSupplyAllTokens () = {
218	218		func for (a,tokenId) = {
219	219		let $t059425998 = a
220	220		let totalSupply = $t059425998._1
221	221		let totalSupplyUsd = $t059425998._2
222	222		let totalSupplyUsdAll = $t059425998._3
223	223		let tSupply = valueOrElse(getInteger(lendContract, (kLendTokenSupply + tokenId)), 0)
224	224		let assetPrice = getAssetPrice(tokenId)
225	225		let assetPrecision = getAssetPrecision(tokenId)
226	226		let tSupplyUsd = fraction(tSupply, assetPrice, assetPrecision)
227	227		$Tuple3((totalSupply :+ tSupply), (totalSupplyUsd :+ tSupplyUsd), (totalSupplyUsdAll + tSupplyUsd))
228	228		}
229	229
230	230		let $l = getAllTokens()
231	231		let $s = size($l)
232	232		let $acc0 = $Tuple3(nil, nil, 0)
233	233		func $f0_1 ($a,$i) = if (($i >= $s))
234	234		then $a
235	235		else for($a, $l[$i])
236	236
237	237		func $f0_2 ($a,$i) = if (($i >= $s))
238	238		then $a
239	239		else throw("List size exceeds 30")
240	240
241	241		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
242	242		}
243	243
244	244
245	245		func getTotalSupplyUsd (tokenId) = {
246	246		let tSupply = valueOrElse(getInteger(lendContract, (kLendTokenSupply + tokenId)), 0)
247	247		let assetPrice = getAssetPrice(tokenId)
248	248		let assetPrecision = getAssetPrecision(tokenId)
249	249		fraction(tSupply, assetPrice, assetPrecision)
250	250		}
251	251
252	252
253		-	func calcNewTokenInterest (tokenId,totalSupply) = if ((~~height~~ >= ~~startHeight~~))
	253	+	func calcNewTokenInterest (tokenId,totalSupply) = if ((startHeight >= height))
254	254		then 0
255	255		else {
256	256		let rewardPerBlock = getIntegerValue(this, (tokenId + kTokenRewardPerBlock))
257	257		let oldInterest = getIntegerValue(this, (tokenId + kTokenInterest))
258	258		let updateHeight = getIntegerValue(this, (tokenId + kTokenInterestHeight))
259	259		let reward = ((height - updateHeight) * rewardPerBlock)
260	260		let interest = if ((totalSupply > 0))
261	261		then fraction(reward, SCALE8, totalSupply)
262	262		else 0
263	263		(oldInterest + interest)
264	264		}
265	265
266	266
267		-	func calcNewLpInterest (totalSupply) = if ((~~height~~ >= ~~startHeight~~))
	267	+	func calcNewLpInterest (totalSupply) = if ((startHeight >= height))
268	268		then 0
269	269		else {
270	270		let rewardPerBlock = valueOrElse(getInteger(this, kLpRewardPerBlock), 0)
271	271		let oldInterest = valueOrElse(getInteger(this, kLpInterest), 0)
272	272		let updateHeight = valueOrElse(getInteger(this, kLpInterestHeight), height)
273	273		let reward = ((height - updateHeight) * rewardPerBlock)
274	274		let interest = if ((totalSupply > 0))
275	275		then fraction(reward, SCALE8, totalSupply)
276	276		else 0
277	277		(oldInterest + interest)
278	278		}
279	279
280	280
281	281		func calcLendUserReward (user,tokenId) = {
282	282		let totalSupply = valueOrElse(getInteger(lendContract, (kLendTokenSupply + tokenId)), 0)
283	283		let tokenInterest = calcNewTokenInterest(tokenId, totalSupply)
284	284		let userSupply = valueOrElse(getInteger(lendContract, ((user + kLendUserSupply) + tokenId)), 0)
285	285		let userTokenInterest = valueOrElse(getInteger(this, (((tokenId + "_") + user) + kUserLendInterest)), if ((userSupply == 0))
286	286		then tokenInterest
287	287		else 0)
288	288		let reward = fraction(userSupply, (tokenInterest - userTokenInterest), SCALE8)
289	289		$Tuple3(reward, tokenInterest, userSupply)
290	290		}
291	291
292	292
293	293		func calcLpUserReward (user) = {
294	294		let totalSupply = valueOrElse(getInteger(sfFarmingContract, (axlyPool + kSFTotalSupply)), 0)
295	295		let tokenInterest = calcNewLpInterest(totalSupply)
296	296		let userSupply = valueOrElse(getInteger(lendContract, (((axlyPool + "_") + user) + kSFUserTotalSupply)), 0)
297	297		let userTokenInterest = valueOrElse(getInteger(this, (user + kUserLpInterest)), if ((userSupply == 0))
298	298		then tokenInterest
299	299		else 0)
300	300		let reward = fraction(userSupply, (tokenInterest - userTokenInterest), SCALE8)
301	301		$Tuple3(reward, tokenInterest, userSupply)
302	302		}
303	303
304	304
305	305		func claimLenderRewardsCommon (user,readOnly) = {
306	306		func claim (a,tokenId) = {
307	307		let $t088828926 = a
308	308		let tokenIds = $t088828926._1
309	309		let cAmount = $t088828926._2
310	310		let total = $t088828926._3
311	311		let enteries = $t088828926._4
312	312		let userAvailableClaim = valueOrElse(getInteger(this, (((tokenId + "_") + user) + kUserLendAvailableClaim)), 0)
313	313		let $t090399118 = calcLendUserReward(user, tokenId)
314	314		let uReward = $t090399118._1
315	315		let newTokenInterest = $t090399118._2
316	316		let userSupply = $t090399118._3
317	317		let totalToClaim = (userAvailableClaim + uReward)
318	318		if (if ((totalToClaim > 0))
319	319		then true
320	320		else (userSupply > 0))
321	321		then {
322	322		let newEntreries = if (if (readOnly)
323	323		then true
324	324		else (totalToClaim == 0))
325	325		then enteries
326	326		else (enteries ++ [IntegerEntry((((tokenId + "_") + user) + kUserLendInterest), newTokenInterest), IntegerEntry((((tokenId + "_") + user) + kUserLendAvailableClaim), 0), IntegerEntry((tokenId + kTokenInterest), newTokenInterest), IntegerEntry((tokenId + kTokenInterestHeight), height)])
327	327		$Tuple4((tokenIds :+ tokenId), (cAmount :+ totalToClaim), (total + totalToClaim), newEntreries)
328	328		}
329	329		else $Tuple4(tokenIds, cAmount, total, enteries)
330	330		}
331	331
332	332		let $l = getAllTokens()
333	333		let $s = size($l)
334	334		let $acc0 = $Tuple4(nil, nil, 0, nil)
335	335		func $f0_1 ($a,$i) = if (($i >= $s))
336	336		then $a
337	337		else claim($a, $l[$i])
338	338
339	339		func $f0_2 ($a,$i) = if (($i >= $s))
340	340		then $a
341	341		else throw("List size exceeds 30")
342	342
343	343		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
344	344		}
345	345
346	346
347	347		func claimLpRewardsCommon (user,readOnly) = {
348	348		let userAvailableClaim = valueOrElse(getInteger(this, (user + kUserLpAvailableClaim)), 0)
349	349		let $t01005010115 = calcLpUserReward(user)
350	350		let uReward = $t01005010115._1
351	351		let newLpInterest = $t01005010115._2
352	352		let userSupply = $t01005010115._3
353	353		let totalToClaim = (userAvailableClaim + uReward)
354	354		if (if (readOnly)
355	355		then true
356	356		else (totalToClaim == 0))
357	357		then $Tuple2(totalToClaim, nil)
358	358		else $Tuple2(totalToClaim, [IntegerEntry((user + kUserLpInterest), newLpInterest), IntegerEntry((user + kUserLpAvailableClaim), 0), IntegerEntry(kLpInterest, newLpInterest), IntegerEntry(kLpInterestHeight, height)])
359	359		}
360	360
361	361
362	362		func getTokensAPRs () = {
363	363		let axlyPrice = getAssetPrice(axlyId)
364	364		let axlyPrecision = getAssetPrecision(axlyId)
365	365		func tokensAprs (apr,tokenId) = {
366	366		let rwpb = valueOrElse(getInteger(this, (tokenId + kTokenRewardPerBlock)), 0)
367	367		let rwpbUsd = fraction(rwpb, axlyPrice, axlyPrecision)
368	368		let rwYear = ((rwpbUsd * periodLength) * 52)
369	369		let totalSupplyUsd = getTotalSupplyUsd(tokenId)
370	370		(apr :+ fraction(rwYear, SCALE8, totalSupplyUsd))
371	371		}
372	372
373	373		let aprs = {
374	374		let $l = getAllTokens()
375	375		let $s = size($l)
376	376		let $acc0 = nil
377	377		func $f0_1 ($a,$i) = if (($i >= $s))
378	378		then $a
379	379		else tokensAprs($a, $l[$i])
380	380
381	381		func $f0_2 ($a,$i) = if (($i >= $s))
382	382		then $a
383	383		else throw("List size exceeds 30")
384	384
385	385		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
386	386		}
387	387		let lpTotalSupply = getIntegerValue(sfFarmingContract, (axlyPool + kSFTotalSupply))
388	388		let lpId = getStringValue(addressFromStringValue(axlyPool), kLpId)
389	389		let lpPrecision = getAssetPrecision(lpId)
390	390		let lpPrice = {
391	391		let @ = ({
392	392		let @ = invoke(mainContract, "getShareAssetPriceREADONLY", [[lpId]], nil)
393	393		if ($isInstanceOf(@, "List[Any]"))
394	394		then @
395	395		else throw(($getType(@) + " couldn't be cast to List[Any]"))
396	396		})[0]
397	397		if ($isInstanceOf(@, "Int"))
398	398		then @
399	399		else throw(($getType(@) + " couldn't be cast to Int"))
400	400		}
401	401		let lpTotalSupplyUsd = fraction(lpTotalSupply, lpPrice, lpPrecision)
402	402		let rwpb = valueOrElse(getInteger(this, kLpRewardPerBlock), 0)
403	403		let rwpbUsd = fraction(rwpb, axlyPrice, axlyPrecision)
404	404		let rwYear = ((rwpbUsd * periodLength) * 52)
405	405		let lpApr = fraction(rwYear, SCALE8, lpTotalSupplyUsd)
406	406		$Tuple3(getAllTokens(), aprs, lpApr)
407	407		}
408	408
409	409
410	410		@Callable(i)
411	411		func claimLenderRewards () = {
412	412		let claimRes = claimLenderRewardsCommon(toString(i.caller), false)
413	413		if ((claimRes._3 == 0))
414	414		then throw("claim amount must be greater than 0")
415	415		else {
416	416		let inv = invoke(tokenContract, "withdrawLendReward", [claimRes._3, toString(i.caller)], nil)
417	417		if ((inv == inv))
418	418		then claimRes._4
419	419		else throw("Strict value is not equal to itself.")
420	420		}
421	421		}
422	422
423	423
424	424
425	425		@Callable(i)
426	426		func claimLpRewards () = {
427	427		let claimRes = claimLpRewardsCommon(toString(i.caller), false)
428	428		if ((claimRes._1 == 0))
429	429		then throw("claim amount must be greater than 0")
430	430		else {
431	431		let inv = invoke(tokenContract, "withdrawLpReward", [claimRes._1, toString(i.caller)], nil)
432	432		if ((inv == inv))
433	433		then claimRes._2
434	434		else throw("Strict value is not equal to itself.")
435	435		}
436	436		}
437	437
438	438
439	439
440	440		@Callable(i)
441	441		func lendAction (user,tokenId) = valueOrElse(isLandCall(i), {
442	442		let userAvailableClaim = valueOrElse(getInteger(this, (tokenId + kUserLendAvailableClaim)), 0)
443	443		let $t01248712554 = calcLendUserReward(user, tokenId)
444	444		let uReward = $t01248712554._1
445	445		let newTokenInterest = $t01248712554._2
446	446		[IntegerEntry((((user + "_") + tokenId) + kUserLendInterest), newTokenInterest), IntegerEntry((((user + "_") + tokenId) + kUserLendAvailableClaim), (userAvailableClaim + uReward)), IntegerEntry((tokenId + kTokenInterest), newTokenInterest), IntegerEntry((tokenId + kTokenInterestHeight), height)]
447	447		})
448	448
449	449
450	450
451	451		@Callable(i)
452	452		func lpAction (user) = valueOrElse(isSFFarmingCall(i), {
453	453		let userAvailableClaim = valueOrElse(getInteger(this, kUserLpAvailableClaim), 0)
454	454		let $t01301913072 = calcLpUserReward(user)
455	455		let uReward = $t01301913072._1
456	456		let newLpInterest = $t01301913072._2
457	457		[IntegerEntry((user + kUserLpInterest), newLpInterest), IntegerEntry((user + kUserLpAvailableClaim), (userAvailableClaim + uReward)), IntegerEntry((user + kLpInterest), newLpInterest), IntegerEntry((user + kLpInterestHeight), height)]
458	458		})
459	459
460	460
461	461
462	462		@Callable(i)
463	463		func init (axlyMainContractAddr,axlyTokenomicContractAddr,axlyPoolAddr,farmingStartHeight,periodLength) = valueOrElse(isSelfCall(i), if (!(isDefined(addressFromString(axlyMainContractAddr))))
464	464		then throw("Wrong farming address")
465	465		else if (!(isDefined(addressFromString(axlyTokenomicContractAddr))))
466	466		then throw("Wrong main contract address")
467	467		else [StringEntry(kAxlyMainContract, axlyMainContractAddr), StringEntry(kAxlyTokenomicContract, axlyTokenomicContractAddr), StringEntry(kAxlyPool, axlyPoolAddr), IntegerEntry(kStartHeight, farmingStartHeight), IntegerEntry(kPeriodLength, periodLength)])
468	468
469	469
470	470
471	471		@Callable(i)
472	472		func initNewToken (tokenId) = valueOrElse(isAdminCall(i), if (isDefined(getInteger(this, (tokenId + kTokenInterest))))
473	473		then throw("token already inited")
474	474		else if (!(contains(getStringValue(lendContract, kLendSetupTokens), tokenId)))
475	475		then throw("no token on landing")
476	476		else {
477	477		let newAllTokens = (getAllTokens() :+ tokenId)
478	478		[IntegerEntry((tokenId + kTokenInterest), 0), IntegerEntry((tokenId + kTokenInterestHeight), max([startHeight, height])), StringEntry(kTokens, makeString(newAllTokens, ",")), IntegerEntry((tokenId + kTokenRewardPerBlock), 0)]
479	479		})
480	480
481	481
482	482
483	483		@Callable(i)
484	484		func updateRewards () = valueOrElse(isOperatorCall(i), {
485	485		let lastUpdateHeight = valueOrElse(getInteger(this, kRewardUpdateHeight), 0)
486	486		if (((lastUpdateHeight + periodLength) > height))
487	487		then throw("rewards alredy updated in this period")
488	488		else {
489	489		let $t01483914919 = getTotalSupplyAllTokens()
490	490		let totalSupply = $t01483914919._1
491	491		let totalSupplyUsd = $t01483914919._2
492	492		let totalSupplyUsdAll = $t01483914919._3
493	493		let axlyPrice = getAssetPrice(axlyId)
494	494		let axlyPrecision = getAssetPrecision(axlyId)
495	495		let maxAPR = getAdoptedAPRByPeriod(curPeriod, LENDERS_APR_PERIODS, LENDERS_APR)
496	496		func updateReward (a,tokenId) = {
497	497		let $t01516815212 = a
498	498		let enteries = $t01516815212._1

github/deemru/w8io/026f985 
62.30 ms ◑