tx · B1d16LfBaJixeBHQmk8HZtQYtDKg6njRuwixFtqerjxP

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.00900000 Waves

2023.10.09 01:16 [2790248] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "B1d16LfBaJixeBHQmk8HZtQYtDKg6njRuwixFtqerjxP",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1696803433519,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "64hCgNVp54NBKRKdwFbKEbCAvYgqc1dY4xeuio9gbGN3psxGDYcqKKZWPnHhANLTsijRkgdcPpkfGvoWFncfxTpU"
    ],
    "script": "base64:BgIjCAISBAoCCAESABIDCgEBEgASBAoCCAESAwoBARIAEgMKAQgqAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABNhY3Jlc1N0YWtlZFRvdGFsS2V5AhZhY3Jlc1N0YWtlZEFtb3VudFRvdGFsAAp4cE5ld1NMYW5kAMCWsQIAD0RBSUxZUkVTQllQSUVDRQCA+NIBABVVU0RUMkFDUkVTX01VTFRJUExJRVIACgAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5hc1R3b0ludHNUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQEOZ2V0Vm90aW5nUG93ZXIBEnVzZXJBZGRyU3RyT3JFbXB0eQQFcHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCgEFYWRkZXICA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0ECnRvdGFsUG93ZXIKAAIkbAUFcHJvcHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp1c2Vyc1Bvd2VyCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBRJ1c2VyQWRkclN0ck9yRW1wdHkAAAkAzAgCBQp0b3RhbFBvd2VyCQDMCAIFCnVzZXJzUG93ZXIFA25pbAEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQBBnByb2xvZwAJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAESY2xhaW1BY3Jlc0ludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0CQCWAwEJAMwIAgAACQDMCAIFCmNhbkdldFVzZHQFA25pbAkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgENY2xhaW1JbnRlcm5hbAMEYWRkcgthY3Jlc0Ftb3VudA1sYXN0Q2xhaW1UaW1lBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUNbGFzdENsYWltVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFDWxhc3RDbGFpbVRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBQ9EQUlMWVJFU0JZUElFQ0UFC2FjcmVzQW1vdW50CQBoAgUJREFZTUlMTElTBQVNVUxUOAQKY2FuR2V0VXNkdAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAQHZ290VXNkdAMJAGcCAAAFCmNhbkdldFVzZHQAAAgJAQ5hc1R3b0ludHNUdXBsZQEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhJzZWxsUmVzb3VyY2VzV29ybGQJAMwIAgUEYWRkcgkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwCXzEJAGgCBQdnb3RVc2R0BRVVU0RUMkFDUkVTX01VTFRJUExJRVIIAWkBDWNvbnN0cnVjdG9yVjECCHJlc3RBZGRyDnVuc3Rha2VkUGllY2VzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ9hY3Jlc0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAhuZnRBY3JlcwkAZAIJAJEDAgkBDmdldFZvdGluZ1Bvd2VyAQIABQtJZHhFZmZUb3RhbAUOdW5zdGFrZWRQaWVjZXMEDGlzc3VlZEFtb3VudAkAZQIFCE1JTExJT042CQBoAgUIbmZ0QWNyZXMFBU1VTFQ4BAVpc3N1ZQkAwwgHAgVBQ1JFUwImV2F2ZXNMYW5kcyBsYW5kIGFjcmVzIGludmVzdG1lbnQgdG9rZW4FDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQtCaW5hcnlFbnRyeQIFD2FjcmVzQXNzZXRJZEtleQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBCnN0YWtlQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRNhY3Jlc1N0YWtlZFRvdGFsS2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAM0IAgkAzQgCCQDNCAIDCQAAAgUMY2xhaW1lZEFjcmVzAAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQNhbXQJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFA2FtdAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAFpAQx1bnN0YWtlQWNyZXMBBmFtb3VudAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAMJAGcCAAAFBmFtb3VudAkAAgECGUFtb3VudCBzaG91bGQgYmUgcG9zaXRpdmUEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAAAwkAZgIFBmFtb3VudAUOb2xkQWNyZXNBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkBCmZpeGVkUG9pbnQCBQ5vbGRBY3Jlc0Ftb3VudAAIAiAgQUNSRVMgc3Rha2VkLCB0cmllZCB0byB1bnN0YWtlIAkBCmZpeGVkUG9pbnQCBQZhbW91bnQACAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYWNyZXNTdGFrZWRUb3RhbEtleQkAZQIFCG9sZFRvdGFsBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBCGJ1eUFjcmVzAAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQMJAGYCBQVNVUxUNgUDYW10CQACAQkArAICCQCsAgICFk1pbiBwYXltZW50IHNob3VsZCBiZSAJAQpmaXhlZFBvaW50AgUFTVVMVDYABgIFIFVTRFQEC2FjcmVzQW1vdW50CQBoAgUDYW10BRVVU0RUMkFDUkVTX01VTFRJUExJRVIEDmFjY1N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQWNjU3RhdHMJAMwIAgUHYWRkcmVzcwkAzAgCCQBrAwUKeHBOZXdTTGFuZAULYWNyZXNBbW91bnQJAGgCABkFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAUDYW10BQt1c2R0QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2FjcmVzQW1vdW50BQxhY3Jlc0Fzc2V0SWQFA25pbAkAlAoCBQxwcm9sb2dSZXN1bHQFDmFjY1N0YXRzUmVzdWx0AWkBCXNlbmRBY3JlcwIEYWRkcgZhbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUEYWRkcgUGYW1vdW50BQxhY3Jlc0Fzc2V0SWQFA25pbAUGYW1vdW50AWkBCWJ1cm5BY3JlcwEGYW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBQ9zdGFraW5nQ29udHJhY3QJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQKYW1vdW50TGVmdAkAZQIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUUYWNyZXNJc3N1ZWRBbW91bnRLZXkAAAUGYW1vdW50AwkAZgIAAAUKYW1vdW50TGVmdAkAAgECJ0F0dGVtcHQgdG8gYnVybiBtb3JlIEFDUkVTLCB0aGFuIGV4aXN0cwkAlAoCCQDMCAIJAQRCdXJuAgUMYWNyZXNBc3NldElkBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFFGFjcmVzSXNzdWVkQW1vdW50S2V5BQphbW91bnRMZWZ0BQNuaWwFBmFtb3VudAFpAQpjbGFpbUFjcmVzAAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQLYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwULYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUMY2xhaW1lZEFjcmVzBQxhY3Jlc0Fzc2V0SWQFA25pbAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAFpARJjbGFpbUFjcmVzUkVBRE9OTFkBB2FkZHJlc3MEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAhsYXN0VGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAEDGNsYWltZWRBY3JlcwkBEmNsYWltQWNyZXNJbnRlcm5hbAMFB2FkZHJlc3MFC2FjcmVzQW1vdW50BQhsYXN0VGltZQkAlAoCBQNuaWwJAMwIAgUMY2xhaW1lZEFjcmVzCQDMCAIFCGxhc3RUaW1lBQNuaWwAJUmZvQ==",
    "height": 2790248,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HehUrzNui12Wkob1cB1oZ4rjcEKb2XBFDMRUnvEHjTrk
Next: AuEfrewxgt3rXhtCg1pDwvebZAK5oA6AXscJsQf92sTT

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

github/deemru/w8io/026f985 
36.68 ms ◑