w8 · tx · 5an···oPo

tx · 5anAW5CCUTRhpHEJtc1kQjcDSvwbfpE4aEJCKyuC3oPo

3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv:  -0.01800000 Waves

2024.11.25 17:05 [3387040] smart account 3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5anAW5CCUTRhpHEJtc1kQjcDSvwbfpE4aEJCKyuC3oPo",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1732543540861,
    "version": 2,
    "chainId": 84,
    "sender": "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv",
    "senderPublicKey": "2fNSk5gmWbXBDTkSYSKd66xSgVvAYzrJnP9YSAFNvTwC",
    "proofs": [
        "4jrQ8FtqW8Ks9aZyjQfjCvuMCxifBopHCFdmr51nQiUKgrAZydLXiobJnrjaTmTKnSZH4r9rmpio86nyUEemRBUV"
    ],
    "script": "base64:BgIbCAISAwoBGBIDCgEIEgMKAQgSAwoBCBIDCgEIcwADU0VQAgJfXwAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEACkRBWV9CTE9DS1MEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAoAsDCQAAAgEBVAUHJG1hdGNoMAA8CQACAQINVW5rbm93biBjaGFpbgALV0VFS19CTE9DS1MEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAA4E4DCQAAAgEBVAUHJG1hdGNoMAC0AQkAAgECDVVua25vd24gY2hhaW4AClZSRl9PRkZTRVQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAAAMJAAACAQFUBQckbWF0Y2gwAJD5RQkAAgECDVVua25vd24gY2hhaW4AC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQRndZdGE4YmlFejMxenBlRmU1REpLOHdFNXRyU3BRVkY4AwkAAAIBAVQFByRtYXRjaDACIzNON1V1WWFyNjI2NFA1OEZCaFZXS1BRQWg0WXVhMmhnbmd2CQACAQINVW5rbm93biBjaGFpbgAVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUExuY1h0UzFVODNENmNRYkZEM0g4ckJIUExnenhTRktaMQMJAAACAQFUBQckbWF0Y2gwAiMzTkRDeUJHNXE4NUp1YVJpaWdVZUV0YWlueWpDUVQzWHBabQkAAgECDVVua25vd24gY2hhaW4BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABBJZHhDZmdBY3JlczJEYXBwAAEADUlkeENmZ1dsZ0RhcHAAAgAUSWR4Q2ZnUHV6emxlUG9vbERhcHAABAAUSWR4Q2ZnSW52ZXN0RnVuZERhcHAABQEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ9rZXlSZXN0MkFkZHJlc3MAAg0lc19fcmVzdDJBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIIcmVzdDJDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQhyZXN0MkNmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADXJlc3QyQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBD2tleVJlc3QyQWRkcmVzcwAFFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIACHJlc3QyQ2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQ1yZXN0MkNvbnRyYWN0AA5hY3JlczJDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRBJZHhDZmdBY3JlczJEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBQ1JZHhDZmdXbGdEYXBwABJwdXp6bGVQb29sQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQhyZXN0MkNmZwUUSWR4Q2ZnUHV6emxlUG9vbERhcHAAEmludmVzdEZ1bmRDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRRJZHhDZmdJbnZlc3RGdW5kRGFwcAATb2xkQWNyZXNDb250cmFjdEtleQIQb2xkQWNyZXNDb250cmFjdAEVa2V5TGFzdFdlZWtUeElkQnlVc2VyAQRhZGRyCQCsAgICE2xhc3RXZWVrVHhJZEJ5VXNlcl8FBGFkZHIBFGtleUN1cldlZWtUeElkQnlVc2VyAQRhZGRyCQCsAgICEmN1cldlZWtUeElkQnlVc2VyXwUEYWRkcgANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQIYV0xHT0xEIGlzIG5vdCBpc3N1ZWQgeWV0AA9hY3Jlc0Fzc2V0SWRLZXkCDGFjcmVzQXNzZXRJZAAMYWNyZXNBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgUOYWNyZXMyQ29udHJhY3QFD2FjcmVzQXNzZXRJZEtleQIXQUNSRVMgaXMgbm90IGlzc3VlZCB5ZXQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBGFkZHIJAKwCAgIYYWNjb3VudEN1c3RvbU5hbWVCeUFkZHJfBQRhZGRyAQ9rZXlBZGRyZXNzUmVmQnkBBGFkZHIJAKwCAgIJYWNjUmVmQnlfBQRhZGRyARNrZXlBZGRyZXNzUmVmZXJyYWxzAQRhZGRyCQCsAgICDWFjY1JlZmVycmFsc18FBGFkZHIBCmtleVVzZXJCZXQBBGFkZHIJAKwCAgIIdXNlckJldF8FBGFkZHIBEmtleVVzZXJXZWVrVGlja2V0cwIEYWRkcgR3ZWVrCQCsAgIJAKwCAgkArAICAhB1c2VyV2Vla1RpY2tldHNfBQRhZGRyAgFfCQCkAwEFBHdlZWsBE2tleVRvdGFsV2Vla1RpY2tldHMBBHdlZWsJAKwCAgIRdG90YWxXZWVrVGlja2V0c18JAKQDAQUEd2VlawEKd2lubmluZ0JldAEDZGF5BAFiCQBoAgUDZGF5BQpEQVlfQkxPQ0tTBAFoAwkAZgIFAWIFClZSRl9PRkZTRVQFAWIJAGQCBQFiBQpWUkZfT0ZGU0VUCQBqAgkAsQkBCQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBBQFoA3ZyZgAEAQxhc1R1cGxlNEludHMBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACFChJbnQsIEludCwgSW50LCBJbnQpBAF0BQckbWF0Y2gwBQF0CQACAQImZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50LCBJbnQsIEludCkBDGFzVHVwbGUzSW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIPKEludCwgSW50LCBJbnQpBAF0BQckbWF0Y2gwBQF0CQACAQIhZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50LCBJbnQpAQxhc1R1cGxlMkludHMBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCihJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAhxmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQpAANNNl8AwIQ9AANNOF8AgMLXLwAKVEVBTV9TSEFSRQDAmgwADkFDVElWSVRZX1NIQVJFAKCNBgAMUExBWUVSX1NIQVJFAIC1GAALWUVBUl9NSUxMSVMAgIbrx3UABkRBWV9NUwCAuJkpAAdJU1NVRTEwAICU69wDAA9QTEFZRVJTMTBfU0hBUkUAgOowABFNQVJLRVRJTkcxMF9TSEFSRQCgjQYADFRFQU0xMF9TSEFSRQCgjQYAEU5FV19TVEFLSU5HX1NUQVJUAIDzuMKxMgAKdGVhbUFkcktleQIIdGVhbUFkZHIADmxhc3RUZWFtVGltS2V5AhRsYXN0Q2xhaW1lZFRpbWVfdGVhbQAOdGVhbUFtdExlZnRLZXkCDnRlYW1BbW91bnRMZWZ0ABRsYXN0QWN0aXZpdGllc1RpbUtleQIabGFzdENsYWltZWRUaW1lX2FjdGl2aXRpZXMADWFjdEFtdExlZnRLZXkCFGFjdGl2aXRpZXNBbW91bnRMZWZ0ABFzdGFrZXJzQW10TGVmdEtleQIRc3Rha2Vyc0Ftb3VudExlZnQBFmtleUxhc3RDbGFpbVRpbWVCeVVzZXIBBGFkZHIJAKwCAgIUbGFzdENsYWltZWRUaW1lVXNlcl8FBGFkZHIBDWRpc3RyQnlQZXJpb2QCDGlzc3VlZEFtb3VudAZwZXJpb2QJAGsDBQxpc3N1ZWRBbW91bnQJAGgCBQxQTEFZRVJfU0hBUkUJAGQCBQZwZXJpb2QAAQkAaAIABgUDTTZfABF3bGdJc3N1ZTEwVGltZUtleQIPd2xnX2lzc3VlMTBUaW1lAA53bGdJc3N1ZVRpbUtleQINd2xnX2lzc3VlVGltZQAPd2xnSXNzdWVkQW10S2V5AhB3bGdfaXNzdWVkQW1vdW50AA56Yklzc3VlZEFtdEtleQISemJpbGxfaXNzdWVkQW1vdW50ARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIAEmFjcmVzU3Rha2RUb3RhbEtleQIWYWNyZXNTdGFrZWRBbW91bnRUb3RhbAAUdG90YWxGYXJtaW5nUG93ZXJLZXkCEXRvdGFsRmFybWluZ1Bvd2VyAAlkYXBwMlJlc3QAAAAMZGFwcDJTdGFraW5nAAEACGRhcHAyV2xnAAIAC2RhcHAyUHV6emxlAAMAD2RhcHAySW52ZXN0RnVuZAAEARBrZXlVc2VyRnVsbEJvbnVzAQRhZGRyCQCsAgICDnVzZXJGdWxsQm9udXNfBQRhZGRyAApsZXZlbEFjcmVzCQDMCAIAAAkAzAgCAAoJAMwIAgAUCQDMCAIAKAkAzAgCAFAJAMwIAgCWAQkAzAgCAPoBCQDMCAIAkAMJAMwIAgC8BQkAzAgCAOgHBQNuaWwBD2dldExldmVsQnlBY3JlcwEFYWNyZXMEA2FjcgkAaQIJAGQCBQVhY3JlcwD/wdcvBQNNOF8KAQdjaGVja2VyAgNhY2MEaXRlbQMJAGcCBQRpdGVtBQNhY3IFA2FjYwkAZAIFA2FjYwABCgACJGwFCmxldmVsQWNyZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2NoZWNrZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBFmdldEZhcm1pbmdQb3dlckJ5QWNyZXMBBWFjcmVzCQBoAgkAaAIFBWFjcmVzABQJAGQCCQEPZ2V0TGV2ZWxCeUFjcmVzAQUFYWNyZXMABAEeZ2V0RmFybWluZ1Bvd2VyQnlBY3Jlc0FuZEJvbnVzAgVhY3JlcwZib251czYECm5vdEJvbnVzZWQJARZnZXRGYXJtaW5nUG93ZXJCeUFjcmVzAQUFYWNyZXMJAJQKAgkAawMFCm5vdEJvbnVzZWQJAGQCBQNNNl8FBmJvbnVzNgUDTTZfBQpub3RCb251c2VkARBnZXRGYXJtaW5nUG93ZXJzAhJ1c2VyQWRkclN0ck9yRW1wdHkOYWNyZXMyQ29udHJhY3QEB3RvdGFsRlAJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOYWNyZXMyQ29udHJhY3QFFHRvdGFsRmFybWluZ1Bvd2VyS2V5AAAECXVzZXJBY3JlcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5hY3JlczJDb250cmFjdAkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUSdXNlckFkZHJTdHJPckVtcHR5AAAECXVzZXJCb251cwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5hY3JlczJDb250cmFjdAkBEGtleVVzZXJGdWxsQm9udXMBBRJ1c2VyQWRkclN0ck9yRW1wdHkAAAQIJHQwNzkxMTkJAR5nZXRGYXJtaW5nUG93ZXJCeUFjcmVzQW5kQm9udXMCBQl1c2VyQWNyZXMFCXVzZXJCb251cwQNdXNlckZQYm9udXNlZAgFCCR0MDc5MTE5Al8xBBB1c2VyRlBub3RCb251c2VkCAUIJHQwNzkxMTkCXzIJAMwIAgUHdG90YWxGUAkAzAgCBQ11c2VyRlBib251c2VkCQDMCAIFEHVzZXJGUG5vdEJvbnVzZWQJAMwIAgUJdXNlckJvbnVzBQNuaWwACmlkeFRvdGFsRlAAAAAQaWR4VXNlckZQYm9udXNlZAABAAtpeFdsZ0Ftb3VudAAAAAhpeFdsZ1dsZwABAAppeFdsZ1ByaWNlAAIACml4V2xnRnVuZHMAAwANaXhXbGdBY3Rpdml0eQAEAAtpeFdsZ0FjcmVzMgAFAA5peFdsZ0FyYml0cmFnZQAGAAlpeFdsZ1Bvb2wABwAOaXhXbGdJc3N1ZVRpbWUACAAUaXhXbGdMYXN0VGVhbUFjdFRpbWUACQAOaXhXbGdUZWFtVG90YWwACgAPaXhXbGdUZWFtQW1MZWZ0AAsAE2l4V2xnVGVhbUFtQXZhaWxOb3cADAAPaXhXbGdUZWFtV2xnb2xkAA0ADWl4V2xnQWN0VG90YWwADgAOaXhXbGdBY3RBbUxlZnQADwASaXhXbGdBY3RBbUF2YWlsTm93ABAADml4V2xnQWN0V2xnb2xkABEADml4V2xnQ3VyUGVyaW9kABIAEGl4V2xnQW1MZWZ0VG90YWwAEwAaaXhXbGdDdXJQZXJpb2REaXN0cmlidXRpb24AFAARaXhXbGdMYXN0VXNlclRpbWUAFQAVaXhXbGdJbnZlc3RGdW5kQW1vdW50ABYAE2l4V2xnVXNlckFtQXZhaWxOb3cAFwAQaXhXbGdFZmZVc2VyVGltZQAYABJpeFdsZ0lzc3VlMTBBbW91bnQAGQAbaXhXbGdNYXJrZXRpbmdJc3N1ZTEwQW1vdW50ABoAFml4V2xnVGVhbUlzc3VlMTBBbW91bnQAGwAPaXhXbGdVc2VyMTBwYXJ0ABwAEGl4V2xnSXNzdWUxMFRpbWUAHQAWaXhXbGdUb3RhbEZhcm1pbmdQb3dlcgAeABVpeFdsZ0FjcmVzU3Rha2VkVG90YWwAHwEMZ2V0V2xnU3RhdHMyBAt1c2VyQWRkck9wdAljb250cmFjdHMGdXNkdElkFXVzZHRCYWxhbmNlQ29ycmVjdGlvbgQMaXNzdWVkQW1vdW50CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQ93bGdJc3N1ZWRBbXRLZXkCGFdMR09MRCBpcyBub3QgaXNzdWVkIHlldAQHcmVzdFVzZAkA8AcCCQCRAwIFCWNvbnRyYWN0cwUJZGFwcDJSZXN0BQZ1c2R0SWQEBndsZ1VzZAkAZQIJAPAHAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQZ1c2R0SWQFFXVzZHRCYWxhbmNlQ29ycmVjdGlvbgQJcHV6emxlVXNkCQDwBwIJAJEDAgUJY29udHJhY3RzBQtkYXBwMlB1enpsZQUGdXNkdElkBAlhY3JlczJVc2QJAPAHAgkAkQMCBQljb250cmFjdHMFDGRhcHAyU3Rha2luZwUGdXNkdElkBBFpbnZlc3RGbmRDb250cmFjdAkAkQMCBQljb250cmFjdHMFD2RhcHAySW52ZXN0RnVuZAQPaW52ZXN0RnVuZFRvdGFsCQBkAgkA8AcCBRFpbnZlc3RGbmRDb250cmFjdAUGdXNkdElkCQELdmFsdWVPckVsc2UCCQCaCAIFEWludmVzdEZuZENvbnRyYWN0BQ56Yklzc3VlZEFtdEtleQAABA10b3RhbEZ1bmRzVXNkCQBkAgkAZAIFCWFjcmVzMlVzZAUGd2xnVXNkBQ9pbnZlc3RGdW5kVG90YWwEBXdsZ0lkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnAgt3bGdfYXNzZXRJZAITTm90IGluaXRpYWxpemVkIHlldAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJaXNzdWVUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQ53bGdJc3N1ZVRpbUtleQIPTm90IGluaXRpYWxpemVkBAZ3bGdXbGcJAPAHAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQV3bGdJZAQJdGVhbVRvdGFsCQBrAwUMaXNzdWVkQW1vdW50BQpURUFNX1NIQVJFBQNNNl8EDnRlYW1BbW91bnRMZWZ0CQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUOdGVhbUFtdExlZnRLZXkFCXRlYW1Ub3RhbAQMbGFzdFRlYW1UaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUObGFzdFRlYW1UaW1LZXkFCWlzc3VlVGltZQQIdGVhbUFkZHIJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQV2YWx1ZQEJAJ0IAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQp0ZWFtQWRyS2V5BBZ0ZWFtQW1vdW50QXZhaWxhYmxlTm93CQCXAwEJAMwIAgkAawMFCXRlYW1Ub3RhbAkAZQIFA25vdwUMbGFzdFRlYW1UaW1lCQBoAgADBQtZRUFSX01JTExJUwkAzAgCBQ50ZWFtQW1vdW50TGVmdAUDbmlsBAp0ZWFtV2xnb2xkCQDwBwIFCHRlYW1BZGRyBQV3bGdJZAQIYWN0VG90YWwJAGsDBQxpc3N1ZWRBbW91bnQFDkFDVElWSVRZX1NIQVJFBQNNNl8EDWFjdEFtb3VudExlZnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnBQ1hY3RBbXRMZWZ0S2V5BQhhY3RUb3RhbAQSbGFzdEFjdGl2aXRpZXNUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwUUbGFzdEFjdGl2aXRpZXNUaW1LZXkFCWlzc3VlVGltZQQVYWN0QW1vdW50QXZhaWxhYmxlTm93CQCXAwEJAMwIAgkAawMFCGFjdFRvdGFsCQBlAgUDbm93BRJsYXN0QWN0aXZpdGllc1RpbWUJAGgCAAMFC1lFQVJfTUlMTElTCQDMCAIFDWFjdEFtb3VudExlZnQFA25pbAQJYWN0V2xnb2xkCQDwBwIJAJEDAgUJY29udHJhY3RzBQlkYXBwMlJlc3QFBXdsZ0lkBAxsYXN0VXNlclRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgkAkQMCBQljb250cmFjdHMFCGRhcHAyV2xnCQEWa2V5TGFzdENsYWltVGltZUJ5VXNlcgEFC3VzZXJBZGRyT3B0BQlpc3N1ZVRpbWUEDmxhc3RVc2VyUGVyaW9kCQBpAgkAZQIFDGxhc3RVc2VyVGltZQUJaXNzdWVUaW1lBQtZRUFSX01JTExJUwQKbm93TGltaXRlZAkAlwMBCQDMCAIFA25vdwkAzAgCCQBkAgUJaXNzdWVUaW1lCQBoAgADBQtZRUFSX01JTExJUwUDbmlsBAljdXJQZXJpb2QJAJcDAQkAzAgCCQBpAgkAZQIFA25vdwUJaXNzdWVUaW1lBQtZRUFSX01JTExJUwkAzAgCAAIFA25pbAQDZWZmCQEQZ2V0RmFybWluZ1Bvd2VycwIFC3VzZXJBZGRyT3B0CQCRAwIFCWNvbnRyYWN0cwUMZGFwcDJTdGFraW5nBBVjdXJQZXJpb2REaXN0cmlidXRpb24JAQ1kaXN0ckJ5UGVyaW9kAgUMaXNzdWVkQW1vdW50BQljdXJQZXJpb2QEDXByZXZQZXJpb2RFbmQJAGQCBQlpc3N1ZVRpbWUJAGgCBQtZRUFSX01JTExJUwUJY3VyUGVyaW9kBBFwcmV2UHJldlBlcmlvZEVuZAkAZAIFCWlzc3VlVGltZQkAaAIFC1lFQVJfTUlMTElTCQBlAgUJY3VyUGVyaW9kAAEEAmEwCQBrAwUVY3VyUGVyaW9kRGlzdHJpYnV0aW9uCQBlAgUKbm93TGltaXRlZAUMbGFzdFVzZXJUaW1lBQtZRUFSX01JTExJUwQNdXNlckF2YWlsYWJsZQMJAAACBQ5sYXN0VXNlclBlcmlvZAUJY3VyUGVyaW9kBQJhMAMJAAACBQ5sYXN0VXNlclBlcmlvZAkAZQIFCWN1clBlcmlvZAABBAJhMQkAawMJAQ1kaXN0ckJ5UGVyaW9kAgUMaXNzdWVkQW1vdW50CQBlAgUJY3VyUGVyaW9kAAEJAGUCBQ1wcmV2UGVyaW9kRW5kBQxsYXN0VXNlclRpbWUFC1lFQVJfTUlMTElTCQBkAgUCYTEFAmEwBAJhMgkAawMJAQ1kaXN0ckJ5UGVyaW9kAgUMaXNzdWVkQW1vdW50CQBlAgUJY3VyUGVyaW9kAAIJAGUCBRFwcmV2UHJldlBlcmlvZEVuZAUMbGFzdFVzZXJUaW1lBQtZRUFSX01JTExJUwQCYTEJAQ1kaXN0ckJ5UGVyaW9kAgUMaXNzdWVkQW1vdW50CQBlAgUJY3VyUGVyaW9kAAEJAGQCCQBkAgUCYTIFAmExBQJhMAQPYW1vdW50TGVmdFRvdGFsCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwURc3Rha2Vyc0FtdExlZnRLZXkAAAQKdXNlckFtb3VudAMJAQIhPQIJAJEDAgUDZWZmBQppZHhUb3RhbEZQAAAJAGsDBQ11c2VyQXZhaWxhYmxlCQCRAwIFA2VmZgUQaWR4VXNlckZQYm9udXNlZAkAkQMCBQNlZmYFCmlkeFRvdGFsRlAAAAQPbGFzdElzc3VlMTBUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIJAJEDAgUJY29udHJhY3RzBQhkYXBwMldsZwURd2xnSXNzdWUxMFRpbWVLZXkFEU5FV19TVEFLSU5HX1NUQVJUBA1pc3N1ZTEwQW1vdW50CQBrAwUHSVNTVUUxMAkAlgMBCQDMCAIJAGUCBQNub3cFD2xhc3RJc3N1ZTEwVGltZQkAzAgCAAAFA25pbAUGREFZX01TBBZtYXJrZXRpbmdJc3N1ZTEwQW1vdW50CQBrAwUNaXNzdWUxMEFtb3VudAURTUFSS0VUSU5HMTBfU0hBUkUFA002XwQRdGVhbUlzc3VlMTBBbW91bnQJAGsDBQ1pc3N1ZTEwQW1vdW50BQxURUFNMTBfU0hBUkUFA002XwQOdXNlcjEwSW50ZXJ2YWwJAJYDAQkAzAgCCQBlAgUDbm93CQCWAwEJAMwIAgURTkVXX1NUQUtJTkdfU1RBUlQJAMwIAgUMbGFzdFVzZXJUaW1lBQNuaWwJAMwIAgAABQNuaWwECnVzZXIxMHBhcnQDCQECIT0CCQCRAwIFA2VmZgUKaWR4VG90YWxGUAAACQBrAwkAawMJAGsDBQdJU1NVRTEwBQ51c2VyMTBJbnRlcnZhbAUGREFZX01TCQCRAwIFA2VmZgUQaWR4VXNlckZQYm9udXNlZAkAkQMCBQNlZmYFCmlkeFRvdGFsRlAFD1BMQVlFUlMxMF9TSEFSRQUDTTZfAAAEDm5ld0lzc3VlMTBUaW1lCQCWAwEJAMwIAgURTkVXX1NUQUtJTkdfU1RBUlQJAMwIAgUDbm93BQNuaWwEEGFjcmVzU3Rha2VkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgkAkQMCBQljb250cmFjdHMFDGRhcHAyU3Rha2luZwUSYWNyZXNTdGFrZFRvdGFsS2V5AAAJAMwIAgUMaXNzdWVkQW1vdW50CQDMCAIFBndsZ1dsZwkAzAgCCQBrAwUNdG90YWxGdW5kc1VzZAUDTThfBQxpc3N1ZWRBbW91bnQJAMwIAgUNdG90YWxGdW5kc1VzZAkAzAgCBQdyZXN0VXNkCQDMCAIFCWFjcmVzMlVzZAkAzAgCBQZ3bGdVc2QJAMwIAgUJcHV6emxlVXNkCQDMCAIFCWlzc3VlVGltZQkAzAgCBQxsYXN0VGVhbVRpbWUJAMwIAgUJdGVhbVRvdGFsCQDMCAIFDnRlYW1BbW91bnRMZWZ0CQDMCAIFFnRlYW1BbW91bnRBdmFpbGFibGVOb3cJAMwIAgUKdGVhbVdsZ29sZAkAzAgCBQhhY3RUb3RhbAkAzAgCBQ1hY3RBbW91bnRMZWZ0CQDMCAIFFWFjdEFtb3VudEF2YWlsYWJsZU5vdwkAzAgCBQlhY3RXbGdvbGQJAMwIAgUJY3VyUGVyaW9kCQDMCAIFD2Ftb3VudExlZnRUb3RhbAkAzAgCBRVjdXJQZXJpb2REaXN0cmlidXRpb24JAMwIAgUMbGFzdFVzZXJUaW1lCQDMCAIFD2ludmVzdEZ1bmRUb3RhbAkAzAgCBQp1c2VyQW1vdW50CQDMCAIFCm5vd0xpbWl0ZWQJAMwIAgUNaXNzdWUxMEFtb3VudAkAzAgCBRZtYXJrZXRpbmdJc3N1ZTEwQW1vdW50CQDMCAIFEXRlYW1Jc3N1ZTEwQW1vdW50CQDMCAIFCnVzZXIxMHBhcnQJAMwIAgUObmV3SXNzdWUxMFRpbWUJAMwIAgkAkQMCBQNlZmYFCmlkeFRvdGFsRlAJAMwIAgUQYWNyZXNTdGFrZWRUb3RhbAUDbmlsAQ53YWxsZXRJbnRlcm5hbAEOdXNlckFkZHJlc3NPcHQEBGFkZHIJAKYIAQUOdXNlckFkZHJlc3NPcHQEB2JhbGFuY2UDCQEJaXNEZWZpbmVkAQUEYWRkcgkA7wcBCQEFdmFsdWUBBQRhZGRyCQEOQmFsYW5jZURldGFpbHMEAAAAAAAAAAAEC3VzZHRCYWxhbmNlAwkBCWlzRGVmaW5lZAEFBGFkZHIJAPAHAgkBBXZhbHVlAQUEYWRkcgULdXNkdEFzc2V0SWQAAAQNd2xnb2xkQmFsYW5jZQMJAQlpc0RlZmluZWQBBQRhZGRyCQDwBwIJAQV2YWx1ZQEFBGFkZHIFCndsZ0Fzc2V0SWQAAAQKY3VzdG9tTmFtZQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ5hY3JlczJDb250cmFjdAkBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBQ51c2VyQWRkcmVzc09wdAUOdXNlckFkZHJlc3NPcHQECHJlZkJ5S2V5CQEPa2V5QWRkcmVzc1JlZkJ5AQUOdXNlckFkZHJlc3NPcHQEBXJlZkJ5CQCdCAIFDmFjcmVzMkNvbnRyYWN0BQhyZWZCeUtleQQEcmVmcwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ5hY3JlczJDb250cmFjdAkBE2tleUFkZHJlc3NSZWZlcnJhbHMBBQ51c2VyQWRkcmVzc09wdAIABAhsYXN0VHhJZAkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ5hY3JlczJDb250cmFjdAkBFWtleUxhc3RXZWVrVHhJZEJ5VXNlcgEFDnVzZXJBZGRyZXNzT3B0AgAEB2N1clR4SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUOYWNyZXMyQ29udHJhY3QJARRrZXlDdXJXZWVrVHhJZEJ5VXNlcgEFDnVzZXJBZGRyZXNzT3B0AgAEDGFjcmVzQmFsYW5jZQMJAQlpc0RlZmluZWQBBQRhZGRyCQDwBwIJAQV2YWx1ZQEFBGFkZHIFDGFjcmVzQXNzZXRJZAAABAtzdGFrZWRBY3JlcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5hY3JlczJDb250cmFjdAkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUOdXNlckFkZHJlc3NPcHQAAAQDbHZsCQEPZ2V0TGV2ZWxCeUFjcmVzAQULc3Rha2VkQWNyZXMEAmZwCQEQZ2V0RmFybWluZ1Bvd2VycwIFDnVzZXJBZGRyZXNzT3B0BQ5hY3JlczJDb250cmFjdAQOYWNyZXNUb05leHRMdmwDCQBnAgUDbHZsCQCQAwEFCmxldmVsQWNyZXMAAAkAZQIJAGQCCQBoAgkAkQMCBQpsZXZlbEFjcmVzBQNsdmwFA004XwABBQtzdGFrZWRBY3JlcwkAzAgCCQCsAgICEiVzJXNfX2N1c3RvbU5hbWVfXwUKY3VzdG9tTmFtZQkAzAgCCQCsAgICEiVzJXNfX3JlZmVycmVkQnlfXwkBC3ZhbHVlT3JFbHNlAgUFcmVmQnkCAAkAzAgCCQCsAgICESVzJXNfX3JlZmVycmFsc19fBQRyZWZzCQDMCAIJAKwCAgIUJXMlc19fbGFzdFdlZWtUeElkX18FCGxhc3RUeElkCQDMCAIJAKwCAgITJXMlc19fY3VyV2Vla1R4SWRfXwUIbGFzdFR4SWQJAMwIAgkArAICAhQlcyVkX193YXZlc0JhbGFuY2VfXwkApAMBCAUHYmFsYW5jZQlhdmFpbGFibGUJAMwIAgkArAICAhMlcyVkX191c2R0QmFsYW5jZV9fCQCkAwEFC3VzZHRCYWxhbmNlCQDMCAIJAKwCAgIVJXMlZF9fd2xnb2xkQmFsYW5jZV9fCQCkAwEFDXdsZ29sZEJhbGFuY2UJAMwIAgkArAICAhQlcyVkX19hY3Jlc0JhbGFuY2VfXwkApAMBBQxhY3Jlc0JhbGFuY2UJAMwIAgkArAICAhMlcyVkX19zdGFrZWRBY3Jlc19fCQCkAwEFC3N0YWtlZEFjcmVzCQDMCAIJAKwCAgISJXMlZF9fY3VycmVudEx2bF9fCQCkAwEFA2x2bAkAzAgCCQCsAgICFiVzJWRfX2FjcmVzVG9OZXh0THZsX18JAKQDAQUOYWNyZXNUb05leHRMdmwJAMwIAgkArAICAhglcyVkX191c2VyRmFybWluZ1Bvd2VyX18JAKQDAQkAkQMCBQJmcAUQaWR4VXNlckZQYm9udXNlZAkAzAgCCQCsAgICGSVzJWRfX3RvdGFsRmFybWluZ1Bvd2VyX18JAKQDAQkAkQMCBQJmcAUKaWR4VG90YWxGUAUDbmlsBQFpAQ1jb25zdHJ1Y3RvclYxAQljb250cmFjdHMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQKAQpkZXNjcmlwdG9yAgNhY2MLaWdub3JlZEl0ZW0JAKwCAgUDYWNjAgIlcwQFZGVzY3IKAAIkbAUJY29udHJhY3RzCgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpkZXNjcmlwdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQprZXlSZXN0Q2ZnAAkAuQkCCQDMCAIFBWRlc2NyBQljb250cmFjdHMFA1NFUAkAzAgCCQELU3RyaW5nRW50cnkCCQEPa2V5UmVzdDJBZGRyZXNzAAkApQgBBQR0aGlzBQNuaWwBaQESd2FsbGV0SW5mb1JFQURPTkxZAQ51c2VyQWRkcmVzc09wdAkAlAoCBQNuaWwJAQ53YWxsZXRJbnRlcm5hbAEFDnVzZXJBZGRyZXNzT3B0AWkBFmNvbnZlcnNpb25JbmZvUkVBRE9OTFkBDnVzZXJBZGRyZXNzT3B0BA9vbGRBY3Jlc0FkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDmFjcmVzMkNvbnRyYWN0BRNvbGRBY3Jlc0NvbnRyYWN0S2V5BAskdDA0Njk1NDgxNwkBDGFzVHVwbGUySW50cwEJAPwHBAUPb2xkQWNyZXNBZGRyZXNzAhd1bnN0YWtlQWxsQWNyZXNSRUFET05MWQkAzAgCBQ51c2VyQWRkcmVzc09wdAUDbmlsBQNuaWwEDXVuc3Rha2VkQWNyZXMIBQskdDA0Njk1NDgxNwJfMQQMY2xhaW1lZEFjcmVzCAULJHQwNDY5NTQ4MTcCXzIECyR0MDQ4MjA0OTY5CQEMYXNUdXBsZTRJbnRzAQkA/AcEBQ5hY3JlczJDb250cmFjdAIUdW5zdGFrZUxhbmRzUkVBRE9OTFkJAMwIAgUOdXNlckFkZHJlc3NPcHQFA25pbAUDbmlsBA9hY3Jlc0Zyb21QaWVjZXMIBQskdDA0ODIwNDk2OQJfMQQMYWNyZXNGcm9tUmVzCAULJHQwNDgyMDQ5NjkCXzIEDGFjcmVzRnJvbU1hdAgFCyR0MDQ4MjA0OTY5Al8zBA1hY3Jlc0Zyb21Qcm9kCAULJHQwNDgyMDQ5NjkCXzQEEW9sZFN0YWtpbmdBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBRVvbGRTdGFraW5nQ29udHJhY3RTdHIEC2R1Y2tBc3NldElkCQELdmFsdWVPckVsc2UCCQCdCAIFEW9sZFN0YWtpbmdBZGRyZXNzCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQ51c2VyQWRkcmVzc09wdAIABAskdDA1MTQ3NTM2OQMJAQIhPQIFC2R1Y2tBc3NldElkAgAJAQxhc1R1cGxlM0ludHMBCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhN1bnN0YWtlRHVja1JFQURPTkxZCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFDnVzZXJBZGRyZXNzT3B0BQNuaWwFA25pbAkAlQoDAAAAAAAABBBhY3Jlc0Zyb21EdWNrUmVzCAULJHQwNTE0NzUzNjkCXzEEEGFjcmVzRnJvbUR1Y2tNYXQIBQskdDA1MTQ3NTM2OQJfMgQRYWNyZXNGcm9tRHVja1Byb2QIBQskdDA1MTQ3NTM2OQJfMwkAlAoCBQNuaWwJAMwIAgkArAICAhUlcyVkX191bnN0YWtlZEFjcmVzX18JAKQDAQUNdW5zdGFrZWRBY3JlcwkAzAgCCQCsAgICFCVzJWRfX2NsYWltZWRBY3Jlc19fCQCkAwEFDGNsYWltZWRBY3JlcwkAzAgCCQCsAgICFyVzJWRfX2FjcmVzRnJvbVBpZWNlc19fCQCkAwEFD2FjcmVzRnJvbVBpZWNlcwkAzAgCCQCsAgICFCVzJWRfX2FjcmVzRnJvbVJlc19fCQCkAwEFDGFjcmVzRnJvbVJlcwkAzAgCCQCsAgICFCVzJWRfX2FjcmVzRnJvbU1hdF9fCQCkAwEFDGFjcmVzRnJvbU1hdAkAzAgCCQCsAgICFSVzJWRfX2FjcmVzRnJvbVByb2RfXwkApAMBBQ1hY3Jlc0Zyb21Qcm9kCQDMCAIJAKwCAgIYJXMlZF9fYWNyZXNGcm9tRHVja1Jlc19fCQCkAwEFEGFjcmVzRnJvbUR1Y2tSZXMJAMwIAgkArAICAhglcyVkX19hY3Jlc0Zyb21EdWNrTWF0X18JAKQDAQUQYWNyZXNGcm9tRHVja01hdAkAzAgCCQCsAgICGSVzJWRfX2FjcmVzRnJvbUR1Y2tQcm9kX18JAKQDAQURYWNyZXNGcm9tRHVja1Byb2QFA25pbAFpARB3bGdTdGF0c1JFQURPTkxZAQt1c2VyQWRkck9wdAQIY3VyU3RhdHMJAQxnZXRXbGdTdGF0czIEBQt1c2VyQWRkck9wdAkAzAgCBQ1yZXN0MkNvbnRyYWN0CQDMCAIFDmFjcmVzMkNvbnRyYWN0CQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFEnB1enpsZVBvb2xDb250cmFjdAkAzAgCBRJpbnZlc3RGdW5kQ29udHJhY3QFA25pbAULdXNkdEFzc2V0SWQAAAkAlAoCBQNuaWwJAMwIAgkArAICAhElcyVkX193bGdBbW91bnRfXwkApAMBCQCRAwIFCGN1clN0YXRzBQtpeFdsZ0Ftb3VudAkAzAgCCQCsAgICDiVzJWRfX3dsZ1dsZ19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFCGl4V2xnV2xnCQDMCAIJAKwCAgIQJXMlZF9fd2xnUHJpY2VfXwkApAMBCQCRAwIFCGN1clN0YXRzBQppeFdsZ1ByaWNlCQDMCAIJAKwCAgIRJXMlZF9fdXNkdEZ1bmRzX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUKaXhXbGdGdW5kcwkAzAgCCQCsAgICFCVzJWRfX3VzZHRBY3Rpdml0eV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDWl4V2xnQWN0aXZpdHkJAMwIAgkArAICAhMlcyVkX191c2R0U3Rha2luZ19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFC2l4V2xnQWNyZXMyCQDMCAIJAKwCAgIVJXMlZF9fdXNkdEFyYml0cmFnZV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDml4V2xnQXJiaXRyYWdlCQDMCAIJAKwCAgIQJXMlZF9fdXNkdFBvb2xfXwkApAMBCQCRAwIFCGN1clN0YXRzBQlpeFdsZ1Bvb2wJAMwIAgkArAICAhQlcyVkX193bGdJc3N1ZVRpbWVfXwkApAMBCQCRAwIFCGN1clN0YXRzBQ5peFdsZ0lzc3VlVGltZQkAzAgCCQCsAgICGiVzJWRfX3dsZ0xhc3RUZWFtQWN0VGltZV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFFGl4V2xnTGFzdFRlYW1BY3RUaW1lCQDMCAIJAKwCAgIUJXMlZF9fd2xnVGVhbVRvdGFsX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdUZWFtVG90YWwJAMwIAgkArAICAhUlcyVkX193bGdUZWFtQW1MZWZ0X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUPaXhXbGdUZWFtQW1MZWZ0CQDMCAIJAKwCAgIZJXMlZF9fd2xnVGVhbUFtQXZhaWxOb3dfXwkApAMBCQCRAwIFCGN1clN0YXRzBRNpeFdsZ1RlYW1BbUF2YWlsTm93CQDMCAIJAKwCAgIVJXMlZF9fd2xnVGVhbVdsZ29sZF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFD2l4V2xnVGVhbVdsZ29sZAkAzAgCCQCsAgICEyVzJWRfX3dsZ0FjdFRvdGFsX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUNaXhXbGdBY3RUb3RhbAkAzAgCCQCsAgICFCVzJWRfX3dsZ0FjdEFtTGVmdF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDml4V2xnQWN0QW1MZWZ0CQDMCAIJAKwCAgIYJXMlZF9fd2xnQWN0QW1BdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFEml4V2xnQWN0QW1BdmFpbE5vdwkAzAgCCQCsAgICFCVzJWRfX3dsZ0FjdFdsZ29sZF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFDml4V2xnQWN0V2xnb2xkCQDMCAIJAKwCAgIUJXMlZF9fd2xnQ3VyUGVyaW9kX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUOaXhXbGdDdXJQZXJpb2QJAMwIAgkArAICAhYlcyVkX193bGdBbUxlZnRUb3RhbF9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFEGl4V2xnQW1MZWZ0VG90YWwJAMwIAgkArAICAiAlcyVkX193bGdDdXJQZXJpb2REaXN0cmlidXRpb25fXwkApAMBCQCRAwIFCGN1clN0YXRzBRppeFdsZ0N1clBlcmlvZERpc3RyaWJ1dGlvbgkAzAgCCQCsAgICFyVzJWRfX3dsZ0xhc3RVc2VyVGltZV9fCQCkAwEJAJEDAgUIY3VyU3RhdHMFEWl4V2xnTGFzdFVzZXJUaW1lCQDMCAIJAKwCAgIaJXMlZF9fd2xnSW52ZXN0RnVuZFRvdGFsX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUVaXhXbGdJbnZlc3RGdW5kQW1vdW50CQDMCAIJAKwCAgIZJXMlZF9fd2xnVXNlckFtQXZhaWxOb3dfXwkApAMBCQCRAwIFCGN1clN0YXRzBRNpeFdsZ1VzZXJBbUF2YWlsTm93CQDMCAIJAKwCAgIWJXMlZF9fd2xnRWZmVXNlclRpbWVfXwkApAMBCQCRAwIFCGN1clN0YXRzBRBpeFdsZ0VmZlVzZXJUaW1lCQDMCAIJAKwCAgIaJXMlZF9fd2xnSXNzdWUxMEF2YWlsTm93X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUSaXhXbGdJc3N1ZTEwQW1vdW50CQDMCAIJAKwCAgIjJXMlZF9fd2xnTWFya2V0aW5nSXNzdWUxMEF2YWlsTm93X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUbaXhXbGdNYXJrZXRpbmdJc3N1ZTEwQW1vdW50CQDMCAIJAKwCAgIeJXMlZF9fd2xnVGVhbUlzc3VlMTBBdmFpbE5vd19fCQCkAwEJAJEDAgUIY3VyU3RhdHMFFml4V2xnVGVhbUlzc3VlMTBBbW91bnQJAMwIAgkArAICAh4lcyVkX193bGdVc2VySXNzdWUxMEF2YWlsTm93X18JAKQDAQkAkQMCBQhjdXJTdGF0cwUPaXhXbGdVc2VyMTBwYXJ0CQDMCAIJAKwCAgIaJXMlZF9fd2xnTGFzdElzc3VlMTBUaW1lX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUQaXhXbGdJc3N1ZTEwVGltZQkAzAgCCQCsAgICHCVzJWRfX3dsZ1RvdGFsRmFybWluZ1Bvd2VyX18JAKQDAQkAkQMCBQhjdXJTdGF0cwUWaXhXbGdUb3RhbEZhcm1pbmdQb3dlcgkAzAgCCQCsAgICGyVzJWRfX3dsZ0FjcmVzU3Rha2VkVG90YWxfXwkApAMBCQCRAwIFCGN1clN0YXRzBRVpeFdsZ0FjcmVzU3Rha2VkVG90YWwFA25pbAFpARRsb3R0ZXJ5U3RhdHNSRUFET05MWQELdXNlckFkZHJPcHQEBXRvZGF5CQBpAgUGaGVpZ2h0BQpEQVlfQkxPQ0tTBAR3ZWVrCQBpAgUGaGVpZ2h0BQtXRUVLX0JMT0NLUwQIbGFzdFdlZWsJAGUCBQR3ZWVrAAEEDmN1cldlZWtUaWNrZXRzCQELdmFsdWVPckVsc2UCCQCaCAIFC3dsZ0NvbnRyYWN0CQESa2V5VXNlcldlZWtUaWNrZXRzAgULdXNlckFkZHJPcHQFBHdlZWsAAAQPbGFzdFdlZWtUaWNrZXRzCQELdmFsdWVPckVsc2UCCQCaCAIFC3dsZ0NvbnRyYWN0CQESa2V5VXNlcldlZWtUaWNrZXRzAgULdXNlckFkZHJPcHQFCGxhc3RXZWVrAAAEE2N1cldlZWtUb3RhbFRpY2tldHMJAQt2YWx1ZU9yRWxzZQIJAJoIAgULd2xnQ29udHJhY3QJARNrZXlUb3RhbFdlZWtUaWNrZXRzAQUEd2VlawAABBRsYXN0V2Vla1RvdGFsVGlja2V0cwkBC3ZhbHVlT3JFbHNlAgkAmggCBQt3bGdDb250cmFjdAkBE2tleVRvdGFsV2Vla1RpY2tldHMBBQhsYXN0V2VlawAABAh1c2Vyc0JldAkBC3ZhbHVlT3JFbHNlAgkAnQgCBQt3bGdDb250cmFjdAkBCmtleVVzZXJCZXQBBQt1c2VyQWRkck9wdAIACQCUCgIFA25pbAkAzAgCCQCsAgIJAKwCAgkArAICAhYlcyVkJWRfX3RvdGFsVGlja2V0c19fCQCkAwEFFGxhc3RXZWVrVG90YWxUaWNrZXRzBQNTRVAJAKQDAQUTY3VyV2Vla1RvdGFsVGlja2V0cwkAzAgCCQCsAgIJAKwCAgkArAICAhUlcyVkJWRfX3VzZXJUaWNrZXRzX18JAKQDAQUPbGFzdFdlZWtUaWNrZXRzBQNTRVAJAKQDAQUOY3VyV2Vla1RpY2tldHMJAMwIAgkArAICAhYlcyVkX19ibG9ja2NoYWluV2Vla19fCQCkAwEFBHdlZWsJAMwIAgkArAICAhUlcyVkX19ibG9ja2NoYWluRGF5X18JAKQDAQUFdG9kYXkJAMwIAgkArAICAhglcyVkX19ibG9ja2NoYWluTWludXRlX18JAKQDAQkAagIFBmhlaWdodAUKREFZX0JMT0NLUwkAzAgCCQCsAgICFyVzJWRfX3dpbm5pbmdCZXRUb2RheV9fCQCkAwEJAQp3aW5uaW5nQmV0AQUFdG9kYXkJAMwIAgkArAICAhAlcyVzX191c2Vyc0JldF9fBQh1c2Vyc0JldAUDbmlsABVnCyY=",
    "height": 3387040,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9jaF9N5DF3y3uosa7EGQZq4bjCL1uJX25fE82VQJrEoN
