w8 · tx · 14M···B9D

tx · 14MoyMZUbpiiwVuCi246oZZa9zNjuKUtYq4YDRy7VB9D

3N7HtrKeFFLz5oy6PfGv1Lg3GwPk4gCPdGy:  -0.02600000 Waves

2024.11.25 15:22 [3386935] smart account 3N7HtrKeFFLz5oy6PfGv1Lg3GwPk4gCPdGy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "14MoyMZUbpiiwVuCi246oZZa9zNjuKUtYq4YDRy7VB9D",
    "fee": 2600000,
    "feeAssetId": null,
    "timestamp": 1732537371008,
    "version": 2,
    "chainId": 84,
    "sender": "3N7HtrKeFFLz5oy6PfGv1Lg3GwPk4gCPdGy",
    "senderPublicKey": "FsR18761ZAsUqsTd7TK3XmR6bhihs1UXVmpHYxz5JzQ1",
    "proofs": [
        "4smwbz7JzYgGT8PtbDL2J2djHbgQpzsB8uWgLZkWQSL971cJoTt3wdveGRPRRjC9QZv54frbjKpxPt1JGNn1Gzfx"
    ],
    "script": "base64:BgJHCAISBgoECAgICBIDCgEIEgMKAQESBAoCCAESAwoBARIECgIIARIAEgMKAQgSAwoBARIDCgEBEgMKAQgSAwoBCBIDCgEBEgCQAQADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUOACAwtcvAA5NSU5TSE9QUEFZTUVOVACgjQYACkRBWV9NSUxMSVMAgLiZKQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEACkRBWV9CTE9DS1MEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAoAsDCQAAAgEBVAUHJG1hdGNoMAA8CQACAQINVW5rbm93biBjaGFpbgALV0VFS19CTE9DS1MEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAA4E4DCQAAAgEBVAUHJG1hdGNoMAC0AQkAAgECDVVua25vd24gY2hhaW4AC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQRndZdGE4YmlFejMxenBlRmU1REpLOHdFNXRyU3BRVkY4AwkAAAIBAVQFByRtYXRjaDACIzNON1V1WWFyNjI2NFA1OEZCaFZXS1BRQWg0WXVhMmhnbmd2CQACAQINVW5rbm93biBjaGFpbgAVZGVmYXVsdFJlc3RBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUFFDdXZGYnZoNExrUFVucm5VMXozam5iQTFwOW0zV05odgMJAAACAQFUBQckbWF0Y2gwAiMzTXVta0dHenRDS0FYcFdEcXhrZGRvZnFYU1VicVFrdlNKeQkAAgECDVVua25vd24gY2hhaW4AEUtTX0FMTE9XX05GVF9EUkFXBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwBwMJAAACAQFUBQckbWF0Y2gwBgkAAgECDVVua25vd24gY2hhaW4BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABBJZHhDZmdBY3JlczJEYXBwAAEADUlkeENmZ1dsZ0RhcHAAAgAUSWR4Q2ZnUHV6emxlUG9vbERhcHAABAAUSWR4Q2ZnSW52ZXN0RnVuZERhcHAABQEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ9rZXlSZXN0MkFkZHJlc3MAAg0lc19fcmVzdDJBZGRyAQ5rZXlSZXN0QWRkcmVzcwACDCVzX19yZXN0QWRkcgAMcmVzdENvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQ5rZXlSZXN0QWRkcmVzcwAFFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgERcmVhZFJlc3RDZmdPckZhaWwBBHJlc3QJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFBHJlc3QJAQprZXlSZXN0Q2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCCHJlc3QyQ2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUIcmVzdDJDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4ABFJZHhDZmdTdGFraW5nRGFwcAABAA9JZHhDZmdBY3Jlc0RhcHAACAAHcmVzdENmZwkBEXJlYWRSZXN0Q2ZnT3JGYWlsAQUMcmVzdENvbnRyYWN0AA9zdGFraW5nQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdTdGFraW5nRGFwcAANYWNyZXNDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFD0lkeENmZ0FjcmVzRGFwcAANcmVzdDJDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEPa2V5UmVzdDJBZGRyZXNzAAUWZGVmYXVsdFJlc3QyQWRkcmVzc1N0cgAIcmVzdDJDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDXJlc3QyQ29udHJhY3QADmFjcmVzMkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUIcmVzdDJDZmcFEElkeENmZ0FjcmVzMkRhcHAAC3dsZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUIcmVzdDJDZmcFDUlkeENmZ1dsZ0RhcHAAEnB1enpsZVBvb2xDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRRJZHhDZmdQdXp6bGVQb29sRGFwcAASaW52ZXN0RnVuZENvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUIcmVzdDJDZmcFFElkeENmZ0ludmVzdEZ1bmREYXBwARVrZXlMYXN0V2Vla1R4SWRCeVVzZXIBBGFkZHIJAKwCAgITbGFzdFdlZWtUeElkQnlVc2VyXwUEYWRkcgANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQIYV0xHT0xEIGlzIG5vdCBpc3N1ZWQgeWV0AQprZXlVc2VyQmV0AQRhZGRyCQCsAgICCHVzZXJCZXRfBQRhZGRyARJrZXlVc2VyV2Vla1RpY2tldHMCBGFkZHIEd2VlawkArAICCQCsAgIJAKwCAgIQdXNlcldlZWtUaWNrZXRzXwUEYWRkcgIBXwkApAMBBQR3ZWVrARNrZXlUb3RhbFdlZWtUaWNrZXRzAQR3ZWVrCQCsAgICEXRvdGFsV2Vla1RpY2tldHNfCQCkAwEFBHdlZWsBGGtleVRvdGFsV2Vla1BhcnRpY2lwYW50cwEEd2VlawkArAICAhZ0b3RhbFdlZWtQYXJ0aWNpcGFudHNfCQCkAwEFBHdlZWsBDmtleU51bU5GVDJEcmF3AQR3ZWVrCQCsAgICDG51bU5GVDJEcmF3XwkApAMBBQR3ZWVrAQ5rZXlOdW1ORlREcmF3bgEEd2VlawkArAICAgxudW1ORlREcmF3bl8JAKQDAQUEd2VlawEOa2V5V2Vla1dpbm5lcnMBBHdlZWsJAKwCAgIMd2Vla1dpbm5lcnNfCQCkAwEFBHdlZWsBCndpbm5pbmdCZXQBA2RheQkAagIJALEJAQkBBXZhbHVlAQgJAQV2YWx1ZQEJAO0HAQkAaAIFA2RheQUKREFZX0JMT0NLUwN2cmYABAEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQpmaXhlZFBvaW50AgN2YWwIZGVjaW1hbHMEBnRlblBvdwkAbAYACgAABQhkZWNpbWFscwAAAAAFBERPV04EB2xvd1BhcnQJAKQDAQkAagIFA3ZhbAUGdGVuUG93BAZ6ZXJvZXMJALACAgkApAMBBQZ0ZW5Qb3cJAGQCAAEJALECAQUHbG93UGFydAkArAICCQCsAgIJAKwCAgkApAMBCQBpAgUDdmFsBQZ0ZW5Qb3cCAS4FBnplcm9lcwUHbG93UGFydAEPZ2V0UmFuZG9tTnVtYmVyAwhtYXhWYWx1ZQRzYWx0B2VudHJvcHkDCQBnAgAABQhtYXhWYWx1ZQkAAgECFm1heFZhbHVlIHNob3VsZCBiZSA+IDAECnJhbmRvbUhhc2gJANQWAQkAywECBQRzYWx0BQdlbnRyb3B5CQBqAgkAsQkBBQpyYW5kb21IYXNoBQhtYXhWYWx1ZQAGU0NBTEU4AIDC1y8ADHhwTGV2ZWxTY2FsZQCAGQAPeHBMZXZlbFJlY2lwUG93AKAfABJudW1Qb2ludHNPbkxldmVsVXAAAwAPd2xnQmFzZUFtb3VudFhwAIDQ28P0AgEJa2V5VXNlclhQAQRhZGRyCQCsAgICB3VzZXJYUF8FBGFkZHIBDGtleVVzZXJMZXZlbAEEYWRkcgkArAICAgp1c2VyTGV2ZWxfBQRhZGRyAAV4cFdsZwCQTgEJbGV2ZWxCeVhQAQJ4cAkAawMFDHhwTGV2ZWxTY2FsZQkAbAYFAnhwAAQFD3hwTGV2ZWxSZWNpcFBvdwAEAAQFBERPV04FBlNDQUxFOAEHbGV2ZWxVcAIJY3VyckxldmVsBW5ld1hQBAhuZXdMZXZlbAkBCWxldmVsQnlYUAEFBW5ld1hQCQDMCAIFCG5ld0xldmVsCQDMCAIJAGgCBRJudW1Qb2ludHNPbkxldmVsVXAJAGUCBQhuZXdMZXZlbAUJY3VyckxldmVsBQNuaWwACE1JTExJT042AICA6YOx3hYAC1BMQVlFUlNIQVJFAIC1GAAJREFZTUlMTElTAIC4mSkAC3RlYW1BZGRyS2V5Agh0ZWFtQWRkcgAPbGFzdFRlYW1UaW1lS2V5AhRsYXN0Q2xhaW1lZFRpbWVfdGVhbQARdGVhbUFtb3VudExlZnRLZXkCDnRlYW1BbW91bnRMZWZ0ABVsYXN0QWN0aXZpdGllc1RpbWVLZXkCGmxhc3RDbGFpbWVkVGltZV9hY3Rpdml0aWVzABBhY3RBbW91bnRMZWZ0S2V5AhRhY3Rpdml0aWVzQW1vdW50TGVmdAAUc3Rha2Vyc0Ftb3VudExlZnRLZXkCEXN0YWtlcnNBbW91bnRMZWZ0ARlrZXlMYXN0V2xnVHJhZGVUaW1lQnlVc2VyAQRhZGRyCQCsAgICEGxhc3RBcmJUaW1lVXNlcl8FBGFkZHIBGmtleUxhc3RXbGdUcmFkZUxpbWl0QnlVc2VyAQRhZGRyCQCsAgICEWxhc3RXbGdMaW1pdFVzZXJfBQRhZGRyAA93bGdJc3N1ZVRpbWVLZXkCDXdsZ19pc3N1ZVRpbWUAEndsZ0lzc3VlZEFtb3VudEtleQIQd2xnX2lzc3VlZEFtb3VudAEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyARhrZXlXbGdTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIWd2xnU3Rha2VkQW1vdW50QnlVc2VyXwUEYWRkcgARd2xnU3Rha2VkVG90YWxLZXkCFHdsZ1N0YWtlZEFtb3VudFRvdGFsARZrZXlXbGdTdGFrZWRUaW1lQnlVc2VyAQRhZGRyCQCsAgICFHdsZ1N0YWtlZFRpbWVCeVVzZXJfBQRhZGRyAANNNl8AwIQ9AANNOF8AgMLXLwAKVEVBTV9TSEFSRQDAmgwADkFDVElWSVRZX1NIQVJFAKCNBgAMUExBWUVSX1NIQVJFAIC1GAALWUVBUl9NSUxMSVMAgIbrx3UABkRBWV9NUwCAuJkpAAdJU1NVRTEwAICU69wDAA9QTEFZRVJTMTBfU0hBUkUAgOowABFNQVJLRVRJTkcxMF9TSEFSRQCgjQYADFRFQU0xMF9TSEFSRQCgjQYAEU5FV19TVEFLSU5HX1NUQVJUAIDzuMKxMgAQbWFya2V0aW5nQWRkcktleQINbWFya2V0aW5nQWRkcgAKdGVhbUFkcktleQIIdGVhbUFkZHIADmxhc3RUZWFtVGltS2V5AhRsYXN0Q2xhaW1lZFRpbWVfdGVhbQAOdGVhbUFtdExlZnRLZXkCDnRlYW1BbW91bnRMZWZ0ABRsYXN0QWN0aXZpdGllc1RpbUtleQIabGFzdENsYWltZWRUaW1lX2FjdGl2aXRpZXMADWFjdEFtdExlZnRLZXkCFGFjdGl2aXRpZXNBbW91bnRMZWZ0ABFzdGFrZXJzQW10TGVmdEtleQIRc3Rha2Vyc0Ftb3VudExlZnQBFmtleUxhc3RDbGFpbVRpbWVCeVVzZXIBBGFkZHIJAKwCAgIUbGFzdENsYWltZWRUaW1lVXNlcl8FBGFkZHIBDWRpc3RyQnlQZXJpb2QCDGlzc3VlZEFtb3VudAZwZXJpb2QJAGsDBQxpc3N1ZWRBbW91bnQJAGgCBQxQTEFZRVJfU0hBUkUJAGQCBQZwZXJpb2QAAQkAaAIABgUDTTZfABF3bGdJc3N1ZTEwVGltZUtleQIPd2xnX2lzc3VlMTBUaW1lAA53bGdJc3N1ZVRpbUtleQINd2xnX2lzc3VlVGltZQAPd2xnSXNzdWVkQW10S2V5AhB3bGdfaXNzdWVkQW1vdW50AA56Yklzc3VlZEFtdEtleQISemJpbGxfaXNzdWVkQW1vdW50ARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIAEmFjcmVzU3Rha2RUb3RhbEtleQIWYWNyZXNTdGFrZWRBbW91bnRUb3RhbAAUdG90YWxGYXJtaW5nUG93ZXJLZXkCEXRvdGFsRmFybWluZ1Bvd2VyAAlkYXBwMlJlc3QAAAAMZGFwcDJTdGFraW5nAAEACGRhcHAyV2xnAAIAC2RhcHAyUHV6emxlAAMAD2RhcHAySW52ZXN0RnVuZAAEABRJZHhEdHgxUGVyY0dlbVdpbm5lcgABABVERUZBVUxUX1dFRUtMWV9QUklaRVMABQEQa2V5VXNlckZ1bGxCb251cwEEYWRkcgkArAICAg51c2VyRnVsbEJvbnVzXwUEYWRkcgAKbGV2ZWxBY3JlcwkAzAgCAAAJAMwIAgAKCQDMCAIAFAkAzAgCACgJAMwIAgBQCQDMCAIAlgEJAMwIAgD6AQkAzAgCAJADCQDMCAIAvAUJAMwIAgDoBwUDbmlsAQ9nZXRMZXZlbEJ5QWNyZXMBBWFjcmVzBANhY3IJAGkCCQBkAgUFYWNyZXMA/8HXLwUDTThfCgEHY2hlY2tlcgIDYWNjBGl0ZW0DCQBnAgUEaXRlbQUDYWNyBQNhY2MJAGQCBQNhY2MAAQoAAiRsBQpsZXZlbEFjcmVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjaGVja2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARZnZXRGYXJtaW5nUG93ZXJCeUFjcmVzAQVhY3JlcwkAaAIJAGgCBQVhY3JlcwAUCQBkAgkBD2dldExldmVsQnlBY3JlcwEFBWFjcmVzAAQBHmdldEZhcm1pbmdQb3dlckJ5QWNyZXNBbmRCb251cwIFYWNyZXMGYm9udXM2BApub3RCb251c2VkCQEWZ2V0RmFybWluZ1Bvd2VyQnlBY3JlcwEFBWFjcmVzCQCUCgIJAGsDBQpub3RCb251c2VkCQBkAgUDTTZfBQZib251czYFA002XwUKbm90Qm9udXNlZAEQZ2V0RmFybWluZ1Bvd2VycwISdXNlckFkZHJTdHJPckVtcHR5DmFjcmVzMkNvbnRyYWN0BAd0b3RhbEZQCQELdmFsdWVPckVsc2UCCQCaCAIFDmFjcmVzMkNvbnRyYWN0BRR0b3RhbEZhcm1pbmdQb3dlcktleQAABAl1c2VyQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFEnVzZXJBZGRyU3RyT3JFbXB0eQAABAl1c2VyQm9udXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARBrZXlVc2VyRnVsbEJvbnVzAQUSdXNlckFkZHJTdHJPckVtcHR5AAAECCR0MDc5MTQzCQEeZ2V0RmFybWluZ1Bvd2VyQnlBY3Jlc0FuZEJvbnVzAgUJdXNlckFjcmVzBQl1c2VyQm9udXMEDXVzZXJGUGJvbnVzZWQIBQgkdDA3OTE0MwJfMQQQdXNlckZQbm90Qm9udXNlZAgFCCR0MDc5MTQzAl8yCQDMCAIFB3RvdGFsRlAJAMwIAgUNdXNlckZQYm9udXNlZAkAzAgCBRB1c2VyRlBub3RCb251c2VkCQDMCAIFCXVzZXJCb251cwUDbmlsAAppZHhUb3RhbEZQAAAAEGlkeFVzZXJGUGJvbnVzZWQAAQALaXhXbGdBbW91bnQAAAAIaXhXbGdXbGcAAQAKaXhXbGdQcmljZQACAA5peFdsZ0lzc3VlVGltZQAIAA9peFdsZ1RlYW1BbUxlZnQACwATaXhXbGdUZWFtQW1BdmFpbE5vdwAMAA5peFdsZ0FjdEFtTGVmdAAPABJpeFdsZ0FjdEFtQXZhaWxOb3cAEAAQaXhXbGdBbUxlZnRUb3RhbAATABNpeFdsZ1VzZXJBbUF2YWlsTm93ABcAEGl4V2xnRWZmVXNlclRpbWUAGAASaXhXbGdJc3N1ZTEwQW1vdW50ABkAG2l4V2xnTWFya2V0aW5nSXNzdWUxMEFtb3VudAAaABZpeFdsZ1RlYW1Jc3N1ZTEwQW1vdW50ABsAD2l4V2xnVXNlcjEwcGFydAAcABBpeFdsZ0lzc3VlMTBUaW1lAB0BDGdldFdsZ1N0YXRzMgQLdXNlckFkZHJPcHQJY29udHJhY3RzBnVzZHRJZBV1c2R0QmFsYW5jZUNvcnJlY3Rpb24EDGlzc3VlZEFtb3VudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUPd2xnSXNzdWVkQW10S2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQEB3Jlc3RVc2QJAPAHAgkAkQMCBQljb250cmFjdHMFCWRhcHAyUmVzdAUGdXNkdElkBAZ3bGdVc2QJAGUCCQDwBwIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUGdXNkdElkBRV1c2R0QmFsYW5jZUNvcnJlY3Rpb24ECXB1enpsZVVzZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwULZGFwcDJQdXp6bGUFBnVzZHRJZAQJYWNyZXMyVXNkCQDwBwIJAJEDAgUJY29udHJhY3RzBQxkYXBwMlN0YWtpbmcFBnVzZHRJZAQRaW52ZXN0Rm5kQ29udHJhY3QJAJEDAgUJY29udHJhY3RzBQ9kYXBwMkludmVzdEZ1bmQED2ludmVzdEZ1bmRUb3RhbAkAZAIJAPAHAgURaW52ZXN0Rm5kQ29udHJhY3QFBnVzZHRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRFpbnZlc3RGbmRDb250cmFjdAUOemJJc3N1ZWRBbXRLZXkAAAQNdG90YWxGdW5kc1VzZAkAZAIJAGQCBQlhY3JlczJVc2QFBndsZ1VzZAUPaW52ZXN0RnVuZFRvdGFsBAV3bGdJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwILd2xnX2Fzc2V0SWQCE05vdCBpbml0aWFsaXplZCB5ZXQEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAECWlzc3VlVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUOd2xnSXNzdWVUaW1LZXkCD05vdCBpbml0aWFsaXplZAQGd2xnV2xnCQDwBwIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUFd2xnSWQECXRlYW1Ub3RhbAkAawMFDGlzc3VlZEFtb3VudAUKVEVBTV9TSEFSRQUDTTZfBA50ZWFtQW1vdW50TGVmdAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDnRlYW1BbXRMZWZ0S2V5BQl0ZWFtVG90YWwEDGxhc3RUZWFtVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDmxhc3RUZWFtVGltS2V5BQlpc3N1ZVRpbWUECHRlYW1BZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCdCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUKdGVhbUFkcktleQQWdGVhbUFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQl0ZWFtVG90YWwJAGUCBQNub3cFDGxhc3RUZWFtVGltZQkAaAIAAwULWUVBUl9NSUxMSVMJAMwIAgUOdGVhbUFtb3VudExlZnQFA25pbAQKdGVhbVdsZ29sZAkA8AcCBQh0ZWFtQWRkcgUFd2xnSWQECGFjdFRvdGFsCQBrAwUMaXNzdWVkQW1vdW50BQ5BQ1RJVklUWV9TSEFSRQUDTTZfBA1hY3RBbW91bnRMZWZ0CQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUNYWN0QW10TGVmdEtleQUIYWN0VG90YWwEEmxhc3RBY3Rpdml0aWVzVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFFGxhc3RBY3Rpdml0aWVzVGltS2V5BQlpc3N1ZVRpbWUEFWFjdEFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQhhY3RUb3RhbAkAZQIFA25vdwUSbGFzdEFjdGl2aXRpZXNUaW1lCQBoAgADBQtZRUFSX01JTExJUwkAzAgCBQ1hY3RBbW91bnRMZWZ0BQNuaWwECWFjdFdsZ29sZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwUJZGFwcDJSZXN0BQV3bGdJZAQMbGFzdFVzZXJUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwkBFmtleUxhc3RDbGFpbVRpbWVCeVVzZXIBBQt1c2VyQWRkck9wdAUJaXNzdWVUaW1lBA5sYXN0VXNlclBlcmlvZAkAaQIJAGUCBQxsYXN0VXNlclRpbWUFCWlzc3VlVGltZQULWUVBUl9NSUxMSVMECm5vd0xpbWl0ZWQJAJcDAQkAzAgCBQNub3cJAMwIAgkAZAIFCWlzc3VlVGltZQkAaAIAAwULWUVBUl9NSUxMSVMFA25pbAQJY3VyUGVyaW9kCQCXAwEJAMwIAgkAaQIJAGUCBQNub3cFCWlzc3VlVGltZQULWUVBUl9NSUxMSVMJAMwIAgACBQNuaWwEA2VmZgkBEGdldEZhcm1pbmdQb3dlcnMCBQt1c2VyQWRkck9wdAkAkQMCBQljb250cmFjdHMFDGRhcHAyU3Rha2luZwQVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAUJY3VyUGVyaW9kBA1wcmV2UGVyaW9kRW5kCQBkAgUJaXNzdWVUaW1lCQBoAgULWUVBUl9NSUxMSVMFCWN1clBlcmlvZAQRcHJldlByZXZQZXJpb2RFbmQJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwkAZQIFCWN1clBlcmlvZAABBAJhMAkAawMFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAZQIFCm5vd0xpbWl0ZWQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEDXVzZXJBdmFpbGFibGUDCQAAAgUObGFzdFVzZXJQZXJpb2QFCWN1clBlcmlvZAUCYTADCQAAAgUObGFzdFVzZXJQZXJpb2QJAGUCBQljdXJQZXJpb2QAAQQCYTEJAGsDCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAABCQBlAgUNcHJldlBlcmlvZEVuZAUMbGFzdFVzZXJUaW1lBQtZRUFSX01JTExJUwkAZAIFAmExBQJhMAQCYTIJAGsDCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAACCQBlAgURcHJldlByZXZQZXJpb2RFbmQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEAmExCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAABCQBkAgkAZAIFAmEyBQJhMQUCYTAED2Ftb3VudExlZnRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFEXN0YWtlcnNBbXRMZWZ0S2V5AAAECnVzZXJBbW91bnQDCQECIT0CCQCRAwIFA2VmZgUKaWR4VG90YWxGUAAACQBrAwUNdXNlckF2YWlsYWJsZQkAkQMCBQNlZmYFEGlkeFVzZXJGUGJvbnVzZWQJAJEDAgUDZWZmBQppZHhUb3RhbEZQAAAED2xhc3RJc3N1ZTEwVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFEXdsZ0lzc3VlMTBUaW1lS2V5BRFORVdfU1RBS0lOR19TVEFSVAQNaXNzdWUxMEFtb3VudAkAawMFB0lTU1VFMTAJAJYDAQkAzAgCCQBlAgUDbm93BQ9sYXN0SXNzdWUxMFRpbWUJAMwIAgAABQNuaWwFBkRBWV9NUwQWbWFya2V0aW5nSXNzdWUxMEFtb3VudAkAawMFDWlzc3VlMTBBbW91bnQFEU1BUktFVElORzEwX1NIQVJFBQNNNl8EEXRlYW1Jc3N1ZTEwQW1vdW50CQBrAwUNaXNzdWUxMEFtb3VudAUMVEVBTTEwX1NIQVJFBQNNNl8EDnVzZXIxMEludGVydmFsCQCWAwEJAMwIAgkAZQIFA25vdwkAlgMBCQDMCAIFEU5FV19TVEFLSU5HX1NUQVJUCQDMCAIFDGxhc3RVc2VyVGltZQUDbmlsCQDMCAIAAAUDbmlsBAp1c2VyMTBwYXJ0AwkBAiE9AgkAkQMCBQNlZmYFCmlkeFRvdGFsRlAAAAkAawMJAGsDCQBrAwUHSVNTVUUxMAUOdXNlcjEwSW50ZXJ2YWwFBkRBWV9NUwkAkQMCBQNlZmYFEGlkeFVzZXJGUGJvbnVzZWQJAJEDAgUDZWZmBQppZHhUb3RhbEZQBQ9QTEFZRVJTMTBfU0hBUkUFA002XwAABA5uZXdJc3N1ZTEwVGltZQkAlgMBCQDMCAIFEU5FV19TVEFLSU5HX1NUQVJUCQDMCAIFA25vdwUDbmlsBBBhY3Jlc1N0YWtlZFRvdGFsCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQxkYXBwMlN0YWtpbmcFEmFjcmVzU3Rha2RUb3RhbEtleQAACQDMCAIFDGlzc3VlZEFtb3VudAkAzAgCBQZ3bGdXbGcJAMwIAgkAawMFDXRvdGFsRnVuZHNVc2QFA004XwUMaXNzdWVkQW1vdW50CQDMCAIFDXRvdGFsRnVuZHNVc2QJAMwIAgUHcmVzdFVzZAkAzAgCBQlhY3JlczJVc2QJAMwIAgUGd2xnVXNkCQDMCAIFCXB1enpsZVVzZAkAzAgCBQlpc3N1ZVRpbWUJAMwIAgUMbGFzdFRlYW1UaW1lCQDMCAIFCXRlYW1Ub3RhbAkAzAgCBQ50ZWFtQW1vdW50TGVmdAkAzAgCBRZ0ZWFtQW1vdW50QXZhaWxhYmxlTm93CQDMCAIFCnRlYW1XbGdvbGQJAMwIAgUIYWN0VG90YWwJAMwIAgUNYWN0QW1vdW50TGVmdAkAzAgCBRVhY3RBbW91bnRBdmFpbGFibGVOb3cJAMwIAgUJYWN0V2xnb2xkCQDMCAIFCWN1clBlcmlvZAkAzAgCBQ9hbW91bnRMZWZ0VG90YWwJAMwIAgUVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQDMCAIFDGxhc3RVc2VyVGltZQkAzAgCBQ9pbnZlc3RGdW5kVG90YWwJAMwIAgUKdXNlckFtb3VudAkAzAgCBQpub3dMaW1pdGVkCQDMCAIFDWlzc3VlMTBBbW91bnQJAMwIAgUWbWFya2V0aW5nSXNzdWUxMEFtb3VudAkAzAgCBRF0ZWFtSXNzdWUxMEFtb3VudAkAzAgCBQp1c2VyMTBwYXJ0CQDMCAIFDm5ld0lzc3VlMTBUaW1lCQDMCAIJAJEDAgUDZWZmBQppZHhUb3RhbEZQCQDMCAIFEGFjcmVzU3Rha2VkVG90YWwFA25pbAANcHJvZml0QWRkcktleQIKcHJvZml0QWRkcgAZc3Rha2Vyc0Ftb3VudFBhaWRUb3RhbEtleQIWc3Rha2Vyc0Ftb3VudFBhaWRUb3RhbAEYa2V5U3Rha2Vyc0Ftb3VudFBhaWRVc2VyAQRhZGRyCQCsAgICFnN0YWtlcnNBbW91bnRQYWlkVXNlcl8FBGFkZHIBB3Byb2xvZzIACQEFYXNJbnQBCQD9BwQFDmFjcmVzMkNvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAESZ2V0U3dhcExpbWl0V2xnb2xkAQRhZGRyBAhsYXN0VGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEZa2V5TGFzdFdsZ1RyYWRlVGltZUJ5VXNlcgEFBGFkZHIAAAQMZGVmYXVsdExpbWl0CQELdmFsdWVPckVsc2UCCQCaCAIFDmFjcmVzMkNvbnRyYWN0CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQRhZGRyAAAEDWxhc3RMaW1pdExlZnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBGmtleUxhc3RXbGdUcmFkZUxpbWl0QnlVc2VyAQUEYWRkcgUMZGVmYXVsdExpbWl0BAxjdXJyZW50TGltaXQJAGQCBQ1sYXN0TGltaXRMZWZ0CQBrAwUMZGVmYXVsdExpbWl0CQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFCGxhc3RUaW1lBQpEQVlfTUlMTElTCQCXAwEJAMwIAgUMY3VycmVudExpbWl0CQDMCAIFDGRlZmF1bHRMaW1pdAUDbmlsAQ5jbGFpbUludGVybmFsMgEEYWRkcgQIY3VyU3RhdHMJAQxnZXRXbGdTdGF0czIEBQRhZGRyCQDMCAIFDXJlc3QyQ29udHJhY3QJAMwIAgUOYWNyZXMyQ29udHJhY3QJAMwIAgULd2xnQ29udHJhY3QJAMwIAgUScHV6emxlUG9vbENvbnRyYWN0CQDMCAIFEmludmVzdEZ1bmRDb250cmFjdAUDbmlsBQt1c2R0QXNzZXRJZAAABAt1c2VyVGltZUtleQkBFmtleUxhc3RDbGFpbVRpbWVCeVVzZXIBBQRhZGRyBAxsYXN0VXNlclRpbWUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQULdXNlclRpbWVLZXkAAAQLdXNlckVmZlRpbWUJAJEDAgUIY3VyU3RhdHMFEGl4V2xnRWZmVXNlclRpbWUDCQAAAgUMbGFzdFVzZXJUaW1lBQt1c2VyRWZmVGltZQkAlAoCBQNuaWwAAAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJaXNzdWVUaW1lCQCRAwIFCGN1clN0YXRzBQ5peFdsZ0lzc3VlVGltZQQOdGVhbUFtb3VudExlZnQJAJEDAgUIY3VyU3RhdHMFD2l4V2xnVGVhbUFtTGVmdAQKdGVhbUFtb3VudAkAZAIJAJEDAgUIY3VyU3RhdHMFE2l4V2xnVGVhbUFtQXZhaWxOb3cJAJEDAgUIY3VyU3RhdHMFFml4V2xnVGVhbUlzc3VlMTBBbW91bnQEDHRlYW1UcmFuc2ZlcgMJAGYCBQp0ZWFtQW1vdW50AAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQkAoggBBQt0ZWFtQWRkcktleQUKdGVhbUFtb3VudAUKd2xnQXNzZXRJZAUDbmlsBQNuaWwEDWFjdEFtb3VudExlZnQJAJEDAgUIY3VyU3RhdHMFDml4V2xnQWN0QW1MZWZ0BAlhY3RBbW91bnQJAJEDAgUIY3VyU3RhdHMFEml4V2xnQWN0QW1BdmFpbE5vdwQLYWN0VHJhbnNmZXIDCQBmAgUJYWN0QW1vdW50AAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUMcmVzdENvbnRyYWN0BQlhY3RBbW91bnQFCndsZ0Fzc2V0SWQFA25pbAUDbmlsBA9tYXJrZXRpbmdBbW91bnQJAJEDAgUIY3VyU3RhdHMFG2l4V2xnTWFya2V0aW5nSXNzdWUxMEFtb3VudAQRbWFya2V0aW5nVHJhbnNmZXIDCQBmAgUPbWFya2V0aW5nQW1vdW50AAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQkAoggBBRBtYXJrZXRpbmdBZGRyS2V5BQ9tYXJrZXRpbmdBbW91bnQFCndsZ0Fzc2V0SWQFA25pbAUDbmlsBAp1c2VyQW1vdW50CQCRAwIFCGN1clN0YXRzBRNpeFdsZ1VzZXJBbUF2YWlsTm93BAd1c2VyS2V5CQEYa2V5U3Rha2Vyc0Ftb3VudFBhaWRVc2VyAQUEYWRkcgQJdXNlclRvdGFsCQBkAgUKdXNlckFtb3VudAkAkQMCBQhjdXJTdGF0cwUPaXhXbGdVc2VyMTBwYXJ0BA5pc3N1ZWQxMEFtb3VudAkAkQMCBQhjdXJTdGF0cwUSaXhXbGdJc3N1ZTEwQW1vdW50CQCUCgIJAM4IAgkAzggCCQDOCAIJAMwIAgkBB1JlaXNzdWUDBQp3bGdBc3NldElkBQ5pc3N1ZWQxMEFtb3VudAYJAMwIAgkBDEludGVnZXJFbnRyeQIFEndsZ0lzc3VlZEFtb3VudEtleQkAZAIJAJEDAgUIY3VyU3RhdHMFC2l4V2xnQW1vdW50BQ5pc3N1ZWQxMEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgURd2xnSXNzdWUxMFRpbWVLZXkJAJEDAgUIY3VyU3RhdHMFEGl4V2xnSXNzdWUxMFRpbWUJAMwIAgkBDEludGVnZXJFbnRyeQIFB3VzZXJLZXkJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFB3VzZXJLZXkAAAUKdXNlckFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUZc3Rha2Vyc0Ftb3VudFBhaWRUb3RhbEtleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUZc3Rha2Vyc0Ftb3VudFBhaWRUb3RhbEtleQAABQp1c2VyQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRzdGFrZXJzQW1vdW50TGVmdEtleQkAZQIJAJEDAgUIY3VyU3RhdHMFEGl4V2xnQW1MZWZ0VG90YWwFCnVzZXJBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEXRlYW1BbW91bnRMZWZ0S2V5CQBkAgkAZQIFDnRlYW1BbW91bnRMZWZ0BQp0ZWFtQW1vdW50CQCRAwIFCGN1clN0YXRzBRZpeFdsZ1RlYW1Jc3N1ZTEwQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ9sYXN0VGVhbVRpbWVLZXkFA25vdwkAzAgCCQEMSW50ZWdlckVudHJ5AgUQYWN0QW1vdW50TGVmdEtleQkAZQIFDWFjdEFtb3VudExlZnQFCWFjdEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUVbGFzdEFjdGl2aXRpZXNUaW1lS2V5BQNub3cJAMwIAgkBDEludGVnZXJFbnRyeQIFC3VzZXJUaW1lS2V5BQt1c2VyRWZmVGltZQUDbmlsBQx0ZWFtVHJhbnNmZXIFC2FjdFRyYW5zZmVyBRFtYXJrZXRpbmdUcmFuc2ZlcgUJdXNlclRvdGFsAQ50YWtlWHBJbnRlcm5hbAIEYWRkcgVkZWx0YQQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQHdGltZUtleQkBFmtleVdsZ1N0YWtlZFRpbWVCeVVzZXIBBQRhZGRyBAlhbW91bnRLZXkJARhrZXlXbGdTdGFrZWRBbW91bnRCeVVzZXIBBQRhZGRyBAhsYXN0VGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAEB29sZFVzZXIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECG9sZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFEXdsZ1N0YWtlZFRvdGFsS2V5AAAEAnhwCQBrAwkAawMFBXhwV2xnBQdvbGRVc2VyBQ93bGdCYXNlQW1vdW50WHAJAGUCBQhsYXN0VGltZQUDbm93BQlEQVlNSUxMSVMJAJUKAwkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQUDbm93CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlhbW91bnRLZXkJAGQCBQdvbGRVc2VyBQVkZWx0YQkAzAgCCQEMSW50ZWdlckVudHJ5AgURd2xnU3Rha2VkVG90YWxLZXkJAGQCBQhvbGRUb3RhbAUFZGVsdGEFA25pbAUCeHAFB29sZFVzZXIBEW9wZW5DaGVzdEludGVybmFsAQRhZGRyBAR3ZWVrCQBpAgUGaGVpZ2h0BQtXRUVLX0JMT0NLUwQIZHJhd1dlZWsJAGUCBQR3ZWVrAAEECW51bVByaXplcwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEOa2V5TnVtTkZUMkRyYXcBBQhkcmF3V2VlawUVREVGQVVMVF9XRUVLTFlfUFJJWkVTBAtwcml6ZXNEcmF3bgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEOa2V5TnVtTkZURHJhd24BBQhkcmF3V2VlawAABAt1c2VyVGlja2V0cwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESa2V5VXNlcldlZWtUaWNrZXRzAgUEYWRkcgUIZHJhd1dlZWsAAAMJAGcCAAAFC3VzZXJUaWNrZXRzCQCUCgIFA25pbAUEdW5pdAQLd2Vla1RpY2tldHMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBE2tleVRvdGFsV2Vla1RpY2tldHMBBQhkcmF3V2VlawAAAwkAZwIAAAULd2Vla1RpY2tldHMJAJQKAgkAzAgCCQELRGVsZXRlRW50cnkBCQESa2V5VXNlcldlZWtUaWNrZXRzAgUEYWRkcgUIZHJhd1dlZWsFA25pbAUEdW5pdAQHZW50cm9weQkBBXZhbHVlAQgJAQV2YWx1ZQEJAO0HAQkAaAIFBHdlZWsFC1dFRUtfQkxPQ0tTA3ZyZgQEc2FsdAkA2QQBCQCRAwIJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEVa2V5TGFzdFdlZWtUeElkQnlVc2VyAQUEYWRkcgIKNDJfREVGQVVMVAIBXwABBAZyYW5kb20JAQ9nZXRSYW5kb21OdW1iZXIDBQt3ZWVrVGlja2V0cwUEc2FsdAUHZW50cm9weQMJAGYCCQBoAgULdXNlclRpY2tldHMFCW51bVByaXplcwUGcmFuZG9tBAtpc3N1ZVJlc3VsdAkA/AcEBQ5hY3JlczJDb250cmFjdAIIaXNzdWVORlQJAMwIAgUEYWRkcgkAzAgCBRRJZHhEdHgxUGVyY0dlbVdpbm5lcgUDbmlsBQNuaWwEB3dpbm5lcnMJAKIIAQkBDmtleVdlZWtXaW5uZXJzAQUIZHJhd1dlZWsECm5ld1dpbm5lcnMDCQEJaXNEZWZpbmVkAQUHd2lubmVycwkArAICCQCsAgIJAQV2YWx1ZQEFB3dpbm5lcnMCAV8FBGFkZHIFBGFkZHIJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDmtleU51bU5GVERyYXduAQUIZHJhd1dlZWsJAGQCBQtwcml6ZXNEcmF3bgABCQDMCAIJAQtEZWxldGVFbnRyeQEJARJrZXlVc2VyV2Vla1RpY2tldHMCBQRhZGRyBQhkcmF3V2VlawkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5V2Vla1dpbm5lcnMBBQhkcmF3V2VlawUKbmV3V2lubmVycwUDbmlsBQtpc3N1ZVJlc3VsdAQHcmFuZG9tMQkAZAIJAQ9nZXRSYW5kb21OdW1iZXIDAAkJAMsBAgEBQgUEc2FsdAUHZW50cm9weQABBAtjb25zVGlja2V0cwkAawMFC3VzZXJUaWNrZXRzBQdyYW5kb20xAAoJAJQKAgkAzAgCCQELRGVsZXRlRW50cnkBCQESa2V5VXNlcldlZWtUaWNrZXRzAgUEYWRkcgUIZHJhd1dlZWsJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlVc2VyV2Vla1RpY2tldHMCBQRhZGRyBQR3ZWVrBQtjb25zVGlja2V0cwUDbmlsBQtjb25zVGlja2V0cwEUY2xhaW1UaWNrZXRzSW50ZXJuYWwCBGFkZHIKdXNlckJldFN0cgQEd2VlawkAaQIFBmhlaWdodAULV0VFS19CTE9DS1MECnRpY2tldHNLZXkJARJrZXlVc2VyV2Vla1RpY2tldHMCBQRhZGRyBQR3ZWVrBAZkYXlCZXQJALUJAgUKdXNlckJldFN0cgIBXwQPb2xkVG90YWxUaWNrZXRzCQELdmFsdWVPckVsc2UCCQCfCAEJARNrZXlUb3RhbFdlZWtUaWNrZXRzAQUEd2VlawAABApvbGRUaWNrZXRzCQELdmFsdWVPckVsc2UCCQCfCAEFCnRpY2tldHNLZXkAAAQMZGVsdGFUaWNrZXRzAwkAAAIJAQp3aW5uaW5nQmV0AQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBmRheUJldAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGZGF5QmV0AAEAAQAABA9vbGRQYXJ0aWNpcGFudHMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBGGtleVRvdGFsV2Vla1BhcnRpY2lwYW50cwEFBHdlZWsAAAQSdXBkYXRlUGFydGljaXBhbnRzAwMJAAACBQpvbGRUaWNrZXRzAAAJAAACBQxkZWx0YVRpY2tldHMAAQcJAMwIAgkBDEludGVnZXJFbnRyeQIJARhrZXlUb3RhbFdlZWtQYXJ0aWNpcGFudHMBBQR3ZWVrCQBkAgUPb2xkUGFydGljaXBhbnRzAAEFA25pbAUDbmlsCQCUCgIDCQAAAgUMZGVsdGFUaWNrZXRzAAAFA25pbAkAzQgCCQDNCAIFEnVwZGF0ZVBhcnRpY2lwYW50cwkBDEludGVnZXJFbnRyeQIFCnRpY2tldHNLZXkJAGQCBQpvbGRUaWNrZXRzBQxkZWx0YVRpY2tldHMJAQxJbnRlZ2VyRW50cnkCCQETa2V5VG90YWxXZWVrVGlja2V0cwEFBHdlZWsJAGQCBQ9vbGRUb3RhbFRpY2tldHMFDGRlbHRhVGlja2V0cwUMZGVsdGFUaWNrZXRzDgFpAQ1jb25zdHJ1Y3RvclYxBAhyZXN0QWRkcg1tYXJrZXRpbmdBZGRyCHRlYW1BZGRyCnByb2ZpdEFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAMJAQlpc0RlZmluZWQBCQChCAEFDXdsZ0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAxpc3N1ZWRBbW91bnQFCE1JTExJT042BAVpc3N1ZQkAwwgHAgZXTEdPTEQCIFdhdmVzTGFuZHMgR29sZCBpbnZlc3RtZW50IHRva2VuBQxpc3N1ZWRBbW91bnQACAYFBHVuaXQAAAQHYXNzZXRJZAkAuAgBBQVpc3N1ZQkAzAgCBQVpc3N1ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgUPd2xnSXNzdWVUaW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSd2xnSXNzdWVkQW1vdW50S2V5BQxpc3N1ZWRBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFGXN0YWtlcnNBbW91bnRQYWlkVG90YWxLZXkAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUc3Rha2Vyc0Ftb3VudExlZnRLZXkJAGsDBQhNSUxMSU9ONgULUExBWUVSU0hBUkUFBU1VTFQ2CQDMCAIJAQtCaW5hcnlFbnRyeQIFDXdsZ0Fzc2V0SWRLZXkFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDmtleVJlc3RBZGRyZXNzAAUIcmVzdEFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgUQbWFya2V0aW5nQWRkcktleQUNbWFya2V0aW5nQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCBQt0ZWFtQWRkcktleQUIdGVhbUFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgUNcHJvZml0QWRkcktleQUKcHJvZml0QWRkcgUDbmlsAWkBDWNvbnN0cnVjdG9yVjIBCXJlc3QyQWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9rZXlSZXN0MkFkZHJlc3MABQlyZXN0MkFkZHIFA25pbAFpAQZidXlXbGcBDG1pblRvUmVjZWl2ZQQMcHJvbG9nUmVzdWx0CQEHcHJvbG9nMgADCQAAAgUMcHJvbG9nUmVzdWx0BQxwcm9sb2dSZXN1bHQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQHdXNkdEFtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECE1VTRFQgcGF5bWVudHMgb25seSEEBmNhbGxlcggFAWkGY2FsbGVyBARhZGRyCQClCAEFBmNhbGxlcgMJAGYCBQ5NSU5TSE9QUEFZTUVOVAUHdXNkdEFtdAkAAgEJAKwCAgkArAICAhJZb3UgY2FuIHRyYWRlIG1pbiAJAQpmaXhlZFBvaW50AgUOTUlOU0hPUFBBWU1FTlQABgIFIFVTRFQECGN1clN0YXRzCQEMZ2V0V2xnU3RhdHMyBAIACQDMCAIFDXJlc3QyQ29udHJhY3QJAMwIAgUOYWNyZXMyQ29udHJhY3QJAMwIAgULd2xnQ29udHJhY3QJAMwIAgUScHV6emxlUG9vbENvbnRyYWN0CQDMCAIFEmludmVzdEZ1bmRDb250cmFjdAUDbmlsBQt1c2R0QXNzZXRJZAUHdXNkdEFtdAQMY3VyV2xnQW1vdW50CQCRAwIFCGN1clN0YXRzBQtpeFdsZ0Ftb3VudAQId2xnUHJpY2UJAJEDAgUIY3VyU3RhdHMFCml4V2xnUHJpY2UECGJ1eVByaWNlCQBuBAUId2xnUHJpY2UABgAFBQdDRUlMSU5HBAl3bGdBbW91bnQJAGsDBQd1c2R0QW10BQVNVUxUOAUIYnV5UHJpY2UEBm1heFdsZwkBEmdldFN3YXBMaW1pdFdsZ29sZAEFBGFkZHIDCQBmAgUJd2xnQW1vdW50BQZtYXhXbGcJAAIBCQCsAgIJAKwCAgIQWW91IGNhbiBnZXQgbWF4IAkBCmZpeGVkUG9pbnQCBQZtYXhXbGcACAIVIFdMR09MRCBhdCB0aGUgbW9tZW50AwkAZgIFDG1pblRvUmVjZWl2ZQUJd2xnQW1vdW50CQACAQIwUHJpY2UgY2hhbmdlZCBkdXJpbmcgb3BlcmF0aW9uLCBwbGVhc2UgdHJ5IGFnYWluBAxwcm9maXRBbW91bnQJAGkCBQd1c2R0QW10AAYJAJQKAgkAzAgCCQEHUmVpc3N1ZQMFCndsZ0Fzc2V0SWQFCXdsZ0Ftb3VudAYJAMwIAgkBDEludGVnZXJFbnRyeQIFEndsZ0lzc3VlZEFtb3VudEtleQkAZAIFDGN1cldsZ0Ftb3VudAUJd2xnQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEZa2V5TGFzdFdsZ1RyYWRlVGltZUJ5VXNlcgEFBGFkZHIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaa2V5TGFzdFdsZ1RyYWRlTGltaXRCeVVzZXIBBQRhZGRyCQBlAgUGbWF4V2xnBQl3bGdBbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQkAoggBBQ1wcm9maXRBZGRyS2V5BQxwcm9maXRBbW91bnQFC3VzZHRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgUJd2xnQW1vdW50BQp3bGdBc3NldElkBQNuaWwFDHByb2xvZ1Jlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5idXlXbGdSRUFET05MWQIHYWRkcmVzcwd1c2R0QW10BAhjdXJTdGF0cwkBDGdldFdsZ1N0YXRzMgQCAAkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQFB3VzZHRBbXQECHdsZ1ByaWNlCQCRAwIFCGN1clN0YXRzBQppeFdsZ1ByaWNlBAhidXlQcmljZQkAbgQFCHdsZ1ByaWNlAAYABQUHQ0VJTElORwQJd2xnQW1vdW50CQBrAwUHdXNkdEFtdAUFTVVMVDgFCGJ1eVByaWNlBAZtYXhXbGcJARJnZXRTd2FwTGltaXRXbGdvbGQBBQdhZGRyZXNzBAdtYXhVc2R0CQBrAwUGbWF4V2xnBQhidXlQcmljZQUFTVVMVDgEDHByb2ZpdEFtb3VudAkAaQIFB3VzZHRBbXQABgkAlAoCBQNuaWwJAMwIAgUJd2xnQW1vdW50CQDMCAIFDk1JTlNIT1BQQVlNRU5UCQDMCAIFB21heFVzZHQJAMwIAgUMcHJvZml0QW1vdW50BQNuaWwBaQEHc2VsbFdsZwEJbWluQW1vdW50BAxwcm9sb2dSZXN1bHQJAQdwcm9sb2cyAAMJAAACBQxwcm9sb2dSZXN1bHQFDHByb2xvZ1Jlc3VsdAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABAZ3bGdBbXQIBQNwbXQGYW1vdW50BAZjYWxsZXIIBQFpBmNhbGxlcgQEYWRkcgkApQgBBQZjYWxsZXIEBm1heFdsZwkBEmdldFN3YXBMaW1pdFdsZ29sZAEFBGFkZHIDCQBmAgUGd2xnQW10BQZtYXhXbGcJAAIBCQCsAgIJAKwCAgISWW91IGNhbiBzcGVuZCBtYXggCQEKZml4ZWRQb2ludAIFBm1heFdsZwAIAhUgV0xHT0xEIGF0IHRoZSBtb21lbnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQp3bGdBc3NldElkCQACAQIVV0xHT0xEIHBheW1lbnRzIG9ubHkhBAhjdXJTdGF0cwkBDGdldFdsZ1N0YXRzMgQCAAkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQAAAQMY3VyV2xnQW1vdW50CQCRAwIFCGN1clN0YXRzBQtpeFdsZ0Ftb3VudAQJc2VsbFByaWNlCQBpAgkAkQMCBQhjdXJTdGF0cwUKaXhXbGdQcmljZQACBAd1c2R0QW10CQBrAwUGd2xnQW10BQlzZWxsUHJpY2UFBU1VTFQ4AwkAZgIFDk1JTlNIT1BQQVlNRU5UBQd1c2R0QW10CQACAQkArAICCQCsAgICEllvdSBjYW4gdHJhZGUgbWluIAkBCmZpeGVkUG9pbnQCBQ5NSU5TSE9QUEFZTUVOVAAGAgUgVVNEVAMJAGYCBQltaW5BbW91bnQFB3VzZHRBbXQJAAIBAjBQcmljZSBjaGFuZ2VkIGR1cmluZyBvcGVyYXRpb24sIHBsZWFzZSB0cnkgYWdhaW4EDHByb2ZpdEFtb3VudAkAaQIFB3VzZHRBbXQABQkAlAoCCQDMCAIJAQRCdXJuAgUKd2xnQXNzZXRJZAUGd2xnQW10CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJ3bGdJc3N1ZWRBbW91bnRLZXkJAGUCBQxjdXJXbGdBbW91bnQFBndsZ0FtdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGWtleUxhc3RXbGdUcmFkZVRpbWVCeVVzZXIBBQRhZGRyCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmtleUxhc3RXbGdUcmFkZUxpbWl0QnlVc2VyAQUEYWRkcgkAZQIFBm1heFdsZwUGd2xnQW10CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQV2YWx1ZQEJAKIIAQUNcHJvZml0QWRkcktleQUMcHJvZml0QW1vdW50BQt1c2R0QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIFB3VzZHRBbXQFC3VzZHRBc3NldElkBQNuaWwFDHByb2xvZ1Jlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ9zZWxsV2xnUkVBRE9OTFkCB2FkZHJlc3MGd2xnQW10BAZtYXhXbGcJARJnZXRTd2FwTGltaXRXbGdvbGQBBQdhZGRyZXNzBAhjdXJTdGF0cwkBDGdldFdsZ1N0YXRzMgQCAAkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQAAAQJc2VsbFByaWNlCQBpAgkAkQMCBQhjdXJTdGF0cwUKaXhXbGdQcmljZQACBAd1c2R0QW10CQBrAwUGd2xnQW10BQlzZWxsUHJpY2UFBU1VTFQ4BAZtaW5XbGcJAGsDBQ5NSU5TSE9QUEFZTUVOVAUFTVVMVDgFCXNlbGxQcmljZQQMcHJvZml0QW1vdW50CQBpAgUHdXNkdEFtdAAFCQCUCgIFA25pbAkAzAgCBQd1c2R0QW10CQDMCAIFBm1pbldsZwkAzAgCBQZtYXhXbGcJAMwIAgUMcHJvZml0QW1vdW50BQNuaWwBaQEFY2xhaW0ABAxwcm9sb2dSZXN1bHQJAQdwcm9sb2cyAAMJAAACBQxwcm9sb2dSZXN1bHQFDHByb2xvZ1Jlc3VsdAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBA0kdDAxNDA0NTE0MTE0CQEOY2xhaW1JbnRlcm5hbDIBCQClCAEIBQFpBmNhbGxlcgQHYWN0aW9ucwgFDSR0MDE0MDQ1MTQxMTQCXzEEEHdsZ0NsYWltZWRBbW91bnQIBQ0kdDAxNDA0NTE0MTE0Al8yCQCUCgIJAM0IAgUHYWN0aW9ucwkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRB3bGdDbGFpbWVkQW1vdW50BQp3bGdBc3NldElkBQxwcm9sb2dSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQESb25TdGFrZVVuc3Rha2VMYW5kAQRhZGRyAwMDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkBAiE9AggFAWkGY2FsbGVyBQ1hY3Jlc0NvbnRyYWN0BwkBAiE9AggFAWkGY2FsbGVyBQ5hY3JlczJDb250cmFjdAcJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQNJHQwMTQ0MzMxNDQ4NwkBDmNsYWltSW50ZXJuYWwyAQUEYWRkcgQHYWN0aW9ucwgFDSR0MDE0NDMzMTQ0ODcCXzEEEHdsZ0NsYWltZWRBbW91bnQIBQ0kdDAxNDQzMzE0NDg3Al8yCQCUCgIDCQBmAgUQd2xnQ2xhaW1lZEFtb3VudAAACQDNCAIFB2FjdGlvbnMJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIFEHdsZ0NsYWltZWRBbW91bnQFCndsZ0Fzc2V0SWQFB2FjdGlvbnMFEHdsZ0NsYWltZWRBbW91bnQBaQEKYnVybldsZ29sZAEGd2xnQW10AwkBAiE9AggFAWkGY2FsbGVyBQ5hY3JlczJDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAhjdXJTdGF0cwkBDGdldFdsZ1N0YXRzMgQCAAkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQAAAMJAGYCBQZ3bGdBbXQJAJEDAgUIY3VyU3RhdHMFCGl4V2xnV2xnCQACAQkArAICCQCsAgIJAKwCAgIFT25seSAJAQpmaXhlZFBvaW50AgkAkQMCBQhjdXJTdGF0cwUIaXhXbGdXbGcACAIlIFdMR09MRCBsZWZ0IG9uIGNvbnRyYWN0LCBjYW4ndCBidXJuIAkBCmZpeGVkUG9pbnQCBQZ3bGdBbXQACAQNd2xnQW1vdW50TGVmdAkAZQIJAJEDAgUIY3VyU3RhdHMFC2l4V2xnQW1vdW50BQZ3bGdBbXQJAJQKAgkAzAgCCQEEQnVybgIFCndsZ0Fzc2V0SWQFBndsZ0FtdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSd2xnSXNzdWVkQW1vdW50S2V5BQ13bGdBbW91bnRMZWZ0BQNuaWwFDXdsZ0Ftb3VudExlZnQBaQEMYmV0Rm9yVGlja2V0AQNiZXQEDHByb2xvZ1Jlc3VsdAkBB3Byb2xvZzIAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0AwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAhkcmF3V2VlawkAZQIJAGkCBQZoZWlnaHQFC1dFRUtfQkxPQ0tTAAEEC3VzZXJUaWNrZXRzCQELdmFsdWVPckVsc2UCCQCfCAEJARJrZXlVc2VyV2Vla1RpY2tldHMCBQRhZGRyBQhkcmF3V2VlawAABAt3ZWVrVGlja2V0cwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQETa2V5VG90YWxXZWVrVGlja2V0cwEFCGRyYXdXZWVrAAADAwkAZgIFC3VzZXJUaWNrZXRzAAAJAGYCBQt3ZWVrVGlja2V0cwAABwkAAgECG1BsZWFzZSBvcGVuIHRoZSBjaGVzdCBmaXJzdAMJAQIhPQIJAGkCBQNiZXQABAAACQACAQIbSW52YWxpZCBiZXQ6IHNob3VsZCBiZSAwLi4zBAZtb21lbnQJAGoCBQZoZWlnaHQFCkRBWV9CTE9DS1MDCQBmAgUGbW9tZW50CQBlAgUKREFZX0JMT0NLUwADCQACAQkArAICCQCsAgICMUNhbm5vdCBiZXQ6IHRoZSBkYXkgaXMgYWxtb3N0IGVuZGVkLCBwbGVhc2Ugd2FpdCAJAKQDAQkAZQIFCkRBWV9CTE9DS1MFBm1vbWVudAIHIGJsb2NrcwQLc3Rha2VkQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFBGFkZHIAAAQDbHZsCQEPZ2V0TGV2ZWxCeUFjcmVzAQULc3Rha2VkQWNyZXMDCQAAAgUDbHZsAAAJAAIBAiNZb3UgbmVlZCB0byBzdGFrZSBzb21lIEFDUkVTIHRvIGJldAQIdG9tb3Jyb3cJAGQCCQBpAgUGaGVpZ2h0BQpEQVlfQkxPQ0tTAAEEBmJldEtleQkBCmtleVVzZXJCZXQBBQRhZGRyBA1vbGRVc2VyQmV0U3RyCQCiCAEFBmJldEtleQQLbmV3QmV0RW50cnkJAQtTdHJpbmdFbnRyeQIFBmJldEtleQkArAICCQCsAgIJAKQDAQUIdG9tb3Jyb3cCAV8JAKQDAQUDYmV0AwkBCWlzRGVmaW5lZAEFDW9sZFVzZXJCZXRTdHIEB3VzZXJCZXQJAQV2YWx1ZQEFDW9sZFVzZXJCZXRTdHIDCQAAAgkAkQMCCQC1CQIFB3VzZXJCZXQCAV8AAAkApAMBBQh0b21vcnJvdwkAAgECHFlvdSBhbHJlYWR5IGJldCBmb3IgdG9tb3Jyb3cEAXIJARRjbGFpbVRpY2tldHNJbnRlcm5hbAIFBGFkZHIFB3VzZXJCZXQJAJQKAgkAzQgCCAUBcgJfMQULbmV3QmV0RW50cnkIBQFyAl8yCQCUCgIJAMwIAgULbmV3QmV0RW50cnkFA25pbAAACQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCXRha2VXbGdYcAEEYWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDSR0MDE3MDg3MTcxMzAJAQ50YWtlWHBJbnRlcm5hbAIFBGFkZHIAAAQHYWN0aW9ucwgFDSR0MDE3MDg3MTcxMzACXzEEAnhwCAUNJHQwMTcwODcxNzEzMAJfMgkAlAoCBQdhY3Rpb25zBQJ4cAFpARJjaGVja1dsZ1hwUkVBRE9OTFkBBGFkZHIEDSR0MDE3MjA3MTcyNTUJAQ50YWtlWHBJbnRlcm5hbAIFBGFkZHIAAAQHaWdub3JlZAgFDSR0MDE3MjA3MTcyNTUCXzEEB2RlbHRhWFAIBQ0kdDAxNzIwNzE3MjU1Al8yBAVuZXdYUAkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEJa2V5VXNlclhQAQUEYWRkcgAABQdkZWx0YVhQBAlsdmxQb2ludHMJAQdsZXZlbFVwAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJAQxrZXlVc2VyTGV2ZWwBBQRhZGRyAAAFBW5ld1hQCQCUCgIFA25pbAkAzQgCBQlsdmxQb2ludHMFBW5ld1hQAWkBDHNldE51bVByaXplcwEJbnVtUHJpemVzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEBHdlZWsJAGkCBQZoZWlnaHQFC1dFRUtfQkxPQ0tTCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ5rZXlOdW1ORlQyRHJhdwEFBHdlZWsFCW51bVByaXplcwUDbmlsBQludW1Qcml6ZXMBaQEJb3BlbkNoZXN0AAMJAQEhAQURS1NfQUxMT1dfTkZUX0RSQVcJAAIBAhRUZW1wb3JhcmlseSBkaXNhYmxlZAQMcHJvbG9nUmVzdWx0CQEHcHJvbG9nMgADCQAAAgUMcHJvbG9nUmVzdWx0BQxwcm9sb2dSZXN1bHQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQIZHJhd1dlZWsJAGUCCQBpAgUGaGVpZ2h0BQtXRUVLX0JMT0NLUwABBARhZGRyCQClCAEIBQFpBmNhbGxlcgQLdXNlclRpY2tldHMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleVVzZXJXZWVrVGlja2V0cwIFBGFkZHIFCGRyYXdXZWVrAAADCQBnAgAABQt1c2VyVGlja2V0cwkAAgECGU5vIGdlbXMgdG8gb3BlbiB0aGUgY2hlc3QJARFvcGVuQ2hlc3RJbnRlcm5hbAEFBGFkZHIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4APA4SAQ==",
    "height": 3386935,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BZGMAks3Tw8M2gq64Pee4atbDcJUiBTSVqRY6RcYozHt
