w8 · tx · 9ja···EoN

tx · 9jaF9N5DF3y3uosa7EGQZq4bjCL1uJX25fE82VQJrEoN

3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv:  -0.01800000 Waves

2024.11.25 16:55 [3387030] smart account 3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9jaF9N5DF3y3uosa7EGQZq4bjCL1uJX25fE82VQJrEoN",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1732542954477,
    "version": 2,
    "chainId": 84,
    "sender": "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv",
    "senderPublicKey": "2fNSk5gmWbXBDTkSYSKd66xSgVvAYzrJnP9YSAFNvTwC",
    "proofs": [
        "44NTsCWU6QKNejG5BQ5qdojchk7wsZmcPnFxu1TjCVztRyVXj2ESi7RJNzLnaESMrczckmMdAhhJVmPTbgDLBt9D"
    ],
    "script": "base64:BgIbCAISAwoBGBIDCgEIEgMKAQgSAwoBCBIDCgEIcwADU0VQAgJfXwAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEACkRBWV9CTE9DS1MEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAoAsDCQAAAgEBVAUHJG1hdGNoMAA8CQACAQINVW5rbm93biBjaGFpbgALV0VFS19CTE9DS1MEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAA4E4DCQAAAgEBVAUHJG1hdGNoMAC0AQkAAgECDVVua25vd24gY2hhaW4AClZSRl9PRkZTRVQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAAAMJAAACAQFUBQckbWF0Y2gwAJD5RQkAAgECDVVua25vd24gY2hhaW4AC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQRndZdGE4YmlFejMxenBlRmU1REpLOHdFNXRyU3BRVkY4AwkAAAIBAVQFByRtYXRjaDACIzNON1V1WWFyNjI2NFA1OEZCaFZXS1BRQWg0WXVhMmhnbmd2CQACAQINVW5rbm93biBjaGFpbgAVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUExuY1h0UzFVODNENmNRYkZEM0g4ckJIUExnenhTRktaMQMJAAACAQFUBQckbWF0Y2gwAiMzTkRDeUJHNXE4NUp1YVJpaWdVZUV0YWlueWpDUVQzWHBabQkAAgECDVVua25vd24gY2hhaW4BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABBJZHhDZmdBY3JlczJEYXBwAAEADUlkeENmZ1dsZ0RhcHAAAgAUSWR4Q2ZnUHV6emxlUG9vbERhcHAABAAUSWR4Q2ZnSW52ZXN0RnVuZERhcHAABQEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ9rZXlSZXN0MkFkZHJlc3MAAg0lc19fcmVzdDJBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIIcmVzdDJDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQhyZXN0MkNmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADXJlc3QyQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBD2tleVJlc3QyQWRkcmVzcwAFFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIACHJlc3QyQ2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQ1yZXN0MkNvbnRyYWN0AA5hY3JlczJDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRBJZHhDZmdBY3JlczJEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBQ1JZHhDZmdXbGdEYXBwABJwdXp6bGVQb29sQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQhyZXN0MkNmZwUUSWR4Q2ZnUHV6emxlUG9vbERhcHAAEmludmVzdEZ1bmRDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRRJZHhDZmdJbnZlc3RGdW5kRGFwcAATb2xkQWNyZXNDb250cmFjdEtleQIQb2xkQWNyZXNDb250cmFjdAEVa2V5TGFzdFdlZWtUeElkQnlVc2VyAQRhZGRyCQCsAgICE2xhc3RXZWVrVHhJZEJ5VXNlcl8FBGFkZHIBFGtleUN1cldlZWtUeElkQnlVc2VyAQRhZGRyCQCsAgICEmN1cldlZWtUeElkQnlVc2VyXwUEYWRkcgANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQIYV0xHT0xEIGlzIG5vdCBpc3N1ZWQgeWV0AA9hY3Jlc0Fzc2V0SWRLZXkCDGFjcmVzQXNzZXRJZAAMYWNyZXNBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgUOYWNyZXMyQ29udHJhY3QFD2FjcmVzQXNzZXRJZEtleQIXQUNSRVMgaXMgbm90IGlzc3VlZCB5ZXQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBGFkZHIJAKwCAgIYYWNjb3VudEN1c3RvbU5hbWVCeUFkZHJfBQRhZGRyAQ9rZXlBZGRyZXNzUmVmQnkBBGFkZHIJAKwCAgIJYWNjUmVmQnlfBQRhZGRyARNrZXlBZGRyZXNzUmVmZXJyYWxzAQRhZGRyCQCsAgICDWFjY1JlZmVycmFsc18FBGFkZHIBCmtleVVzZXJCZXQBBGFkZHIJAKwCAgIIdXNlckJldF8FBGFkZHIBEmtleVVzZXJXZWVrVGlja2V0cwIEYWRkcgR3ZWVrCQCsAgIJAKwCAgkArAICAhB1c2VyV2Vla1RpY2tldHNfBQRhZGRyAgFfCQCkAwEFBHdlZWsBE2tleVRvdGFsV2Vla1RpY2tldHMBBHdlZWsJAKwCAgIRdG90YWxXZWVrVGlja2V0c18JAKQDAQUEd2VlawEKd2lubmluZ0JldAEDZGF5BAFiCQBoAgUDZGF5BQpEQVlfQkxPQ0tTBAFoAwkAZgIFAWIFClZSRl9PRkZTRVQFAWIJAGQCBQFiBQpWUkZfT0ZGU0VUCQBqAgkAsQkBCQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBCQBkAgkAaAIFA2RheQUKREFZX0JMT0NLUwUKVlJGX09GRlNFVAN2cmYABAEMYXNUdXBsZTRJbnRzAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAhQoSW50LCBJbnQsIEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECJmZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCwgSW50LCBJbnQpAQxhc1R1cGxlM0ludHMBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACDyhJbnQsIEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECIWZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCwgSW50KQEMYXNUdXBsZTJJbnRzAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgooSW50LCBJbnQpBAF0BQckbWF0Y2gwBQF0CQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQADTTZfAMCEPQADTThfAIDC1y8AClRFQU1fU0hBUkUAwJoMAA5BQ1RJVklUWV9TSEFSRQCgjQYADFBMQVlFUl9TSEFSRQCAtRgAC1lFQVJfTUlMTElTAICG68d1AAZEQVlfTVMAgLiZKQAHSVNTVUUxMACAlOvcAwAPUExBWUVSUzEwX1NIQVJFAIDqMAARTUFSS0VUSU5HMTBfU0hBUkUAoI0GAAxURUFNMTBfU0hBUkUAoI0GABFORVdfU1RBS0lOR19TVEFSVACA87jCsTIACnRlYW1BZHJLZXkCCHRlYW1BZGRyAA5sYXN0VGVhbVRpbUtleQIUbGFzdENsYWltZWRUaW1lX3RlYW0ADnRlYW1BbXRMZWZ0S2V5Ag50ZWFtQW1vdW50TGVmdAAUbGFzdEFjdGl2aXRpZXNUaW1LZXkCGmxhc3RDbGFpbWVkVGltZV9hY3Rpdml0aWVzAA1hY3RBbXRMZWZ0S2V5AhRhY3Rpdml0aWVzQW1vdW50TGVmdAARc3Rha2Vyc0FtdExlZnRLZXkCEXN0YWtlcnNBbW91bnRMZWZ0ARZrZXlMYXN0Q2xhaW1UaW1lQnlVc2VyAQRhZGRyCQCsAgICFGxhc3RDbGFpbWVkVGltZVVzZXJfBQRhZGRyAQ1kaXN0ckJ5UGVyaW9kAgxpc3N1ZWRBbW91bnQGcGVyaW9kCQBrAwUMaXNzdWVkQW1vdW50CQBoAgUMUExBWUVSX1NIQVJFCQBkAgUGcGVyaW9kAAEJAGgCAAYFA002XwARd2xnSXNzdWUxMFRpbWVLZXkCD3dsZ19pc3N1ZTEwVGltZQAOd2xnSXNzdWVUaW1LZXkCDXdsZ19pc3N1ZVRpbWUAD3dsZ0lzc3VlZEFtdEtleQIQd2xnX2lzc3VlZEFtb3VudAAOemJJc3N1ZWRBbXRLZXkCEnpiaWxsX2lzc3VlZEFtb3VudAEXa2V5QWNyZXNTdGFrZWRBbXRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABJhY3Jlc1N0YWtkVG90YWxLZXkCFmFjcmVzU3Rha2VkQW1vdW50VG90YWwAFHRvdGFsRmFybWluZ1Bvd2VyS2V5AhF0b3RhbEZhcm1pbmdQb3dlcgAJZGFwcDJSZXN0AAAADGRhcHAyU3Rha2luZwABAAhkYXBwMldsZwACAAtkYXBwMlB1enpsZQADAA9kYXBwMkludmVzdEZ1bmQABAEQa2V5VXNlckZ1bGxCb251cwEEYWRkcgkArAICAg51c2VyRnVsbEJvbnVzXwUEYWRkcgAKbGV2ZWxBY3JlcwkAzAgCAAAJAMwIAgAKCQDMCAIAFAkAzAgCACgJAMwIAgBQCQDMCAIAlgEJAMwIAgD6AQkAzAgCAJADCQDMCAIAvAUJAMwIAgDoBwUDbmlsAQ9nZXRMZXZlbEJ5QWNyZXMBBWFjcmVzBANhY3IJAGkCCQBkAgUFYWNyZXMA/8HXLwUDTThfCgEHY2hlY2tlcgIDYWNjBGl0ZW0DCQBnAgUEaXRlbQUDYWNyBQNhY2MJAGQCBQNhY2MAAQoAAiRsBQpsZXZlbEFjcmVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjaGVja2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARZnZXRGYXJtaW5nUG93ZXJCeUFjcmVzAQVhY3JlcwkAaAIJAGgCBQVhY3JlcwAUCQBkAgkBD2dldExldmVsQnlBY3JlcwEFBWFjcmVzAAQBHmdldEZhcm1pbmdQb3dlckJ5QWNyZXNBbmRCb251cwIFYWNyZXMGYm9udXM2BApub3RCb251c2VkCQEWZ2V0RmFybWluZ1Bvd2VyQnlBY3JlcwEFBWFjcmVzCQCUCgIJAGsDBQpub3RCb251c2VkCQBkAgUDTTZfBQZib251czYFA002XwUKbm90Qm9udXNlZAEQZ2V0RmFybWluZ1Bvd2VycwISdXNlckFkZHJTdHJPckVtcHR5DmFjcmVzMkNvbnRyYWN0BAd0b3RhbEZQCQELdmFsdWVPckVsc2UCCQCaCAIFDmFjcmVzMkNvbnRyYWN0BRR0b3RhbEZhcm1pbmdQb3dlcktleQAABAl1c2VyQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFEnVzZXJBZGRyU3RyT3JFbXB0eQAABAl1c2VyQm9udXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARBrZXlVc2VyRnVsbEJvbnVzAQUSdXNlckFkZHJTdHJPckVtcHR5AAAECCR0MDc5MTE5CQEeZ2V0RmFybWluZ1Bvd2VyQnlBY3Jlc0FuZEJvbnVzAgUJdXNlckFjcmVzBQl1c2VyQm9udXMEDXVzZXJGUGJvbnVzZWQIBQgkdDA3OTExOQJfMQQQdXNlckZQbm90Qm9udXNlZAgFCCR0MDc5MTE5Al8yCQDMCAIFB3RvdGFsRlAJAMwIAgUNdXNlckZQYm9udXNlZAkAzAgCBRB1c2VyRlBub3RCb251c2VkCQDMCAIFCXVzZXJCb251cwUDbmlsAAppZHhUb3RhbEZQAAAAEGlkeFVzZXJGUGJvbnVzZWQAAQALaXhXbGdBbW91bnQAAAAIaXhXbGdXbGcAAQAKaXhXbGdQcmljZQACAAppeFdsZ0Z1bmRzAAMADWl4V2xnQWN0aXZpdHkABAALaXhXbGdBY3JlczIABQAOaXhXbGdBcmJpdHJhZ2UABgAJaXhXbGdQb29sAAcADml4V2xnSXNzdWVUaW1lAAgAFGl4V2xnTGFzdFRlYW1BY3RUaW1lAAkADml4V2xnVGVhbVRvdGFsAAoAD2l4V2xnVGVhbUFtTGVmdAALABNpeFdsZ1RlYW1BbUF2YWlsTm93AAwAD2l4V2xnVGVhbVdsZ29sZAANAA1peFdsZ0FjdFRvdGFsAA4ADml4V2xnQWN0QW1MZWZ0AA8AEml4V2xnQWN0QW1BdmFpbE5vdwAQAA5peFdsZ0FjdFdsZ29sZAARAA5peFdsZ0N1clBlcmlvZAASABBpeFdsZ0FtTGVmdFRvdGFsABMAGml4V2xnQ3VyUGVyaW9kRGlzdHJpYnV0aW9uABQAEWl4V2xnTGFzdFVzZXJUaW1lABUAFWl4V2xnSW52ZXN0RnVuZEFtb3VudAAWABNpeFdsZ1VzZXJBbUF2YWlsTm93ABcAEGl4V2xnRWZmVXNlclRpbWUAGAASaXhXbGdJc3N1ZTEwQW1vdW50ABkAG2l4V2xnTWFya2V0aW5nSXNzdWUxMEFtb3VudAAaABZpeFdsZ1RlYW1Jc3N1ZTEwQW1vdW50ABsAD2l4V2xnVXNlcjEwcGFydAAcABBpeFdsZ0lzc3VlMTBUaW1lAB0AFml4V2xnVG90YWxGYXJtaW5nUG93ZXIAHgAVaXhXbGdBY3Jlc1N0YWtlZFRvdGFsAB8BDGdldFdsZ1N0YXRzMgQLdXNlckFkZHJPcHQJY29udHJhY3RzBnVzZHRJZBV1c2R0QmFsYW5jZUNvcnJlY3Rpb24EDGlzc3VlZEFtb3VudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUPd2xnSXNzdWVkQW10S2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQEB3Jlc3RVc2QJAPAHAgkAkQMCBQljb250cmFjdHMFCWRhcHAyUmVzdAUGdXNkdElkBAZ3bGdVc2QJAGUCCQDwBwIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUGdXNkdElkBRV1c2R0QmFsYW5jZUNvcnJlY3Rpb24ECXB1enpsZVVzZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwULZGFwcDJQdXp6bGUFBnVzZHRJZAQJYWNyZXMyVXNkCQDwBwIJAJEDAgUJY29udHJhY3RzBQxkYXBwMlN0YWtpbmcFBnVzZHRJZAQRaW52ZXN0Rm5kQ29udHJhY3QJAJEDAgUJY29udHJhY3RzBQ9kYXBwMkludmVzdEZ1bmQED2ludmVzdEZ1bmRUb3RhbAkAZAIJAPAHAgURaW52ZXN0Rm5kQ29udHJhY3QFBnVzZHRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRFpbnZlc3RGbmRDb250cmFjdAUOemJJc3N1ZWRBbXRLZXkAAAQNdG90YWxGdW5kc1VzZAkAZAIJAGQCBQlhY3JlczJVc2QFBndsZ1VzZAUPaW52ZXN0RnVuZFRvdGFsBAV3bGdJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwILd2xnX2Fzc2V0SWQCE05vdCBpbml0aWFsaXplZCB5ZXQEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAECWlzc3VlVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUOd2xnSXNzdWVUaW1LZXkCD05vdCBpbml0aWFsaXplZAQGd2xnV2xnCQDwBwIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUFd2xnSWQECXRlYW1Ub3RhbAkAawMFDGlzc3VlZEFtb3VudAUKVEVBTV9TSEFSRQUDTTZfBA50ZWFtQW1vdW50TGVmdAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDnRlYW1BbXRMZWZ0S2V5BQl0ZWFtVG90YWwEDGxhc3RUZWFtVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFDmxhc3RUZWFtVGltS2V5BQlpc3N1ZVRpbWUECHRlYW1BZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBCQCdCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUKdGVhbUFkcktleQQWdGVhbUFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQl0ZWFtVG90YWwJAGUCBQNub3cFDGxhc3RUZWFtVGltZQkAaAIAAwULWUVBUl9NSUxMSVMJAMwIAgUOdGVhbUFtb3VudExlZnQFA25pbAQKdGVhbVdsZ29sZAkA8AcCBQh0ZWFtQWRkcgUFd2xnSWQECGFjdFRvdGFsCQBrAwUMaXNzdWVkQW1vdW50BQ5BQ1RJVklUWV9TSEFSRQUDTTZfBA1hY3RBbW91bnRMZWZ0CQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUNYWN0QW10TGVmdEtleQUIYWN0VG90YWwEEmxhc3RBY3Rpdml0aWVzVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFFGxhc3RBY3Rpdml0aWVzVGltS2V5BQlpc3N1ZVRpbWUEFWFjdEFtb3VudEF2YWlsYWJsZU5vdwkAlwMBCQDMCAIJAGsDBQhhY3RUb3RhbAkAZQIFA25vdwUSbGFzdEFjdGl2aXRpZXNUaW1lCQBoAgADBQtZRUFSX01JTExJUwkAzAgCBQ1hY3RBbW91bnRMZWZ0BQNuaWwECWFjdFdsZ29sZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwUJZGFwcDJSZXN0BQV3bGdJZAQMbGFzdFVzZXJUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwkBFmtleUxhc3RDbGFpbVRpbWVCeVVzZXIBBQt1c2VyQWRkck9wdAUJaXNzdWVUaW1lBA5sYXN0VXNlclBlcmlvZAkAaQIJAGUCBQxsYXN0VXNlclRpbWUFCWlzc3VlVGltZQULWUVBUl9NSUxMSVMECm5vd0xpbWl0ZWQJAJcDAQkAzAgCBQNub3cJAMwIAgkAZAIFCWlzc3VlVGltZQkAaAIAAwULWUVBUl9NSUxMSVMFA25pbAQJY3VyUGVyaW9kCQCXAwEJAMwIAgkAaQIJAGUCBQNub3cFCWlzc3VlVGltZQULWUVBUl9NSUxMSVMJAMwIAgACBQNuaWwEA2VmZgkBEGdldEZhcm1pbmdQb3dlcnMCBQt1c2VyQWRkck9wdAkAkQMCBQljb250cmFjdHMFDGRhcHAyU3Rha2luZwQVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAUJY3VyUGVyaW9kBA1wcmV2UGVyaW9kRW5kCQBkAgUJaXNzdWVUaW1lCQBoAgULWUVBUl9NSUxMSVMFCWN1clBlcmlvZAQRcHJldlByZXZQZXJpb2RFbmQJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwkAZQIFCWN1clBlcmlvZAABBAJhMAkAawMFFWN1clBlcmlvZERpc3RyaWJ1dGlvbgkAZQIFCm5vd0xpbWl0ZWQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEDXVzZXJBdmFpbGFibGUDCQAAAgUObGFzdFVzZXJQZXJpb2QFCWN1clBlcmlvZAUCYTADCQAAAgUObGFzdFVzZXJQZXJpb2QJAGUCBQljdXJQZXJpb2QAAQQCYTEJAGsDCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAABCQBlAgUNcHJldlBlcmlvZEVuZAUMbGFzdFVzZXJUaW1lBQtZRUFSX01JTExJUwkAZAIFAmExBQJhMAQCYTIJAGsDCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAACCQBlAgURcHJldlByZXZQZXJpb2RFbmQFDGxhc3RVc2VyVGltZQULWUVBUl9NSUxMSVMEAmExCQENZGlzdHJCeVBlcmlvZAIFDGlzc3VlZEFtb3VudAkAZQIFCWN1clBlcmlvZAABCQBkAgkAZAIFAmEyBQJhMQUCYTAED2Ftb3VudExlZnRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFEXN0YWtlcnNBbXRMZWZ0S2V5AAAECnVzZXJBbW91bnQDCQECIT0CCQCRAwIFA2VmZgUKaWR4VG90YWxGUAAACQBrAwUNdXNlckF2YWlsYWJsZQkAkQMCBQNlZmYFEGlkeFVzZXJGUGJvbnVzZWQJAJEDAgUDZWZmBQppZHhUb3RhbEZQAAAED2xhc3RJc3N1ZTEwVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCCQCRAwIFCWNvbnRyYWN0cwUIZGFwcDJXbGcFEXdsZ0lzc3VlMTBUaW1lS2V5BRFORVdfU1RBS0lOR19TVEFSVAQNaXNzdWUxMEFtb3VudAkAawMFB0lTU1VFMTAJAJYDAQkAzAgCCQBlAgUDbm93BQ9sYXN0SXNzdWUxMFRpbWUJAMwIAgAABQNuaWwFBkRBWV9NUwQWbWFya2V0aW5nSXNzdWUxMEFtb3VudAkAawMFDWlzc3VlMTBBbW91bnQFEU1BUktFVElORzEwX1NIQVJFBQNNNl8EEXRlYW1Jc3N1ZTEwQW1vdW50CQBrAwUNaXNzdWUxMEFtb3VudAUMVEVBTTEwX1NIQVJFBQNNNl8EDnVzZXIxMEludGVydmFsCQCWAwEJAMwIAgkAZQIFA25vdwkAlgMBCQDMCAIFEU5FV19TVEFLSU5HX1NUQVJUCQDMCAIFDGxhc3RVc2VyVGltZQUDbmlsCQDMCAIAAAUDbmlsBAp1c2VyMTBwYXJ0AwkBAiE9AgkAkQMCBQNlZmYFCmlkeFRvdGFsRlAAAAkAawMJAGsDCQBrAwUHSVNTVUUxMAUOdXNlcjEwSW50ZXJ2YWwFBkRBWV9NUwkAkQMCBQNlZmYFEGlkeFVzZXJGUGJvbnVzZWQJAJEDAgUDZWZmBQppZHhUb3RhbEZQBQ9QTEFZRVJTMTBfU0hBUkUFA002XwAABA5uZXdJc3N1ZTEwVGltZQkAlgMBCQDMCAIFEU5FV19TVEFLSU5HX1NUQVJUCQDMCAIFA25vdwUDbmlsBBBhY3Jlc1N0YWtlZFRvdGFsCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQxkYXBwMlN0YWtpbmcFEmFjcmVzU3Rha2RUb3RhbEtleQAACQDMCAIFDGlzc3VlZEFtb3VudAkAzAgCBQZ3bGdXbGcJAMwIAgkAawMFDXRvdGFsRnVuZHNVc2QFA004XwUMaXNzdWVkQW1vdW50CQDMCAIFDXRvdGFsRnVuZHNVc2QJAMwIAgUHcmVzdFVzZAkAzAgCBQlhY3JlczJVc2QJAMwIAgUGd2xnVXNkCQDMCAIFCXB1enpsZVVzZAkAzAgCBQlpc3N1ZVRpbWUJAMwIAgUMbGFzdFRlYW1UaW1lCQDMCAIFCXRlYW1Ub3RhbAkAzAgCBQ50ZWFtQW1vdW50TGVmdAkAzAgCBRZ0ZWFtQW1vdW50QXZhaWxhYmxlTm93CQDMCAIFCnRlYW1XbGdvbGQJAMwIAgUIYWN0VG90YWwJAMwIAgUNYWN0QW1vdW50TGVmdAkAzAgCBRVhY3RBbW91bnRBdmFpbGFibGVOb3cJAMwIAgUJYWN0V2xnb2xkCQDMCAIFCWN1clBlcmlvZAkAzAgCBQ9hbW91bnRMZWZ0VG90YWwJAMwIAgUVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQDMCAIFDGxhc3RVc2VyVGltZQkAzAgCBQ9pbnZlc3RGdW5kVG90YWwJAMwIAgUKdXNlckFtb3VudAkAzAgCBQpub3dMaW1pdGVkCQDMCAIFDWlzc3VlMTBBbW91bnQJAMwIAgUWbWFya2V0aW5nSXNzdWUxMEFtb3VudAkAzAgCBRF0ZWFtSXNzdWUxMEFtb3VudAkAzAgCBQp1c2VyMTBwYXJ0CQDMCAIFDm5ld0lzc3VlMTBUaW1lCQDMCAIJAJEDAgUDZWZmBQppZHhUb3RhbEZQCQDMCAIFEGFjcmVzU3Rha2VkVG90YWwFA25pbAEOd2FsbGV0SW50ZXJuYWwBDnVzZXJBZGRyZXNzT3B0BARhZGRyCQCmCAEFDnVzZXJBZGRyZXNzT3B0BAdiYWxhbmNlAwkBCWlzRGVmaW5lZAEFBGFkZHIJAO8HAQkBBXZhbHVlAQUEYWRkcgkBDkJhbGFuY2VEZXRhaWxzBAAAAAAAAAAABAt1c2R0QmFsYW5jZQMJAQlpc0RlZmluZWQBBQRhZGRyCQDwBwIJAQV2YWx1ZQEFBGFkZHIFC3VzZHRBc3NldElkAAAEDXdsZ29sZEJhbGFuY2UDCQEJaXNEZWZpbmVkAQUEYWRkcgkA8AcCCQEFdmFsdWUBBQRhZGRyBQp3bGdBc3NldElkAAAECmN1c3RvbU5hbWUJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUOYWNyZXMyQ29udHJhY3QJARZrZXlBZGRyZXNzVG9DdXN0b21OYW1lAQUOdXNlckFkZHJlc3NPcHQFDnVzZXJBZGRyZXNzT3B0BAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFDnVzZXJBZGRyZXNzT3B0BAVyZWZCeQkAnQgCBQ5hY3JlczJDb250cmFjdAUIcmVmQnlLZXkEBHJlZnMJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUOYWNyZXMyQ29udHJhY3QJARNrZXlBZGRyZXNzUmVmZXJyYWxzAQUOdXNlckFkZHJlc3NPcHQCAAQIbGFzdFR4SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUOYWNyZXMyQ29udHJhY3QJARVrZXlMYXN0V2Vla1R4SWRCeVVzZXIBBQ51c2VyQWRkcmVzc09wdAIABAdjdXJUeElkCQELdmFsdWVPckVsc2UCCQCdCAIFDmFjcmVzMkNvbnRyYWN0CQEUa2V5Q3VyV2Vla1R4SWRCeVVzZXIBBQ51c2VyQWRkcmVzc09wdAIABAxhY3Jlc0JhbGFuY2UDCQEJaXNEZWZpbmVkAQUEYWRkcgkA8AcCCQEFdmFsdWUBBQRhZGRyBQxhY3Jlc0Fzc2V0SWQAAAQLc3Rha2VkQWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QJARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEFDnVzZXJBZGRyZXNzT3B0AAAEA2x2bAkBD2dldExldmVsQnlBY3JlcwEFC3N0YWtlZEFjcmVzBAJmcAkBEGdldEZhcm1pbmdQb3dlcnMCBQ51c2VyQWRkcmVzc09wdAUOYWNyZXMyQ29udHJhY3QEDmFjcmVzVG9OZXh0THZsAwkAZwIFA2x2bAkAkAMBBQpsZXZlbEFjcmVzAAAJAGUCCQBkAgkAaAIJAJEDAgUKbGV2ZWxBY3JlcwUDbHZsBQNNOF8AAQULc3Rha2VkQWNyZXMJAMwIAgkArAICAhIlcyVzX19jdXN0b21OYW1lX18FCmN1c3RvbU5hbWUJAMwIAgkArAICAhIlcyVzX19yZWZlcnJlZEJ5X18JAQt2YWx1ZU9yRWxzZQIFBXJlZkJ5AgAJAMwIAgkArAICAhElcyVzX19yZWZlcnJhbHNfXwUEcmVmcwkAzAgCCQCsAgICFCVzJXNfX2xhc3RXZWVrVHhJZF9fBQhsYXN0VHhJZAkAzAgCCQCsAgICEyVzJXNfX2N1cldlZWtUeElkX18FCGxhc3RUeElkCQDMCAIJAKwCAgIUJXMlZF9fd2F2ZXNCYWxhbmNlX18JAKQDAQgFB2JhbGFuY2UJYXZhaWxhYmxlCQDMCAIJAKwCAgITJXMlZF9fdXNkdEJhbGFuY2VfXwkApAMBBQt1c2R0QmFsYW5jZQkAzAgCCQCsAgICFSVzJWRfX3dsZ29sZEJhbGFuY2VfXwkApAMBBQ13bGdvbGRCYWxhbmNlCQDMCAIJAKwCAgIUJXMlZF9fYWNyZXNCYWxhbmNlX18JAKQDAQUMYWNyZXNCYWxhbmNlCQDMCAIJAKwCAgITJXMlZF9fc3Rha2VkQWNyZXNfXwkApAMBBQtzdGFrZWRBY3JlcwkAzAgCCQCsAgICEiVzJWRfX2N1cnJlbnRMdmxfXwkApAMBBQNsdmwJAMwIAgkArAICAhYlcyVkX19hY3Jlc1RvTmV4dEx2bF9fCQCkAwEFDmFjcmVzVG9OZXh0THZsCQDMCAIJAKwCAgIYJXMlZF9fdXNlckZhcm1pbmdQb3dlcl9fCQCkAwEJAJEDAgUCZnAFEGlkeFVzZXJGUGJvbnVzZWQJAMwIAgkArAICAhklcyVkX190b3RhbEZhcm1pbmdQb3dlcl9fCQCkAwEJAJEDAgUCZnAFCmlkeFRvdGFsRlAFA25pbAUBaQENY29uc3RydWN0b3JWMQEJY29udHJhY3RzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIScGVybWlzc2lvbnMgZGVuaWVkCgEKZGVzY3JpcHRvcgIDYWNjC2lnbm9yZWRJdGVtCQCsAgIFA2FjYwICJXMEBWRlc2NyCgACJGwFCWNvbnRyYWN0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKZGVzY3JpcHRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkAzAgCCQELU3RyaW5nRW50cnkCCQEKa2V5UmVzdENmZwAJALkJAgkAzAgCBQVkZXNjcgUJY29udHJhY3RzBQNTRVAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBD2tleVJlc3QyQWRkcmVzcwAJAKUIAQUEdGhpcwUDbmlsAWkBEndhbGxldEluZm9SRUFET05MWQEOdXNlckFkZHJlc3NPcHQJAJQKAgUDbmlsCQEOd2FsbGV0SW50ZXJuYWwBBQ51c2VyQWRkcmVzc09wdAFpARZjb252ZXJzaW9uSW5mb1JFQURPTkxZAQ51c2VyQWRkcmVzc09wdAQPb2xkQWNyZXNBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1MykCBQ5hY3JlczJDb250cmFjdAUTb2xkQWNyZXNDb250cmFjdEtleQQLJHQwNDY5NTQ4MTcJAQxhc1R1cGxlMkludHMBCQD8BwQFD29sZEFjcmVzQWRkcmVzcwIXdW5zdGFrZUFsbEFjcmVzUkVBRE9OTFkJAMwIAgUOdXNlckFkZHJlc3NPcHQFA25pbAUDbmlsBA11bnN0YWtlZEFjcmVzCAULJHQwNDY5NTQ4MTcCXzEEDGNsYWltZWRBY3JlcwgFCyR0MDQ2OTU0ODE3Al8yBAskdDA0ODIwNDk2OQkBDGFzVHVwbGU0SW50cwEJAPwHBAUOYWNyZXMyQ29udHJhY3QCFHVuc3Rha2VMYW5kc1JFQURPTkxZCQDMCAIFDnVzZXJBZGRyZXNzT3B0BQNuaWwFA25pbAQPYWNyZXNGcm9tUGllY2VzCAULJHQwNDgyMDQ5NjkCXzEEDGFjcmVzRnJvbVJlcwgFCyR0MDQ4MjA0OTY5Al8yBAxhY3Jlc0Zyb21NYXQIBQskdDA0ODIwNDk2OQJfMwQNYWNyZXNGcm9tUHJvZAgFCyR0MDQ4MjA0OTY5Al80BBFvbGRTdGFraW5nQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAtkdWNrQXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAnQgCBRFvbGRTdGFraW5nQWRkcmVzcwkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUOdXNlckFkZHJlc3NPcHQCAAQLJHQwNTE0NzUzNjkDCQECIT0CBQtkdWNrQXNzZXRJZAIACQEMYXNUdXBsZTNJbnRzAQkA/AcEBRFvbGRTdGFraW5nQWRkcmVzcwITdW5zdGFrZUR1Y2tSRUFET05MWQkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQ51c2VyQWRkcmVzc09wdAUDbmlsBQNuaWwJAJUKAwAAAAAAAAQQYWNyZXNGcm9tRHVja1JlcwgFCyR0MDUxNDc1MzY5Al8xBBBhY3Jlc0Zyb21EdWNrTWF0CAULJHQwNTE0NzUzNjkCXzIEEWFjcmVzRnJvbUR1Y2tQcm9kCAULJHQwNTE0NzUzNjkCXzMJAJQKAgUDbmlsCQDMCAIJAKwCAgIVJXMlZF9fdW5zdGFrZWRBY3Jlc19fCQCkAwEFDXVuc3Rha2VkQWNyZXMJAMwIAgkArAICAhQlcyVkX19jbGFpbWVkQWNyZXNfXwkApAMBBQxjbGFpbWVkQWNyZXMJAMwIAgkArAICAhclcyVkX19hY3Jlc0Zyb21QaWVjZXNfXwkApAMBBQ9hY3Jlc0Zyb21QaWVjZXMJAMwIAgkArAICAhQlcyVkX19hY3Jlc0Zyb21SZXNfXwkApAMBBQxhY3Jlc0Zyb21SZXMJAMwIAgkArAICAhQlcyVkX19hY3Jlc0Zyb21NYXRfXwkApAMBBQxhY3Jlc0Zyb21NYXQJAMwIAgkArAICAhUlcyVkX19hY3Jlc0Zyb21Qcm9kX18JAKQDAQUNYWNyZXNGcm9tUHJvZAkAzAgCCQCsAgICGCVzJWRfX2FjcmVzRnJvbUR1Y2tSZXNfXwkApAMBBRBhY3Jlc0Zyb21EdWNrUmVzCQDMCAIJAKwCAgIYJXMlZF9fYWNyZXNGcm9tRHVja01hdF9fCQCkAwEFEGFjcmVzRnJvbUR1Y2tNYXQJAMwIAgkArAICAhklcyVkX19hY3Jlc0Zyb21EdWNrUHJvZF9fCQCkAwEFEWFjcmVzRnJvbUR1Y2tQcm9kBQNuaWwBaQEQd2xnU3RhdHNSRUFET05MWQELdXNlckFkZHJPcHQECGN1clN0YXRzCQEMZ2V0V2xnU3RhdHMyBAULdXNlckFkZHJPcHQJAMwIAgUNcmVzdDJDb250cmFjdAkAzAgCBQ5hY3JlczJDb250cmFjdAkAzAgCBQt3bGdDb250cmFjdAkAzAgCBRJwdXp6bGVQb29sQ29udHJhY3QJAMwIAgUSaW52ZXN0RnVuZENvbnRyYWN0BQNuaWwFC3VzZHRBc3NldElkAAAJAJQKAgUDbmlsCQDMCAIJAKwCAgIRJXMlZF9fd2xnQW1vdW50X18JAKQDAQkAkQMCBQhjdXJTdGF0cwULaXhXbGdBbW91bnQJAMwIAgkArAICAg4lcyVkX193bGdXbGdfXwkApAMBCQCRAwIFCGN1clN0YXRzBQhpeFdsZ1dsZwkAzAgCCQCsAgICECVzJWRfX3dsZ1ByaWNlX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUKaXhXbGdQcmljZQkAzAgCCQCsAgICESVzJWRfX3VzZHRGdW5kc19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFCml4V2xnRnVuZHMJAMwIAgkArAICAhQlcyVkX191c2R0QWN0aXZpdHlfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ1peFdsZ0FjdGl2aXR5CQDMCAIJAKwCAgITJXMlZF9fdXNkdFN0YWtpbmdfXwkApAMBCQCRAwIFCGN1clN0YXRzBQtpeFdsZ0FjcmVzMgkAzAgCCQCsAgICFSVzJWRfX3VzZHRBcmJpdHJhZ2VfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ5peFdsZ0FyYml0cmFnZQkAzAgCCQCsAgICECVzJWRfX3VzZHRQb29sX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUJaXhXbGdQb29sCQDMCAIJAKwCAgIUJXMlZF9fd2xnSXNzdWVUaW1lX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdJc3N1ZVRpbWUJAMwIAgkArAICAholcyVkX193bGdMYXN0VGVhbUFjdFRpbWVfXwkApAMBCQCRAwIFCGN1clN0YXRzBRRpeFdsZ0xhc3RUZWFtQWN0VGltZQkAzAgCCQCsAgICFCVzJWRfX3dsZ1RlYW1Ub3RhbF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDml4V2xnVGVhbVRvdGFsCQDMCAIJAKwCAgIVJXMlZF9fd2xnVGVhbUFtTGVmdF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFD2l4V2xnVGVhbUFtTGVmdAkAzAgCCQCsAgICGSVzJWRfX3dsZ1RlYW1BbUF2YWlsTm93X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUTaXhXbGdUZWFtQW1BdmFpbE5vdwkAzAgCCQCsAgICFSVzJWRfX3dsZ1RlYW1XbGdvbGRfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ9peFdsZ1RlYW1XbGdvbGQJAMwIAgkArAICAhMlcyVkX193bGdBY3RUb3RhbF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDWl4V2xnQWN0VG90YWwJAMwIAgkArAICAhQlcyVkX193bGdBY3RBbUxlZnRfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ5peFdsZ0FjdEFtTGVmdAkAzAgCCQCsAgICGCVzJWRfX3dsZ0FjdEFtQXZhaWxOb3dfXwkApAMBCQCRAwIFCGN1clN0YXRzBRJpeFdsZ0FjdEFtQXZhaWxOb3cJAMwIAgkArAICAhQlcyVkX193bGdBY3RXbGdvbGRfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ5peFdsZ0FjdFdsZ29sZAkAzAgCCQCsAgICFCVzJWRfX3dsZ0N1clBlcmlvZF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDml4V2xnQ3VyUGVyaW9kCQDMCAIJAKwCAgIWJXMlZF9fd2xnQW1MZWZ0VG90YWxfXwkApAMBCQCRAwIFCGN1clN0YXRzBRBpeFdsZ0FtTGVmdFRvdGFsCQDMCAIJAKwCAgIgJXMlZF9fd2xnQ3VyUGVyaW9kRGlzdHJpYnV0aW9uX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUaaXhXbGdDdXJQZXJpb2REaXN0cmlidXRpb24JAMwIAgkArAICAhclcyVkX193bGdMYXN0VXNlclRpbWVfXwkApAMBCQCRAwIFCGN1clN0YXRzBRFpeFdsZ0xhc3RVc2VyVGltZQkAzAgCCQCsAgICGiVzJWRfX3dsZ0ludmVzdEZ1bmRUb3RhbF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFFWl4V2xnSW52ZXN0RnVuZEFtb3VudAkAzAgCCQCsAgICGSVzJWRfX3dsZ1VzZXJBbUF2YWlsTm93X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUTaXhXbGdVc2VyQW1BdmFpbE5vdwkAzAgCCQCsAgICFiVzJWRfX3dsZ0VmZlVzZXJUaW1lX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUQaXhXbGdFZmZVc2VyVGltZQkAzAgCCQCsAgICGiVzJWRfX3dsZ0lzc3VlMTBBdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFEml4V2xnSXNzdWUxMEFtb3VudAkAzAgCCQCsAgICIyVzJWRfX3dsZ01hcmtldGluZ0lzc3VlMTBBdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFG2l4V2xnTWFya2V0aW5nSXNzdWUxMEFtb3VudAkAzAgCCQCsAgICHiVzJWRfX3dsZ1RlYW1Jc3N1ZTEwQXZhaWxOb3dfXwkApAMBCQCRAwIFCGN1clN0YXRzBRZpeFdsZ1RlYW1Jc3N1ZTEwQW1vdW50CQDMCAIJAKwCAgIeJXMlZF9fd2xnVXNlcklzc3VlMTBBdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFD2l4V2xnVXNlcjEwcGFydAkAzAgCCQCsAgICGiVzJWRfX3dsZ0xhc3RJc3N1ZTEwVGltZV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFEGl4V2xnSXNzdWUxMFRpbWUJAMwIAgkArAICAhwlcyVkX193bGdUb3RhbEZhcm1pbmdQb3dlcl9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFFml4V2xnVG90YWxGYXJtaW5nUG93ZXIJAMwIAgkArAICAhslcyVkX193bGdBY3Jlc1N0YWtlZFRvdGFsX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUVaXhXbGdBY3Jlc1N0YWtlZFRvdGFsBQNuaWwBaQEUbG90dGVyeVN0YXRzUkVBRE9OTFkBC3VzZXJBZGRyT3B0BAV0b2RheQkAaQIFBmhlaWdodAUKREFZX0JMT0NLUwQEd2VlawkAaQIFBmhlaWdodAULV0VFS19CTE9DS1MECGxhc3RXZWVrCQBlAgUEd2VlawABBA5jdXJXZWVrVGlja2V0cwkBC3ZhbHVlT3JFbHNlAgkAmggCBQt3bGdDb250cmFjdAkBEmtleVVzZXJXZWVrVGlja2V0cwIFC3VzZXJBZGRyT3B0BQR3ZWVrAAAED2xhc3RXZWVrVGlja2V0cwkBC3ZhbHVlT3JFbHNlAgkAmggCBQt3bGdDb250cmFjdAkBEmtleVVzZXJXZWVrVGlja2V0cwIFC3VzZXJBZGRyT3B0BQhsYXN0V2VlawAABBNjdXJXZWVrVG90YWxUaWNrZXRzCQELdmFsdWVPckVsc2UCCQCaCAIFC3dsZ0NvbnRyYWN0CQETa2V5VG90YWxXZWVrVGlja2V0cwEFBHdlZWsAAAQUbGFzdFdlZWtUb3RhbFRpY2tldHMJAQt2YWx1ZU9yRWxzZQIJAJoIAgULd2xnQ29udHJhY3QJARNrZXlUb3RhbFdlZWtUaWNrZXRzAQUIbGFzdFdlZWsAAAQIdXNlcnNCZXQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgULd2xnQ29udHJhY3QJAQprZXlVc2VyQmV0AQULdXNlckFkZHJPcHQCAAkAlAoCBQNuaWwJAMwIAgkArAICCQCsAgIJAKwCAgIWJXMlZCVkX190b3RhbFRpY2tldHNfXwkApAMBBRRsYXN0V2Vla1RvdGFsVGlja2V0cwUDU0VQCQCkAwEFE2N1cldlZWtUb3RhbFRpY2tldHMJAMwIAgkArAICCQCsAgIJAKwCAgIVJXMlZCVkX191c2VyVGlja2V0c19fCQCkAwEFD2xhc3RXZWVrVGlja2V0cwUDU0VQCQCkAwEFDmN1cldlZWtUaWNrZXRzCQDMCAIJAKwCAgIWJXMlZF9fYmxvY2tjaGFpbldlZWtfXwkApAMBBQR3ZWVrCQDMCAIJAKwCAgIVJXMlZF9fYmxvY2tjaGFpbkRheV9fCQCkAwEFBXRvZGF5CQDMCAIJAKwCAgIYJXMlZF9fYmxvY2tjaGFpbk1pbnV0ZV9fCQCkAwEJAGoCBQZoZWlnaHQFCkRBWV9CTE9DS1MJAMwIAgkArAICAhclcyVkX193aW5uaW5nQmV0VG9kYXlfXwkApAMBCQEKd2lubmluZ0JldAEFBXRvZGF5CQDMCAIJAKwCAgIQJXMlc19fdXNlcnNCZXRfXwUIdXNlcnNCZXQFA25pbAAPdQDw",
    "height": 3387030,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: GovWwQwuVtCwDcw3X3AXQkfYN9495bgKL75pnnifBvC4
