w8 · tx · Huf···tsP

tx · HufQu1DVfAEaEuuLoxtc6rQ1qUonBdJXMiXcidcbEtsP

3N7HtrKeFFLz5oy6PfGv1Lg3GwPk4gCPdGy:  -0.02200000 Waves

2024.11.11 01:54 [3365978] smart account 3N7HtrKeFFLz5oy6PfGv1Lg3GwPk4gCPdGy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HufQu1DVfAEaEuuLoxtc6rQ1qUonBdJXMiXcidcbEtsP",
    "fee": 2200000,
    "feeAssetId": null,
    "timestamp": 1731279287474,
    "version": 2,
    "chainId": 84,
    "sender": "3N7HtrKeFFLz5oy6PfGv1Lg3GwPk4gCPdGy",
    "senderPublicKey": "FsR18761ZAsUqsTd7TK3XmR6bhihs1UXVmpHYxz5JzQ1",
    "proofs": [
        "AtSc8HJowVfiWUyY37f6xEHQX6JKrUN1hhqfyr5y2FFezZdfXuGwse4Xue5aVxiQtMWeg9M3TC4q7WpHNSq2KR1"
    ],
    "script": "base64:BgJCCAISBgoECAgICBIDCgEIEgMKAQESBAoCCAESAwoBARIECgIIARIAEgMKAQgSAwoBARIDCgEBEgASAwoBCBIDCgEIggEACkRBWV9NSUxMSVMAgLiZKQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluABBhY3JlczJBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUDRVSDNUOW5YcE1OcFVtU21RalBtRXozRzg1dDN6bjZlQQMJAAACAQFUBQckbWF0Y2gwAiMzTkJQeDFGY2l1M0pRTkVHWjIxalNuVGR1dExOR0dCVVNYaAkAAgECDVVua25vd24gY2hhaW4ADmFyYml0cmFnZURlbGF5BAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwBQpEQVlfTUlMTElTAwkAAAIBAVQFByRtYXRjaDAA4NQDCQACAQINVW5rbm93biBjaGFpbgADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUOACAwtcvAA5NSU5TSE9QUEFZTUVOVACgjQYBD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABAA1JZHhDZmdXbGdEYXBwAAQAFElkeENmZ1B1enpsZVBvb2xEYXBwAAUAFElkeENmZ0ludmVzdEZ1bmREYXBwAAYAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyAQ9rZXlSZXN0MkFkZHJlc3MAAg0lc19fcmVzdDJBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFDUlkeENmZ1dsZ0RhcHAAEnB1enpsZVBvb2xDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ1B1enpsZVBvb2xEYXBwABJpbnZlc3RGdW5kQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRRJZHhDZmdJbnZlc3RGdW5kRGFwcAANYWNyZXNDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFD0lkeENmZ0FjcmVzRGFwcAANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQIYV0xHT0xEIGlzIG5vdCBpc3N1ZWQgeWV0AQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AAZTQ0FMRTgAgMLXLwAMeHBMZXZlbFNjYWxlAIAZAA94cExldmVsUmVjaXBQb3cAoB8AEm51bVBvaW50c09uTGV2ZWxVcAADAA93bGdCYXNlQW1vdW50WHAAgNDbw/QCAQlrZXlVc2VyWFABBGFkZHIJAKwCAgIHdXNlclhQXwUEYWRkcgEMa2V5VXNlckxldmVsAQRhZGRyCQCsAgICCnVzZXJMZXZlbF8FBGFkZHIABXhwV2xnAJBOAQlsZXZlbEJ5WFABAnhwCQBrAwUMeHBMZXZlbFNjYWxlCQBsBgUCeHAABAUPeHBMZXZlbFJlY2lwUG93AAQABAUERE9XTgUGU0NBTEU4AQdsZXZlbFVwAgljdXJyTGV2ZWwFbmV3WFAECG5ld0xldmVsCQEJbGV2ZWxCeVhQAQUFbmV3WFAJAMwIAgUIbmV3TGV2ZWwJAMwIAgkAaAIFEm51bVBvaW50c09uTGV2ZWxVcAkAZQIFCG5ld0xldmVsBQljdXJyTGV2ZWwFA25pbAAITUlMTElPTjYAgIDpg7HeFgALUExBWUVSU0hBUkUAgLUYAAlEQVlNSUxMSVMAgLiZKQALdGVhbUFkZHJLZXkCCHRlYW1BZGRyAA9sYXN0VGVhbVRpbWVLZXkCFGxhc3RDbGFpbWVkVGltZV90ZWFtABF0ZWFtQW1vdW50TGVmdEtleQIOdGVhbUFtb3VudExlZnQAFWxhc3RBY3Rpdml0aWVzVGltZUtleQIabGFzdENsYWltZWRUaW1lX2FjdGl2aXRpZXMAEGFjdEFtb3VudExlZnRLZXkCFGFjdGl2aXRpZXNBbW91bnRMZWZ0ABRzdGFrZXJzQW1vdW50TGVmdEtleQIRc3Rha2Vyc0Ftb3VudExlZnQBFGtleUxhc3RBcmJUaW1lQnlVc2VyAQRhZGRyCQCsAgICEGxhc3RBcmJUaW1lVXNlcl8FBGFkZHIAD3dsZ0lzc3VlVGltZUtleQINd2xnX2lzc3VlVGltZQASd2xnSXNzdWVkQW1vdW50S2V5AhB3bGdfaXNzdWVkQW1vdW50ARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIBGGtleVdsZ1N0YWtlZEFtb3VudEJ5VXNlcgEEYWRkcgkArAICAhZ3bGdTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABF3bGdTdGFrZWRUb3RhbEtleQIUd2xnU3Rha2VkQW1vdW50VG90YWwBFmtleVdsZ1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIUd2xnU3Rha2VkVGltZUJ5VXNlcl8FBGFkZHIAA002XwDAhD0AA004XwCAwtcvAApURUFNX1NIQVJFAMCaDAAOQUNUSVZJVFlfU0hBUkUAoI0GAAxQTEFZRVJfU0hBUkUAgLUYAAtZRUFSX01JTExJUwCAhuvHdQAGREFZX01TAIC4mSkACkRBWV9CTE9DS1MAoAsAB0lTU1VFMTAAgJTr3AMAD1BMQVlFUlMxMF9TSEFSRQCA6jAAEU1BUktFVElORzEwX1NIQVJFAKCNBgAMVEVBTTEwX1NIQVJFAKCNBgARTkVXX1NUQUtJTkdfU1RBUlQAgPO4wrEyABBtYXJrZXRpbmdBZGRyS2V5Ag1tYXJrZXRpbmdBZGRyAAp0ZWFtQWRyS2V5Agh0ZWFtQWRkcgAObGFzdFRlYW1UaW1LZXkCFGxhc3RDbGFpbWVkVGltZV90ZWFtAA50ZWFtQW10TGVmdEtleQIOdGVhbUFtb3VudExlZnQAFGxhc3RBY3Rpdml0aWVzVGltS2V5AhpsYXN0Q2xhaW1lZFRpbWVfYWN0aXZpdGllcwANYWN0QW10TGVmdEtleQIUYWN0aXZpdGllc0Ftb3VudExlZnQAEXN0YWtlcnNBbXRMZWZ0S2V5AhFzdGFrZXJzQW1vdW50TGVmdAEWa2V5TGFzdENsYWltVGltZUJ5VXNlcgEEYWRkcgkArAICAhRsYXN0Q2xhaW1lZFRpbWVVc2VyXwUEYWRkcgENZGlzdHJCeVBlcmlvZAIMaXNzdWVkQW1vdW50BnBlcmlvZAkAawMFDGlzc3VlZEFtb3VudAkAaAIFDFBMQVlFUl9TSEFSRQkAZAIFBnBlcmlvZAABCQBoAgAGBQNNNl8AEXdsZ0lzc3VlMTBUaW1lS2V5Ag93bGdfaXNzdWUxMFRpbWUADndsZ0lzc3VlVGltS2V5Ag13bGdfaXNzdWVUaW1lAA93bGdJc3N1ZWRBbXRLZXkCEHdsZ19pc3N1ZWRBbW91bnQADnpiSXNzdWVkQW10S2V5AhJ6YmlsbF9pc3N1ZWRBbW91bnQBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQRhZGRyCQCsAgICGGFjcmVzU3Rha2VkQW1vdW50QnlVc2VyXwUEYWRkcgAUdG90YWxGYXJtaW5nUG93ZXJLZXkCEXRvdGFsRmFybWluZ1Bvd2VyAAlkYXBwMlJlc3QAAAAMZGFwcDJTdGFraW5nAAEACGRhcHAyV2xnAAIAC2RhcHAyUHV6emxlAAMAD2RhcHAySW52ZXN0RnVuZAAEAApsZXZlbEFjcmVzCQDMCAIAAAkAzAgCAAoJAMwIAgAUCQDMCAIAKAkAzAgCAFAJAMwIAgCWAQkAzAgCAPoBCQDMCAIAkAMJAMwIAgC8BQkAzAgCAOgHBQNuaWwBD2dldExldmVsQnlBY3JlcwEFYWNyZXMEA2FjcgkAaQIJAGQCBQVhY3JlcwD/wdcvBQNNOF8KAQdjaGVja2VyAgNhY2MEaXRlbQMJAGcCBQRpdGVtBQNhY3IFA2FjYwkAZAIFA2FjYwABCgACJGwFCmxldmVsQWNyZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2NoZWNrZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBFmdldEZhcm1pbmdQb3dlckJ5QWNyZXMBBWFjcmVzCQBoAgkAaAIFBWFjcmVzABQJAGQCCQEPZ2V0TGV2ZWxCeUFjcmVzAQUFYWNyZXMABAEQZ2V0RmFybWluZ1Bvd2VycwISdXNlckFkZHJTdHJPckVtcHR5DmFjcmVzMkNvbnRyYWN0BAd0b3RhbEZQCQELdmFsdWVPckVsc2UCCQCaCAIFDmFjcmVzMkNvbnRyYWN0BRR0b3RhbEZhcm1pbmdQb3dlcktleQAABAl1c2VyQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFEnVzZXJBZGRyU3RyT3JFbXB0eQAABAZ1c2VyRlAJARZnZXRGYXJtaW5nUG93ZXJCeUFjcmVzAQUJdXNlckFjcmVzCQDMCAIFB3RvdGFsRlAJAMwIAgUGdXNlckZQBQNuaWwBCmtleVVzZXJCZXQBBGFkZHIJAKwCAgIIdXNlckJldF8FBGFkZHIBDmtleVVzZXJUaWNrZXRzAQRhZGRyCQCsAgICDHVzZXJUaWNrZXRzXwUEYWRkcgAPa2V5VG90YWxUaWNrZXRzAgx0b3RhbFRpY2tldHMBCndpbm5pbmdCZXQBA2RheQkAagIJALEJAQkBBXZhbHVlAQgJAQV2YWx1ZQEJAO0HAQkAaAIFA2RheQUKREFZX0JMT0NLUwN2cmYABAAKaWR4VG90YWxGUAAAAAlpZHhVc2VyRlAAAQALaXhXbGdBbW91bnQAAAAIaXhXbGdXbGcAAQAKaXhXbGdQcmljZQACAA5peFdsZ0lzc3VlVGltZQAIAA9peFdsZ1RlYW1BbUxlZnQACwATaXhXbGdUZWFtQW1BdmFpbE5vdwAMAA5peFdsZ0FjdEFtTGVmdAAPABJpeFdsZ0FjdEFtQXZhaWxOb3cAEAAQaXhXbGdBbUxlZnRUb3RhbAATABNpeFdsZ1VzZXJBbUF2YWlsTm93ABcAEGl4V2xnRWZmVXNlclRpbWUAGAASaXhXbGdJc3N1ZTEwQW1vdW50ABkAG2l4V2xnTWFya2V0aW5nSXNzdWUxMEFtb3VudAAaABZpeFdsZ1RlYW1Jc3N1ZTEwQW1vdW50ABsAD2l4V2xnVXNlcjEwcGFydAAcABBpeFdsZ0lzc3VlMTBUaW1lAB0BDGdldFdsZ1N0YXRzMgQLdXNlckFkZHJPcHQJY29udHJhY3RzBnVzZHRJZBV1c2R0QmFsYW5jZUNvcnJlY3Rpb24EDGlzc3VlZEFtb3VudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUPd2xnSXNzdWVkQW10S2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQEB3Jlc3RVc2QJAPAHAgkAkQMCBQljb250cmFjdHMFCWRhcHAyUmVzdAUGdXNkdElkBAZ3bGdVc2QJAGUCCQDwBwIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUGdXNkdElkBRV1c2R0QmFsYW5jZUNvcnJlY3Rpb24ECXB1enpsZVVzZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwULZGFwcDJQdXp6bGUFBnVzZHRJZAQJYWNyZXMyVXNkCQDwBwIJAJEDAgUJY29udHJhY3RzBQxkYXBwMlN0YWtpbmcFBnVzZHRJZAQRaW52ZXN0Rm5kQ29udHJhY3QJAJEDAgUJY29udHJhY3RzBQ9kYXBwMkludmVzdEZ1bmQED2ludmVzdEZ1bmRUb3RhbAkAZAIJAPAHAgURaW52ZXN0Rm5kQ29udHJhY3QFBnVzZHRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRFpbnZlc3RGbmRDb250cmFjdAUOemJJc3N1ZWRBbXRLZXkAAAQNdG90YWxGdW5kc1VzZAkAZAIJAGQCBQlhY3JlczJVc2QFBndsZ1VzZAUPaW52ZXN0RnVuZFRvdGFsBAV3bGdJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwILd2xnX2Fzc2V0SWQCE05vdCBpbml0aWFsaXplZCB5ZXQEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAECWlzc3VlVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUOd2xnSXNzdWVUaW1LZXkCD05vdCBpbml0aWFsaXplZAQGd2xnV2xnCQDwBwIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUFd2xnSWQECXRlYW1Ub3RhbAkAawMFDGlzc3VlZEFtb3VudAUKVEVBTV9TSEFSRQUDTTZfBA50ZWFtQW1vdW50TGVmdAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDnRlYW1BbXRMZWZ0S2V5BQl0ZWFtVG90YWwEDGxhc3RUZWFtVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDmxhc3RUZWFtVGltS2V5BQlpc3N1ZVRpbWUECHRlYW1BZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCdCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUKdGVhbUFkcktleQQWdGVhbUFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQl0ZWFtVG90YWwJAGUCBQNub3cFDGxhc3RUZWFtVGltZQkAaAIAAwULWUVBUl9NSUxMSVMJAMwIAgUOdGVhbUFtb3VudExlZnQFA25pbAQKdGVhbVdsZ29sZAkA8AcCBQh0ZWFtQWRkcgUFd2xnSWQECGFjdFRvdGFsCQBrAwUMaXNzdWVkQW1vdW50BQ5BQ1RJVklUWV9TSEFSRQUDTTZfBA1hY3RBbW91bnRMZWZ0CQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUNYWN0QW10TGVmdEtleQUIYWN0VG90YWwEEmxhc3RBY3Rpdml0aWVzVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFFGxhc3RBY3Rpdml0aWVzVGltS2V5BQlpc3N1ZVRpbWUEFWFjdEFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQhhY3RUb3RhbAkAZQIFA25vdwUSbGFzdEFjdGl2aXRpZXNUaW1lCQBoAgADBQtZRUFSX01JTExJUwkAzAgCBQ1hY3RBbW91bnRMZWZ0BQNuaWwECWFjdFdsZ29sZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwUJZGFwcDJSZXN0BQV3bGdJZAQMbGFzdFVzZXJUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwkBFmtleUxhc3RDbGFpbVRpbWVCeVVzZXIBBQt1c2VyQWRkck9wdAUJaXNzdWVUaW1lBA5sYXN0VXNlclBlcmlvZAkAaQIJAGUCBQxsYXN0VXNlclRpbWUFCWlzc3VlVGltZQULWUVBUl9NSUxMSVMECm5vd0xpbWl0ZWQJAJcDAQkAzAgCBQNub3cJAMwIAgkAZAIFCWlzc3VlVGltZQkAaAIAAwULWUVBUl9NSUxMSVMFA25pbAQJY3VyUGVyaW9kCQCXAwEJAMwIAgkAaQIJAGUCBQNub3cFCWlzc3VlVGltZQULWUVBUl9NSUxMSVMJAMwIAgACBQNuaWwEA2VmZgkBEGdldEZhcm1pbmdQb3dlcnMCBQt1c2VyQWRkck9wdAkAkQMCBQljb250cmFjdHMFDGRhcHAyU3Rha2luZwQVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAUJY3VyUGVyaW9kBA1wcmV2UGVyaW9kRW5kCQBkAgUJaXNzdWVUaW1lCQBoAgULWUVBUl9NSUxMSVMFCWN1clBlcmlvZAQRcHJldlByZXZQZXJpb2RFbmQJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwkAZQIFCWN1clBlcmlvZAABBAJhMAkAawMFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAZQIFCm5vd0xpbWl0ZWQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEDXVzZXJBdmFpbGFibGUDCQAAAgUObGFzdFVzZXJQZXJpb2QFCWN1clBlcmlvZAUCYTADCQAAAgUObGFzdFVzZXJQZXJpb2QJAGUCBQljdXJQZXJpb2QAAQQCYTEJAGsDCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAABCQBlAgUNcHJldlBlcmlvZEVuZAUMbGFzdFVzZXJUaW1lBQtZRUFSX01JTExJUwkAZAIFAmExBQJhMAQCYTIJAGsDCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAACCQBlAgURcHJldlByZXZQZXJpb2RFbmQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEAmExCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAABCQBkAgkAZAIFAmEyBQJhMQUCYTAED2Ftb3VudExlZnRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFEXN0YWtlcnNBbXRMZWZ0S2V5AAAECnVzZXJBbW91bnQDCQECIT0CCQCRAwIFA2VmZgUKaWR4VG90YWxGUAAACQBrAwUNdXNlckF2YWlsYWJsZQkAkQMCBQNlZmYFCWlkeFVzZXJGUAkAkQMCBQNlZmYFCmlkeFRvdGFsRlAAAAQPbGFzdElzc3VlMTBUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwURd2xnSXNzdWUxMFRpbWVLZXkFEU5FV19TVEFLSU5HX1NUQVJUBA1pc3N1ZTEwQW1vdW50CQBrAwUHSVNTVUUxMAkAlgMBCQDMCAIJAGUCBQNub3cFD2xhc3RJc3N1ZTEwVGltZQkAzAgCAAAFA25pbAUGREFZX01TBBZtYXJrZXRpbmdJc3N1ZTEwQW1vdW50CQBrAwUNaXNzdWUxMEFtb3VudAURTUFSS0VUSU5HMTBfU0hBUkUFA002XwQRdGVhbUlzc3VlMTBBbW91bnQJAGsDBQ1pc3N1ZTEwQW1vdW50BQxURUFNMTBfU0hBUkUFA002XwQOdXNlcjEwSW50ZXJ2YWwJAJYDAQkAzAgCCQBlAgUDbm93CQCWAwEJAMwIAgURTkVXX1NUQUtJTkdfU1RBUlQJAMwIAgUMbGFzdFVzZXJUaW1lBQNuaWwJAMwIAgAABQNuaWwECnVzZXIxMHBhcnQDCQECIT0CCQCRAwIFA2VmZgUKaWR4VG90YWxGUAAACQBrAwkAawMJAGsDBQdJU1NVRTEwBQ51c2VyMTBJbnRlcnZhbAUGREFZX01TCQCRAwIFA2VmZgUJaWR4VXNlckZQCQCRAwIFA2VmZgUKaWR4VG90YWxGUAUPUExBWUVSUzEwX1NIQVJFBQNNNl8AAAQObmV3SXNzdWUxMFRpbWUJAJYDAQkAzAgCBRFORVdfU1RBS0lOR19TVEFSVAkAzAgCBQNub3cFA25pbAkAzAgCBQxpc3N1ZWRBbW91bnQJAMwIAgUGd2xnV2xnCQDMCAIJAGsDBQ10b3RhbEZ1bmRzVXNkBQNNOF8FDGlzc3VlZEFtb3VudAkAzAgCBQ10b3RhbEZ1bmRzVXNkCQDMCAIFB3Jlc3RVc2QJAMwIAgUJYWNyZXMyVXNkCQDMCAIFBndsZ1VzZAkAzAgCBQlwdXp6bGVVc2QJAMwIAgUJaXNzdWVUaW1lCQDMCAIFDGxhc3RUZWFtVGltZQkAzAgCBQl0ZWFtVG90YWwJAMwIAgUOdGVhbUFtb3VudExlZnQJAMwIAgUWdGVhbUFtb3VudEF2YWlsYWJsZU5vdwkAzAgCBQp0ZWFtV2xnb2xkCQDMCAIFCGFjdFRvdGFsCQDMCAIFDWFjdEFtb3VudExlZnQJAMwIAgUVYWN0QW1vdW50QXZhaWxhYmxlTm93CQDMCAIFCWFjdFdsZ29sZAkAzAgCBQljdXJQZXJpb2QJAMwIAgUPYW1vdW50TGVmdFRvdGFsCQDMCAIFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAzAgCBQxsYXN0VXNlclRpbWUJAMwIAgUPaW52ZXN0RnVuZFRvdGFsCQDMCAIFCnVzZXJBbW91bnQJAMwIAgUKbm93TGltaXRlZAkAzAgCBQ1pc3N1ZTEwQW1vdW50CQDMCAIFFm1hcmtldGluZ0lzc3VlMTBBbW91bnQJAMwIAgURdGVhbUlzc3VlMTBBbW91bnQJAMwIAgUKdXNlcjEwcGFydAkAzAgCBQ5uZXdJc3N1ZTEwVGltZQkAzAgCCQCRAwIFA2VmZgUKaWR4VG90YWxGUAUDbmlsAANuZXQJAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIEByRtYXRjaDAFA25ldAMJAAACAQFXBQckbWF0Y2gwAiMzUEZ3WXRhOGJpRXozMXpwZUZlNURKSzh3RTV0clNwUVZGOAMJAAACAQFUBQckbWF0Y2gwAiMzTjdVdVlhcjYyNjRQNThGQmhWV0tQUUFoNFl1YTJoZ25ndgkAAgECDVVua25vd24gY2hhaW4ADXByb2ZpdEFkZHJLZXkCCnByb2ZpdEFkZHIAGXN0YWtlcnNBbW91bnRQYWlkVG90YWxLZXkCFnN0YWtlcnNBbW91bnRQYWlkVG90YWwBGGtleVN0YWtlcnNBbW91bnRQYWlkVXNlcgEEYWRkcgkArAICAhZzdGFrZXJzQW1vdW50UGFpZFVzZXJfBQRhZGRyAA1yZXN0MkNvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQ9rZXlSZXN0MkFkZHJlc3MABRZkZWZhdWx0UmVzdDJBZGRyZXNzU3RyAA5hY3JlczJDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQUQYWNyZXMyQWRkcmVzc1N0cgEHcHJvbG9nMgAJAQVhc0ludAEJAP0HBAUOYWNyZXMyQ29udHJhY3QCCnNhdmVMYXN0VHgFA25pbAUDbmlsAQ9nZXRTd2FwTGltaXRXbGcBBGFkZHIECGxhc3RUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEJARRrZXlMYXN0QXJiVGltZUJ5VXNlcgEFBGFkZHIAAAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAMJAGYCBQ5hcmJpdHJhZ2VEZWxheQkAZQIFA25vdwUIbGFzdFRpbWUJAAIBCQCsAgIJAKwCAgIfQXJiaXRyYWdlcyBhcmUgcG9zc2libGUgb25jZSBhIAkApAMBCQBpAgUOYXJiaXRyYWdlRGVsYXkA4NQDAgNtaW4JAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFBGFkZHIAAAEOY2xhaW1JbnRlcm5hbDIBBGFkZHIECGN1clN0YXRzCQEMZ2V0V2xnU3RhdHMyBAUEYWRkcgkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQAAAQLdXNlclRpbWVLZXkJARZrZXlMYXN0Q2xhaW1UaW1lQnlVc2VyAQUEYWRkcgQMbGFzdFVzZXJUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFC3VzZXJUaW1lS2V5AAAEC3VzZXJFZmZUaW1lCQCRAwIFCGN1clN0YXRzBRBpeFdsZ0VmZlVzZXJUaW1lAwkAAAIFDGxhc3RVc2VyVGltZQULdXNlckVmZlRpbWUJAJQKAgUDbmlsAAAEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAECWlzc3VlVGltZQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdJc3N1ZVRpbWUEDnRlYW1BbW91bnRMZWZ0CQCRAwIFCGN1clN0YXRzBQ9peFdsZ1RlYW1BbUxlZnQECnRlYW1BbW91bnQJAGQCCQCRAwIFCGN1clN0YXRzBRNpeFdsZ1RlYW1BbUF2YWlsTm93CQCRAwIFCGN1clN0YXRzBRZpeFdsZ1RlYW1Jc3N1ZTEwQW1vdW50BAx0ZWFtVHJhbnNmZXIDCQBmAgUKdGVhbUFtb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQV2YWx1ZQEJAKIIAQULdGVhbUFkZHJLZXkFCnRlYW1BbW91bnQFCndsZ0Fzc2V0SWQFA25pbAUDbmlsBA1hY3RBbW91bnRMZWZ0CQCRAwIFCGN1clN0YXRzBQ5peFdsZ0FjdEFtTGVmdAQJYWN0QW1vdW50CQCRAwIFCGN1clN0YXRzBRJpeFdsZ0FjdEFtQXZhaWxOb3cEC2FjdFRyYW5zZmVyAwkAZgIFCWFjdEFtb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFDHJlc3RDb250cmFjdAUJYWN0QW1vdW50BQp3bGdBc3NldElkBQNuaWwFA25pbAQPbWFya2V0aW5nQW1vdW50CQCRAwIFCGN1clN0YXRzBRtpeFdsZ01hcmtldGluZ0lzc3VlMTBBbW91bnQEEW1hcmtldGluZ1RyYW5zZmVyAwkAZgIFD21hcmtldGluZ0Ftb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQV2YWx1ZQEJAKIIAQUQbWFya2V0aW5nQWRkcktleQUPbWFya2V0aW5nQW1vdW50BQp3bGdBc3NldElkBQNuaWwFA25pbAQKdXNlckFtb3VudAkAkQMCBQhjdXJTdGF0cwUTaXhXbGdVc2VyQW1BdmFpbE5vdwQHdXNlcktleQkBGGtleVN0YWtlcnNBbW91bnRQYWlkVXNlcgEFBGFkZHIECXVzZXJUb3RhbAkAZAIFCnVzZXJBbW91bnQJAJEDAgUIY3VyU3RhdHMFD2l4V2xnVXNlcjEwcGFydAQOaXNzdWVkMTBBbW91bnQJAJEDAgUIY3VyU3RhdHMFEml4V2xnSXNzdWUxMEFtb3VudAkAlAoCCQDOCAIJAM4IAgkAzggCCQDMCAIJAQdSZWlzc3VlAwUKd2xnQXNzZXRJZAUOaXNzdWVkMTBBbW91bnQGCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJ3bGdJc3N1ZWRBbW91bnRLZXkJAGQCCQCRAwIFCGN1clN0YXRzBQtpeFdsZ0Ftb3VudAUOaXNzdWVkMTBBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEXdsZ0lzc3VlMTBUaW1lS2V5CQCRAwIFCGN1clN0YXRzBRBpeFdsZ0lzc3VlMTBUaW1lCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd1c2VyS2V5CQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd1c2VyS2V5AAAFCnVzZXJBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFGXN0YWtlcnNBbW91bnRQYWlkVG90YWxLZXkJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFGXN0YWtlcnNBbW91bnRQYWlkVG90YWxLZXkAAAUKdXNlckFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUc3Rha2Vyc0Ftb3VudExlZnRLZXkJAGUCCQCRAwIFCGN1clN0YXRzBRBpeFdsZ0FtTGVmdFRvdGFsBQp1c2VyQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRF0ZWFtQW1vdW50TGVmdEtleQkAZAIJAGUCBQ50ZWFtQW1vdW50TGVmdAUKdGVhbUFtb3VudAkAkQMCBQhjdXJTdGF0cwUWaXhXbGdUZWFtSXNzdWUxMEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUPbGFzdFRlYW1UaW1lS2V5BQNub3cJAMwIAgkBDEludGVnZXJFbnRyeQIFEGFjdEFtb3VudExlZnRLZXkJAGUCBQ1hY3RBbW91bnRMZWZ0BQlhY3RBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFFWxhc3RBY3Rpdml0aWVzVGltZUtleQUDbm93CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQt1c2VyVGltZUtleQULdXNlckVmZlRpbWUFA25pbAUMdGVhbVRyYW5zZmVyBQthY3RUcmFuc2ZlcgURbWFya2V0aW5nVHJhbnNmZXIFCXVzZXJUb3RhbAEOdGFrZVhwSW50ZXJuYWwCBGFkZHIFZGVsdGEEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEB3RpbWVLZXkJARZrZXlXbGdTdGFrZWRUaW1lQnlVc2VyAQUEYWRkcgQJYW1vdW50S2V5CQEYa2V5V2xnU3Rha2VkQW1vdW50QnlVc2VyAQUEYWRkcgQIbGFzdFRpbWUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAABAdvbGRVc2VyCQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRF3bGdTdGFrZWRUb3RhbEtleQAABAJ4cAkAawMJAGsDBQV4cFdsZwUHb2xkVXNlcgUPd2xnQmFzZUFtb3VudFhwCQBlAgUIbGFzdFRpbWUFA25vdwUJREFZTUlMTElTCQCVCgMJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkFA25vdwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBkAgUHb2xkVXNlcgUFZGVsdGEJAMwIAgkBDEludGVnZXJFbnRyeQIFEXdsZ1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFBWRlbHRhBQNuaWwFAnhwBQdvbGRVc2VyARRjbGFpbVRpY2tldHNJbnRlcm5hbAIEYWRkcgp1c2VyQmV0U3RyBA90b3RhbFRpY2tldHNLZXkFD2tleVRvdGFsVGlja2V0cwQKdGlja2V0c0tleQkBDmtleVVzZXJUaWNrZXRzAQUEYWRkcgQGYmV0S2V5CQEKa2V5VXNlckJldAEFBGFkZHIEBmRheUJldAkAtQkCBQp1c2VyQmV0U3RyAgFfBA9vbGRUb3RhbFRpY2tldHMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUPdG90YWxUaWNrZXRzS2V5AAAECm9sZFRpY2tldHMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUKdGlja2V0c0tleQAABAxkZWx0YVRpY2tldHMDCQAAAgkBCndpbm5pbmdCZXQBCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGZGF5QmV0AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZkYXlCZXQAAQABAAAJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUKdGlja2V0c0tleQkAZAIFCm9sZFRpY2tldHMFDGRlbHRhVGlja2V0cwkAzAgCCQEMSW50ZWdlckVudHJ5AgUPdG90YWxUaWNrZXRzS2V5CQBkAgUPb2xkVG90YWxUaWNrZXRzBQxkZWx0YVRpY2tldHMJAMwIAgkBC0RlbGV0ZUVudHJ5AQUGYmV0S2V5BQNuaWwFDGRlbHRhVGlja2V0cw0BaQENY29uc3RydWN0b3JWMQQIcmVzdEFkZHINbWFya2V0aW5nQWRkcgh0ZWFtQWRkcgpwcm9maXRBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ13bGdBc3NldElkS2V5CQACAQITQWxyZWFkeSBpbml0aWFsaXplZAQMaXNzdWVkQW1vdW50BQhNSUxMSU9ONgQFaXNzdWUJAMMIBwIGV0xHT0xEAiBXYXZlc0xhbmRzIEdvbGQgaW52ZXN0bWVudCB0b2tlbgUMaXNzdWVkQW1vdW50AAgGBQR1bml0AAAEB2Fzc2V0SWQJALgIAQUFaXNzdWUJAMwIAgUFaXNzdWUJAMwIAgkBDEludGVnZXJFbnRyeQIFD3dsZ0lzc3VlVGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIFEndsZ0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRlzdGFrZXJzQW1vdW50UGFpZFRvdGFsS2V5AAAJAMwIAgkBDEludGVnZXJFbnRyeQIFFHN0YWtlcnNBbW91bnRMZWZ0S2V5CQBrAwUITUlMTElPTjYFC1BMQVlFUlNIQVJFBQVNVUxUNgkAzAgCCQELQmluYXJ5RW50cnkCBQ13bGdBc3NldElkS2V5BQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlSZXN0QWRkcmVzcwAFCHJlc3RBZGRyCQDMCAIJAQtTdHJpbmdFbnRyeQIFEG1hcmtldGluZ0FkZHJLZXkFDW1hcmtldGluZ0FkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgULdGVhbUFkZHJLZXkFCHRlYW1BZGRyCQDMCAIJAQtTdHJpbmdFbnRyeQIFDXByb2ZpdEFkZHJLZXkFCnByb2ZpdEFkZHIFA25pbAFpAQ1jb25zdHJ1Y3RvclYyAQlyZXN0MkFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAzAgCCQELU3RyaW5nRW50cnkCCQEPa2V5UmVzdDJBZGRyZXNzAAUJcmVzdDJBZGRyBQNuaWwBaQEGYnV5V2xnAQltaW5BbW91bnQEDHByb2xvZ1Jlc3VsdAkBB3Byb2xvZzIAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0AwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEB3VzZHRBbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhNVU0RUIHBheW1lbnRzIG9ubHkhBAZjYWxsZXIIBQFpBmNhbGxlcgQEYWRkcgkApQgBBQZjYWxsZXIDCQBmAgUOTUlOU0hPUFBBWU1FTlQFB3VzZHRBbXQJAAIBCQCsAgIJAKwCAgISWW91IGNhbiB0cmFkZSBtaW4gCQEKZml4ZWRQb2ludAIFDk1JTlNIT1BQQVlNRU5UAAYCBSBVU0RUBAhjdXJTdGF0cwkBDGdldFdsZ1N0YXRzMgQCAAkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQFB3VzZHRBbXQEDGN1cldsZ0Ftb3VudAkAkQMCBQhjdXJTdGF0cwULaXhXbGdBbW91bnQECHdsZ1ByaWNlCQCRAwIFCGN1clN0YXRzBQppeFdsZ1ByaWNlBAhidXlQcmljZQkAawMFCHdsZ1ByaWNlAAYABQQJd2xnQW1vdW50CQBrAwUHdXNkdEFtdAUFTVVMVDgFCGJ1eVByaWNlBAZtYXhXbGcJAQ9nZXRTd2FwTGltaXRXbGcBBQRhZGRyAwkAZgIFCXdsZ0Ftb3VudAUGbWF4V2xnCQACAQkArAICCQCsAgICEFlvdSBjYW4gZ2V0IG1heCAJAQpmaXhlZFBvaW50AgUGbWF4V2xnAAgCByBXTEdPTEQDCQBmAgUJbWluQW1vdW50BQl3bGdBbW91bnQJAAIBAjBQcmljZSBjaGFuZ2VkIGR1cmluZyBvcGVyYXRpb24sIHBsZWFzZSB0cnkgYWdhaW4EDHByb2ZpdEFtb3VudAkAaQIFB3VzZHRBbXQABgkAlAoCCQDMCAIJAQdSZWlzc3VlAwUKd2xnQXNzZXRJZAUJd2xnQW1vdW50BgkAzAgCCQEMSW50ZWdlckVudHJ5AgUSd2xnSXNzdWVkQW1vdW50S2V5CQBkAgUMY3VyV2xnQW1vdW50BQl3bGdBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARRrZXlMYXN0QXJiVGltZUJ5VXNlcgEFBGFkZHIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQV2YWx1ZQEJAKIIAQUNcHJvZml0QWRkcktleQUMcHJvZml0QW1vdW50BQt1c2R0QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIFCXdsZ0Ftb3VudAUKd2xnQXNzZXRJZAUDbmlsBQxwcm9sb2dSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEOYnV5V2xnUkVBRE9OTFkCB2FkZHJlc3MHdXNkdEFtdAQIY3VyU3RhdHMJAQxnZXRXbGdTdGF0czIEAgAJAMwIAgUNcmVzdDJDb250cmFjdAkAzAgCBQ5hY3JlczJDb250cmFjdAkAzAgCBQt3bGdDb250cmFjdAkAzAgCBRJwdXp6bGVQb29sQ29udHJhY3QJAMwIAgUSaW52ZXN0RnVuZENvbnRyYWN0BQNuaWwFC3VzZHRBc3NldElkBQd1c2R0QW10BAxjdXJXbGdBbW91bnQJAJEDAgUIY3VyU3RhdHMFC2l4V2xnQW1vdW50BAh3bGdQcmljZQkAkQMCBQhjdXJTdGF0cwUKaXhXbGdQcmljZQQIYnV5UHJpY2UJAGsDBQh3bGdQcmljZQAGAAUECXdsZ0Ftb3VudAkAawMFB3VzZHRBbXQFBU1VTFQ4BQhidXlQcmljZQQGbWF4V2xnCQEPZ2V0U3dhcExpbWl0V2xnAQUHYWRkcmVzcwQMcHJvZml0QW1vdW50CQBpAgUHdXNkdEFtdAAGCQCUCgIFA25pbAkAzAgCBQl3bGdBbW91bnQJAMwIAgUOTUlOU0hPUFBBWU1FTlQJAMwIAgUGbWF4V2xnCQDMCAIFDHByb2ZpdEFtb3VudAUDbmlsAWkBB3NlbGxXbGcBCW1pbkFtb3VudAQMcHJvbG9nUmVzdWx0CQEHcHJvbG9nMgADCQAAAgUMcHJvbG9nUmVzdWx0BQxwcm9sb2dSZXN1bHQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGd2xnQW10CAUDcG10BmFtb3VudAQGY2FsbGVyCAUBaQZjYWxsZXIEBGFkZHIJAKUIAQUGY2FsbGVyBAZtYXhXbGcJAQ9nZXRTd2FwTGltaXRXbGcBBQRhZGRyAwkAZgIFBndsZ0FtdAUGbWF4V2xnCQACAQkArAICCQCsAgICEllvdSBjYW4gc3BlbmQgbWF4IAkBCmZpeGVkUG9pbnQCBQZtYXhXbGcACAIHIFdMR09MRAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFCndsZ0Fzc2V0SWQJAAIBAhVXTEdPTEQgcGF5bWVudHMgb25seSEECGN1clN0YXRzCQEMZ2V0V2xnU3RhdHMyBAIACQDMCAIFDXJlc3QyQ29udHJhY3QJAMwIAgUOYWNyZXMyQ29udHJhY3QJAMwIAgULd2xnQ29udHJhY3QJAMwIAgUScHV6emxlUG9vbENvbnRyYWN0CQDMCAIFEmludmVzdEZ1bmRDb250cmFjdAUDbmlsBQt1c2R0QXNzZXRJZAAABAxjdXJXbGdBbW91bnQJAJEDAgUIY3VyU3RhdHMFC2l4V2xnQW1vdW50BAlzZWxsUHJpY2UJAGkCCQCRAwIFCGN1clN0YXRzBQppeFdsZ1ByaWNlAAIEB3VzZHRBbXQJAGsDBQZ3bGdBbXQFCXNlbGxQcmljZQUFTVVMVDgDCQBmAgUOTUlOU0hPUFBBWU1FTlQFB3VzZHRBbXQJAAIBCQCsAgIJAKwCAgISWW91IGNhbiB0cmFkZSBtaW4gCQEKZml4ZWRQb2ludAIFDk1JTlNIT1BQQVlNRU5UAAYCBSBVU0RUAwkAZgIFCW1pbkFtb3VudAUHdXNkdEFtdAkAAgECMFByaWNlIGNoYW5nZWQgZHVyaW5nIG9wZXJhdGlvbiwgcGxlYXNlIHRyeSBhZ2FpbgQMcHJvZml0QW1vdW50CQBpAgUHdXNkdEFtdAAFCQCUCgIJAMwIAgkBBEJ1cm4CBQp3bGdBc3NldElkBQZ3bGdBbXQJAMwIAgkBDEludGVnZXJFbnRyeQIFEndsZ0lzc3VlZEFtb3VudEtleQkAZQIFDGN1cldsZ0Ftb3VudAUGd2xnQW10CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEUa2V5TGFzdEFyYlRpbWVCeVVzZXIBBQRhZGRyCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCiCAEFDXByb2ZpdEFkZHJLZXkFDHByb2ZpdEFtb3VudAULdXNkdEFzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyBQd1c2R0QW10BQt1c2R0QXNzZXRJZAUDbmlsBQxwcm9sb2dSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEPc2VsbFdsZ1JFQURPTkxZAgdhZGRyZXNzBndsZ0FtdAQGbWF4V2xnCQEPZ2V0U3dhcExpbWl0V2xnAQUHYWRkcmVzcwQIY3VyU3RhdHMJAQxnZXRXbGdTdGF0czIEAgAJAMwIAgUNcmVzdDJDb250cmFjdAkAzAgCBQ5hY3JlczJDb250cmFjdAkAzAgCBQt3bGdDb250cmFjdAkAzAgCBRJwdXp6bGVQb29sQ29udHJhY3QJAMwIAgUSaW52ZXN0RnVuZENvbnRyYWN0BQNuaWwFC3VzZHRBc3NldElkAAAEDGN1cldsZ0Ftb3VudAkAkQMCBQhjdXJTdGF0cwULaXhXbGdBbW91bnQECXNlbGxQcmljZQkAaQIJAJEDAgUIY3VyU3RhdHMFCml4V2xnUHJpY2UAAgQHdXNkdEFtdAkAawMFBndsZ0FtdAUJc2VsbFByaWNlBQVNVUxUOAQGbWluV2xnCQBrAwUOTUlOU0hPUFBBWU1FTlQFBU1VTFQ4BQlzZWxsUHJpY2UEDHByb2ZpdEFtb3VudAkAaQIFB3VzZHRBbXQABQkAlAoCBQNuaWwJAMwIAgUHdXNkdEFtdAkAzAgCBQZtaW5XbGcJAMwIAgUGbWF4V2xnCQDMCAIFDHByb2ZpdEFtb3VudAUDbmlsAWkBBWNsYWltAAQMcHJvbG9nUmVzdWx0CQEHcHJvbG9nMgADCQAAAgUMcHJvbG9nUmVzdWx0BQxwcm9sb2dSZXN1bHQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQNJHQwMTEyMjExMTI5MAkBDmNsYWltSW50ZXJuYWwyAQkApQgBCAUBaQZjYWxsZXIEB2FjdGlvbnMIBQ0kdDAxMTIyMTExMjkwAl8xBBB3bGdDbGFpbWVkQW1vdW50CAUNJHQwMTEyMjExMTI5MAJfMgkAlAoCCQDNCAIFB2FjdGlvbnMJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUQd2xnQ2xhaW1lZEFtb3VudAUKd2xnQXNzZXRJZAUMcHJvbG9nUmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEm9uU3Rha2VVbnN0YWtlTGFuZAEEYWRkcgMDAwkBAiE9AggFAWkGY2FsbGVyBQ9zdGFraW5nQ29udHJhY3QJAQIhPQIIBQFpBmNhbGxlcgUNYWNyZXNDb250cmFjdAcJAQIhPQIIBQFpBmNhbGxlcgUOYWNyZXMyQ29udHJhY3QHCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDSR0MDExNjA5MTE2NjMJAQ5jbGFpbUludGVybmFsMgEFBGFkZHIEB2FjdGlvbnMIBQ0kdDAxMTYwOTExNjYzAl8xBBB3bGdDbGFpbWVkQW1vdW50CAUNJHQwMTE2MDkxMTY2MwJfMgkAlAoCAwkAZgIFEHdsZ0NsYWltZWRBbW91bnQAAAkAzQgCBQdhY3Rpb25zCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQRhZGRyBRB3bGdDbGFpbWVkQW1vdW50BQp3bGdBc3NldElkBQdhY3Rpb25zBRB3bGdDbGFpbWVkQW1vdW50AWkBCmJ1cm5XbGdvbGQBBndsZ0FtdAMJAQIhPQIIBQFpBmNhbGxlcgUOYWNyZXMyQ29udHJhY3QJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQIY3VyU3RhdHMJAQxnZXRXbGdTdGF0czIEAgAJAMwIAgUNcmVzdDJDb250cmFjdAkAzAgCBQ5hY3JlczJDb250cmFjdAkAzAgCBQt3bGdDb250cmFjdAkAzAgCBRJwdXp6bGVQb29sQ29udHJhY3QJAMwIAgUSaW52ZXN0RnVuZENvbnRyYWN0BQNuaWwFC3VzZHRBc3NldElkAAADCQBmAgUGd2xnQW10CQCRAwIFCGN1clN0YXRzBQhpeFdsZ1dsZwkAAgEJAKwCAgkArAICCQCsAgICBU9ubHkgCQEKZml4ZWRQb2ludAIJAJEDAgUIY3VyU3RhdHMFCGl4V2xnV2xnAAgCJSBXTEdPTEQgbGVmdCBvbiBjb250cmFjdCwgY2FuJ3QgYnVybiAJAQpmaXhlZFBvaW50AgUGd2xnQW10AAgEDXdsZ0Ftb3VudExlZnQJAGUCCQCRAwIFCGN1clN0YXRzBQtpeFdsZ0Ftb3VudAUGd2xnQW10CQCUCgIJAMwIAgkBBEJ1cm4CBQp3bGdBc3NldElkBQZ3bGdBbXQJAMwIAgkBDEludGVnZXJFbnRyeQIFEndsZ0lzc3VlZEFtb3VudEtleQUNd2xnQW1vdW50TGVmdAUDbmlsBQ13bGdBbW91bnRMZWZ0AWkBDGJldEZvclRpY2tldAEDYmV0BAxwcm9sb2dSZXN1bHQJAQdwcm9sb2cyAAMJAAACBQxwcm9sb2dSZXN1bHQFDHByb2xvZ1Jlc3VsdAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkAwkBAiE9AgkAaQIFA2JldAAEAAAJAAIBAhtJbnZhbGlkIGJldDogc2hvdWxkIGJlIDAuLjMEBm1vbWVudAkAagIFBmhlaWdodAUKREFZX0JMT0NLUwMJAGYCBQZtb21lbnQJAGUCBQpEQVlfQkxPQ0tTAAMJAAIBCQCsAgIJAKwCAgIxQ2Fubm90IGJldDogdGhlIGRheSBpcyBhbG1vc3QgZW5kZWQsIHBsZWFzZSB3YWl0IAkApAMBCQBlAgUKREFZX0JMT0NLUwUGbW9tZW50AgcgYmxvY2tzBARhZGRyCQClCAEIBQFpBmNhbGxlcgQLc3Rha2VkQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFBGFkZHIAAAQDbHZsCQEPZ2V0TGV2ZWxCeUFjcmVzAQULc3Rha2VkQWNyZXMDCQAAAgUDbHZsAAAJAAIBAiNZb3UgbmVlZCB0byBzdGFrZSBzb21lIEFDUkVTIHRvIGJldAQIdG9tb3Jyb3cJAGQCCQBpAgUGaGVpZ2h0BQpEQVlfQkxPQ0tTAAEEBmJldEtleQkBCmtleVVzZXJCZXQBBQRhZGRyBAp1c2VyQmV0U3RyCQCiCAEFBmJldEtleQQLbmV3QmV0RW50cnkJAQtTdHJpbmdFbnRyeQIFBmJldEtleQkArAICCQCsAgIJAKQDAQUIdG9tb3Jyb3cCAV8JAKQDAQUDYmV0AwkBCWlzRGVmaW5lZAEFCnVzZXJCZXRTdHIEB3VzZXJCZXQJAQV2YWx1ZQEFCnVzZXJCZXRTdHIDCQAAAgkAkQMCCQC1CQIFB3VzZXJCZXQCAV8AAAkApAMBBQh0b21vcnJvdwkAAgECHFlvdSBhbHJlYWR5IGJldCBmb3IgdG9tb3Jyb3cEAXIJARRjbGFpbVRpY2tldHNJbnRlcm5hbAIFBGFkZHIFB3VzZXJCZXQJAJQKAgkAzAgCCQCRAwIIBQFyAl8xAAAJAMwIAgkAkQMCCAUBcgJfMQABCQDMCAIFC25ld0JldEVudHJ5BQNuaWwIBQFyAl8yCQCUCgIJAMwIAgULbmV3QmV0RW50cnkFA25pbAAACQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDGNsYWltVGlja2V0cwAEDHByb2xvZ1Jlc3VsdAkBB3Byb2xvZzIAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0AwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAp1c2VyQmV0U3RyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBCmtleVVzZXJCZXQBBQRhZGRyAhxZb3UgaGF2ZSBubyB0aWNrZXRzIHRvIGNsYWltCQEUY2xhaW1UaWNrZXRzSW50ZXJuYWwCBQRhZGRyBQp1c2VyQmV0U3RyCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCXRha2VXbGdYcAEEYWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDSR0MDE5NzQxMTk3ODQJAQ50YWtlWHBJbnRlcm5hbAIFBGFkZHIAAAQHYWN0aW9ucwgFDSR0MDE5NzQxMTk3ODQCXzEEAnhwCAUNJHQwMTk3NDExOTc4NAJfMgkAlAoCBQdhY3Rpb25zBQJ4cAFpARJjaGVja1dsZ1hwUkVBRE9OTFkBBGFkZHIEDSR0MDE5ODYxMTk5MDkJAQ50YWtlWHBJbnRlcm5hbAIFBGFkZHIAAAQHaWdub3JlZAgFDSR0MDE5ODYxMTk5MDkCXzEEB2RlbHRhWFAIBQ0kdDAxOTg2MTE5OTA5Al8yBAVuZXdYUAkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEJa2V5VXNlclhQAQUEYWRkcgAABQdkZWx0YVhQBAlsdmxQb2ludHMJAQdsZXZlbFVwAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJAQxrZXlVc2VyTGV2ZWwBBQRhZGRyAAAFBW5ld1hQCQCUCgIFA25pbAkAzQgCBQlsdmxQb2ludHMFBW5ld1hQADO96/E=",
    "height": 3365978,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4zrpgvkKSbPSNSYzyD5RCXUQ2CkMbK67EmRnVbSt4QF
Next: Dheq9Gk5fXDhVgC4STbA5oqVKC1Wxaurk1Vz4yK8Et7Y

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

Old	New		Differences
198	198
199	199		let TEAM10_SHARE = 100000
200	200
201		-	let NEW_STAKING_START = ~~1727740800000~~
	201	+	let NEW_STAKING_START = 1731279600000
202	202
203	203		let marketingAddrKey = "marketingAddr"
204	204

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

github/deemru/w8io/026f985 
65.55 ms ◑