Next: 4EbzTKshDBTuVWUL49Cv8rcPoy6tBZuoz1bkHrcUMgr5

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SEP = "__"
5 5  
6 6  let MULT6 = 1000000
7 7  
8 8  let MULT8 = 100000000
9 9  
10 10  let MINSHOPPAYMENT = 100000
11 11  
12 12  let DAY_MILLIS = 86400000
13 13  
14 14  let chain = take(drop(this.bytes, 1), 1)
15 15  
16 16  let DAY_BLOCKS = match chain {
17 17      case _ => 
18 18          if ((base58'2W' == $match0))
19 19              then 1440
20 20              else if ((base58'2T' == $match0))
21 21                  then 60
22 22                  else throw("Unknown chain")
23 23  }
24 24  
25 25  let WEEK_BLOCKS = match chain {
26 26      case _ => 
27 27          if ((base58'2W' == $match0))
28 28              then 10080
29 29              else if ((base58'2T' == $match0))
30 30                  then 180
31 31                  else throw("Unknown chain")
32 32  }
33 33  
34 34  let usdtAssetId = match chain {
35 35      case _ => 
36 36          if ((base58'2W' == $match0))
37 37              then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
38 38              else if ((base58'2T' == $match0))
39 39                  then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
40 40                  else throw("Unknown chain")
41 41  }
42 42  
43 43  let defaultRest2AddressStr = match chain {
44 44      case _ => 
45 45          if ((base58'2W' == $match0))
46 46              then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
47 47              else if ((base58'2T' == $match0))
48 48                  then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
49 49                  else throw("Unknown chain")
50 50  }
51 51  
52 52  let defaultRestAddressStr = match chain {
53 53      case _ => 
54 54          if ((base58'2W' == $match0))
55 55              then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
56 56              else if ((base58'2T' == $match0))
57 57                  then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
58 58                  else throw("Unknown chain")
59 59  }
60 60  
61 61  let KS_ALLOW_NFT_DRAW = match chain {
62 62      case _ => 
63 63          if ((base58'2W' == $match0))
64 64              then false
65 65              else if ((base58'2T' == $match0))
66 66                  then true
67 67                  else throw("Unknown chain")
68 68  }
69 69  
70 70  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
71 71  
72 72  
73 73  let IdxCfgAcres2Dapp = 1
74 74  
75 75  let IdxCfgWlgDapp = 2
76 76  
77 77  let IdxCfgPuzzlePoolDapp = 4
78 78  
79 79  let IdxCfgInvestFundDapp = 5
80 80  
81 81  func keyRestCfg () = "%s__restConfig"
82 82  
83 83  
84 84  func keyRest2Address () = "%s__rest2Addr"
85 85  
86 86  
87 87  func keyRestAddress () = "%s__restAddr"
88 88  
89 89  
90 90  let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
91 91  
92 92  func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
93 93  
94 94  
95 95  func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
96 96  
97 97  
98 98  let IdxCfgStakingDapp = 1
99 99  
100 100  let IdxCfgAcresDapp = 8
101 101  
102 102  let restCfg = readRestCfgOrFail(restContract)
103 103  
104 104  let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
105 105  
106 106  let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
107 107  
108 108  let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
109 109  
110 110  let rest2Cfg = readRestCfgOrFail(rest2Contract)
111 111  
112 112  let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
113 113  
114 114  let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
115 115  
116 116  let puzzlePoolContract = getContractAddressOrFail(rest2Cfg, IdxCfgPuzzlePoolDapp)
117 117  
118 118  let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
119 119  
120 120  func keyLastWeekTxIdByUser (addr) = ("lastWeekTxIdByUser_" + addr)
121 121  
122 122  
123 123  let wlgAssetIdKey = "wlg_assetId"
124 124  
125 125  let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
126 126  
127 127  func keyUserBet (addr) = ("userBet_" + addr)
128 128  
129 129  
130 130  func keyUserWeekTickets (addr,week) = ((("userWeekTickets_" + addr) + "_") + toString(week))
131 131  
132 132  
133 133  func keyTotalWeekTickets (week) = ("totalWeekTickets_" + toString(week))
134 134  
135 135  
136 136  func keyTotalWeekParticipants (week) = ("totalWeekParticipants_" + toString(week))
137 137  
138 138  
139 139  func keyNumNFT2Draw (week) = ("numNFT2Draw_" + toString(week))
140 140  
141 141  
142 142  func keyNumNFTDrawn (week) = ("numNFTDrawn_" + toString(week))
143 143  
144 144  
145 145  func keyWeekWinners (week) = ("weekWinners_" + toString(week))
146 146  
147 147  
148 148  func winningBet (day) = (toInt(value(value(blockInfoByHeight((day * DAY_BLOCKS))).vrf)) % 4)
149 149  
150 150  
151 151  func asInt (v) = match v {
152 152      case n: Int => 
153 153          n
154 154      case _ => 
155 155          throw("fail to cast into Int")
156 156  }
157 157  
158 158  
159 159  func fixedPoint (val,decimals) = {
160 160      let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
161 161      let lowPart = toString((val % tenPow))
162 162      let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
163 163      (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
164 164      }
165 165  
166 166  
167 167  func getRandomNumber (maxValue,salt,entropy) = if ((0 >= maxValue))
168 168      then throw("maxValue should be > 0")
169 169      else {
170 170          let randomHash = sha256_16Kb((salt + entropy))
171 171          (toInt(randomHash) % maxValue)
172 172          }
173 173  
174 174  
175 175  let SCALE8 = 100000000
176 176  
177 177  let xpLevelScale = 3200
178 178  
179 179  let xpLevelRecipPow = 4000
180 180  
181 181  let numPointsOnLevelUp = 3
182 182  
183 183  let wlgBaseAmountXp = 100000000000
184 184  
185 185  func keyUserXP (addr) = ("userXP_" + addr)
186 186  
187 187  
188 188  func keyUserLevel (addr) = ("userLevel_" + addr)
189 189  
190 190  
191 191  let xpWlg = 10000
192 192  
193 193  func levelByXP (xp) = fraction(xpLevelScale, pow(xp, 4, xpLevelRecipPow, 4, 4, DOWN), SCALE8)
194 194  
195 195  
196 196  func levelUp (currLevel,newXP) = {
197 197      let newLevel = levelByXP(newXP)
198 198  [newLevel, (numPointsOnLevelUp * (newLevel - currLevel))]
199 199      }
200 200  
201 201  
202 202  let MILLION6 = 100000000000000
203 203  
204 204  let PLAYERSHARE = 400000
205 205  
206 206  let DAYMILLIS = 86400000
207 207  
208 208  let teamAddrKey = "teamAddr"
209 209  
210 210  let lastTeamTimeKey = "lastClaimedTime_team"
211 211  
212 212  let teamAmountLeftKey = "teamAmountLeft"
213 213  
214 214  let lastActivitiesTimeKey = "lastClaimedTime_activities"
215 215  
216 216  let actAmountLeftKey = "activitiesAmountLeft"
217 217  
218 218  let stakersAmountLeftKey = "stakersAmountLeft"
219 219  
220 220  func keyLastWlgTradeTimeByUser (addr) = ("lastArbTimeUser_" + addr)
221 221  
222 222  
223 223  func keyLastWlgTradeLimitByUser (addr) = ("lastWlgLimitUser_" + addr)
224 224  
225 225  
226 226  let wlgIssueTimeKey = "wlg_issueTime"
227 227  
228 228  let wlgIssuedAmountKey = "wlg_issuedAmount"
229 229  
230 230  func keyAcresStakedAmountByUser (addr) = ("acresStakedAmountByUser_" + addr)
231 231  
232 232  
233 233  func keyWlgStakedAmountByUser (addr) = ("wlgStakedAmountByUser_" + addr)
234 234  
235 235  
236 236  let wlgStakedTotalKey = "wlgStakedAmountTotal"
237 237  
238 238  func keyWlgStakedTimeByUser (addr) = ("wlgStakedTimeByUser_" + addr)
239 239  
240 240  
241 241  let M6_ = 1000000
242 242  
243 243  let M8_ = 100000000
244 244  
245 245  let TEAM_SHARE = 200000
246 246  
247 247  let ACTIVITY_SHARE = 100000
248 248  
249 249  let PLAYER_SHARE = 400000
250 250  
251 251  let YEAR_MILLIS = 31557600000
252 252  
253 253  let DAY_MS = 86400000
254 254  
255 255  let ISSUE10 = 1000000000
256 256  
257 257  let PLAYERS10_SHARE = 800000
258 258  
259 259  let MARKETING10_SHARE = 100000
260 260  
261 261  let TEAM10_SHARE = 100000
262 262  
263 263  let NEW_STAKING_START = 1731279600000
264 264  
265 265  let marketingAddrKey = "marketingAddr"
266 266  
267 267  let teamAdrKey = "teamAddr"
268 268  
269 269  let lastTeamTimKey = "lastClaimedTime_team"
270 270  
271 271  let teamAmtLeftKey = "teamAmountLeft"
272 272  
273 273  let lastActivitiesTimKey = "lastClaimedTime_activities"
274 274  
275 275  let actAmtLeftKey = "activitiesAmountLeft"
276 276  
277 277  let stakersAmtLeftKey = "stakersAmountLeft"
278 278  
279 279  func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
280 280  
281 281  
282 282  func distrByPeriod (issuedAmount,period) = fraction(issuedAmount, (PLAYER_SHARE * (period + 1)), (6 * M6_))
283 283  
284 284  
285 285  let wlgIssue10TimeKey = "wlg_issue10Time"
286 286  
287 287  let wlgIssueTimKey = "wlg_issueTime"
288 288  
289 289  let wlgIssuedAmtKey = "wlg_issuedAmount"
290 290  
291 291  let zbIssuedAmtKey = "zbill_issuedAmount"
292 292  
293 293  func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
294 294  
295 295  
296 296  let acresStakdTotalKey = "acresStakedAmountTotal"
297 297  
298 298  let totalFarmingPowerKey = "totalFarmingPower"
299 299  
300 300  let dapp2Rest = 0
301 301  
302 302  let dapp2Staking = 1
303 303  
304 304  let dapp2Wlg = 2
305 305  
306 306  let dapp2Puzzle = 3
307 307  
308 308  let dapp2InvestFund = 4
309 309  
310 310  let IdxDtx1PercGemWinner = 1
311 311  
312 312  let DEFAULT_WEEKLY_PRIZES = 5
313 313  
314 314  func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
315 315  
316 316  
317 317  let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
318 318  
319 319  func getLevelByAcres (acres) = {
320 320      let acr = ((acres + 99999999) / M8_)
321 321      func checker (acc,item) =     if ((item >= acr))
322 322          then acc
323 323          else (acc + 1)
324 324  
325 325      let $l = levelAcres
326 326      let $s = size($l)
327 327      let $acc0 = 0
328 328      func $f0_1 ($a,$i) =     if (($i >= $s))
329 329          then $a
330 330          else checker($a, $l[$i])
331 331  
332 332      func $f0_2 ($a,$i) =     if (($i >= $s))
333 333          then $a
334 334          else throw("List size exceeds 10")
335 335  
336 336      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
337 337      }
338 338  
339 339  
340 340  func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
341 341  
342 342  
343 343  func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
344 344      let notBonused = getFarmingPowerByAcres(acres)
345 345      $Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
346 346      }
347 347  
348 348  
349 349  func getFarmingPowers (userAddrStrOrEmpty,acres2Contract) = {
350 350      let totalFP = valueOrElse(getInteger(acres2Contract, totalFarmingPowerKey), 0)
351 351      let userAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
352 352      let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(userAddrStrOrEmpty)), 0)
353 353      let $t079143 = getFarmingPowerByAcresAndBonus(userAcres, userBonus)
354 354      let userFPbonused = $t079143._1
355 355      let userFPnotBonused = $t079143._2
356 356  [totalFP, userFPbonused, userFPnotBonused, userBonus]
357 357      }
358 358  
359 359  
360 360  let idxTotalFP = 0
361 361  
362 362  let idxUserFPbonused = 1
363 363  
364 364  let ixWlgAmount = 0
365 365  
366 366  let ixWlgWlg = 1
367 367  
368 368  let ixWlgPrice = 2
369 369  
370 370  let ixWlgIssueTime = 8
371 371  
372 372  let ixWlgTeamAmLeft = 11
373 373  
374 374  let ixWlgTeamAmAvailNow = 12
375 375  
376 376  let ixWlgActAmLeft = 15
377 377  
378 378  let ixWlgActAmAvailNow = 16
379 379  
380 380  let ixWlgAmLeftTotal = 19
381 381  
382 382  let ixWlgUserAmAvailNow = 23
383 383  
384 384  let ixWlgEffUserTime = 24
385 385  
386 386  let ixWlgIssue10Amount = 25
387 387  
388 388  let ixWlgMarketingIssue10Amount = 26
389 389  
390 390  let ixWlgTeamIssue10Amount = 27
391 391  
392 392  let ixWlgUser10part = 28
393 393  
394 394  let ixWlgIssue10Time = 29
395 395  
396 396  func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
397 397      let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
398 398      let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
399 399      let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
400 400      let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
401 401      let acres2Usd = assetBalance(contracts[dapp2Staking], usdtId)
402 402      let investFndContract = contracts[dapp2InvestFund]
403 403      let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
404 404      let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
405 405      let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
406 406      let now = lastBlock.timestamp
407 407      let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
408 408      let wlgWlg = assetBalance(contracts[dapp2Wlg], wlgId)
409 409      let teamTotal = fraction(issuedAmount, TEAM_SHARE, M6_)
410 410      let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
411 411      let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
412 412      let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
413 413      let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
414 414      let teamWlgold = assetBalance(teamAddr, wlgId)
415 415      let actTotal = fraction(issuedAmount, ACTIVITY_SHARE, M6_)
416 416      let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
417 417      let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
418 418      let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
419 419      let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
420 420      let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
421 421      let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
422 422      let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
423 423      let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
424 424      let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
425 425      let curPeriodDistribution = distrByPeriod(issuedAmount, curPeriod)
426 426      let prevPeriodEnd = (issueTime + (YEAR_MILLIS * curPeriod))
427 427      let prevPrevPeriodEnd = (issueTime + (YEAR_MILLIS * (curPeriod - 1)))
428 428      let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
429 429      let userAvailable = if ((lastUserPeriod == curPeriod))
430 430          then a0
431 431          else if ((lastUserPeriod == (curPeriod - 1)))
432 432              then {
433 433                  let a1 = fraction(distrByPeriod(issuedAmount, (curPeriod - 1)), (prevPeriodEnd - lastUserTime), YEAR_MILLIS)
434 434                  (a1 + a0)
435 435                  }
436 436              else {
437 437                  let a2 = fraction(distrByPeriod(issuedAmount, (curPeriod - 2)), (prevPrevPeriodEnd - lastUserTime), YEAR_MILLIS)
438 438                  let a1 = distrByPeriod(issuedAmount, (curPeriod - 1))
439 439                  ((a2 + a1) + a0)
440 440                  }
441 441      let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
442 442      let userAmount = if ((eff[idxTotalFP] != 0))
443 443          then fraction(userAvailable, eff[idxUserFPbonused], eff[idxTotalFP])
444 444          else 0
445 445      let lastIssue10Time = valueOrElse(getInteger(contracts[dapp2Wlg], wlgIssue10TimeKey), NEW_STAKING_START)
446 446      let issue10Amount = fraction(ISSUE10, max([(now - lastIssue10Time), 0]), DAY_MS)
447 447      let marketingIssue10Amount = fraction(issue10Amount, MARKETING10_SHARE, M6_)
448 448      let teamIssue10Amount = fraction(issue10Amount, TEAM10_SHARE, M6_)
449 449      let user10Interval = max([(now - max([NEW_STAKING_START, lastUserTime])), 0])
450 450      let user10part = if ((eff[idxTotalFP] != 0))
451 451          then fraction(fraction(fraction(ISSUE10, user10Interval, DAY_MS), eff[idxUserFPbonused], eff[idxTotalFP]), PLAYERS10_SHARE, M6_)
452 452          else 0
453 453      let newIssue10Time = max([NEW_STAKING_START, now])
454 454      let acresStakedTotal = valueOrElse(getInteger(contracts[dapp2Staking], acresStakdTotalKey), 0)
455 455  [issuedAmount, wlgWlg, fraction(totalFundsUsd, M8_, issuedAmount), totalFundsUsd, restUsd, acres2Usd, wlgUsd, puzzleUsd, issueTime, lastTeamTime, teamTotal, teamAmountLeft, teamAmountAvailableNow, teamWlgold, actTotal, actAmountLeft, actAmountAvailableNow, actWlgold, curPeriod, amountLeftTotal, curPeriodDistribution, lastUserTime, investFundTotal, userAmount, nowLimited, issue10Amount, marketingIssue10Amount, teamIssue10Amount, user10part, newIssue10Time, eff[idxTotalFP], acresStakedTotal]
456 456      }
457 457  
458 458  
459 459  let profitAddrKey = "profitAddr"
460 460  
461 461  let stakersAmountPaidTotalKey = "stakersAmountPaidTotal"
462 462  
463 463  func keyStakersAmountPaidUser (addr) = ("stakersAmountPaidUser_" + addr)
464 464  
465 465  
466 466  func prolog2 () = asInt(reentrantInvoke(acres2Contract, "saveLastTx", nil, nil))
467 467  
468 468  
469 469  func getSwapLimitWlgold (addr) = {
470 470      let lastTime = valueOrElse(getInteger(keyLastWlgTradeTimeByUser(addr)), 0)
471 471      let defaultLimit = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmountByUser(addr)), 0)
472 472      let lastLimitLeft = valueOrElse(getInteger(keyLastWlgTradeLimitByUser(addr)), defaultLimit)
473 473      let currentLimit = (lastLimitLeft + fraction(defaultLimit, (lastBlock.timestamp - lastTime), DAY_MILLIS))
474 474      min([currentLimit, defaultLimit])
475 475      }
476 476  
477 477  
478 478  func claimInternal2 (addr) = {
479 479      let curStats = getWlgStats2(addr, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
480 480      let userTimeKey = keyLastClaimTimeByUser(addr)
481 481      let lastUserTime = valueOrElse(getInteger(userTimeKey), 0)
482 482      let userEffTime = curStats[ixWlgEffUserTime]
483 483      if ((lastUserTime == userEffTime))
484 484          then $Tuple2(nil, 0)
485 485          else {
486 486              let now = lastBlock.timestamp
487 487              let issueTime = curStats[ixWlgIssueTime]
488 488              let teamAmountLeft = curStats[ixWlgTeamAmLeft]
489 489              let teamAmount = (curStats[ixWlgTeamAmAvailNow] + curStats[ixWlgTeamIssue10Amount])
490 490              let teamTransfer = if ((teamAmount > 0))
491 491                  then [ScriptTransfer(addressFromStringValue(value(getString(teamAddrKey))), teamAmount, wlgAssetId)]
492 492                  else nil
493 493              let actAmountLeft = curStats[ixWlgActAmLeft]
494 494              let actAmount = curStats[ixWlgActAmAvailNow]
495 495              let actTransfer = if ((actAmount > 0))
496 496                  then [ScriptTransfer(restContract, actAmount, wlgAssetId)]
497 497                  else nil
498 498              let marketingAmount = curStats[ixWlgMarketingIssue10Amount]
499 499              let marketingTransfer = if ((marketingAmount > 0))
500 500                  then [ScriptTransfer(addressFromStringValue(value(getString(marketingAddrKey))), marketingAmount, wlgAssetId)]
501 501                  else nil
502 502              let userAmount = curStats[ixWlgUserAmAvailNow]
503 503              let userKey = keyStakersAmountPaidUser(addr)
504 504              let userTotal = (userAmount + curStats[ixWlgUser10part])
505 505              let issued10Amount = curStats[ixWlgIssue10Amount]
506 506              $Tuple2(((([Reissue(wlgAssetId, issued10Amount, true), IntegerEntry(wlgIssuedAmountKey, (curStats[ixWlgAmount] + issued10Amount)), IntegerEntry(wlgIssue10TimeKey, curStats[ixWlgIssue10Time]), IntegerEntry(userKey, (valueOrElse(getInteger(userKey), 0) + userAmount)), IntegerEntry(stakersAmountPaidTotalKey, (valueOrElse(getInteger(stakersAmountPaidTotalKey), 0) + userAmount)), IntegerEntry(stakersAmountLeftKey, (curStats[ixWlgAmLeftTotal] - userAmount)), IntegerEntry(teamAmountLeftKey, ((teamAmountLeft - teamAmount) + curStats[ixWlgTeamIssue10Amount])), IntegerEntry(lastTeamTimeKey, now), IntegerEntry(actAmountLeftKey, (actAmountLeft - actAmount)), IntegerEntry(lastActivitiesTimeKey, now), IntegerEntry(userTimeKey, userEffTime)] ++ teamTransfer) ++ actTransfer) ++ marketingTransfer), userTotal)
507 507              }
508 508      }
509 509  
510 510  
511 511  func takeXpInternal (addr,delta) = {
512 512      let now = lastBlock.timestamp
513 513      let timeKey = keyWlgStakedTimeByUser(addr)
514 514      let amountKey = keyWlgStakedAmountByUser(addr)
515 515      let lastTime = valueOrElse(getInteger(timeKey), 0)
516 516      let oldUser = valueOrElse(getInteger(amountKey), 0)
517 517      let oldTotal = valueOrElse(getInteger(wlgStakedTotalKey), 0)
518 518      let xp = fraction(fraction(xpWlg, oldUser, wlgBaseAmountXp), (lastTime - now), DAYMILLIS)
519 519      $Tuple3([IntegerEntry(timeKey, now), IntegerEntry(amountKey, (oldUser + delta)), IntegerEntry(wlgStakedTotalKey, (oldTotal + delta))], xp, oldUser)
520 520      }
521 521  
522 522  
523 523  func openChestInternal (addr) = {
524 524      let week = (height / WEEK_BLOCKS)
525 525      let drawWeek = (week - 1)
526 526      let numPrizes = valueOrElse(getInteger(keyNumNFT2Draw(drawWeek)), DEFAULT_WEEKLY_PRIZES)
527 527      let prizesDrawn = valueOrElse(getInteger(keyNumNFTDrawn(drawWeek)), 0)
528 528      let userTickets = valueOrElse(getInteger(keyUserWeekTickets(addr, drawWeek)), 0)
529 529      if ((0 >= userTickets))
530 530          then $Tuple2(nil, unit)
531 531          else {
532 532              let weekTickets = valueOrElse(getInteger(keyTotalWeekTickets(drawWeek)), 0)
533 533              if ((0 >= weekTickets))
534 534                  then $Tuple2([DeleteEntry(keyUserWeekTickets(addr, drawWeek))], unit)
535 535                  else {
536 536                      let entropy = value(value(blockInfoByHeight((week * WEEK_BLOCKS))).vrf)
537 537                      let salt = fromBase58String(split(valueOrElse(getString(keyLastWeekTxIdByUser(addr)), "42_DEFAULT"), "_")[1])
538 538                      let random = getRandomNumber(weekTickets, salt, entropy)
539 539                      if (((userTickets * numPrizes) > random))
540 540                          then {
541 541                              let issueResult = invoke(acres2Contract, "issueNFT", [addr, IdxDtx1PercGemWinner], nil)
542 542                              let winners = getString(keyWeekWinners(drawWeek))
543 543                              let newWinners = if (isDefined(winners))
544 544                                  then ((value(winners) + "_") + addr)
545 545                                  else addr
546 546                              $Tuple2([IntegerEntry(keyNumNFTDrawn(drawWeek), (prizesDrawn + 1)), DeleteEntry(keyUserWeekTickets(addr, drawWeek)), StringEntry(keyWeekWinners(drawWeek), newWinners)], issueResult)
547 547                              }
548 548                          else {
549 549                              let random1 = (getRandomNumber(9, (base58'29' + salt), entropy) + 1)
550 550                              let consTickets = fraction(userTickets, random1, 10)
551 551                              $Tuple2([DeleteEntry(keyUserWeekTickets(addr, drawWeek)), IntegerEntry(keyUserWeekTickets(addr, week), consTickets)], consTickets)
552 552                              }
553 553                      }
554 554              }
555 555      }
556 556  
557 557  
558 558  func claimTicketsInternal (addr,userBetStr) = {
559 559      let week = (height / WEEK_BLOCKS)
560 560      let ticketsKey = keyUserWeekTickets(addr, week)
561 561      let dayBet = split(userBetStr, "_")
562 562      let oldTotalTickets = valueOrElse(getInteger(keyTotalWeekTickets(week)), 0)
563 563      let oldTickets = valueOrElse(getInteger(ticketsKey), 0)
564 564      let deltaTickets = if ((winningBet(parseIntValue(dayBet[0])) == parseIntValue(dayBet[1])))
565 565          then 1
566 566          else 0
567 567      let oldParticipants = valueOrElse(getInteger(keyTotalWeekParticipants(week)), 0)
568 568      let updateParticipants = if (if ((oldTickets == 0))
569 569          then (deltaTickets == 1)
570 570          else false)
571 571          then [IntegerEntry(keyTotalWeekParticipants(week), (oldParticipants + 1))]
572 572          else nil
573 573      $Tuple2(if ((deltaTickets == 0))
574 574          then nil
575 575          else ((updateParticipants :+ IntegerEntry(ticketsKey, (oldTickets + deltaTickets))) :+ IntegerEntry(keyTotalWeekTickets(week), (oldTotalTickets + deltaTickets))), deltaTickets)
576 576      }
577 577  
578 578  
579 579  @Callable(i)
580 580  func constructorV1 (restAddr,marketingAddr,teamAddr,profitAddr) = if ((i.caller != this))
581 581      then throw("Permission denied")
582 582      else if (isDefined(getBinary(wlgAssetIdKey)))
583 583          then throw("Already initialized")
584 584          else {
585 585              let issuedAmount = MILLION6
586 586              let issue = Issue("WLGOLD", "WavesLands Gold investment token", issuedAmount, 8, true, unit, 0)
587 587              let assetId = calculateAssetId(issue)
588 588  [issue, IntegerEntry(wlgIssueTimeKey, lastBlock.timestamp), IntegerEntry(wlgIssuedAmountKey, issuedAmount), IntegerEntry(stakersAmountPaidTotalKey, 0), IntegerEntry(stakersAmountLeftKey, fraction(MILLION6, PLAYERSHARE, MULT6)), BinaryEntry(wlgAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr), StringEntry(marketingAddrKey, marketingAddr), StringEntry(teamAddrKey, teamAddr), StringEntry(profitAddrKey, profitAddr)]
589 589              }
590 590  
591 591  
592 592  
593 593  @Callable(i)
594 594  func constructorV2 (rest2Addr) = if ((i.caller != this))
595 595      then throw("Permission denied")
596 596      else [StringEntry(keyRest2Address(), rest2Addr)]
597 597  
598 598  
599 599  
600 600  @Callable(i)
601 601  func buyWlg (minToReceive) = {
602 602      let prologResult = prolog2()
603 603      if ((prologResult == prologResult))
604 604          then if ((size(i.payments) != 1))
605 605              then throw("exactly 1 payment must be attached")
606 606              else {
607 607                  let pmt = i.payments[0]
608 608                  let usdtAmt = pmt.amount
609 609                  if (if (!(isDefined(pmt.assetId)))
610 610                      then true
611 611                      else (value(pmt.assetId) != usdtAssetId))
612 612                      then throw("USDT payments only!")
613 613                      else {
614 614                          let caller = i.caller
615 615                          let addr = toString(caller)
616 616                          if ((MINSHOPPAYMENT > usdtAmt))
617 617                              then throw((("You can trade min " + fixedPoint(MINSHOPPAYMENT, 6)) + " USDT"))
618 618                              else {
619 619                                  let curStats = getWlgStats2("", [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, usdtAmt)
620 620                                  let curWlgAmount = curStats[ixWlgAmount]
621 621                                  let wlgPrice = curStats[ixWlgPrice]
622 622                                  let buyPrice = fraction(wlgPrice, 6, 5, CEILING)
623 623                                  let wlgAmount = fraction(usdtAmt, MULT8, buyPrice)
624 624                                  let maxWlg = getSwapLimitWlgold(addr)
625 625                                  if ((wlgAmount > maxWlg))
626 626                                      then throw((("You can get max " + fixedPoint(maxWlg, 8)) + " WLGOLD at the moment"))
627 627                                      else if ((minToReceive > wlgAmount))
628 628                                          then throw("Price changed during operation, please try again")
629 629                                          else {
630 630                                              let profitAmount = (usdtAmt / 6)
631 631                                              $Tuple2([Reissue(wlgAssetId, wlgAmount, true), IntegerEntry(wlgIssuedAmountKey, (curWlgAmount + wlgAmount)), IntegerEntry(keyLastWlgTradeTimeByUser(addr), lastBlock.timestamp), IntegerEntry(keyLastWlgTradeLimitByUser(addr), (maxWlg - wlgAmount)), ScriptTransfer(addressFromStringValue(value(getString(profitAddrKey))), profitAmount, usdtAssetId), ScriptTransfer(caller, wlgAmount, wlgAssetId)], prologResult)
632 632                                              }
633 633                                  }
634 634                          }
635 635                  }
636 636          else throw("Strict value is not equal to itself.")
637 637      }
638 638  
639 639  
640 640  
641 641  @Callable(i)
642 642  func buyWlgREADONLY (address,usdtAmt) = {
643 643      let curStats = getWlgStats2("", [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, usdtAmt)
644 644      let wlgPrice = curStats[ixWlgPrice]
645 645      let buyPrice = fraction(wlgPrice, 6, 5, CEILING)
646 646      let wlgAmount = fraction(usdtAmt, MULT8, buyPrice)
647 647      let maxWlg = getSwapLimitWlgold(address)
648 648      let maxUsdt = fraction(maxWlg, buyPrice, MULT8)
649 649      let profitAmount = (usdtAmt / 6)
650 650      $Tuple2(nil, [wlgAmount, MINSHOPPAYMENT, maxUsdt, profitAmount])
651 651      }
652 652  
653 653  
654 654  
655 655  @Callable(i)
656 656  func sellWlg (minAmount) = {
657 657      let prologResult = prolog2()
658 658      if ((prologResult == prologResult))
659 659          then if ((size(i.payments) != 1))
660 660              then throw("exactly 1 payment must be attached")
661 661              else {
662 662                  let pmt = i.payments[0]
663 663                  let wlgAmt = pmt.amount
664 664                  let caller = i.caller
665 665                  let addr = toString(caller)
666 666                  let maxWlg = getSwapLimitWlgold(addr)
667 667                  if ((wlgAmt > maxWlg))
668 668                      then throw((("You can spend max " + fixedPoint(maxWlg, 8)) + " WLGOLD at the moment"))
669 669                      else if (if (!(isDefined(pmt.assetId)))
670 670                          then true
671 671                          else (value(pmt.assetId) != wlgAssetId))
672 672                          then throw("WLGOLD payments only!")
673 673                          else {
674 674                              let curStats = getWlgStats2("", [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
675 675                              let curWlgAmount = curStats[ixWlgAmount]
676 676                              let sellPrice = (curStats[ixWlgPrice] / 2)
677 677                              let usdtAmt = fraction(wlgAmt, sellPrice, MULT8)
678 678                              if ((MINSHOPPAYMENT > usdtAmt))
679 679                                  then throw((("You can trade min " + fixedPoint(MINSHOPPAYMENT, 6)) + " USDT"))
680 680                                  else if ((minAmount > usdtAmt))
681 681                                      then throw("Price changed during operation, please try again")
682 682                                      else {
683 683                                          let profitAmount = (usdtAmt / 5)
684 684                                          $Tuple2([Burn(wlgAssetId, wlgAmt), IntegerEntry(wlgIssuedAmountKey, (curWlgAmount - wlgAmt)), IntegerEntry(keyLastWlgTradeTimeByUser(addr), lastBlock.timestamp), IntegerEntry(keyLastWlgTradeLimitByUser(addr), (maxWlg - wlgAmt)), ScriptTransfer(addressFromStringValue(value(getString(profitAddrKey))), profitAmount, usdtAssetId), ScriptTransfer(caller, usdtAmt, usdtAssetId)], prologResult)
685 685                                          }
686 686                              }
687 687                  }
688 688          else throw("Strict value is not equal to itself.")
689 689      }
690 690  
691 691  
692 692  
693 693  @Callable(i)
694 694  func sellWlgREADONLY (address,wlgAmt) = {
695 695      let maxWlg = getSwapLimitWlgold(address)
696 696      let curStats = getWlgStats2("", [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
697 697      let sellPrice = (curStats[ixWlgPrice] / 2)
698 698      let usdtAmt = fraction(wlgAmt, sellPrice, MULT8)
699 699      let minWlg = fraction(MINSHOPPAYMENT, MULT8, sellPrice)
700 700      let profitAmount = (usdtAmt / 5)
701 701      $Tuple2(nil, [usdtAmt, minWlg, maxWlg, profitAmount])
702 702      }
703 703  
704 704  
705 705  
706 706  @Callable(i)
707 707  func claim () = {
708 708      let prologResult = prolog2()
709 709      if ((prologResult == prologResult))
710 710          then if ((size(i.payments) != 0))
711 711              then throw("No payments required")
712 712              else {
713 713                  let $t01404514114 = claimInternal2(toString(i.caller))
714 714                  let actions = $t01404514114._1
715 715                  let wlgClaimedAmount = $t01404514114._2
716 716                  $Tuple2((actions :+ ScriptTransfer(i.caller, wlgClaimedAmount, wlgAssetId)), prologResult)
717 717                  }
718 718          else throw("Strict value is not equal to itself.")
719 719      }
720 720  
721 721  
722 722  
723 723  @Callable(i)
724 724  func onStakeUnstakeLand (addr) = if (if (if ((i.caller != stakingContract))
725 725      then (i.caller != acresContract)
726 726      else false)
727 727      then (i.caller != acres2Contract)
728 728      else false)
729 729      then throw("Permission denied")
730 730      else {
731 731          let $t01443314487 = claimInternal2(addr)
732 732          let actions = $t01443314487._1
733 733          let wlgClaimedAmount = $t01443314487._2
734 734          $Tuple2(if ((wlgClaimedAmount > 0))
735 735              then (actions :+ ScriptTransfer(addressFromStringValue(addr), wlgClaimedAmount, wlgAssetId))
736 736              else actions, wlgClaimedAmount)
737 737          }
738 738  
739 739  
740 740  
741 741  @Callable(i)
742 742  func burnWlgold (wlgAmt) = if ((i.caller != acres2Contract))
743 743      then throw("Permission denied")
744 744      else {
745 745          let curStats = getWlgStats2("", [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
746 746          if ((wlgAmt > curStats[ixWlgWlg]))
747 747              then throw(((("Only " + fixedPoint(curStats[ixWlgWlg], 8)) + " WLGOLD left on contract, can't burn ") + fixedPoint(wlgAmt, 8)))
748 748              else {
749 749                  let wlgAmountLeft = (curStats[ixWlgAmount] - wlgAmt)
750 750                  $Tuple2([Burn(wlgAssetId, wlgAmt), IntegerEntry(wlgIssuedAmountKey, wlgAmountLeft)], wlgAmountLeft)
751 751                  }
752 752          }
753 753  
754 754  
755 755  
756 756  @Callable(i)
757 757  func betForTicket (bet) = {
758 758      let prologResult = prolog2()
759 759      if ((prologResult == prologResult))
760 760          then if ((size(i.payments) != 0))
761 761              then throw("No payments required")
762 762              else {
763 763                  let addr = toString(i.caller)
764 764                  let drawWeek = ((height / WEEK_BLOCKS) - 1)
765 765                  let userTickets = valueOrElse(getInteger(keyUserWeekTickets(addr, drawWeek)), 0)
766 766                  let weekTickets = valueOrElse(getInteger(keyTotalWeekTickets(drawWeek)), 0)
767 767                  if (if ((userTickets > 0))
768 768                      then (weekTickets > 0)
769 769                      else false)
770 770                      then throw("Please open the chest first")
771 771                      else if (((bet / 4) != 0))
772 772                          then throw("Invalid bet: should be 0..3")
773 773                          else {
774 774                              let moment = (height % DAY_BLOCKS)
775 775                              if ((moment > (DAY_BLOCKS - 3)))
776 776                                  then throw((("Cannot bet: the day is almost ended, please wait " + toString((DAY_BLOCKS - moment))) + " blocks"))
777 777                                  else {
778 778                                      let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(addr)), 0)
779 779                                      let lvl = getLevelByAcres(stakedAcres)
780 780                                      if ((lvl == 0))
781 781                                          then throw("You need to stake some ACRES to bet")
782 782                                          else {
783 783                                              let tomorrow = ((height / DAY_BLOCKS) + 1)
784 784                                              let betKey = keyUserBet(addr)
785 785                                              let oldUserBetStr = getString(betKey)
786 786                                              let newBetEntry = StringEntry(betKey, ((toString(tomorrow) + "_") + toString(bet)))
787 787                                              if (isDefined(oldUserBetStr))
788 788                                                  then {
789 789                                                      let userBet = value(oldUserBetStr)
790 790                                                      if ((split(userBet, "_")[0] == toString(tomorrow)))
791 791                                                          then throw("You already bet for tomorrow")
792 792                                                          else {
793 793                                                              let r = claimTicketsInternal(addr, userBet)
794 794                                                              $Tuple2((r._1 :+ newBetEntry), r._2)
795 795                                                              }
796 796                                                      }
797 797                                                  else $Tuple2([newBetEntry], 0)
798 798                                              }
799 799                                      }
800 800                              }
801 801                  }
802 802          else throw("Strict value is not equal to itself.")
803 803      }
804 804  
805 805  
806 806  
807 807  @Callable(i)
808 808  func takeWlgXp (addr) = if ((i.caller != stakingContract))
809 809      then throw("Permission denied")
810 810      else {
811 811          let $t01708717130 = takeXpInternal(addr, 0)
812 812          let actions = $t01708717130._1
813 813          let xp = $t01708717130._2
814 814          $Tuple2(actions, xp)
815 815          }
816 816  
817 817  
818 818  
819 819  @Callable(i)
820 820  func checkWlgXpREADONLY (addr) = {
821 821      let $t01720717255 = takeXpInternal(addr, 0)
822 822      let ignored = $t01720717255._1
823 823      let deltaXP = $t01720717255._2
824 824      let newXP = (valueOrElse(getInteger(stakingContract, keyUserXP(addr)), 0) + deltaXP)
825 825      let lvlPoints = levelUp(valueOrElse(getInteger(stakingContract, keyUserLevel(addr)), 0), newXP)
826 826      $Tuple2(nil, (lvlPoints :+ newXP))
827 827      }
828 828  
829 829  
830 830  
831 831  @Callable(i)
832 832  func setNumPrizes (numPrizes) = if ((i.caller != this))
833 833      then throw("Permission denied")
834 834      else {
835 835          let week = (height / WEEK_BLOCKS)
836 836          $Tuple2([IntegerEntry(keyNumNFT2Draw(week), numPrizes)], numPrizes)
837 837          }
838 838  
839 839  
840 840  
841 841  @Callable(i)
842 842  func openChest () = if (!(KS_ALLOW_NFT_DRAW))
843 843      then throw("Temporarily disabled")
844 844      else {
845 845          let prologResult = prolog2()
846 846          if ((prologResult == prologResult))
847 847              then if ((size(i.payments) != 0))
848 848                  then throw("No payments required")
849 849                  else {
850 850                      let drawWeek = ((height / WEEK_BLOCKS) - 1)
851 851                      let addr = toString(i.caller)
852 852                      let userTickets = valueOrElse(getInteger(keyUserWeekTickets(addr, drawWeek)), 0)
853 853                      if ((0 >= userTickets))
854 854                          then throw("No gems to open the chest")
855 855                          else openChestInternal(addr)
856 856                      }
857 857              else throw("Strict value is not equal to itself.")
858 858          }
859 859  
860 860

Old	New	Differences
1	1	{-# STDLIB_VERSION 6 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let SEP = "__"
5	5
6	6	let MULT6 = 1000000
7	7
8	8	let MULT8 = 100000000
9	9
10	10	let MINSHOPPAYMENT = 100000
11	11
12	12	let DAY_MILLIS = 86400000
13	13
14	14	let chain = take(drop(this.bytes, 1), 1)
15	15
16	16	let DAY_BLOCKS = match chain {
17	17	case _ =>
18	18	if ((base58'2W' == $match0))
19	19	then 1440
20	20	else if ((base58'2T' == $match0))
21	21	then 60
22	22	else throw("Unknown chain")
23	23	}
24	24
25	25	let WEEK_BLOCKS = match chain {
26	26	case _ =>
27	27	if ((base58'2W' == $match0))
28	28	then 10080
29	29	else if ((base58'2T' == $match0))
30	30	then 180
31	31	else throw("Unknown chain")
32	32	}
33	33
34	34	let usdtAssetId = match chain {
35	35	case _ =>
36	36	if ((base58'2W' == $match0))
37	37	then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
38	38	else if ((base58'2T' == $match0))
39	39	then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
40	40	else throw("Unknown chain")
41	41	}
42	42
43	43	let defaultRest2AddressStr = match chain {
44	44	case _ =>
45	45	if ((base58'2W' == $match0))
46	46	then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
47	47	else if ((base58'2T' == $match0))
48	48	then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
49	49	else throw("Unknown chain")
50	50	}
51	51
52	52	let defaultRestAddressStr = match chain {
53	53	case _ =>
54	54	if ((base58'2W' == $match0))
55	55	then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
56	56	else if ((base58'2T' == $match0))
57	57	then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
58	58	else throw("Unknown chain")
59	59	}
60	60
61	61	let KS_ALLOW_NFT_DRAW = match chain {
62	62	case _ =>
63	63	if ((base58'2W' == $match0))
64	64	then false
65	65	else if ((base58'2T' == $match0))
66	66	then true
67	67	else throw("Unknown chain")
68	68	}
69	69
70	70	func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
71	71
72	72
73	73	let IdxCfgAcres2Dapp = 1
74	74
75	75	let IdxCfgWlgDapp = 2
76	76
77	77	let IdxCfgPuzzlePoolDapp = 4
78	78
79	79	let IdxCfgInvestFundDapp = 5
80	80
81	81	func keyRestCfg () = "%s__restConfig"
82	82
83	83
84	84	func keyRest2Address () = "%s__rest2Addr"
85	85
86	86
87	87	func keyRestAddress () = "%s__restAddr"
88	88
89	89
90	90	let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
91	91
92	92	func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
93	93
94	94
95	95	func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
96	96
97	97
98	98	let IdxCfgStakingDapp = 1
99	99
100	100	let IdxCfgAcresDapp = 8
101	101
102	102	let restCfg = readRestCfgOrFail(restContract)
103	103
104	104	let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
105	105
106	106	let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
107	107
108	108	let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
109	109
110	110	let rest2Cfg = readRestCfgOrFail(rest2Contract)
111	111
112	112	let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
113	113
114	114	let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
115	115
116	116	let puzzlePoolContract = getContractAddressOrFail(rest2Cfg, IdxCfgPuzzlePoolDapp)
117	117
118	118	let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
119	119
120	120	func keyLastWeekTxIdByUser (addr) = ("lastWeekTxIdByUser_" + addr)
121	121
122	122
123	123	let wlgAssetIdKey = "wlg_assetId"
124	124
125	125	let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
126	126
127	127	func keyUserBet (addr) = ("userBet_" + addr)
128	128
129	129
130	130	func keyUserWeekTickets (addr,week) = ((("userWeekTickets_" + addr) + "_") + toString(week))
131	131
132	132
133	133	func keyTotalWeekTickets (week) = ("totalWeekTickets_" + toString(week))
134	134
135	135
136	136	func keyTotalWeekParticipants (week) = ("totalWeekParticipants_" + toString(week))
137	137
138	138
139	139	func keyNumNFT2Draw (week) = ("numNFT2Draw_" + toString(week))
140	140
141	141
142	142	func keyNumNFTDrawn (week) = ("numNFTDrawn_" + toString(week))
143	143
144	144
145	145	func keyWeekWinners (week) = ("weekWinners_" + toString(week))
146	146
147	147
148	148	func winningBet (day) = (toInt(value(value(blockInfoByHeight((day * DAY_BLOCKS))).vrf)) % 4)
149	149
150	150
151	151	func asInt (v) = match v {
152	152	case n: Int =>
153	153	n
154	154	case _ =>
155	155	throw("fail to cast into Int")
156	156	}
157	157
158	158
159	159	func fixedPoint (val,decimals) = {
160	160	let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
161	161	let lowPart = toString((val % tenPow))
162	162	let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
163	163	(((toString((val / tenPow)) + ".") + zeroes) + lowPart)
164	164	}
165	165
166	166
167	167	func getRandomNumber (maxValue,salt,entropy) = if ((0 >= maxValue))
168	168	then throw("maxValue should be > 0")
169	169	else {
170	170	let randomHash = sha256_16Kb((salt + entropy))
171	171	(toInt(randomHash) % maxValue)
172	172	}
173	173
174	174
175	175	let SCALE8 = 100000000
176	176
177	177	let xpLevelScale = 3200
178	178
179	179	let xpLevelRecipPow = 4000
180	180
181	181	let numPointsOnLevelUp = 3
182	182
183	183	let wlgBaseAmountXp = 100000000000
184	184
185	185	func keyUserXP (addr) = ("userXP_" + addr)
186	186
187	187
188	188	func keyUserLevel (addr) = ("userLevel_" + addr)
189	189
190	190
191	191	let xpWlg = 10000
192	192
193	193	func levelByXP (xp) = fraction(xpLevelScale, pow(xp, 4, xpLevelRecipPow, 4, 4, DOWN), SCALE8)
194	194
195	195
196	196	func levelUp (currLevel,newXP) = {
197	197	let newLevel = levelByXP(newXP)
198	198	[newLevel, (numPointsOnLevelUp * (newLevel - currLevel))]
199	199	}
200	200
201	201
202	202	let MILLION6 = 100000000000000
203	203
204	204	let PLAYERSHARE = 400000
205	205
206	206	let DAYMILLIS = 86400000
207	207
208	208	let teamAddrKey = "teamAddr"
209	209
210	210	let lastTeamTimeKey = "lastClaimedTime_team"
211	211
212	212	let teamAmountLeftKey = "teamAmountLeft"
213	213
214	214	let lastActivitiesTimeKey = "lastClaimedTime_activities"
215	215
216	216	let actAmountLeftKey = "activitiesAmountLeft"
217	217
218	218	let stakersAmountLeftKey = "stakersAmountLeft"
219	219
220	220	func keyLastWlgTradeTimeByUser (addr) = ("lastArbTimeUser_" + addr)
221	221
222	222
223	223	func keyLastWlgTradeLimitByUser (addr) = ("lastWlgLimitUser_" + addr)
224	224
225	225
226	226	let wlgIssueTimeKey = "wlg_issueTime"
227	227
228	228	let wlgIssuedAmountKey = "wlg_issuedAmount"
229	229
230	230	func keyAcresStakedAmountByUser (addr) = ("acresStakedAmountByUser_" + addr)
231	231
232	232
233	233	func keyWlgStakedAmountByUser (addr) = ("wlgStakedAmountByUser_" + addr)
234	234
235	235
236	236	let wlgStakedTotalKey = "wlgStakedAmountTotal"
237	237
238	238	func keyWlgStakedTimeByUser (addr) = ("wlgStakedTimeByUser_" + addr)
239	239
240	240
241	241	let M6_ = 1000000
242	242
243	243	let M8_ = 100000000
244	244
245	245	let TEAM_SHARE = 200000
246	246
247	247	let ACTIVITY_SHARE = 100000
248	248
249	249	let PLAYER_SHARE = 400000
250	250
251	251	let YEAR_MILLIS = 31557600000
252	252
253	253	let DAY_MS = 86400000
254	254
255	255	let ISSUE10 = 1000000000
256	256
257	257	let PLAYERS10_SHARE = 800000
258	258
259	259	let MARKETING10_SHARE = 100000
260	260
261	261	let TEAM10_SHARE = 100000
262	262
263	263	let NEW_STAKING_START = 1731279600000
264	264
265	265	let marketingAddrKey = "marketingAddr"
266	266
267	267	let teamAdrKey = "teamAddr"
268	268
269	269	let lastTeamTimKey = "lastClaimedTime_team"
270	270
271	271	let teamAmtLeftKey = "teamAmountLeft"
272	272
273	273	let lastActivitiesTimKey = "lastClaimedTime_activities"
274	274
275	275	let actAmtLeftKey = "activitiesAmountLeft"
276	276
277	277	let stakersAmtLeftKey = "stakersAmountLeft"
278	278
279	279	func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
280	280
281	281
282	282	func distrByPeriod (issuedAmount,period) = fraction(issuedAmount, (PLAYER_SHARE * (period + 1)), (6 * M6_))
283	283
284	284
285	285	let wlgIssue10TimeKey = "wlg_issue10Time"
286	286
287	287	let wlgIssueTimKey = "wlg_issueTime"
288	288
289	289	let wlgIssuedAmtKey = "wlg_issuedAmount"
290	290
291	291	let zbIssuedAmtKey = "zbill_issuedAmount"
292	292
293	293	func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
294	294
295	295
296	296	let acresStakdTotalKey = "acresStakedAmountTotal"
297	297
298	298	let totalFarmingPowerKey = "totalFarmingPower"
299	299
300	300	let dapp2Rest = 0
301	301
302	302	let dapp2Staking = 1
303	303
304	304	let dapp2Wlg = 2
305	305
306	306	let dapp2Puzzle = 3
307	307
308	308	let dapp2InvestFund = 4
309	309
310	310	let IdxDtx1PercGemWinner = 1
311	311
312	312	let DEFAULT_WEEKLY_PRIZES = 5
313	313
314	314	func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
315	315
316	316
317	317	let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
318	318
319	319	func getLevelByAcres (acres) = {
320	320	let acr = ((acres + 99999999) / M8_)
321	321	func checker (acc,item) = if ((item >= acr))
322	322	then acc
323	323	else (acc + 1)
324	324
325	325	let $l = levelAcres
326	326	let $s = size($l)
327	327	let $acc0 = 0
328	328	func $f0_1 ($a,$i) = if (($i >= $s))
329	329	then $a
330	330	else checker($a, $l[$i])
331	331
332	332	func $f0_2 ($a,$i) = if (($i >= $s))
333	333	then $a
334	334	else throw("List size exceeds 10")
335	335
336	336	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
337	337	}
338	338
339	339
340	340	func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
341	341
342	342
343	343	func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
344	344	let notBonused = getFarmingPowerByAcres(acres)
345	345	$Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
346	346	}
347	347
348	348
349	349	func getFarmingPowers (userAddrStrOrEmpty,acres2Contract) = {
350	350	let totalFP = valueOrElse(getInteger(acres2Contract, totalFarmingPowerKey), 0)
351	351	let userAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
352	352	let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(userAddrStrOrEmpty)), 0)
353	353	let $t079143 = getFarmingPowerByAcresAndBonus(userAcres, userBonus)
354	354	let userFPbonused = $t079143._1
355	355	let userFPnotBonused = $t079143._2
356	356	[totalFP, userFPbonused, userFPnotBonused, userBonus]
357	357	}
358	358
359	359
360	360	let idxTotalFP = 0
361	361
362	362	let idxUserFPbonused = 1
363	363
364	364	let ixWlgAmount = 0
365	365
366	366	let ixWlgWlg = 1
367	367
368	368	let ixWlgPrice = 2
369	369
370	370	let ixWlgIssueTime = 8
371	371
372	372	let ixWlgTeamAmLeft = 11
373	373
374	374	let ixWlgTeamAmAvailNow = 12
375	375
376	376	let ixWlgActAmLeft = 15
377	377
378	378	let ixWlgActAmAvailNow = 16
379	379
380	380	let ixWlgAmLeftTotal = 19
381	381
382	382	let ixWlgUserAmAvailNow = 23
383	383
384	384	let ixWlgEffUserTime = 24
385	385
386	386	let ixWlgIssue10Amount = 25
387	387
388	388	let ixWlgMarketingIssue10Amount = 26
389	389
390	390	let ixWlgTeamIssue10Amount = 27
391	391
392	392	let ixWlgUser10part = 28
393	393
394	394	let ixWlgIssue10Time = 29
395	395
396	396	func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
397	397	let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
398	398	let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
399	399	let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
400	400	let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
401	401	let acres2Usd = assetBalance(contracts[dapp2Staking], usdtId)
402	402	let investFndContract = contracts[dapp2InvestFund]
403	403	let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
404	404	let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
405	405	let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
406	406	let now = lastBlock.timestamp
407	407	let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
408	408	let wlgWlg = assetBalance(contracts[dapp2Wlg], wlgId)
409	409	let teamTotal = fraction(issuedAmount, TEAM_SHARE, M6_)
410	410	let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
411	411	let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
412	412	let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
413	413	let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
414	414	let teamWlgold = assetBalance(teamAddr, wlgId)
415	415	let actTotal = fraction(issuedAmount, ACTIVITY_SHARE, M6_)
416	416	let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
417	417	let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
418	418	let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
419	419	let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
420	420	let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
421	421	let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
422	422	let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
423	423	let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
424	424	let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
425	425	let curPeriodDistribution = distrByPeriod(issuedAmount, curPeriod)
426	426	let prevPeriodEnd = (issueTime + (YEAR_MILLIS * curPeriod))
427	427	let prevPrevPeriodEnd = (issueTime + (YEAR_MILLIS * (curPeriod - 1)))
428	428	let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
429	429	let userAvailable = if ((lastUserPeriod == curPeriod))
430	430	then a0
431	431	else if ((lastUserPeriod == (curPeriod - 1)))
432	432	then {
433	433	let a1 = fraction(distrByPeriod(issuedAmount, (curPeriod - 1)), (prevPeriodEnd - lastUserTime), YEAR_MILLIS)
434	434	(a1 + a0)
435	435	}
436	436	else {
437	437	let a2 = fraction(distrByPeriod(issuedAmount, (curPeriod - 2)), (prevPrevPeriodEnd - lastUserTime), YEAR_MILLIS)
438	438	let a1 = distrByPeriod(issuedAmount, (curPeriod - 1))
439	439	((a2 + a1) + a0)
440	440	}
441	441	let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
442	442	let userAmount = if ((eff[idxTotalFP] != 0))
443	443	then fraction(userAvailable, eff[idxUserFPbonused], eff[idxTotalFP])
444	444	else 0
445	445	let lastIssue10Time = valueOrElse(getInteger(contracts[dapp2Wlg], wlgIssue10TimeKey), NEW_STAKING_START)
446	446	let issue10Amount = fraction(ISSUE10, max([(now - lastIssue10Time), 0]), DAY_MS)
447	447	let marketingIssue10Amount = fraction(issue10Amount, MARKETING10_SHARE, M6_)
448	448	let teamIssue10Amount = fraction(issue10Amount, TEAM10_SHARE, M6_)
449	449	let user10Interval = max([(now - max([NEW_STAKING_START, lastUserTime])), 0])
450	450	let user10part = if ((eff[idxTotalFP] != 0))
451	451	then fraction(fraction(fraction(ISSUE10, user10Interval, DAY_MS), eff[idxUserFPbonused], eff[idxTotalFP]), PLAYERS10_SHARE, M6_)
452	452	else 0
453	453	let newIssue10Time = max([NEW_STAKING_START, now])
454	454	let acresStakedTotal = valueOrElse(getInteger(contracts[dapp2Staking], acresStakdTotalKey), 0)
455	455	[issuedAmount, wlgWlg, fraction(totalFundsUsd, M8_, issuedAmount), totalFundsUsd, restUsd, acres2Usd, wlgUsd, puzzleUsd, issueTime, lastTeamTime, teamTotal, teamAmountLeft, teamAmountAvailableNow, teamWlgold, actTotal, actAmountLeft, actAmountAvailableNow, actWlgold, curPeriod, amountLeftTotal, curPeriodDistribution, lastUserTime, investFundTotal, userAmount, nowLimited, issue10Amount, marketingIssue10Amount, teamIssue10Amount, user10part, newIssue10Time, eff[idxTotalFP], acresStakedTotal]
456	456	}
457	457
458	458
459	459	let profitAddrKey = "profitAddr"
460	460
461	461	let stakersAmountPaidTotalKey = "stakersAmountPaidTotal"
462	462
463	463	func keyStakersAmountPaidUser (addr) = ("stakersAmountPaidUser_" + addr)
464	464
465	465
466	466	func prolog2 () = asInt(reentrantInvoke(acres2Contract, "saveLastTx", nil, nil))
467	467
468	468
469	469	func getSwapLimitWlgold (addr) = {
470	470	let lastTime = valueOrElse(getInteger(keyLastWlgTradeTimeByUser(addr)), 0)
471	471	let defaultLimit = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmountByUser(addr)), 0)
472	472	let lastLimitLeft = valueOrElse(getInteger(keyLastWlgTradeLimitByUser(addr)), defaultLimit)
473	473	let currentLimit = (lastLimitLeft + fraction(defaultLimit, (lastBlock.timestamp - lastTime), DAY_MILLIS))
474	474	min([currentLimit, defaultLimit])
475	475	}
476	476
477	477
478	478	func claimInternal2 (addr) = {
479	479	let curStats = getWlgStats2(addr, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
480	480	let userTimeKey = keyLastClaimTimeByUser(addr)
481	481	let lastUserTime = valueOrElse(getInteger(userTimeKey), 0)
482	482	let userEffTime = curStats[ixWlgEffUserTime]
483	483	if ((lastUserTime == userEffTime))
484	484	then $Tuple2(nil, 0)
485	485	else {
486	486	let now = lastBlock.timestamp
487	487	let issueTime = curStats[ixWlgIssueTime]
488	488	let teamAmountLeft = curStats[ixWlgTeamAmLeft]
489	489	let teamAmount = (curStats[ixWlgTeamAmAvailNow] + curStats[ixWlgTeamIssue10Amount])
490	490	let teamTransfer = if ((teamAmount > 0))
491	491	then [ScriptTransfer(addressFromStringValue(value(getString(teamAddrKey))), teamAmount, wlgAssetId)]
492	492	else nil
493	493	let actAmountLeft = curStats[ixWlgActAmLeft]
494	494	let actAmount = curStats[ixWlgActAmAvailNow]
495	495	let actTransfer = if ((actAmount > 0))
496	496	then [ScriptTransfer(restContract, actAmount, wlgAssetId)]
497	497	else nil
498	498	let marketingAmount = curStats[ixWlgMarketingIssue10Amount]
499	499	let marketingTransfer = if ((marketingAmount > 0))
500	500	then [ScriptTransfer(addressFromStringValue(value(getString(marketingAddrKey))), marketingAmount, wlgAssetId)]

github/deemru/w8io/026f985 
56.41 ms ◑