w8 · tx · 13s···jUS

tx · 13sYgRg5XMBsFnoDDVCpjYPBcWxuJV4V5q3qfy1CHjUS

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.00800000 Waves

2024.12.04 04:40 [3399250] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "13sYgRg5XMBsFnoDDVCpjYPBcWxuJV4V5q3qfy1CHjUS",
    "fee": 800000,
    "feeAssetId": null,
    "timestamp": 1733276492682,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "5g8119mNuCpAXDVXXwXf4Dwi2oM1ceoRLaMyZQ1NTyvE3dgXa5F6XVWMm4Fp6wtxm8HUzz7ek9JKunvDf1WDVi5T"
    ],
    "script": "base64:BgIdCAISBAoCCAESBAoCAQgSAwoBCBIDCgEBEgMKAQgvABRPTERfU1RBS0lOR19ERUFETElORQCA5O7wuDIABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgAQYWNyZXMyQWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1A0VUgzVDluWHBNTnBVbVNtUWpQbUV6M0c4NXQzem42ZUEDCQAAAgEBVAUHJG1hdGNoMAIjM05CUHgxRmNpdTNKUU5FR1oyMWpTblRkdXRMTkdHQlVTWGgJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUOACAwtcvAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQARSWR4Q2ZnRWNvbm9teURhcHAAAgANSWR4Q2ZnV2xnRGFwcAAEAA9JZHhDZmdBY3Jlc0RhcHAACAEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ5rZXlSZXN0QWRkcmVzcwACDCVzX19yZXN0QWRkcgERcmVhZFJlc3RDZmdPckZhaWwBBHJlc3QJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFBHJlc3QJAQprZXlSZXN0Q2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCB3Jlc3RDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdyZXN0Q2ZnBQNpZHgJAKwCAgIqUmVzdCBjZmcgZG9lc24ndCBjb250YWluIGFkZHJlc3MgYXQgaW5kZXggCQCkAwEFA2lkeAAMcmVzdENvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQ5rZXlSZXN0QWRkcmVzcwAFFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgAHcmVzdENmZwkBEXJlYWRSZXN0Q2ZnT3JGYWlsAQUMcmVzdENvbnRyYWN0AA9zdGFraW5nQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdTdGFraW5nRGFwcAAPZWNvbm9teUNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnRWNvbm9teURhcHAAC3dsZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUNSWR4Q2ZnV2xnRGFwcAANYWNyZXNDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFD0lkeENmZ0FjcmVzRGFwcAAUYWNyZXNJc3N1ZWRBbW91bnRLZXkCEWFjcmVzSXNzdWVkQW1vdW50AA9hY3Jlc0Fzc2V0SWRLZXkCDGFjcmVzQXNzZXRJZAAMYWNyZXNBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgUNYWNyZXNDb250cmFjdAUPYWNyZXNBc3NldElkS2V5AhdBQ1JFUyBpcyBub3QgaXNzdWVkIHlldAEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQRhZGRyCQCsAgICFmFjcmVzU3Rha2VkVGltZUJ5VXNlcl8FBGFkZHIAC0lkeEVmZlRvdGFsAAABEWtleVJlc1Byb3BvcnRpb25zAAITcmVzVHlwZXNQcm9wb3J0aW9ucwEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICFHN0YWtlZFBpZWNlc0J5T3duZXJfBQlvd25lckFkZHIBBWFzSW50AQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACA0ludAQBbgUHJG1hdGNoMAUBbgkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEOYXNUd29JbnRzVHVwbGUBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCihJbnQsIEludCkEAnQyBQckbWF0Y2gwBQJ0MgkAAgECHGZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCkBDmdldFZvdGluZ1Bvd2VyARJ1c2VyQWRkclN0ck9yRW1wdHkEBXByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAIBXwoBBWFkZGVyAgNhY2MEaXRlbQkAZAIFA2FjYwkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAp0b3RhbFBvd2VyCgACJGwFBXByb3BzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQKdXNlcnNQb3dlcgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUSdXNlckFkZHJTdHJPckVtcHR5AAAJAMwIAgUKdG90YWxQb3dlcgkAzAgCBQp1c2Vyc1Bvd2VyBQNuaWwBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AQlmaW5hbFRpbWUACQCXAwEJAMwIAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgUUT0xEX1NUQUtJTkdfREVBRExJTkUFA25pbAAPREFJTFlSRVNCWVBJRUNFAID40gEAFVVTRFQyQUNSRVNfTVVMVElQTElFUgAKAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyARprZXlBY3Jlc0xvY2tlZEFtb3VudEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc0xvY2tlZEFtb3VudEJ5VXNlcl8FBGFkZHIBF2tleUFjcmVzTG9ja2VkRXRhQnlVc2VyAQRhZGRyCQCsAgICFWFjcmVzTG9ja2VkRXRhQnlVc2VyXwUEYWRkcgATYWNyZXNTdGFrZWRUb3RhbEtleQIWYWNyZXNTdGFrZWRBbW91bnRUb3RhbAAMQkxBQ0tMSVNURUQxAt8GM1AyTkdYNFE1bmdlMU1DYXV3UVc1YXFZTGRrY2NTR2oxRXBfM1AyeEZBSFc5eWh5Tm9oWW96V2Q0SEZoRVhadTNic05Tb1JfM1AyeUthWjJndm45WGU1dHRpODFhN1A5TFpoSGdqdlRvVjlfM1AzN3pRM2NmMmVjdTU1Um1KcUVpR1NpdmR6TjlhdnQzbTlfM1A0YXo2ZHR6c3ZHQ1dGQXhhOTRVZGV2S3pYeUV3eEVpRkdfM1A0a1pVNlgzVFRMRmNTVWU1NUpTeThCeVNxaXRjUGdNQnpfM1A1aEN4QkVoM05nTml6WmhOQnJleUJTcXRiaEpZTGtLUERfM1A3SEx2dWN5MTF5eHlNSlV3anpYRkhIS01FRHdpMUV3ZkNfM1A4SnVhcUg5UFRRQXY4RDVIQkdnUWZLYXVMVFl0Mk5RZnRfM1A5Z1REQjRydERFVmJwWDNhc1U2M0g0WmluaDJFblRtWkVfM1A5aU4zcXJ0ZkppY1VWeTdhbVplVnNldFZEM3ZVTWs4YmVfM1BDYTJCc0FhNkpCTGlyc3pRZlY1cjlmSnJ1amZod3R3ZlBfM1BEM2k0WE44S3R5Z2NGeDRyeTVNN1VHcWRmSDhWWXZ0UlRfM1BERU1ubkpOYzJreDljUEVtdlZ2aFhVcjhTdmhBTktoc2FfM1BER0U5dEtRaXphZVpGZUREcTVhWVN2ODlud1liZmlycFpfM1BETUtRVENyVVBaRUNWWEVKSjhtMXNIdHV0U3UxbmFTZjFfM1BHaDJRdTZZdng4R1RDUlJWTnZCVVZaTGRhaWRZU2F4bzVfM1BLa21BdGJTSzVEMmhRZG8xUmZFZzhlWHlNYkRjUlVjOTJfM1BMTW5ieHpzc1A4VzhFOFhqSjFSTEJCZzhVWkw4Q3ozUDJfM1BNdXhvNFBDQW94OXM0YTdSMWVzemg0aXFxdThnUzdqSHZfM1BOck10RVFDaHc4N1daVTFKQUo3YUdIeWtDYThUam5ETktfM1BQdUJYZldvQnkzRUVvcnk3Yzd2Z2k5VXNqa2E3bzV0QmpfM1BRd3lleUVoVDRZNmFHQUw2dGc3M2FRV0p0VjF6UnQzblJfM1BSR0RTaHVNR2I4NE1KdFRKdnRUZzhxRGZzd2tZV2NtM2UADVBST01PMV9BTU9VTlQAwq2vAgETaXNCbGFja2xpc3RlZFByb21vMQEEYWRkcgkBCGNvbnRhaW5zAgUMQkxBQ0tMSVNURUQxBQRhZGRyARJjbGFpbUFjcmVzSW50ZXJuYWwDBGFkZHILYWNyZXNBbW91bnQNbGFzdENsYWltVGltZQQJZGVsdGFUaW1lCQBlAgkBCWZpbmFsVGltZQAFDWxhc3RDbGFpbVRpbWUECGF2YWlsUmVzCQBrAwUJZGVsdGFUaW1lCQBoAgUPREFJTFlSRVNCWVBJRUNFBQthY3Jlc0Ftb3VudAkAaAIFCURBWU1JTExJUwUFTVVMVDgECmNhbkdldFVzZHQJAQVhc0ludAEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhpzZWxsUmVzb3VyY2VzV29ybGRSRUFET05MWQkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwEB2dvdFVzZHQJAJYDAQkAzAgCAAAJAMwIAgUKY2FuR2V0VXNkdAUDbmlsCQBoAgUHZ290VXNkdAUVVVNEVDJBQ1JFU19NVUxUSVBMSUVSAQ1jbGFpbUludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIJAQlmaW5hbFRpbWUABQ1sYXN0Q2xhaW1UaW1lAwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQUNbGFzdENsYWltVGltZQIKLCBmaW5hbCA9IAkApAMBCQEJZmluYWxUaW1lAAQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBQ9EQUlMWVJFU0JZUElFQ0UFC2FjcmVzQW1vdW50CQBoAgUJREFZTUlMTElTBQVNVUxUOAQKY2FuR2V0VXNkdAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAQHZ290VXNkdAMJAGcCAAAFCmNhbkdldFVzZHQAAAgJAQ5hc1R3b0ludHNUdXBsZQEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhJzZWxsUmVzb3VyY2VzV29ybGQJAMwIAgUEYWRkcgkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwCXzEJAGgCBQdnb3RVc2R0BRVVU0RUMkFDUkVTX01VTFRJUExJRVIBDnVuc3Rha2VBY3Jlc1JPAgZhbW91bnQHYWRkcmVzcwQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MEDGNsYWltZWRBY3JlcwkBEmNsYWltQWNyZXNJbnRlcm5hbAMFB2FkZHJlc3MFBmFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAJAJQKAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFAWkBDWNvbnN0cnVjdG9yVjECCHJlc3RBZGRyDnVuc3Rha2VkUGllY2VzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ9hY3Jlc0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAhuZnRBY3JlcwkAZAIJAJEDAgkBDmdldFZvdGluZ1Bvd2VyAQIABQtJZHhFZmZUb3RhbAUOdW5zdGFrZWRQaWVjZXMEDGlzc3VlZEFtb3VudAkAZQIFCE1JTExJT042CQBoAgUIbmZ0QWNyZXMFBU1VTFQ4BAVpc3N1ZQkAwwgHAgVBQ1JFUwImV2F2ZXNMYW5kcyBsYW5kIGFjcmVzIGludmVzdG1lbnQgdG9rZW4FDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQtCaW5hcnlFbnRyeQIFD2FjcmVzQXNzZXRJZEtleQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBFHVuc3Rha2VBY3Jlc0NhbGxiYWNrAgZhbW91bnQHYWRkcmVzcwMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyBRBhY3JlczJBZGRyZXNzU3RyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQBnAgAABQZhbW91bnQJAAIBAhlBbW91bnQgc2hvdWxkIGJlIHBvc2l0aXZlBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBA5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAMJAGYCBQZhbW91bnQFDm9sZEFjcmVzQW1vdW50CQACAQkArAICCQCsAgIJAKwCAgIOWW91IGhhdmUgb25seSAJAQpmaXhlZFBvaW50AgUOb2xkQWNyZXNBbW91bnQACAIgIEFDUkVTIHN0YWtlZCwgdHJpZWQgdG8gdW5zdGFrZSAJAQpmaXhlZFBvaW50AgUGYW1vdW50AAgEDGxvY2tlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEaa2V5QWNyZXNMb2NrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzAAAECWxvY2tlZEVUQQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEXa2V5QWNyZXNMb2NrZWRFdGFCeVVzZXIBBQdhZGRyZXNzAAAEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEEHVuc3Rha2FibGVBbW91bnQDCQETaXNCbGFja2xpc3RlZFByb21vMQEFB2FkZHJlc3MJAGUCCQBlAgUOb2xkQWNyZXNBbW91bnQFDGxvY2tlZEFtb3VudAUNUFJPTU8xX0FNT1VOVAkAZQIFDm9sZEFjcmVzQW1vdW50BQxsb2NrZWRBbW91bnQDAwkAZgIFCWxvY2tlZEVUQQUDbm93CQBmAgUGYW1vdW50BRB1bnN0YWthYmxlQW1vdW50BwkAAgEJAKwCAgkArAICCQCsAgICBU9ubHkgCQEKZml4ZWRQb2ludAIFEHVuc3Rha2FibGVBbW91bnQACAInIEFDUkVTIGNhbiBiZSB1bnN0YWtlZCBub3csIHdhaXQgdW50aWwgCQCkAwEFCWxvY2tlZEVUQQQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzCQDMCAIHBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYWNyZXNTdGFrZWRUb3RhbEtleQkAZQIFCG9sZFRvdGFsBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIJAGQCBQZhbW91bnQFDGNsYWltZWRBY3JlcwUJd2xnUmVzdWx0AWkBF3Vuc3Rha2VBbGxBY3Jlc1JFQURPTkxZAQdhZGRyZXNzBAZhbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwAABBN1bnN0YWtlZFdpdGhDbGFpbWVkCQEOdW5zdGFrZUFjcmVzUk8CBQZhbW91bnQFB2FkZHJlc3MJAJQKAgUDbmlsBRN1bnN0YWtlZFdpdGhDbGFpbWVkAWkBFHJlcXVlc3RBY3Jlc0NhbGxiYWNrAQZhbW91bnQEBmNhbGxlcggFAWkGY2FsbGVyAwMJAQIhPQIJAKUIAQUGY2FsbGVyBRBhY3JlczJBZGRyZXNzU3RyCQECIT0CBQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAcJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgUGYW1vdW50BQxhY3Jlc0Fzc2V0SWQFA25pbAUGYW1vdW50AWkBEmNsYWltQWNyZXNSRUFET05MWQEHYWRkcmVzcwQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQLYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECGxhc3RUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAQMY2xhaW1lZEFjcmVzCQESY2xhaW1BY3Jlc0ludGVybmFsAwUHYWRkcmVzcwULYWNyZXNBbW91bnQFCGxhc3RUaW1lCQCUCgIFA25pbAkAzAgCBQxjbGFpbWVkQWNyZXMJAMwIAgUIbGFzdFRpbWUFA25pbABaQ+Fd",
    "height": 3399250,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CBnsuLMAvGZ9GPF2i794utCnPkF67oDcDC2NJGzLU45g