Next: UqrozsgTZ92X1uRfjLAZBpXUKAY1j7N66L2ndipXxop

Diff: 
Old New Differences
136 136      let h = if ((b > VRF_OFFSET))
137 137          then b
138 138          else (b + VRF_OFFSET)
139 -     (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
139 +     (toInt(value(value(blockInfoByHeight(h)).vrf)) % 4)
140 140      }
141 141  
142 142  
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 134  func winningBet (day) = {
135 135      let b = (day * DAY_BLOCKS)
136 136      let h = if ((b > VRF_OFFSET))
137 137          then b
138 138          else (b + VRF_OFFSET)
139 -     (toInt(value(value(blockInfoByHeight(((day * DAY_BLOCKS) + VRF_OFFSET))).vrf)) % 4)
139 +     (toInt(value(value(blockInfoByHeight(h)).vrf)) % 4)
140 140      }
141 141  
142 142  
143 143  func asTuple4Ints (val) = match val {
144 144      case t: (Int, Int, Int, Int) => 
145 145          t
146 146      case _ => 
147 147          throw("fail to cast into (Int, Int, Int, Int)")
148 148  }
149 149  
150 150  
151 151  func asTuple3Ints (val) = match val {
152 152      case t: (Int, Int, Int) => 
153 153          t
154 154      case _ => 
155 155          throw("fail to cast into (Int, Int, Int)")
156 156  }
157 157  
158 158  
159 159  func asTuple2Ints (val) = match val {
160 160      case t: (Int, Int) => 
161 161          t
162 162      case _ => 
163 163          throw("fail to cast into (Int, Int)")
164 164  }
165 165  
166 166  
167 167  let M6_ = 1000000
168 168  
169 169  let M8_ = 100000000
170 170  
171 171  let TEAM_SHARE = 200000
172 172  
173 173  let ACTIVITY_SHARE = 100000
174 174  
175 175  let PLAYER_SHARE = 400000
176 176  
177 177  let YEAR_MILLIS = 31557600000
178 178  
179 179  let DAY_MS = 86400000
180 180  
181 181  let ISSUE10 = 1000000000
182 182  
183 183  let PLAYERS10_SHARE = 800000
184 184  
185 185  let MARKETING10_SHARE = 100000
186 186  
187 187  let TEAM10_SHARE = 100000
188 188  
189 189  let NEW_STAKING_START = 1731279600000
190 190  
191 191  let teamAdrKey = "teamAddr"
192 192  
193 193  let lastTeamTimKey = "lastClaimedTime_team"
194 194  
195 195  let teamAmtLeftKey = "teamAmountLeft"
196 196  
197 197  let lastActivitiesTimKey = "lastClaimedTime_activities"
198 198  
199 199  let actAmtLeftKey = "activitiesAmountLeft"
200 200  
201 201  let stakersAmtLeftKey = "stakersAmountLeft"
202 202  
203 203  func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
204 204  
205 205  
206 206  func distrByPeriod (issuedAmount,period) = fraction(issuedAmount, (PLAYER_SHARE * (period + 1)), (6 * M6_))
207 207  
208 208  
209 209  let wlgIssue10TimeKey = "wlg_issue10Time"
210 210  
211 211  let wlgIssueTimKey = "wlg_issueTime"
212 212  
213 213  let wlgIssuedAmtKey = "wlg_issuedAmount"
214 214  
215 215  let zbIssuedAmtKey = "zbill_issuedAmount"
216 216  
217 217  func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
218 218  
219 219  
220 220  let acresStakdTotalKey = "acresStakedAmountTotal"
221 221  
222 222  let totalFarmingPowerKey = "totalFarmingPower"
223 223  
224 224  let dapp2Rest = 0
225 225  
226 226  let dapp2Staking = 1
227 227  
228 228  let dapp2Wlg = 2
229 229  
230 230  let dapp2Puzzle = 3
231 231  
232 232  let dapp2InvestFund = 4
233 233  
234 234  func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
235 235  
236 236  
237 237  let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
238 238  
239 239  func getLevelByAcres (acres) = {
240 240      let acr = ((acres + 99999999) / M8_)
241 241      func checker (acc,item) =     if ((item >= acr))
242 242          then acc
243 243          else (acc + 1)
244 244  
245 245      let $l = levelAcres
246 246      let $s = size($l)
247 247      let $acc0 = 0
248 248      func $f0_1 ($a,$i) =     if (($i >= $s))
249 249          then $a
250 250          else checker($a, $l[$i])
251 251  
252 252      func $f0_2 ($a,$i) =     if (($i >= $s))
253 253          then $a
254 254          else throw("List size exceeds 10")
255 255  
256 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)
257 257      }
258 258  
259 259  
260 260  func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
261 261  
262 262  
263 263  func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
264 264      let notBonused = getFarmingPowerByAcres(acres)
265 265      $Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
266 266      }
267 267  
268 268  
269 269  func getFarmingPowers (userAddrStrOrEmpty,acres2Contract) = {
270 270      let totalFP = valueOrElse(getInteger(acres2Contract, totalFarmingPowerKey), 0)
271 271      let userAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
272 272      let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(userAddrStrOrEmpty)), 0)
273 273      let $t079119 = getFarmingPowerByAcresAndBonus(userAcres, userBonus)
274 274      let userFPbonused = $t079119._1
275 275      let userFPnotBonused = $t079119._2
276 276  [totalFP, userFPbonused, userFPnotBonused, userBonus]
277 277      }
278 278  
279 279  
280 280  let idxTotalFP = 0
281 281  
282 282  let idxUserFPbonused = 1
283 283  
284 284  let ixWlgAmount = 0
285 285  
286 286  let ixWlgWlg = 1
287 287  
288 288  let ixWlgPrice = 2
289 289  
290 290  let ixWlgFunds = 3
291 291  
292 292  let ixWlgActivity = 4
293 293  
294 294  let ixWlgAcres2 = 5
295 295  
296 296  let ixWlgArbitrage = 6
297 297  
298 298  let ixWlgPool = 7
299 299  
300 300  let ixWlgIssueTime = 8
301 301  
302 302  let ixWlgLastTeamActTime = 9
303 303  
304 304  let ixWlgTeamTotal = 10
305 305  
306 306  let ixWlgTeamAmLeft = 11
307 307  
308 308  let ixWlgTeamAmAvailNow = 12
309 309  
310 310  let ixWlgTeamWlgold = 13
311 311  
312 312  let ixWlgActTotal = 14
313 313  
314 314  let ixWlgActAmLeft = 15
315 315  
316 316  let ixWlgActAmAvailNow = 16
317 317  
318 318  let ixWlgActWlgold = 17
319 319  
320 320  let ixWlgCurPeriod = 18
321 321  
322 322  let ixWlgAmLeftTotal = 19
323 323  
324 324  let ixWlgCurPeriodDistribution = 20
325 325  
326 326  let ixWlgLastUserTime = 21
327 327  
328 328  let ixWlgInvestFundAmount = 22
329 329  
330 330  let ixWlgUserAmAvailNow = 23
331 331  
332 332  let ixWlgEffUserTime = 24
333 333  
334 334  let ixWlgIssue10Amount = 25
335 335  
336 336  let ixWlgMarketingIssue10Amount = 26
337 337  
338 338  let ixWlgTeamIssue10Amount = 27
339 339  
340 340  let ixWlgUser10part = 28
341 341  
342 342  let ixWlgIssue10Time = 29
343 343  
344 344  let ixWlgTotalFarmingPower = 30
345 345  
346 346  let ixWlgAcresStakedTotal = 31
347 347  
348 348  func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
349 349      let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
350 350      let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
351 351      let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
352 352      let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
353 353      let acres2Usd = assetBalance(contracts[dapp2Staking], usdtId)
354 354      let investFndContract = contracts[dapp2InvestFund]
355 355      let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
356 356      let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
357 357      let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
358 358      let now = lastBlock.timestamp
359 359      let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
360 360      let wlgWlg = assetBalance(contracts[dapp2Wlg], wlgId)
361 361      let teamTotal = fraction(issuedAmount, TEAM_SHARE, M6_)
362 362      let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
363 363      let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
364 364      let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
365 365      let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
366 366      let teamWlgold = assetBalance(teamAddr, wlgId)
367 367      let actTotal = fraction(issuedAmount, ACTIVITY_SHARE, M6_)
368 368      let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
369 369      let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
370 370      let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
371 371      let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
372 372      let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
373 373      let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
374 374      let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
375 375      let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
376 376      let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
377 377      let curPeriodDistribution = distrByPeriod(issuedAmount, curPeriod)
378 378      let prevPeriodEnd = (issueTime + (YEAR_MILLIS * curPeriod))
379 379      let prevPrevPeriodEnd = (issueTime + (YEAR_MILLIS * (curPeriod - 1)))
380 380      let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
381 381      let userAvailable = if ((lastUserPeriod == curPeriod))
382 382          then a0
383 383          else if ((lastUserPeriod == (curPeriod - 1)))
384 384              then {
385 385                  let a1 = fraction(distrByPeriod(issuedAmount, (curPeriod - 1)), (prevPeriodEnd - lastUserTime), YEAR_MILLIS)
386 386                  (a1 + a0)
387 387                  }
388 388              else {
389 389                  let a2 = fraction(distrByPeriod(issuedAmount, (curPeriod - 2)), (prevPrevPeriodEnd - lastUserTime), YEAR_MILLIS)
390 390                  let a1 = distrByPeriod(issuedAmount, (curPeriod - 1))
391 391                  ((a2 + a1) + a0)
392 392                  }
393 393      let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
394 394      let userAmount = if ((eff[idxTotalFP] != 0))
395 395          then fraction(userAvailable, eff[idxUserFPbonused], eff[idxTotalFP])
396 396          else 0
397 397      let lastIssue10Time = valueOrElse(getInteger(contracts[dapp2Wlg], wlgIssue10TimeKey), NEW_STAKING_START)
398 398      let issue10Amount = fraction(ISSUE10, max([(now - lastIssue10Time), 0]), DAY_MS)
399 399      let marketingIssue10Amount = fraction(issue10Amount, MARKETING10_SHARE, M6_)
400 400      let teamIssue10Amount = fraction(issue10Amount, TEAM10_SHARE, M6_)
401 401      let user10Interval = max([(now - max([NEW_STAKING_START, lastUserTime])), 0])
402 402      let user10part = if ((eff[idxTotalFP] != 0))
403 403          then fraction(fraction(fraction(ISSUE10, user10Interval, DAY_MS), eff[idxUserFPbonused], eff[idxTotalFP]), PLAYERS10_SHARE, M6_)
404 404          else 0
405 405      let newIssue10Time = max([NEW_STAKING_START, now])
406 406      let acresStakedTotal = valueOrElse(getInteger(contracts[dapp2Staking], acresStakdTotalKey), 0)
407 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]
408 408      }
409 409  
410 410  
411 411  func walletInternal (userAddressOpt) = {
412 412      let addr = addressFromString(userAddressOpt)
413 413      let balance = if (isDefined(addr))
414 414          then wavesBalance(value(addr))
415 415          else BalanceDetails(0, 0, 0, 0)
416 416      let usdtBalance = if (isDefined(addr))
417 417          then assetBalance(value(addr), usdtAssetId)
418 418          else 0
419 419      let wlgoldBalance = if (isDefined(addr))
420 420          then assetBalance(value(addr), wlgAssetId)
421 421          else 0
422 422      let customName = valueOrElse(getString(acres2Contract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
423 423      let refByKey = keyAddressRefBy(userAddressOpt)
424 424      let refBy = getString(acres2Contract, refByKey)
425 425      let refs = valueOrElse(getString(acres2Contract, keyAddressReferrals(userAddressOpt)), "")
426 426      let lastTxId = valueOrElse(getString(acres2Contract, keyLastWeekTxIdByUser(userAddressOpt)), "")
427 427      let curTxId = valueOrElse(getString(acres2Contract, keyCurWeekTxIdByUser(userAddressOpt)), "")
428 428      let acresBalance = if (isDefined(addr))
429 429          then assetBalance(value(addr), acresAssetId)
430 430          else 0
431 431      let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddressOpt)), 0)
432 432      let lvl = getLevelByAcres(stakedAcres)
433 433      let fp = getFarmingPowers(userAddressOpt, acres2Contract)
434 434      let acresToNextLvl = if ((lvl >= size(levelAcres)))
435 435          then 0
436 436          else (((levelAcres[lvl] * M8_) + 1) - stakedAcres)
437 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]))]
438 438      }
439 439  
440 440  
441 441  @Callable(i)
442 442  func constructorV1 (contracts) = if ((i.caller != this))
443 443      then throw("permissions denied")
444 444      else {
445 445          func descriptor (acc,ignoredItem) =         (acc + "%s")
446 446  
447 447          let descr = {
448 448              let $l = contracts
449 449              let $s = size($l)
450 450              let $acc0 = ""
451 451              func $f0_1 ($a,$i) =             if (($i >= $s))
452 452                  then $a
453 453                  else descriptor($a, $l[$i])
454 454  
455 455              func $f0_2 ($a,$i) =             if (($i >= $s))
456 456                  then $a
457 457                  else throw("List size exceeds 10")
458 458  
459 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)
460 460              }
461 461  [StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRest2Address(), toString(this))]
462 462          }
463 463  
464 464  
465 465  
466 466  @Callable(i)
467 467  func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
468 468  
469 469  
470 470  
471 471  @Callable(i)
472 472  func conversionInfoREADONLY (userAddressOpt) = {
473 473      let oldAcresAddress = addressFromStringValue(getStringValue(acres2Contract, oldAcresContractKey))
474 474      let $t046954817 = asTuple2Ints(invoke(oldAcresAddress, "unstakeAllAcresREADONLY", [userAddressOpt], nil))
475 475      let unstakedAcres = $t046954817._1
476 476      let claimedAcres = $t046954817._2
477 477      let $t048204969 = asTuple4Ints(invoke(acres2Contract, "unstakeLandsREADONLY", [userAddressOpt], nil))
478 478      let acresFromPieces = $t048204969._1
479 479      let acresFromRes = $t048204969._2
480 480      let acresFromMat = $t048204969._3
481 481      let acresFromProd = $t048204969._4
482 482      let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
483 483      let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(userAddressOpt)), "")
484 484      let $t051475369 = if ((duckAssetId != ""))
485 485          then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckREADONLY", [duckAssetId, userAddressOpt], nil))
486 486          else $Tuple3(0, 0, 0)
487 487      let acresFromDuckRes = $t051475369._1
488 488      let acresFromDuckMat = $t051475369._2
489 489      let acresFromDuckProd = $t051475369._3
490 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))])
491 491      }
492 492  
493 493  
494 494  
495 495  @Callable(i)
496 496  func wlgStatsREADONLY (userAddrOpt) = {
497 497      let curStats = getWlgStats2(userAddrOpt, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
498 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]))])
499 499      }
500 500  
501 501  
502 502  
503 503  @Callable(i)
504 504  func lotteryStatsREADONLY (userAddrOpt) = {
505 505      let today = (height / DAY_BLOCKS)
506 506      let week = (height / WEEK_BLOCKS)
507 507      let lastWeek = (week - 1)
508 508      let curWeekTickets = valueOrElse(getInteger(wlgContract, keyUserWeekTickets(userAddrOpt, week)), 0)
509 509      let lastWeekTickets = valueOrElse(getInteger(wlgContract, keyUserWeekTickets(userAddrOpt, lastWeek)), 0)
510 510      let curWeekTotalTickets = valueOrElse(getInteger(wlgContract, keyTotalWeekTickets(week)), 0)
511 511      let lastWeekTotalTickets = valueOrElse(getInteger(wlgContract, keyTotalWeekTickets(lastWeek)), 0)
512 512      let usersBet = valueOrElse(getString(wlgContract, keyUserBet(userAddrOpt)), "")
513 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)])
514 514      }
515 515  
516 516