Next: 5anAW5CCUTRhpHEJtc1kQjcDSvwbfpE4aEJCKyuC3oPo

Diff: 
Old New Differences
131 131  func keyTotalWeekTickets (week) = ("totalWeekTickets_" + toString(week))
132 132  
133 133  
134 - func winningBet (day) = (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
134 + func winningBet (day) = {
135 +     let b = (day * DAY_BLOCKS)
136 +     let h = if ((b > VRF_OFFSET))
137 +         then b
138 +         else (b + VRF_OFFSET)
139 +     (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
140 +     }
135 141  
136 142  
137 143  func asTuple4Ints (val) = match val {
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 chain = take(drop(this.bytes, 1), 1)
7 7  
8 8  let DAY_BLOCKS = match chain {
9 9      case _ => 
10 10          if ((base58'2W' == $match0))
11 11              then 1440
12 12              else if ((base58'2T' == $match0))
13 13                  then 60
14 14                  else throw("Unknown chain")
15 15  }
16 16  
17 17  let WEEK_BLOCKS = match chain {
18 18      case _ => 
19 19          if ((base58'2W' == $match0))
20 20              then 10080
21 21              else if ((base58'2T' == $match0))
22 22                  then 180
23 23                  else throw("Unknown chain")
24 24  }
25 25  
26 26  let VRF_OFFSET = match chain {
27 27      case _ => 
28 28          if ((base58'2W' == $match0))
29 29              then 0
30 30              else if ((base58'2T' == $match0))
31 31                  then 1146000
32 32                  else throw("Unknown chain")
33 33  }
34 34  
35 35  let usdtAssetId = match chain {
36 36      case _ => 
37 37          if ((base58'2W' == $match0))
38 38              then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
39 39              else if ((base58'2T' == $match0))
40 40                  then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
41 41                  else throw("Unknown chain")
42 42  }
43 43  
44 44  let defaultRest2AddressStr = match chain {
45 45      case _ => 
46 46          if ((base58'2W' == $match0))
47 47              then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
48 48              else if ((base58'2T' == $match0))
49 49                  then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
50 50                  else throw("Unknown chain")
51 51  }
52 52  
53 53  let oldStakingContractStr = match chain {
54 54      case _ => 
55 55          if ((base58'2W' == $match0))
56 56              then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
57 57              else if ((base58'2T' == $match0))
58 58                  then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
59 59                  else throw("Unknown chain")
60 60  }
61 61  
62 62  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
63 63  
64 64  
65 65  let IdxCfgAcres2Dapp = 1
66 66  
67 67  let IdxCfgWlgDapp = 2
68 68  
69 69  let IdxCfgPuzzlePoolDapp = 4
70 70  
71 71  let IdxCfgInvestFundDapp = 5
72 72  
73 73  func keyRestCfg () = "%s__restConfig"
74 74  
75 75  
76 76  func keyRest2Address () = "%s__rest2Addr"
77 77  
78 78  
79 79  func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
80 80  
81 81  
82 82  func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
83 83  
84 84  
85 85  let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
86 86  
87 87  let rest2Cfg = readRestCfgOrFail(rest2Contract)
88 88  
89 89  let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
90 90  
91 91  let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
92 92  
93 93  let puzzlePoolContract = getContractAddressOrFail(rest2Cfg, IdxCfgPuzzlePoolDapp)
94 94  
95 95  let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
96 96  
97 97  let oldAcresContractKey = "oldAcresContract"
98 98  
99 99  func keyLastWeekTxIdByUser (addr) = ("lastWeekTxIdByUser_" + addr)
100 100  
101 101  
102 102  func keyCurWeekTxIdByUser (addr) = ("curWeekTxIdByUser_" + addr)
103 103  
104 104  
105 105  let wlgAssetIdKey = "wlg_assetId"
106 106  
107 107  let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
108 108  
109 109  let acresAssetIdKey = "acresAssetId"
110 110  
111 111  let acresAssetId = valueOrErrorMessage(getBinary(acres2Contract, acresAssetIdKey), "ACRES is not issued yet")
112 112  
113 113  func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
114 114  
115 115  
116 116  func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
117 117  
118 118  
119 119  func keyAddressRefBy (addr) = ("accRefBy_" + addr)
120 120  
121 121  
122 122  func keyAddressReferrals (addr) = ("accReferrals_" + addr)
123 123  
124 124  
125 125  func keyUserBet (addr) = ("userBet_" + addr)
126 126  
127 127  
128 128  func keyUserWeekTickets (addr,week) = ((("userWeekTickets_" + addr) + "_") + toString(week))
129 129  
130 130  
131 131  func keyTotalWeekTickets (week) = ("totalWeekTickets_" + toString(week))
132 132  
133 133  
134 - func winningBet (day) = (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
134 + func winningBet (day) = {
135 +     let b = (day * DAY_BLOCKS)
136 +     let h = if ((b > VRF_OFFSET))
137 +         then b
138 +         else (b + VRF_OFFSET)
139 +     (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
140 +     }
135 141  
136 142  
137 143  func asTuple4Ints (val) = match val {
138 144      case t: (Int, Int, Int, Int) => 
139 145          t
140 146      case _ => 
141 147          throw("fail to cast into (Int, Int, Int, Int)")
142 148  }
143 149  
144 150  
145 151  func asTuple3Ints (val) = match val {
146 152      case t: (Int, Int, Int) => 
147 153          t
148 154      case _ => 
149 155          throw("fail to cast into (Int, Int, Int)")
150 156  }
151 157  
152 158  
153 159  func asTuple2Ints (val) = match val {
154 160      case t: (Int, Int) => 
155 161          t
156 162      case _ => 
157 163          throw("fail to cast into (Int, Int)")
158 164  }
159 165  
160 166  
161 167  let M6_ = 1000000
162 168  
163 169  let M8_ = 100000000
164 170  
165 171  let TEAM_SHARE = 200000
166 172  
167 173  let ACTIVITY_SHARE = 100000
168 174  
169 175  let PLAYER_SHARE = 400000
170 176  
171 177  let YEAR_MILLIS = 31557600000
172 178  
173 179  let DAY_MS = 86400000
174 180  
175 181  let ISSUE10 = 1000000000
176 182  
177 183  let PLAYERS10_SHARE = 800000
178 184  
179 185  let MARKETING10_SHARE = 100000
180 186  
181 187  let TEAM10_SHARE = 100000
182 188  
183 189  let NEW_STAKING_START = 1731279600000
184 190  
185 191  let teamAdrKey = "teamAddr"
186 192  
187 193  let lastTeamTimKey = "lastClaimedTime_team"
188 194  
189 195  let teamAmtLeftKey = "teamAmountLeft"
190 196  
191 197  let lastActivitiesTimKey = "lastClaimedTime_activities"
192 198  
193 199  let actAmtLeftKey = "activitiesAmountLeft"
194 200  
195 201  let stakersAmtLeftKey = "stakersAmountLeft"
196 202  
197 203  func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
198 204  
199 205  
200 206  func distrByPeriod (issuedAmount,period) = fraction(issuedAmount, (PLAYER_SHARE * (period + 1)), (6 * M6_))
201 207  
202 208  
203 209  let wlgIssue10TimeKey = "wlg_issue10Time"
204 210  
205 211  let wlgIssueTimKey = "wlg_issueTime"
206 212  
207 213  let wlgIssuedAmtKey = "wlg_issuedAmount"
208 214  
209 215  let zbIssuedAmtKey = "zbill_issuedAmount"
210 216  
211 217  func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
212 218  
213 219  
214 220  let acresStakdTotalKey = "acresStakedAmountTotal"
215 221  
216 222  let totalFarmingPowerKey = "totalFarmingPower"
217 223  
218 224  let dapp2Rest = 0
219 225  
220 226  let dapp2Staking = 1
221 227  
222 228  let dapp2Wlg = 2
223 229  
224 230  let dapp2Puzzle = 3
225 231  
226 232  let dapp2InvestFund = 4
227 233  
228 234  func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
229 235  
230 236  
231 237  let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
232 238  
233 239  func getLevelByAcres (acres) = {
234 240      let acr = ((acres + 99999999) / M8_)
235 241      func checker (acc,item) =     if ((item >= acr))
236 242          then acc
237 243          else (acc + 1)
238 244  
239 245      let $l = levelAcres
240 246      let $s = size($l)
241 247      let $acc0 = 0
242 248      func $f0_1 ($a,$i) =     if (($i >= $s))
243 249          then $a
244 250          else checker($a, $l[$i])
245 251  
246 252      func $f0_2 ($a,$i) =     if (($i >= $s))
247 253          then $a
248 254          else throw("List size exceeds 10")
249 255  
250 256      $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)
251 257      }
252 258  
253 259  
254 260  func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
255 261  
256 262  
257 263  func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
258 264      let notBonused = getFarmingPowerByAcres(acres)
259 265      $Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
260 266      }
261 267  
262 268  
263 269  func getFarmingPowers (userAddrStrOrEmpty,acres2Contract) = {
264 270      let totalFP = valueOrElse(getInteger(acres2Contract, totalFarmingPowerKey), 0)
265 271      let userAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
266 272      let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(userAddrStrOrEmpty)), 0)
267 273      let $t079119 = getFarmingPowerByAcresAndBonus(userAcres, userBonus)
268 274      let userFPbonused = $t079119._1
269 275      let userFPnotBonused = $t079119._2
270 276  [totalFP, userFPbonused, userFPnotBonused, userBonus]
271 277      }
272 278  
273 279  
274 280  let idxTotalFP = 0
275 281  
276 282  let idxUserFPbonused = 1
277 283  
278 284  let ixWlgAmount = 0
279 285  
280 286  let ixWlgWlg = 1
281 287  
282 288  let ixWlgPrice = 2
283 289  
284 290  let ixWlgFunds = 3
285 291  
286 292  let ixWlgActivity = 4
287 293  
288 294  let ixWlgAcres2 = 5
289 295  
290 296  let ixWlgArbitrage = 6
291 297  
292 298  let ixWlgPool = 7
293 299  
294 300  let ixWlgIssueTime = 8
295 301  
296 302  let ixWlgLastTeamActTime = 9
297 303  
298 304  let ixWlgTeamTotal = 10
299 305  
300 306  let ixWlgTeamAmLeft = 11
301 307  
302 308  let ixWlgTeamAmAvailNow = 12
303 309  
304 310  let ixWlgTeamWlgold = 13
305 311  
306 312  let ixWlgActTotal = 14
307 313  
308 314  let ixWlgActAmLeft = 15
309 315  
310 316  let ixWlgActAmAvailNow = 16
311 317  
312 318  let ixWlgActWlgold = 17
313 319  
314 320  let ixWlgCurPeriod = 18
315 321  
316 322  let ixWlgAmLeftTotal = 19
317 323  
318 324  let ixWlgCurPeriodDistribution = 20
319 325  
320 326  let ixWlgLastUserTime = 21
321 327  
322 328  let ixWlgInvestFundAmount = 22
323 329  
324 330  let ixWlgUserAmAvailNow = 23
325 331  
326 332  let ixWlgEffUserTime = 24
327 333  
328 334  let ixWlgIssue10Amount = 25
329 335  
330 336  let ixWlgMarketingIssue10Amount = 26
331 337  
332 338  let ixWlgTeamIssue10Amount = 27
333 339  
334 340  let ixWlgUser10part = 28
335 341  
336 342  let ixWlgIssue10Time = 29
337 343  
338 344  let ixWlgTotalFarmingPower = 30
339 345  
340 346  let ixWlgAcresStakedTotal = 31
341 347  
342 348  func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
343 349      let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
344 350      let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
345 351      let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
346 352      let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
347 353      let acres2Usd = assetBalance(contracts[dapp2Staking], usdtId)
348 354      let investFndContract = contracts[dapp2InvestFund]
349 355      let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
350 356      let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
351 357      let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
352 358      let now = lastBlock.timestamp
353 359      let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
354 360      let wlgWlg = assetBalance(contracts[dapp2Wlg], wlgId)
355 361      let teamTotal = fraction(issuedAmount, TEAM_SHARE, M6_)
356 362      let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
357 363      let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
358 364      let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
359 365      let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
360 366      let teamWlgold = assetBalance(teamAddr, wlgId)
361 367      let actTotal = fraction(issuedAmount, ACTIVITY_SHARE, M6_)
362 368      let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
363 369      let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
364 370      let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
365 371      let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
366 372      let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
367 373      let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
368 374      let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
369 375      let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
370 376      let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
371 377      let curPeriodDistribution = distrByPeriod(issuedAmount, curPeriod)
372 378      let prevPeriodEnd = (issueTime + (YEAR_MILLIS * curPeriod))
373 379      let prevPrevPeriodEnd = (issueTime + (YEAR_MILLIS * (curPeriod - 1)))
374 380      let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
375 381      let userAvailable = if ((lastUserPeriod == curPeriod))
376 382          then a0
377 383          else if ((lastUserPeriod == (curPeriod - 1)))
378 384              then {
379 385                  let a1 = fraction(distrByPeriod(issuedAmount, (curPeriod - 1)), (prevPeriodEnd - lastUserTime), YEAR_MILLIS)
380 386                  (a1 + a0)
381 387                  }
382 388              else {
383 389                  let a2 = fraction(distrByPeriod(issuedAmount, (curPeriod - 2)), (prevPrevPeriodEnd - lastUserTime), YEAR_MILLIS)
384 390                  let a1 = distrByPeriod(issuedAmount, (curPeriod - 1))
385 391                  ((a2 + a1) + a0)
386 392                  }
387 393      let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
388 394      let userAmount = if ((eff[idxTotalFP] != 0))
389 395          then fraction(userAvailable, eff[idxUserFPbonused], eff[idxTotalFP])
390 396          else 0
391 397      let lastIssue10Time = valueOrElse(getInteger(contracts[dapp2Wlg], wlgIssue10TimeKey), NEW_STAKING_START)
392 398      let issue10Amount = fraction(ISSUE10, max([(now - lastIssue10Time), 0]), DAY_MS)
393 399      let marketingIssue10Amount = fraction(issue10Amount, MARKETING10_SHARE, M6_)
394 400      let teamIssue10Amount = fraction(issue10Amount, TEAM10_SHARE, M6_)
395 401      let user10Interval = max([(now - max([NEW_STAKING_START, lastUserTime])), 0])
396 402      let user10part = if ((eff[idxTotalFP] != 0))
397 403          then fraction(fraction(fraction(ISSUE10, user10Interval, DAY_MS), eff[idxUserFPbonused], eff[idxTotalFP]), PLAYERS10_SHARE, M6_)
398 404          else 0
399 405      let newIssue10Time = max([NEW_STAKING_START, now])
400 406      let acresStakedTotal = valueOrElse(getInteger(contracts[dapp2Staking], acresStakdTotalKey), 0)
401 407  [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]
402 408      }
403 409  
404 410  
405 411  func walletInternal (userAddressOpt) = {
406 412      let addr = addressFromString(userAddressOpt)
407 413      let balance = if (isDefined(addr))
408 414          then wavesBalance(value(addr))
409 415          else BalanceDetails(0, 0, 0, 0)
410 416      let usdtBalance = if (isDefined(addr))
411 417          then assetBalance(value(addr), usdtAssetId)
412 418          else 0
413 419      let wlgoldBalance = if (isDefined(addr))
414 420          then assetBalance(value(addr), wlgAssetId)
415 421          else 0
416 422      let customName = valueOrElse(getString(acres2Contract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
417 423      let refByKey = keyAddressRefBy(userAddressOpt)
418 424      let refBy = getString(acres2Contract, refByKey)
419 425      let refs = valueOrElse(getString(acres2Contract, keyAddressReferrals(userAddressOpt)), "")
420 426      let lastTxId = valueOrElse(getString(acres2Contract, keyLastWeekTxIdByUser(userAddressOpt)), "")
421 427      let curTxId = valueOrElse(getString(acres2Contract, keyCurWeekTxIdByUser(userAddressOpt)), "")
422 428      let acresBalance = if (isDefined(addr))
423 429          then assetBalance(value(addr), acresAssetId)
424 430          else 0
425 431      let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddressOpt)), 0)
426 432      let lvl = getLevelByAcres(stakedAcres)
427 433      let fp = getFarmingPowers(userAddressOpt, acres2Contract)
428 434      let acresToNextLvl = if ((lvl >= size(levelAcres)))
429 435          then 0
430 436          else (((levelAcres[lvl] * M8_) + 1) - stakedAcres)
431 437  [("%s%s__customName__" + customName), ("%s%s__referredBy__" + valueOrElse(refBy, "")), ("%s%s__referrals__" + refs), ("%s%s__lastWeekTxId__" + lastTxId), ("%s%s__curWeekTxId__" + lastTxId), ("%s%d__wavesBalance__" + toString(balance.available)), ("%s%d__usdtBalance__" + toString(usdtBalance)), ("%s%d__wlgoldBalance__" + toString(wlgoldBalance)), ("%s%d__acresBalance__" + toString(acresBalance)), ("%s%d__stakedAcres__" + toString(stakedAcres)), ("%s%d__currentLvl__" + toString(lvl)), ("%s%d__acresToNextLvl__" + toString(acresToNextLvl)), ("%s%d__userFarmingPower__" + toString(fp[idxUserFPbonused])), ("%s%d__totalFarmingPower__" + toString(fp[idxTotalFP]))]
432 438      }
433 439  
434 440  
435 441  @Callable(i)
436 442  func constructorV1 (contracts) = if ((i.caller != this))
437 443      then throw("permissions denied")
438 444      else {
439 445          func descriptor (acc,ignoredItem) =         (acc + "%s")
440 446  
441 447          let descr = {
442 448              let $l = contracts
443 449              let $s = size($l)
444 450              let $acc0 = ""
445 451              func $f0_1 ($a,$i) =             if (($i >= $s))
446 452                  then $a
447 453                  else descriptor($a, $l[$i])
448 454  
449 455              func $f0_2 ($a,$i) =             if (($i >= $s))
450 456                  then $a
451 457                  else throw("List size exceeds 10")
452 458  
453 459              $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)
454 460              }
455 461  [StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRest2Address(), toString(this))]
456 462          }
457 463  
458 464  
459 465  
460 466  @Callable(i)
461 467  func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
462 468  
463 469  
464 470  
465 471  @Callable(i)
466 472  func conversionInfoREADONLY (userAddressOpt) = {
467 473      let oldAcresAddress = addressFromStringValue(getStringValue(acres2Contract, oldAcresContractKey))
468 474      let $t046954817 = asTuple2Ints(invoke(oldAcresAddress, "unstakeAllAcresREADONLY", [userAddressOpt], nil))
469 475      let unstakedAcres = $t046954817._1
470 476      let claimedAcres = $t046954817._2
471 477      let $t048204969 = asTuple4Ints(invoke(acres2Contract, "unstakeLandsREADONLY", [userAddressOpt], nil))
472 478      let acresFromPieces = $t048204969._1
473 479      let acresFromRes = $t048204969._2
474 480      let acresFromMat = $t048204969._3
475 481      let acresFromProd = $t048204969._4
476 482      let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
477 483      let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(userAddressOpt)), "")
478 484      let $t051475369 = if ((duckAssetId != ""))
479 485          then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckREADONLY", [duckAssetId, userAddressOpt], nil))
480 486          else $Tuple3(0, 0, 0)
481 487      let acresFromDuckRes = $t051475369._1
482 488      let acresFromDuckMat = $t051475369._2
483 489      let acresFromDuckProd = $t051475369._3
484 490      $Tuple2(nil, [("%s%d__unstakedAcres__" + toString(unstakedAcres)), ("%s%d__claimedAcres__" + toString(claimedAcres)), ("%s%d__acresFromPieces__" + toString(acresFromPieces)), ("%s%d__acresFromRes__" + toString(acresFromRes)), ("%s%d__acresFromMat__" + toString(acresFromMat)), ("%s%d__acresFromProd__" + toString(acresFromProd)), ("%s%d__acresFromDuckRes__" + toString(acresFromDuckRes)), ("%s%d__acresFromDuckMat__" + toString(acresFromDuckMat)), ("%s%d__acresFromDuckProd__" + toString(acresFromDuckProd))])
485 491      }
486 492  
487 493  
488 494  
489 495  @Callable(i)
490 496  func wlgStatsREADONLY (userAddrOpt) = {
491 497      let curStats = getWlgStats2(userAddrOpt, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
492 498      $Tuple2(nil, [("%s%d__wlgAmount__" + toString(curStats[ixWlgAmount])), ("%s%d__wlgWlg__" + toString(curStats[ixWlgWlg])), ("%s%d__wlgPrice__" + toString(curStats[ixWlgPrice])), ("%s%d__usdtFunds__" + toString(curStats[ixWlgFunds])), ("%s%d__usdtActivity__" + toString(curStats[ixWlgActivity])), ("%s%d__usdtStaking__" + toString(curStats[ixWlgAcres2])), ("%s%d__usdtArbitrage__" + toString(curStats[ixWlgArbitrage])), ("%s%d__usdtPool__" + toString(curStats[ixWlgPool])), ("%s%d__wlgIssueTime__" + toString(curStats[ixWlgIssueTime])), ("%s%d__wlgLastTeamActTime__" + toString(curStats[ixWlgLastTeamActTime])), ("%s%d__wlgTeamTotal__" + toString(curStats[ixWlgTeamTotal])), ("%s%d__wlgTeamAmLeft__" + toString(curStats[ixWlgTeamAmLeft])), ("%s%d__wlgTeamAmAvailNow__" + toString(curStats[ixWlgTeamAmAvailNow])), ("%s%d__wlgTeamWlgold__" + toString(curStats[ixWlgTeamWlgold])), ("%s%d__wlgActTotal__" + toString(curStats[ixWlgActTotal])), ("%s%d__wlgActAmLeft__" + toString(curStats[ixWlgActAmLeft])), ("%s%d__wlgActAmAvailNow__" + toString(curStats[ixWlgActAmAvailNow])), ("%s%d__wlgActWlgold__" + toString(curStats[ixWlgActWlgold])), ("%s%d__wlgCurPeriod__" + toString(curStats[ixWlgCurPeriod])), ("%s%d__wlgAmLeftTotal__" + toString(curStats[ixWlgAmLeftTotal])), ("%s%d__wlgCurPeriodDistribution__" + toString(curStats[ixWlgCurPeriodDistribution])), ("%s%d__wlgLastUserTime__" + toString(curStats[ixWlgLastUserTime])), ("%s%d__wlgInvestFundTotal__" + toString(curStats[ixWlgInvestFundAmount])), ("%s%d__wlgUserAmAvailNow__" + toString(curStats[ixWlgUserAmAvailNow])), ("%s%d__wlgEffUserTime__" + toString(curStats[ixWlgEffUserTime])), ("%s%d__wlgIssue10AvailNow__" + toString(curStats[ixWlgIssue10Amount])), ("%s%d__wlgMarketingIssue10AvailNow__" + toString(curStats[ixWlgMarketingIssue10Amount])), ("%s%d__wlgTeamIssue10AvailNow__" + toString(curStats[ixWlgTeamIssue10Amount])), ("%s%d__wlgUserIssue10AvailNow__" + toString(curStats[ixWlgUser10part])), ("%s%d__wlgLastIssue10Time__" + toString(curStats[ixWlgIssue10Time])), ("%s%d__wlgTotalFarmingPower__" + toString(curStats[ixWlgTotalFarmingPower])), ("%s%d__wlgAcresStakedTotal__" + toString(curStats[ixWlgAcresStakedTotal]))])
493 499      }
494 500  
495 501  
496 502  
497 503  @Callable(i)
498 504  func lotteryStatsREADONLY (userAddrOpt) = {
499 505      let today = (height / DAY_BLOCKS)
500 506      let week = (height / WEEK_BLOCKS)
501 507      let lastWeek = (week - 1)
502 508      let curWeekTickets = valueOrElse(getInteger(wlgContract, keyUserWeekTickets(userAddrOpt, week)), 0)
503 509      let lastWeekTickets = valueOrElse(getInteger(wlgContract, keyUserWeekTickets(userAddrOpt, lastWeek)), 0)
504 510      let curWeekTotalTickets = valueOrElse(getInteger(wlgContract, keyTotalWeekTickets(week)), 0)
505 511      let lastWeekTotalTickets = valueOrElse(getInteger(wlgContract, keyTotalWeekTickets(lastWeek)), 0)
506 512      let usersBet = valueOrElse(getString(wlgContract, keyUserBet(userAddrOpt)), "")
507 513      $Tuple2(nil, [((("%s%d%d__totalTickets__" + toString(lastWeekTotalTickets)) + SEP) + toString(curWeekTotalTickets)), ((("%s%d%d__userTickets__" + toString(lastWeekTickets)) + SEP) + toString(curWeekTickets)), ("%s%d__blockchainWeek__" + toString(week)), ("%s%d__blockchainDay__" + toString(today)), ("%s%d__blockchainMinute__" + toString((height % DAY_BLOCKS))), ("%s%d__winningBetToday__" + toString(winningBet(today))), ("%s%s__usersBet__" + usersBet)])
508 514      }
509 515  
510 516

Old	New		Differences
131	131		func keyTotalWeekTickets (week) = ("totalWeekTickets_" + toString(week))
132	132
133	133
134		-	func winningBet (day) = (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
	134	+	func winningBet (day) = {
	135	+	let b = (day * DAY_BLOCKS)
	136	+	let h = if ((b > VRF_OFFSET))
	137	+	then b
	138	+	else (b + VRF_OFFSET)
	139	+	(toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
	140	+	}
135	141
136	142
137	143		func asTuple4Ints (val) = match val {

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 chain = take(drop(this.bytes, 1), 1)
7	7
8	8		let DAY_BLOCKS = match chain {
9	9		case _ =>
10	10		if ((base58'2W' == $match0))
11	11		then 1440
12	12		else if ((base58'2T' == $match0))
13	13		then 60
14	14		else throw("Unknown chain")
15	15		}
16	16
17	17		let WEEK_BLOCKS = match chain {
18	18		case _ =>
19	19		if ((base58'2W' == $match0))
20	20		then 10080
21	21		else if ((base58'2T' == $match0))
22	22		then 180
23	23		else throw("Unknown chain")
24	24		}
25	25
26	26		let VRF_OFFSET = match chain {
27	27		case _ =>
28	28		if ((base58'2W' == $match0))
29	29		then 0
30	30		else if ((base58'2T' == $match0))
31	31		then 1146000
32	32		else throw("Unknown chain")
33	33		}
34	34
35	35		let usdtAssetId = match chain {
36	36		case _ =>
37	37		if ((base58'2W' == $match0))
38	38		then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
39	39		else if ((base58'2T' == $match0))
40	40		then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
41	41		else throw("Unknown chain")
42	42		}
43	43
44	44		let defaultRest2AddressStr = match chain {
45	45		case _ =>
46	46		if ((base58'2W' == $match0))
47	47		then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
48	48		else if ((base58'2T' == $match0))
49	49		then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
50	50		else throw("Unknown chain")
51	51		}
52	52
53	53		let oldStakingContractStr = match chain {
54	54		case _ =>
55	55		if ((base58'2W' == $match0))
56	56		then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
57	57		else if ((base58'2T' == $match0))
58	58		then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
59	59		else throw("Unknown chain")
60	60		}
61	61
62	62		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
63	63
64	64
65	65		let IdxCfgAcres2Dapp = 1
66	66
67	67		let IdxCfgWlgDapp = 2
68	68
69	69		let IdxCfgPuzzlePoolDapp = 4
70	70
71	71		let IdxCfgInvestFundDapp = 5
72	72
73	73		func keyRestCfg () = "%s__restConfig"
74	74
75	75
76	76		func keyRest2Address () = "%s__rest2Addr"
77	77
78	78
79	79		func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
80	80
81	81
82	82		func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
83	83
84	84
85	85		let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
86	86
87	87		let rest2Cfg = readRestCfgOrFail(rest2Contract)
88	88
89	89		let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
90	90
91	91		let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
92	92
93	93		let puzzlePoolContract = getContractAddressOrFail(rest2Cfg, IdxCfgPuzzlePoolDapp)
94	94
95	95		let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
96	96
97	97		let oldAcresContractKey = "oldAcresContract"
98	98
99	99		func keyLastWeekTxIdByUser (addr) = ("lastWeekTxIdByUser_" + addr)
100	100
101	101
102	102		func keyCurWeekTxIdByUser (addr) = ("curWeekTxIdByUser_" + addr)
103	103
104	104
105	105		let wlgAssetIdKey = "wlg_assetId"
106	106
107	107		let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
108	108
109	109		let acresAssetIdKey = "acresAssetId"
110	110
111	111		let acresAssetId = valueOrErrorMessage(getBinary(acres2Contract, acresAssetIdKey), "ACRES is not issued yet")
112	112
113	113		func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
114	114
115	115
116	116		func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
117	117
118	118
119	119		func keyAddressRefBy (addr) = ("accRefBy_" + addr)
120	120
121	121
122	122		func keyAddressReferrals (addr) = ("accReferrals_" + addr)
123	123
124	124
125	125		func keyUserBet (addr) = ("userBet_" + addr)
126	126
127	127
128	128		func keyUserWeekTickets (addr,week) = ((("userWeekTickets_" + addr) + "_") + toString(week))
129	129
130	130
131	131		func keyTotalWeekTickets (week) = ("totalWeekTickets_" + toString(week))
132	132
133	133
134		-	func winningBet (day) = (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
	134	+	func winningBet (day) = {
	135	+	let b = (day * DAY_BLOCKS)
	136	+	let h = if ((b > VRF_OFFSET))
	137	+	then b
	138	+	else (b + VRF_OFFSET)
	139	+	(toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
	140	+	}
135	141
136	142
137	143		func asTuple4Ints (val) = match val {
138	144		case t: (Int, Int, Int, Int) =>
139	145		t
140	146		case _ =>
141	147		throw("fail to cast into (Int, Int, Int, Int)")
142	148		}
143	149
144	150
145	151		func asTuple3Ints (val) = match val {
146	152		case t: (Int, Int, Int) =>
147	153		t
148	154		case _ =>
149	155		throw("fail to cast into (Int, Int, Int)")
150	156		}
151	157
152	158
153	159		func asTuple2Ints (val) = match val {
154	160		case t: (Int, Int) =>
155	161		t
156	162		case _ =>
157	163		throw("fail to cast into (Int, Int)")
158	164		}
159	165
160	166
161	167		let M6_ = 1000000
162	168
163	169		let M8_ = 100000000
164	170
165	171		let TEAM_SHARE = 200000
166	172
167	173		let ACTIVITY_SHARE = 100000
168	174
169	175		let PLAYER_SHARE = 400000
170	176
171	177		let YEAR_MILLIS = 31557600000
172	178
173	179		let DAY_MS = 86400000
174	180
175	181		let ISSUE10 = 1000000000
176	182
177	183		let PLAYERS10_SHARE = 800000
178	184
179	185		let MARKETING10_SHARE = 100000
180	186
181	187		let TEAM10_SHARE = 100000
182	188
183	189		let NEW_STAKING_START = 1731279600000
184	190
185	191		let teamAdrKey = "teamAddr"
186	192
187	193		let lastTeamTimKey = "lastClaimedTime_team"
188	194
189	195		let teamAmtLeftKey = "teamAmountLeft"
190	196
191	197		let lastActivitiesTimKey = "lastClaimedTime_activities"
192	198
193	199		let actAmtLeftKey = "activitiesAmountLeft"
194	200
195	201		let stakersAmtLeftKey = "stakersAmountLeft"
196	202
197	203		func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
198	204
199	205
200	206		func distrByPeriod (issuedAmount,period) = fraction(issuedAmount, (PLAYER_SHARE * (period + 1)), (6 * M6_))
201	207
202	208
203	209		let wlgIssue10TimeKey = "wlg_issue10Time"
204	210
205	211		let wlgIssueTimKey = "wlg_issueTime"
206	212
207	213		let wlgIssuedAmtKey = "wlg_issuedAmount"
208	214
209	215		let zbIssuedAmtKey = "zbill_issuedAmount"
210	216
211	217		func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
212	218
213	219
214	220		let acresStakdTotalKey = "acresStakedAmountTotal"
215	221
216	222		let totalFarmingPowerKey = "totalFarmingPower"
217	223
218	224		let dapp2Rest = 0
219	225
220	226		let dapp2Staking = 1
221	227
222	228		let dapp2Wlg = 2
223	229
224	230		let dapp2Puzzle = 3
225	231
226	232		let dapp2InvestFund = 4
227	233
228	234		func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
229	235
230	236
231	237		let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
232	238
233	239		func getLevelByAcres (acres) = {
234	240		let acr = ((acres + 99999999) / M8_)
235	241		func checker (acc,item) = if ((item >= acr))
236	242		then acc
237	243		else (acc + 1)
238	244
239	245		let $l = levelAcres
240	246		let $s = size($l)
241	247		let $acc0 = 0
242	248		func $f0_1 ($a,$i) = if (($i >= $s))
243	249		then $a
244	250		else checker($a, $l[$i])
245	251
246	252		func $f0_2 ($a,$i) = if (($i >= $s))
247	253		then $a
248	254		else throw("List size exceeds 10")
249	255
250	256		$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)
251	257		}
252	258
253	259
254	260		func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
255	261
256	262
257	263		func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
258	264		let notBonused = getFarmingPowerByAcres(acres)
259	265		$Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
260	266		}
261	267
262	268
263	269		func getFarmingPowers (userAddrStrOrEmpty,acres2Contract) = {
264	270		let totalFP = valueOrElse(getInteger(acres2Contract, totalFarmingPowerKey), 0)
265	271		let userAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
266	272		let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(userAddrStrOrEmpty)), 0)
267	273		let $t079119 = getFarmingPowerByAcresAndBonus(userAcres, userBonus)
268	274		let userFPbonused = $t079119._1
269	275		let userFPnotBonused = $t079119._2
270	276		[totalFP, userFPbonused, userFPnotBonused, userBonus]
271	277		}
272	278
273	279
274	280		let idxTotalFP = 0
275	281
276	282		let idxUserFPbonused = 1
277	283
278	284		let ixWlgAmount = 0
279	285
280	286		let ixWlgWlg = 1
281	287
282	288		let ixWlgPrice = 2
283	289
284	290		let ixWlgFunds = 3
285	291
286	292		let ixWlgActivity = 4
287	293
288	294		let ixWlgAcres2 = 5
289	295
290	296		let ixWlgArbitrage = 6
291	297
292	298		let ixWlgPool = 7
293	299
294	300		let ixWlgIssueTime = 8
295	301
296	302		let ixWlgLastTeamActTime = 9
297	303
298	304		let ixWlgTeamTotal = 10
299	305
300	306		let ixWlgTeamAmLeft = 11
301	307
302	308		let ixWlgTeamAmAvailNow = 12
303	309
304	310		let ixWlgTeamWlgold = 13
305	311
306	312		let ixWlgActTotal = 14
307	313
308	314		let ixWlgActAmLeft = 15
309	315
310	316		let ixWlgActAmAvailNow = 16
311	317
312	318		let ixWlgActWlgold = 17
313	319
314	320		let ixWlgCurPeriod = 18
315	321
316	322		let ixWlgAmLeftTotal = 19
317	323
318	324		let ixWlgCurPeriodDistribution = 20
319	325
320	326		let ixWlgLastUserTime = 21
321	327
322	328		let ixWlgInvestFundAmount = 22
323	329
324	330		let ixWlgUserAmAvailNow = 23
325	331
326	332		let ixWlgEffUserTime = 24
327	333
328	334		let ixWlgIssue10Amount = 25
329	335
330	336		let ixWlgMarketingIssue10Amount = 26
331	337
332	338		let ixWlgTeamIssue10Amount = 27
333	339
334	340		let ixWlgUser10part = 28
335	341
336	342		let ixWlgIssue10Time = 29
337	343
338	344		let ixWlgTotalFarmingPower = 30
339	345
340	346		let ixWlgAcresStakedTotal = 31
341	347
342	348		func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
343	349		let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
344	350		let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
345	351		let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
346	352		let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
347	353		let acres2Usd = assetBalance(contracts[dapp2Staking], usdtId)
348	354		let investFndContract = contracts[dapp2InvestFund]
349	355		let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
350	356		let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
351	357		let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
352	358		let now = lastBlock.timestamp
353	359		let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
354	360		let wlgWlg = assetBalance(contracts[dapp2Wlg], wlgId)
355	361		let teamTotal = fraction(issuedAmount, TEAM_SHARE, M6_)
356	362		let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
357	363		let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
358	364		let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
359	365		let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
360	366		let teamWlgold = assetBalance(teamAddr, wlgId)
361	367		let actTotal = fraction(issuedAmount, ACTIVITY_SHARE, M6_)
362	368		let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
363	369		let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
364	370		let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
365	371		let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
366	372		let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
367	373		let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
368	374		let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
369	375		let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
370	376		let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
371	377		let curPeriodDistribution = distrByPeriod(issuedAmount, curPeriod)
372	378		let prevPeriodEnd = (issueTime + (YEAR_MILLIS * curPeriod))
373	379		let prevPrevPeriodEnd = (issueTime + (YEAR_MILLIS * (curPeriod - 1)))
374	380		let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
375	381		let userAvailable = if ((lastUserPeriod == curPeriod))
376	382		then a0
377	383		else if ((lastUserPeriod == (curPeriod - 1)))
378	384		then {
379	385		let a1 = fraction(distrByPeriod(issuedAmount, (curPeriod - 1)), (prevPeriodEnd - lastUserTime), YEAR_MILLIS)
380	386		(a1 + a0)
381	387		}
382	388		else {
383	389		let a2 = fraction(distrByPeriod(issuedAmount, (curPeriod - 2)), (prevPrevPeriodEnd - lastUserTime), YEAR_MILLIS)
384	390		let a1 = distrByPeriod(issuedAmount, (curPeriod - 1))
385	391		((a2 + a1) + a0)
386	392		}
387	393		let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
388	394		let userAmount = if ((eff[idxTotalFP] != 0))
389	395		then fraction(userAvailable, eff[idxUserFPbonused], eff[idxTotalFP])
390	396		else 0
391	397		let lastIssue10Time = valueOrElse(getInteger(contracts[dapp2Wlg], wlgIssue10TimeKey), NEW_STAKING_START)
392	398		let issue10Amount = fraction(ISSUE10, max([(now - lastIssue10Time), 0]), DAY_MS)
393	399		let marketingIssue10Amount = fraction(issue10Amount, MARKETING10_SHARE, M6_)
394	400		let teamIssue10Amount = fraction(issue10Amount, TEAM10_SHARE, M6_)
395	401		let user10Interval = max([(now - max([NEW_STAKING_START, lastUserTime])), 0])
396	402		let user10part = if ((eff[idxTotalFP] != 0))
397	403		then fraction(fraction(fraction(ISSUE10, user10Interval, DAY_MS), eff[idxUserFPbonused], eff[idxTotalFP]), PLAYERS10_SHARE, M6_)
398	404		else 0
399	405		let newIssue10Time = max([NEW_STAKING_START, now])
400	406		let acresStakedTotal = valueOrElse(getInteger(contracts[dapp2Staking], acresStakdTotalKey), 0)
401	407		[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]
402	408		}
403	409
404	410
405	411		func walletInternal (userAddressOpt) = {
406	412		let addr = addressFromString(userAddressOpt)
407	413		let balance = if (isDefined(addr))
408	414		then wavesBalance(value(addr))
409	415		else BalanceDetails(0, 0, 0, 0)
410	416		let usdtBalance = if (isDefined(addr))
411	417		then assetBalance(value(addr), usdtAssetId)
412	418		else 0
413	419		let wlgoldBalance = if (isDefined(addr))
414	420		then assetBalance(value(addr), wlgAssetId)
415	421		else 0
416	422		let customName = valueOrElse(getString(acres2Contract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
417	423		let refByKey = keyAddressRefBy(userAddressOpt)
418	424		let refBy = getString(acres2Contract, refByKey)
419	425		let refs = valueOrElse(getString(acres2Contract, keyAddressReferrals(userAddressOpt)), "")
420	426		let lastTxId = valueOrElse(getString(acres2Contract, keyLastWeekTxIdByUser(userAddressOpt)), "")
421	427		let curTxId = valueOrElse(getString(acres2Contract, keyCurWeekTxIdByUser(userAddressOpt)), "")
422	428		let acresBalance = if (isDefined(addr))
423	429		then assetBalance(value(addr), acresAssetId)
424	430		else 0
425	431		let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddressOpt)), 0)
426	432		let lvl = getLevelByAcres(stakedAcres)
427	433		let fp = getFarmingPowers(userAddressOpt, acres2Contract)
428	434		let acresToNextLvl = if ((lvl >= size(levelAcres)))
429	435		then 0
430	436		else (((levelAcres[lvl] * M8_) + 1) - stakedAcres)
431	437		[("%s%s__customName__" + customName), ("%s%s__referredBy__" + valueOrElse(refBy, "")), ("%s%s__referrals__" + refs), ("%s%s__lastWeekTxId__" + lastTxId), ("%s%s__curWeekTxId__" + lastTxId), ("%s%d__wavesBalance__" + toString(balance.available)), ("%s%d__usdtBalance__" + toString(usdtBalance)), ("%s%d__wlgoldBalance__" + toString(wlgoldBalance)), ("%s%d__acresBalance__" + toString(acresBalance)), ("%s%d__stakedAcres__" + toString(stakedAcres)), ("%s%d__currentLvl__" + toString(lvl)), ("%s%d__acresToNextLvl__" + toString(acresToNextLvl)), ("%s%d__userFarmingPower__" + toString(fp[idxUserFPbonused])), ("%s%d__totalFarmingPower__" + toString(fp[idxTotalFP]))]
432	438		}
433	439
434	440
435	441		@Callable(i)
436	442		func constructorV1 (contracts) = if ((i.caller != this))
437	443		then throw("permissions denied")
438	444		else {
439	445		func descriptor (acc,ignoredItem) = (acc + "%s")
440	446
441	447		let descr = {
442	448		let $l = contracts
443	449		let $s = size($l)
444	450		let $acc0 = ""
445	451		func $f0_1 ($a,$i) = if (($i >= $s))
446	452		then $a
447	453		else descriptor($a, $l[$i])
448	454
449	455		func $f0_2 ($a,$i) = if (($i >= $s))
450	456		then $a
451	457		else throw("List size exceeds 10")
452	458
453	459		$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)
454	460		}
455	461		[StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRest2Address(), toString(this))]
456	462		}
457	463
458	464
459	465
460	466		@Callable(i)
461	467		func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
462	468
463	469
464	470
465	471		@Callable(i)
466	472		func conversionInfoREADONLY (userAddressOpt) = {
467	473		let oldAcresAddress = addressFromStringValue(getStringValue(acres2Contract, oldAcresContractKey))
468	474		let $t046954817 = asTuple2Ints(invoke(oldAcresAddress, "unstakeAllAcresREADONLY", [userAddressOpt], nil))
469	475		let unstakedAcres = $t046954817._1
470	476		let claimedAcres = $t046954817._2
471	477		let $t048204969 = asTuple4Ints(invoke(acres2Contract, "unstakeLandsREADONLY", [userAddressOpt], nil))
472	478		let acresFromPieces = $t048204969._1
473	479		let acresFromRes = $t048204969._2
474	480		let acresFromMat = $t048204969._3
475	481		let acresFromProd = $t048204969._4
476	482		let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
477	483		let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(userAddressOpt)), "")
478	484		let $t051475369 = if ((duckAssetId != ""))
479	485		then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckREADONLY", [duckAssetId, userAddressOpt], nil))
480	486		else $Tuple3(0, 0, 0)
481	487		let acresFromDuckRes = $t051475369._1
482	488		let acresFromDuckMat = $t051475369._2
483	489		let acresFromDuckProd = $t051475369._3
484	490		$Tuple2(nil, [("%s%d__unstakedAcres__" + toString(unstakedAcres)), ("%s%d__claimedAcres__" + toString(claimedAcres)), ("%s%d__acresFromPieces__" + toString(acresFromPieces)), ("%s%d__acresFromRes__" + toString(acresFromRes)), ("%s%d__acresFromMat__" + toString(acresFromMat)), ("%s%d__acresFromProd__" + toString(acresFromProd)), ("%s%d__acresFromDuckRes__" + toString(acresFromDuckRes)), ("%s%d__acresFromDuckMat__" + toString(acresFromDuckMat)), ("%s%d__acresFromDuckProd__" + toString(acresFromDuckProd))])
485	491		}
486	492
487	493
488	494
489	495		@Callable(i)
490	496		func wlgStatsREADONLY (userAddrOpt) = {
491	497		let curStats = getWlgStats2(userAddrOpt, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
492	498		$Tuple2(nil, [("%s%d__wlgAmount__" + toString(curStats[ixWlgAmount])), ("%s%d__wlgWlg__" + toString(curStats[ixWlgWlg])), ("%s%d__wlgPrice__" + toString(curStats[ixWlgPrice])), ("%s%d__usdtFunds__" + toString(curStats[ixWlgFunds])), ("%s%d__usdtActivity__" + toString(curStats[ixWlgActivity])), ("%s%d__usdtStaking__" + toString(curStats[ixWlgAcres2])), ("%s%d__usdtArbitrage__" + toString(curStats[ixWlgArbitrage])), ("%s%d__usdtPool__" + toString(curStats[ixWlgPool])), ("%s%d__wlgIssueTime__" + toString(curStats[ixWlgIssueTime])), ("%s%d__wlgLastTeamActTime__" + toString(curStats[ixWlgLastTeamActTime])), ("%s%d__wlgTeamTotal__" + toString(curStats[ixWlgTeamTotal])), ("%s%d__wlgTeamAmLeft__" + toString(curStats[ixWlgTeamAmLeft])), ("%s%d__wlgTeamAmAvailNow__" + toString(curStats[ixWlgTeamAmAvailNow])), ("%s%d__wlgTeamWlgold__" + toString(curStats[ixWlgTeamWlgold])), ("%s%d__wlgActTotal__" + toString(curStats[ixWlgActTotal])), ("%s%d__wlgActAmLeft__" + toString(curStats[ixWlgActAmLeft])), ("%s%d__wlgActAmAvailNow__" + toString(curStats[ixWlgActAmAvailNow])), ("%s%d__wlgActWlgold__" + toString(curStats[ixWlgActWlgold])), ("%s%d__wlgCurPeriod__" + toString(curStats[ixWlgCurPeriod])), ("%s%d__wlgAmLeftTotal__" + toString(curStats[ixWlgAmLeftTotal])), ("%s%d__wlgCurPeriodDistribution__" + toString(curStats[ixWlgCurPeriodDistribution])), ("%s%d__wlgLastUserTime__" + toString(curStats[ixWlgLastUserTime])), ("%s%d__wlgInvestFundTotal__" + toString(curStats[ixWlgInvestFundAmount])), ("%s%d__wlgUserAmAvailNow__" + toString(curStats[ixWlgUserAmAvailNow])), ("%s%d__wlgEffUserTime__" + toString(curStats[ixWlgEffUserTime])), ("%s%d__wlgIssue10AvailNow__" + toString(curStats[ixWlgIssue10Amount])), ("%s%d__wlgMarketingIssue10AvailNow__" + toString(curStats[ixWlgMarketingIssue10Amount])), ("%s%d__wlgTeamIssue10AvailNow__" + toString(curStats[ixWlgTeamIssue10Amount])), ("%s%d__wlgUserIssue10AvailNow__" + toString(curStats[ixWlgUser10part])), ("%s%d__wlgLastIssue10Time__" + toString(curStats[ixWlgIssue10Time])), ("%s%d__wlgTotalFarmingPower__" + toString(curStats[ixWlgTotalFarmingPower])), ("%s%d__wlgAcresStakedTotal__" + toString(curStats[ixWlgAcresStakedTotal]))])
493	499		}

github/deemru/w8io/026f985 
81.31 ms ◑