Next: CVuXANUvarirc2GyPHyFQfsLjEUcyCEY6JNZWGkVChZn

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let OLD_STAKING_DEADLINE = 1733248800000
4 + let OLD_STAKING_DEADLINE = 1733256000000
5 5  
6 6  let chain = take(drop(this.bytes, 1), 1)
7 7  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let OLD_STAKING_DEADLINE = 1733248800000
4 + let OLD_STAKING_DEADLINE = 1733256000000
5 5  
6 6  let chain = take(drop(this.bytes, 1), 1)
7 7  
8 8  let defaultRestAddressStr = match chain {
9 9      case _ => 
10 10          if ((base58'2W' == $match0))
11 11              then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
12 12              else if ((base58'2T' == $match0))
13 13                  then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
14 14                  else throw("Unknown chain")
15 15  }
16 16  
17 17  let acres2AddressStr = match chain {
18 18      case _ => 
19 19          if ((base58'2W' == $match0))
20 20              then "3P4UH3T9nXpMNpUmSmQjPmEz3G85t3zn6eA"
21 21              else if ((base58'2T' == $match0))
22 22                  then "3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh"
23 23                  else throw("Unknown chain")
24 24  }
25 25  
26 26  let SEP = "__"
27 27  
28 28  let MULT8 = 100000000
29 29  
30 30  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
31 31  
32 32  
33 33  let IdxCfgStakingDapp = 1
34 34  
35 35  let IdxCfgEconomyDapp = 2
36 36  
37 37  let IdxCfgWlgDapp = 4
38 38  
39 39  let IdxCfgAcresDapp = 8
40 40  
41 41  func keyRestCfg () = "%s__restConfig"
42 42  
43 43  
44 44  func keyRestAddress () = "%s__restAddr"
45 45  
46 46  
47 47  func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
48 48  
49 49  
50 50  func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
51 51  
52 52  
53 53  let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
54 54  
55 55  let restCfg = readRestCfgOrFail(restContract)
56 56  
57 57  let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
58 58  
59 59  let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
60 60  
61 61  let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
62 62  
63 63  let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
64 64  
65 65  let acresIssuedAmountKey = "acresIssuedAmount"
66 66  
67 67  let acresAssetIdKey = "acresAssetId"
68 68  
69 69  let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
70 70  
71 71  func keyAcresStakedTimeByUser (addr) = ("acresStakedTimeByUser_" + addr)
72 72  
73 73  
74 74  let IdxEffTotal = 0
75 75  
76 76  func keyResProportions () = "resTypesProportions"
77 77  
78 78  
79 79  func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
80 80  
81 81  
82 82  func asInt (v) = match v {
83 83      case n: Int => 
84 84          n
85 85      case _ => 
86 86          throw("fail to cast into Int")
87 87  }
88 88  
89 89  
90 90  func asTwoIntsTuple (val) = match val {
91 91      case t2: (Int, Int) => 
92 92          t2
93 93      case _ => 
94 94          throw("fail to cast into (Int, Int)")
95 95  }
96 96  
97 97  
98 98  func getVotingPower (userAddrStrOrEmpty) = {
99 99      let props = split(valueOrElse(getString(stakingContract, keyResProportions()), "0_0_0_0_0_0"), "_")
100 100      func adder (acc,item) =     (acc + parseIntValue(item))
101 101  
102 102      let totalPower = {
103 103          let $l = props
104 104          let $s = size($l)
105 105          let $acc0 = 0
106 106          func $f0_1 ($a,$i) =         if (($i >= $s))
107 107              then $a
108 108              else adder($a, $l[$i])
109 109  
110 110          func $f0_2 ($a,$i) =         if (($i >= $s))
111 111              then $a
112 112              else throw("List size exceeds 6")
113 113  
114 114          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
115 115          }
116 116      let usersPower = valueOrElse(getInteger(stakingContract, keyStakedPiecesByOwner(userAddrStrOrEmpty)), 0)
117 117  [totalPower, usersPower]
118 118      }
119 119  
120 120  
121 121  func fixedPoint (val,decimals) = {
122 122      let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
123 123      let lowPart = toString((val % tenPow))
124 124      let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
125 125      (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
126 126      }
127 127  
128 128  
129 129  func finalTime () = min([lastBlock.timestamp, OLD_STAKING_DEADLINE])
130 130  
131 131  
132 132  let DAILYRESBYPIECE = 3456000
133 133  
134 134  let USDT2ACRES_MULTIPLIER = 10
135 135  
136 136  let MILLION6 = 100000000000000
137 137  
138 138  let DAYMILLIS = 86400000
139 139  
140 140  func keyAcresStakedAmountByUser (addr) = ("acresStakedAmountByUser_" + addr)
141 141  
142 142  
143 143  func keyAcresLockedAmountByUser (addr) = ("acresLockedAmountByUser_" + addr)
144 144  
145 145  
146 146  func keyAcresLockedEtaByUser (addr) = ("acresLockedEtaByUser_" + addr)
147 147  
148 148  
149 149  let acresStakedTotalKey = "acresStakedAmountTotal"
150 150  
151 151  let BLACKLISTED1 = "3P2NGX4Q5nge1MCauwQW5aqYLdkccSGj1Ep_3P2xFAHW9yhyNohYozWd4HFhEXZu3bsNSoR_3P2yKaZ2gvn9Xe5tti81a7P9LZhHgjvToV9_3P37zQ3cf2ecu55RmJqEiGSivdzN9avt3m9_3P4az6dtzsvGCWFAxa94UdevKzXyEwxEiFG_3P4kZU6X3TTLFcSUe55JSy8BySqitcPgMBz_3P5hCxBEh3NgNizZhNBreyBSqtbhJYLkKPD_3P7HLvucy11yxyMJUwjzXFHHKMEDwi1EwfC_3P8JuaqH9PTQAv8D5HBGgQfKauLTYt2NQft_3P9gTDB4rtDEVbpX3asU63H4Zinh2EnTmZE_3P9iN3qrtfJicUVy7amZeVsetVD3vUMk8be_3PCa2BsAa6JBLirszQfV5r9fJrujfhwtwfP_3PD3i4XN8KtygcFx4ry5M7UGqdfH8VYvtRT_3PDEMnnJNc2kx9cPEmvVvhXUr8SvhANKhsa_3PDGE9tKQizaeZFeDDq5aYSv89nwYbfirpZ_3PDMKQTCrUPZECVXEJJ8m1sHtutSu1naSf1_3PGh2Qu6Yvx8GTCRRVNvBUVZLdaidYSaxo5_3PKkmAtbSK5D2hQdo1RfEg8eXyMbDcRUc92_3PLMnbxzssP8W8E8XjJ1RLBBg8UZL8Cz3P2_3PMuxo4PCAox9s4a7R1eszh4iqqu8gS7jHv_3PNrMtEQChw87WZU1JAJ7aGHykCa8TjnDNK_3PPuBXfWoBy3EEory7c7vgi9Usjka7o5tBj_3PQwyeyEhT4Y6aGAL6tg73aQWJtV1zRt3nR_3PRGDShuMGb84MJtTJvtTg8qDfswkYWcm3e"
152 152  
153 153  let PROMO1_AMOUNT = 4970178
154 154  
155 155  func isBlacklistedPromo1 (addr) = contains(BLACKLISTED1, addr)
156 156  
157 157  
158 158  func claimAcresInternal (addr,acresAmount,lastClaimTime) = {
159 159      let deltaTime = (finalTime() - lastClaimTime)
160 160      let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
161 161      let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
162 162      let gotUsdt = max([0, canGetUsdt])
163 163      (gotUsdt * USDT2ACRES_MULTIPLIER)
164 164      }
165 165  
166 166  
167 167  func claimInternal (addr,acresAmount,lastClaimTime) = {
168 168      let deltaTime = (finalTime() - lastClaimTime)
169 169      if ((0 > deltaTime))
170 170          then throw(((("Saved timestamp is in future, saved = " + toString(lastClaimTime)) + ", final = ") + toString(finalTime())))
171 171          else {
172 172              let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
173 173              let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
174 174              let gotUsdt = if ((0 >= canGetUsdt))
175 175                  then 0
176 176                  else asTwoIntsTuple(invoke(economyContract, "sellResourcesWorld", [addr, availRes], nil))._1
177 177              (gotUsdt * USDT2ACRES_MULTIPLIER)
178 178              }
179 179      }
180 180  
181 181  
182 182  func unstakeAcresRO (amount,address) = {
183 183      let timeKey = keyAcresStakedTimeByUser(address)
184 184      let claimedAcres = claimAcresInternal(address, amount, valueOrElse(getInteger(timeKey), 0))
185 185      $Tuple2(amount, claimedAcres)
186 186      }
187 187  
188 188  
189 189  @Callable(i)
190 190  func constructorV1 (restAddr,unstakedPieces) = if ((i.caller != this))
191 191      then throw("Permission denied")
192 192      else if (isDefined(getBinary(acresAssetIdKey)))
193 193          then throw("Already initialized")
194 194          else {
195 195              let nftAcres = (getVotingPower("")[IdxEffTotal] + unstakedPieces)
196 196              let issuedAmount = (MILLION6 - (nftAcres * MULT8))
197 197              let issue = Issue("ACRES", "WavesLands land acres investment token", issuedAmount, 8, false, unit, 0)
198 198              let assetId = calculateAssetId(issue)
199 199  [issue, IntegerEntry(acresIssuedAmountKey, issuedAmount), BinaryEntry(acresAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr)]
200 200              }
201 201  
202 202  
203 203  
204 204  @Callable(i)
205 205  func unstakeAcresCallback (amount,address) = if ((toString(i.caller) != acres2AddressStr))
206 206      then throw("Permission denied")
207 207      else if ((0 >= amount))
208 208          then throw("Amount should be positive")
209 209          else {
210 210              let timeKey = keyAcresStakedTimeByUser(address)
211 211              let amountKey = keyAcresStakedAmountByUser(address)
212 212              let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
213 213              if ((amount > oldAcresAmount))
214 214                  then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(amount, 8)))
215 215                  else {
216 216                      let lockedAmount = valueOrElse(getInteger(keyAcresLockedAmountByUser(address)), 0)
217 217                      let lockedETA = valueOrElse(getInteger(keyAcresLockedEtaByUser(address)), 0)
218 218                      let now = lastBlock.timestamp
219 219                      let unstakableAmount = if (isBlacklistedPromo1(address))
220 220                          then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
221 221                          else (oldAcresAmount - lockedAmount)
222 222                      if (if ((lockedETA > now))
223 223                          then (amount > unstakableAmount)
224 224                          else false)
225 225                          then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
226 226                          else {
227 227                              let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
228 228                              let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address, false], nil)
229 229                              let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
230 230                              $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2((amount + claimedAcres), wlgResult))
231 231                              }
232 232                      }
233 233              }
234 234  
235 235  
236 236  
237 237  @Callable(i)
238 238  func unstakeAllAcresREADONLY (address) = {
239 239      let amount = valueOrElse(getInteger(keyAcresStakedAmountByUser(address)), 0)
240 240      let unstakedWithClaimed = unstakeAcresRO(amount, address)
241 241      $Tuple2(nil, unstakedWithClaimed)
242 242      }
243 243  
244 244  
245 245  
246 246  @Callable(i)
247 247  func requestAcresCallback (amount) = {
248 248      let caller = i.caller
249 249      if (if ((toString(caller) != acres2AddressStr))
250 250          then (caller != stakingContract)
251 251          else false)
252 252          then throw("Permission denied")
253 253          else $Tuple2([ScriptTransfer(caller, amount, acresAssetId)], amount)
254 254      }
255 255  
256 256  
257 257  
258 258  @Callable(i)
259 259  func claimAcresREADONLY (address) = {
260 260      let timeKey = keyAcresStakedTimeByUser(address)
261 261      let amountKey = keyAcresStakedAmountByUser(address)
262 262      let acresAmount = valueOrElse(getInteger(amountKey), 0)
263 263      let lastTime = valueOrElse(getInteger(timeKey), 0)
264 264      let claimedAcres = claimAcresInternal(address, acresAmount, lastTime)
265 265      $Tuple2(nil, [claimedAcres, lastTime])
266 266      }
267 267  
268 268

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let OLD_STAKING_DEADLINE = ~~1733248800000~~
	4	+	let OLD_STAKING_DEADLINE = 1733256000000