Old	New		Differences
136	136		let h = if ((b > VRF_OFFSET))
137	137		then b
138	138		else (b + VRF_OFFSET)
139		-	(toInt(value(value(blockInfoByHeight(~~((day * DAY_BLOCKS) + VRF_OFFSET)~~)).vrf)) % 4)
	139	+	(toInt(value(value(blockInfoByHeight(h)).vrf)) % 4)
140	140		}
141	141
142	142

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	134		func winningBet (day) = {
135	135		let b = (day * DAY_BLOCKS)
136	136		let h = if ((b > VRF_OFFSET))
137	137		then b
138	138		else (b + VRF_OFFSET)
139		-	(toInt(value(value(blockInfoByHeight(~~((day * DAY_BLOCKS) + VRF_OFFSET)~~)).vrf)) % 4)
	139	+	(toInt(value(value(blockInfoByHeight(h)).vrf)) % 4)
140	140		}
141	141
142	142
143	143		func asTuple4Ints (val) = match val {
144	144		case t: (Int, Int, Int, Int) =>
145	145		t
146	146		case _ =>
147	147		throw("fail to cast into (Int, Int, Int, Int)")
148	148		}
149	149
150	150
151	151		func asTuple3Ints (val) = match val {
152	152		case t: (Int, Int, Int) =>
153	153		t
154	154		case _ =>
155	155		throw("fail to cast into (Int, Int, Int)")
156	156		}
157	157
158	158
159	159		func asTuple2Ints (val) = match val {
160	160		case t: (Int, Int) =>
161	161		t
162	162		case _ =>
163	163		throw("fail to cast into (Int, Int)")
164	164		}
165	165
166	166
167	167		let M6_ = 1000000
168	168
169	169		let M8_ = 100000000
170	170
171	171		let TEAM_SHARE = 200000
172	172
173	173		let ACTIVITY_SHARE = 100000
174	174
175	175		let PLAYER_SHARE = 400000
176	176
177	177		let YEAR_MILLIS = 31557600000
178	178
179	179		let DAY_MS = 86400000
180	180
181	181		let ISSUE10 = 1000000000
182	182
183	183		let PLAYERS10_SHARE = 800000
184	184
185	185		let MARKETING10_SHARE = 100000
186	186
187	187		let TEAM10_SHARE = 100000
188	188
189	189		let NEW_STAKING_START = 1731279600000
190	190
191	191		let teamAdrKey = "teamAddr"
192	192
193	193		let lastTeamTimKey = "lastClaimedTime_team"
194	194
195	195		let teamAmtLeftKey = "teamAmountLeft"
196	196
197	197		let lastActivitiesTimKey = "lastClaimedTime_activities"
198	198
199	199		let actAmtLeftKey = "activitiesAmountLeft"
200	200
201	201		let stakersAmtLeftKey = "stakersAmountLeft"
202	202
203	203		func keyLastClaimTimeByUser (addr) = ("lastClaimedTimeUser_" + addr)
204	204
205	205
206	206		func distrByPeriod (issuedAmount,period) = fraction(issuedAmount, (PLAYER_SHARE * (period + 1)), (6 * M6_))
207	207
208	208
209	209		let wlgIssue10TimeKey = "wlg_issue10Time"
210	210
211	211		let wlgIssueTimKey = "wlg_issueTime"
212	212
213	213		let wlgIssuedAmtKey = "wlg_issuedAmount"
214	214
215	215		let zbIssuedAmtKey = "zbill_issuedAmount"
216	216
217	217		func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
218	218
219	219
220	220		let acresStakdTotalKey = "acresStakedAmountTotal"
221	221
222	222		let totalFarmingPowerKey = "totalFarmingPower"
223	223
224	224		let dapp2Rest = 0
225	225
226	226		let dapp2Staking = 1
227	227
228	228		let dapp2Wlg = 2
229	229
230	230		let dapp2Puzzle = 3
231	231
232	232		let dapp2InvestFund = 4
233	233
234	234		func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
235	235
236	236
237	237		let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
238	238
239	239		func getLevelByAcres (acres) = {
240	240		let acr = ((acres + 99999999) / M8_)
241	241		func checker (acc,item) = if ((item >= acr))
242	242		then acc
243	243		else (acc + 1)
244	244
245	245		let $l = levelAcres
246	246		let $s = size($l)
247	247		let $acc0 = 0
248	248		func $f0_1 ($a,$i) = if (($i >= $s))
249	249		then $a
250	250		else checker($a, $l[$i])
251	251
252	252		func $f0_2 ($a,$i) = if (($i >= $s))
253	253		then $a
254	254		else throw("List size exceeds 10")
255	255
256	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)
257	257		}
258	258
259	259
260	260		func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
261	261
262	262
263	263		func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
264	264		let notBonused = getFarmingPowerByAcres(acres)
265	265		$Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
266	266		}
267	267
268	268
269	269		func getFarmingPowers (userAddrStrOrEmpty,acres2Contract) = {
270	270		let totalFP = valueOrElse(getInteger(acres2Contract, totalFarmingPowerKey), 0)
271	271		let userAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddrStrOrEmpty)), 0)
272	272		let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(userAddrStrOrEmpty)), 0)
273	273		let $t079119 = getFarmingPowerByAcresAndBonus(userAcres, userBonus)
274	274		let userFPbonused = $t079119._1
275	275		let userFPnotBonused = $t079119._2
276	276		[totalFP, userFPbonused, userFPnotBonused, userBonus]
277	277		}
278	278
279	279
280	280		let idxTotalFP = 0
281	281
282	282		let idxUserFPbonused = 1
283	283
284	284		let ixWlgAmount = 0
285	285
286	286		let ixWlgWlg = 1
287	287
288	288		let ixWlgPrice = 2
289	289
290	290		let ixWlgFunds = 3
291	291
292	292		let ixWlgActivity = 4
293	293
294	294		let ixWlgAcres2 = 5
295	295
296	296		let ixWlgArbitrage = 6
297	297
298	298		let ixWlgPool = 7
299	299
300	300		let ixWlgIssueTime = 8
301	301
302	302		let ixWlgLastTeamActTime = 9
303	303
304	304		let ixWlgTeamTotal = 10
305	305
306	306		let ixWlgTeamAmLeft = 11
307	307
308	308		let ixWlgTeamAmAvailNow = 12
309	309
310	310		let ixWlgTeamWlgold = 13
311	311
312	312		let ixWlgActTotal = 14
313	313
314	314		let ixWlgActAmLeft = 15
315	315
316	316		let ixWlgActAmAvailNow = 16
317	317
318	318		let ixWlgActWlgold = 17
319	319
320	320		let ixWlgCurPeriod = 18
321	321
322	322		let ixWlgAmLeftTotal = 19
323	323
324	324		let ixWlgCurPeriodDistribution = 20
325	325
326	326		let ixWlgLastUserTime = 21
327	327
328	328		let ixWlgInvestFundAmount = 22
329	329
330	330		let ixWlgUserAmAvailNow = 23
331	331
332	332		let ixWlgEffUserTime = 24
333	333
334	334		let ixWlgIssue10Amount = 25
335	335
336	336		let ixWlgMarketingIssue10Amount = 26
337	337
338	338		let ixWlgTeamIssue10Amount = 27
339	339
340	340		let ixWlgUser10part = 28
341	341
342	342		let ixWlgIssue10Time = 29
343	343
344	344		let ixWlgTotalFarmingPower = 30
345	345
346	346		let ixWlgAcresStakedTotal = 31
347	347
348	348		func getWlgStats2 (userAddrOpt,contracts,usdtId,usdtBalanceCorrection) = {
349	349		let issuedAmount = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssuedAmtKey), "WLGOLD is not issued yet")
350	350		let restUsd = assetBalance(contracts[dapp2Rest], usdtId)
351	351		let wlgUsd = (assetBalance(contracts[dapp2Wlg], usdtId) - usdtBalanceCorrection)
352	352		let puzzleUsd = assetBalance(contracts[dapp2Puzzle], usdtId)
353	353		let acres2Usd = assetBalance(contracts[dapp2Staking], usdtId)
354	354		let investFndContract = contracts[dapp2InvestFund]
355	355		let investFundTotal = (assetBalance(investFndContract, usdtId) + valueOrElse(getInteger(investFndContract, zbIssuedAmtKey), 0))
356	356		let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
357	357		let wlgId = valueOrErrorMessage(getBinary(contracts[dapp2Wlg], "wlg_assetId"), "Not initialized yet")
358	358		let now = lastBlock.timestamp
359	359		let issueTime = valueOrErrorMessage(getInteger(contracts[dapp2Wlg], wlgIssueTimKey), "Not initialized")
360	360		let wlgWlg = assetBalance(contracts[dapp2Wlg], wlgId)
361	361		let teamTotal = fraction(issuedAmount, TEAM_SHARE, M6_)
362	362		let teamAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], teamAmtLeftKey), teamTotal)
363	363		let lastTeamTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastTeamTimKey), issueTime)
364	364		let teamAddr = addressFromStringValue(value(getString(contracts[dapp2Wlg], teamAdrKey)))
365	365		let teamAmountAvailableNow = min([fraction(teamTotal, (now - lastTeamTime), (3 * YEAR_MILLIS)), teamAmountLeft])
366	366		let teamWlgold = assetBalance(teamAddr, wlgId)
367	367		let actTotal = fraction(issuedAmount, ACTIVITY_SHARE, M6_)
368	368		let actAmountLeft = valueOrElse(getInteger(contracts[dapp2Wlg], actAmtLeftKey), actTotal)
369	369		let lastActivitiesTime = valueOrElse(getInteger(contracts[dapp2Wlg], lastActivitiesTimKey), issueTime)
370	370		let actAmountAvailableNow = min([fraction(actTotal, (now - lastActivitiesTime), (3 * YEAR_MILLIS)), actAmountLeft])
371	371		let actWlgold = assetBalance(contracts[dapp2Rest], wlgId)
372	372		let lastUserTime = valueOrElse(getInteger(contracts[dapp2Wlg], keyLastClaimTimeByUser(userAddrOpt)), issueTime)
373	373		let lastUserPeriod = ((lastUserTime - issueTime) / YEAR_MILLIS)
374	374		let nowLimited = min([now, (issueTime + (3 * YEAR_MILLIS))])
375	375		let curPeriod = min([((now - issueTime) / YEAR_MILLIS), 2])
376	376		let eff = getFarmingPowers(userAddrOpt, contracts[dapp2Staking])
377	377		let curPeriodDistribution = distrByPeriod(issuedAmount, curPeriod)
378	378		let prevPeriodEnd = (issueTime + (YEAR_MILLIS * curPeriod))
379	379		let prevPrevPeriodEnd = (issueTime + (YEAR_MILLIS * (curPeriod - 1)))
380	380		let a0 = fraction(curPeriodDistribution, (nowLimited - lastUserTime), YEAR_MILLIS)
381	381		let userAvailable = if ((lastUserPeriod == curPeriod))
382	382		then a0
383	383		else if ((lastUserPeriod == (curPeriod - 1)))
384	384		then {
385	385		let a1 = fraction(distrByPeriod(issuedAmount, (curPeriod - 1)), (prevPeriodEnd - lastUserTime), YEAR_MILLIS)
386	386		(a1 + a0)
387	387		}
388	388		else {
389	389		let a2 = fraction(distrByPeriod(issuedAmount, (curPeriod - 2)), (prevPrevPeriodEnd - lastUserTime), YEAR_MILLIS)
390	390		let a1 = distrByPeriod(issuedAmount, (curPeriod - 1))
391	391		((a2 + a1) + a0)
392	392		}
393	393		let amountLeftTotal = valueOrElse(getInteger(contracts[dapp2Wlg], stakersAmtLeftKey), 0)
394	394		let userAmount = if ((eff[idxTotalFP] != 0))
395	395		then fraction(userAvailable, eff[idxUserFPbonused], eff[idxTotalFP])
396	396		else 0
397	397		let lastIssue10Time = valueOrElse(getInteger(contracts[dapp2Wlg], wlgIssue10TimeKey), NEW_STAKING_START)
398	398		let issue10Amount = fraction(ISSUE10, max([(now - lastIssue10Time), 0]), DAY_MS)
399	399		let marketingIssue10Amount = fraction(issue10Amount, MARKETING10_SHARE, M6_)
400	400		let teamIssue10Amount = fraction(issue10Amount, TEAM10_SHARE, M6_)
401	401		let user10Interval = max([(now - max([NEW_STAKING_START, lastUserTime])), 0])
402	402		let user10part = if ((eff[idxTotalFP] != 0))
403	403		then fraction(fraction(fraction(ISSUE10, user10Interval, DAY_MS), eff[idxUserFPbonused], eff[idxTotalFP]), PLAYERS10_SHARE, M6_)
404	404		else 0
405	405		let newIssue10Time = max([NEW_STAKING_START, now])
406	406		let acresStakedTotal = valueOrElse(getInteger(contracts[dapp2Staking], acresStakdTotalKey), 0)
407	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]
408	408		}
409	409
410	410
411	411		func walletInternal (userAddressOpt) = {
412	412		let addr = addressFromString(userAddressOpt)
413	413		let balance = if (isDefined(addr))
414	414		then wavesBalance(value(addr))
415	415		else BalanceDetails(0, 0, 0, 0)
416	416		let usdtBalance = if (isDefined(addr))
417	417		then assetBalance(value(addr), usdtAssetId)
418	418		else 0
419	419		let wlgoldBalance = if (isDefined(addr))
420	420		then assetBalance(value(addr), wlgAssetId)
421	421		else 0
422	422		let customName = valueOrElse(getString(acres2Contract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
423	423		let refByKey = keyAddressRefBy(userAddressOpt)
424	424		let refBy = getString(acres2Contract, refByKey)
425	425		let refs = valueOrElse(getString(acres2Contract, keyAddressReferrals(userAddressOpt)), "")
426	426		let lastTxId = valueOrElse(getString(acres2Contract, keyLastWeekTxIdByUser(userAddressOpt)), "")
427	427		let curTxId = valueOrElse(getString(acres2Contract, keyCurWeekTxIdByUser(userAddressOpt)), "")
428	428		let acresBalance = if (isDefined(addr))
429	429		then assetBalance(value(addr), acresAssetId)
430	430		else 0
431	431		let stakedAcres = valueOrElse(getInteger(acres2Contract, keyAcresStakedAmtByUser(userAddressOpt)), 0)
432	432		let lvl = getLevelByAcres(stakedAcres)
433	433		let fp = getFarmingPowers(userAddressOpt, acres2Contract)
434	434		let acresToNextLvl = if ((lvl >= size(levelAcres)))
435	435		then 0
436	436		else (((levelAcres[lvl] * M8_) + 1) - stakedAcres)
437	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]))]
438	438		}
439	439
440	440
441	441		@Callable(i)
442	442		func constructorV1 (contracts) = if ((i.caller != this))
443	443		then throw("permissions denied")
444	444		else {
445	445		func descriptor (acc,ignoredItem) = (acc + "%s")
446	446
447	447		let descr = {
448	448		let $l = contracts
449	449		let $s = size($l)
450	450		let $acc0 = ""
451	451		func $f0_1 ($a,$i) = if (($i >= $s))
452	452		then $a
453	453		else descriptor($a, $l[$i])
454	454
455	455		func $f0_2 ($a,$i) = if (($i >= $s))
456	456		then $a
457	457		else throw("List size exceeds 10")
458	458
459	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)
460	460		}
461	461		[StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRest2Address(), toString(this))]
462	462		}
463	463
464	464
465	465
466	466		@Callable(i)
467	467		func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
468	468
469	469
470	470
471	471		@Callable(i)
472	472		func conversionInfoREADONLY (userAddressOpt) = {
473	473		let oldAcresAddress = addressFromStringValue(getStringValue(acres2Contract, oldAcresContractKey))
474	474		let $t046954817 = asTuple2Ints(invoke(oldAcresAddress, "unstakeAllAcresREADONLY", [userAddressOpt], nil))
475	475		let unstakedAcres = $t046954817._1
476	476		let claimedAcres = $t046954817._2
477	477		let $t048204969 = asTuple4Ints(invoke(acres2Contract, "unstakeLandsREADONLY", [userAddressOpt], nil))
478	478		let acresFromPieces = $t048204969._1
479	479		let acresFromRes = $t048204969._2
480	480		let acresFromMat = $t048204969._3
481	481		let acresFromProd = $t048204969._4
482	482		let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
483	483		let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(userAddressOpt)), "")
484	484		let $t051475369 = if ((duckAssetId != ""))
485	485		then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckREADONLY", [duckAssetId, userAddressOpt], nil))
486	486		else $Tuple3(0, 0, 0)
487	487		let acresFromDuckRes = $t051475369._1
488	488		let acresFromDuckMat = $t051475369._2
489	489		let acresFromDuckProd = $t051475369._3
490	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))])
491	491		}
492	492
493	493
494	494
495	495		@Callable(i)
496	496		func wlgStatsREADONLY (userAddrOpt) = {
497	497		let curStats = getWlgStats2(userAddrOpt, [rest2Contract, acres2Contract, wlgContract, puzzlePoolContract, investFundContract], usdtAssetId, 0)
498	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]))])
499	499		}

github/deemru/w8io/026f985 
129.67 ms ◑