5	5
6	6		let chain = take(drop(this.bytes, 1), 1)
7	7

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let OLD_STAKING_DEADLINE = ~~1733248800000~~
	4	+	let OLD_STAKING_DEADLINE = 1733256000000
5	5
6	6		let chain = take(drop(this.bytes, 1), 1)
7	7
8	8		let defaultRestAddressStr = match chain {
9	9		case _ =>
10	10		if ((base58'2W' == $match0))
11	11		then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
12	12		else if ((base58'2T' == $match0))
13	13		then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
14	14		else throw("Unknown chain")
15	15		}
16	16
17	17		let acres2AddressStr = match chain {
18	18		case _ =>
19	19		if ((base58'2W' == $match0))
20	20		then "3P4UH3T9nXpMNpUmSmQjPmEz3G85t3zn6eA"
21	21		else if ((base58'2T' == $match0))
22	22		then "3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh"
23	23		else throw("Unknown chain")
24	24		}
25	25
26	26		let SEP = "__"
27	27
28	28		let MULT8 = 100000000
29	29
30	30		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
31	31
32	32
33	33		let IdxCfgStakingDapp = 1
34	34
35	35		let IdxCfgEconomyDapp = 2
36	36
37	37		let IdxCfgWlgDapp = 4
38	38
39	39		let IdxCfgAcresDapp = 8
40	40
41	41		func keyRestCfg () = "%s__restConfig"
42	42
43	43
44	44		func keyRestAddress () = "%s__restAddr"
45	45
46	46
47	47		func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
48	48
49	49
50	50		func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
51	51
52	52
53	53		let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
54	54
55	55		let restCfg = readRestCfgOrFail(restContract)
56	56
57	57		let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
58	58
59	59		let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
60	60
61	61		let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
62	62
63	63		let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
64	64
65	65		let acresIssuedAmountKey = "acresIssuedAmount"
66	66
67	67		let acresAssetIdKey = "acresAssetId"
68	68
69	69		let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
70	70
71	71		func keyAcresStakedTimeByUser (addr) = ("acresStakedTimeByUser_" + addr)
72	72
73	73
74	74		let IdxEffTotal = 0
75	75
76	76		func keyResProportions () = "resTypesProportions"
77	77
78	78
79	79		func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
80	80
81	81
82	82		func asInt (v) = match v {
83	83		case n: Int =>
84	84		n
85	85		case _ =>
86	86		throw("fail to cast into Int")
87	87		}
88	88
89	89
90	90		func asTwoIntsTuple (val) = match val {
91	91		case t2: (Int, Int) =>
92	92		t2
93	93		case _ =>
94	94		throw("fail to cast into (Int, Int)")
95	95		}
96	96
97	97
98	98		func getVotingPower (userAddrStrOrEmpty) = {
99	99		let props = split(valueOrElse(getString(stakingContract, keyResProportions()), "0_0_0_0_0_0"), "_")
100	100		func adder (acc,item) = (acc + parseIntValue(item))
101	101
102	102		let totalPower = {
103	103		let $l = props
104	104		let $s = size($l)
105	105		let $acc0 = 0
106	106		func $f0_1 ($a,$i) = if (($i >= $s))
107	107		then $a
108	108		else adder($a, $l[$i])
109	109
110	110		func $f0_2 ($a,$i) = if (($i >= $s))
111	111		then $a
112	112		else throw("List size exceeds 6")
113	113
114	114		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
115	115		}
116	116		let usersPower = valueOrElse(getInteger(stakingContract, keyStakedPiecesByOwner(userAddrStrOrEmpty)), 0)
117	117		[totalPower, usersPower]
118	118		}
119	119
120	120
121	121		func fixedPoint (val,decimals) = {
122	122		let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
123	123		let lowPart = toString((val % tenPow))
124	124		let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
125	125		(((toString((val / tenPow)) + ".") + zeroes) + lowPart)
126	126		}
127	127
128	128
129	129		func finalTime () = min([lastBlock.timestamp, OLD_STAKING_DEADLINE])
130	130
131	131
132	132		let DAILYRESBYPIECE = 3456000
133	133
134	134		let USDT2ACRES_MULTIPLIER = 10
135	135
136	136		let MILLION6 = 100000000000000
137	137
138	138		let DAYMILLIS = 86400000
139	139
140	140		func keyAcresStakedAmountByUser (addr) = ("acresStakedAmountByUser_" + addr)
141	141
142	142
143	143		func keyAcresLockedAmountByUser (addr) = ("acresLockedAmountByUser_" + addr)
144	144
145	145
146	146		func keyAcresLockedEtaByUser (addr) = ("acresLockedEtaByUser_" + addr)
147	147
148	148
149	149		let acresStakedTotalKey = "acresStakedAmountTotal"
150	150
151	151		let BLACKLISTED1 = "3P2NGX4Q5nge1MCauwQW5aqYLdkccSGj1Ep_3P2xFAHW9yhyNohYozWd4HFhEXZu3bsNSoR_3P2yKaZ2gvn9Xe5tti81a7P9LZhHgjvToV9_3P37zQ3cf2ecu55RmJqEiGSivdzN9avt3m9_3P4az6dtzsvGCWFAxa94UdevKzXyEwxEiFG_3P4kZU6X3TTLFcSUe55JSy8BySqitcPgMBz_3P5hCxBEh3NgNizZhNBreyBSqtbhJYLkKPD_3P7HLvucy11yxyMJUwjzXFHHKMEDwi1EwfC_3P8JuaqH9PTQAv8D5HBGgQfKauLTYt2NQft_3P9gTDB4rtDEVbpX3asU63H4Zinh2EnTmZE_3P9iN3qrtfJicUVy7amZeVsetVD3vUMk8be_3PCa2BsAa6JBLirszQfV5r9fJrujfhwtwfP_3PD3i4XN8KtygcFx4ry5M7UGqdfH8VYvtRT_3PDEMnnJNc2kx9cPEmvVvhXUr8SvhANKhsa_3PDGE9tKQizaeZFeDDq5aYSv89nwYbfirpZ_3PDMKQTCrUPZECVXEJJ8m1sHtutSu1naSf1_3PGh2Qu6Yvx8GTCRRVNvBUVZLdaidYSaxo5_3PKkmAtbSK5D2hQdo1RfEg8eXyMbDcRUc92_3PLMnbxzssP8W8E8XjJ1RLBBg8UZL8Cz3P2_3PMuxo4PCAox9s4a7R1eszh4iqqu8gS7jHv_3PNrMtEQChw87WZU1JAJ7aGHykCa8TjnDNK_3PPuBXfWoBy3EEory7c7vgi9Usjka7o5tBj_3PQwyeyEhT4Y6aGAL6tg73aQWJtV1zRt3nR_3PRGDShuMGb84MJtTJvtTg8qDfswkYWcm3e"
152	152
153	153		let PROMO1_AMOUNT = 4970178
154	154
155	155		func isBlacklistedPromo1 (addr) = contains(BLACKLISTED1, addr)
156	156
157	157
158	158		func claimAcresInternal (addr,acresAmount,lastClaimTime) = {
159	159		let deltaTime = (finalTime() - lastClaimTime)
160	160		let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
161	161		let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
162	162		let gotUsdt = max([0, canGetUsdt])
163	163		(gotUsdt * USDT2ACRES_MULTIPLIER)
164	164		}
165	165
166	166
167	167		func claimInternal (addr,acresAmount,lastClaimTime) = {
168	168		let deltaTime = (finalTime() - lastClaimTime)
169	169		if ((0 > deltaTime))
170	170		then throw(((("Saved timestamp is in future, saved = " + toString(lastClaimTime)) + ", final = ") + toString(finalTime())))
171	171		else {
172	172		let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
173	173		let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
174	174		let gotUsdt = if ((0 >= canGetUsdt))
175	175		then 0
176	176		else asTwoIntsTuple(invoke(economyContract, "sellResourcesWorld", [addr, availRes], nil))._1
177	177		(gotUsdt * USDT2ACRES_MULTIPLIER)
178	178		}
179	179		}
180	180
181	181
182	182		func unstakeAcresRO (amount,address) = {
183	183		let timeKey = keyAcresStakedTimeByUser(address)
184	184		let claimedAcres = claimAcresInternal(address, amount, valueOrElse(getInteger(timeKey), 0))
185	185		$Tuple2(amount, claimedAcres)
186	186		}
187	187
188	188
189	189		@Callable(i)
190	190		func constructorV1 (restAddr,unstakedPieces) = if ((i.caller != this))
191	191		then throw("Permission denied")
192	192		else if (isDefined(getBinary(acresAssetIdKey)))
193	193		then throw("Already initialized")
194	194		else {
195	195		let nftAcres = (getVotingPower("")[IdxEffTotal] + unstakedPieces)
196	196		let issuedAmount = (MILLION6 - (nftAcres * MULT8))
197	197		let issue = Issue("ACRES", "WavesLands land acres investment token", issuedAmount, 8, false, unit, 0)
198	198		let assetId = calculateAssetId(issue)
199	199		[issue, IntegerEntry(acresIssuedAmountKey, issuedAmount), BinaryEntry(acresAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr)]
200	200		}
201	201
202	202
203	203
204	204		@Callable(i)
205	205		func unstakeAcresCallback (amount,address) = if ((toString(i.caller) != acres2AddressStr))
206	206		then throw("Permission denied")
207	207		else if ((0 >= amount))
208	208		then throw("Amount should be positive")
209	209		else {
210	210		let timeKey = keyAcresStakedTimeByUser(address)
211	211		let amountKey = keyAcresStakedAmountByUser(address)
212	212		let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
213	213		if ((amount > oldAcresAmount))
214	214		then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(amount, 8)))
215	215		else {
216	216		let lockedAmount = valueOrElse(getInteger(keyAcresLockedAmountByUser(address)), 0)
217	217		let lockedETA = valueOrElse(getInteger(keyAcresLockedEtaByUser(address)), 0)
218	218		let now = lastBlock.timestamp
219	219		let unstakableAmount = if (isBlacklistedPromo1(address))
220	220		then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
221	221		else (oldAcresAmount - lockedAmount)
222	222		if (if ((lockedETA > now))
223	223		then (amount > unstakableAmount)
224	224		else false)
225	225		then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
226	226		else {
227	227		let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
228	228		let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address, false], nil)
229	229		let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
230	230		$Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2((amount + claimedAcres), wlgResult))
231	231		}
232	232		}
233	233		}
234	234
235	235
236	236
237	237		@Callable(i)
238	238		func unstakeAllAcresREADONLY (address) = {
239	239		let amount = valueOrElse(getInteger(keyAcresStakedAmountByUser(address)), 0)
240	240		let unstakedWithClaimed = unstakeAcresRO(amount, address)
241	241		$Tuple2(nil, unstakedWithClaimed)
242	242		}
243	243
244	244
245	245
246	246		@Callable(i)
247	247		func requestAcresCallback (amount) = {
248	248		let caller = i.caller
249	249		if (if ((toString(caller) != acres2AddressStr))
250	250		then (caller != stakingContract)
251	251		else false)
252	252		then throw("Permission denied")
253	253		else $Tuple2([ScriptTransfer(caller, amount, acresAssetId)], amount)
254	254		}
255	255
256	256
257	257
258	258		@Callable(i)
259	259		func claimAcresREADONLY (address) = {
260	260		let timeKey = keyAcresStakedTimeByUser(address)
261	261		let amountKey = keyAcresStakedAmountByUser(address)
262	262		let acresAmount = valueOrElse(getInteger(amountKey), 0)
263	263		let lastTime = valueOrElse(getInteger(timeKey), 0)
264	264		let claimedAcres = claimAcresInternal(address, acresAmount, lastTime)
265	265		$Tuple2(nil, [claimedAcres, lastTime])
266	266		}
267	267
268	268

github/deemru/w8io/026f985 
26.47 ms ◑