tx · 6wtoAm8MX5XaLQzjHAbe1kRpigouPL7kdNGMC2QPTLUr

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.00900000 Waves

2023.09.30 19:41 [2778417] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6wtoAm8MX5XaLQzjHAbe1kRpigouPL7kdNGMC2QPTLUr",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1696092136606,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "5GhiPCXCWq6ZN928BxkPjhAMqnqmY9MXrkiW2oEhX14ogco6Z2ofufRUsJ3XTTv5muSvhDHV2mJhoxw5JsDuvTDd"
    ],
    "script": "base64:BgIdCAISBAoCCAESABIDCgEBEgASAwoBARIAEgMKAQgrAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABNhY3Jlc1N0YWtlZFRvdGFsS2V5AhZhY3Jlc1N0YWtlZEFtb3VudFRvdGFsAAp4cE5ld1NMYW5kAMCWsQIAD0RBSUxZUkVTQllQSUVDRQCA+NIBABVVU0RUMkFDUkVTX01VTFRJUExJRVIACgAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5hc1R3b0ludHNUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQEOZ2V0Vm90aW5nUG93ZXIBEnVzZXJBZGRyU3RyT3JFbXB0eQQFcHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCgEFYWRkZXICA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0ECnRvdGFsUG93ZXIKAAIkbAUFcHJvcHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp1c2Vyc1Bvd2VyCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBRJ1c2VyQWRkclN0ck9yRW1wdHkAAAkAzAgCBQp0b3RhbFBvd2VyCQDMCAIFCnVzZXJzUG93ZXIFA25pbAEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQACndoYWxlc0xpc3QJAM0IAgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAUDbmlsAwkAAAIBAVQFByRtYXRjaDAJAMwIAgIjM010QmdKVGFMeFBCM0M3VUpEMVVFOHFqa0h0aGZLdkZRWVkJAMwIAgIjM04zZ1NGclR3Z2lMQUZaSE11SnJFdHRodDFuUGhua3B2anMFA25pbAkAAgECDVVua25vd24gY2hhaW4JAKUIAQUEdGhpcwEGcHJvbG9nAAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCCnNhdmVMYXN0VHgFA25pbAUDbmlsARJjbGFpbUFjcmVzSW50ZXJuYWwDBGFkZHILYWNyZXNBbW91bnQNbGFzdENsYWltVGltZQQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFDWxhc3RDbGFpbVRpbWUECGF2YWlsUmVzCQBrAwUJZGVsdGFUaW1lCQBoAgUPREFJTFlSRVNCWVBJRUNFBQthY3Jlc0Ftb3VudAkAaAIFCURBWU1JTExJUwUFTVVMVDgECmNhbkdldFVzZHQJAQVhc0ludAEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhpzZWxsUmVzb3VyY2VzV29ybGRSRUFET05MWQkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwEB2dvdFVzZHQJAJYDAQkAzAgCAAAJAMwIAgUKY2FuR2V0VXNkdAUDbmlsCQBoAgUHZ290VXNkdAUVVVNEVDJBQ1JFU19NVUxUSVBMSUVSAQ1jbGFpbUludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lAwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQUNbGFzdENsYWltVGltZQIMLCBjdXJyZW50ID0gCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0AwkAZwIAAAUKY2FuR2V0VXNkdAAACAkBDmFzVHdvSW50c1R1cGxlAQkA/AcEBQ9lY29ub215Q29udHJhY3QCEnNlbGxSZXNvdXJjZXNXb3JsZAkAzAgCBQRhZGRyCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAJfMQkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgcBaQENY29uc3RydWN0b3JWMQIIcmVzdEFkZHIOdW5zdGFrZWRQaWVjZXMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAMJAQlpc0RlZmluZWQBCQChCAEFD2FjcmVzQXNzZXRJZEtleQkAAgECE0FscmVhZHkgaW5pdGlhbGl6ZWQECG5mdEFjcmVzCQBkAgkAkQMCCQEOZ2V0Vm90aW5nUG93ZXIBAgAFC0lkeEVmZlRvdGFsBQ51bnN0YWtlZFBpZWNlcwQMaXNzdWVkQW1vdW50CQBlAgUITUlMTElPTjYJAGgCBQhuZnRBY3JlcwUFTVVMVDgEBWlzc3VlCQDDCAcCBUFDUkVTAiZXYXZlc0xhbmRzIGxhbmQgYWNyZXMgaW52ZXN0bWVudCB0b2tlbgUMaXNzdWVkQW1vdW50AAgHBQR1bml0AAAEB2Fzc2V0SWQJALgIAQUFaXNzdWUJAMwIAgUFaXNzdWUJAMwIAgkBDEludGVnZXJFbnRyeQIFFGFjcmVzSXNzdWVkQW1vdW50S2V5BQxpc3N1ZWRBbW91bnQJAMwIAgkBC0JpbmFyeUVudHJ5AgUPYWNyZXNBc3NldElkS2V5BQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlSZXN0QWRkcmVzcwAFCHJlc3RBZGRyBQNuaWwBaQEKc3Rha2VBY3JlcwAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwAEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQxhY3Jlc0Fzc2V0SWQJAAIBAhRBQ1JFUyBwYXltZW50cyBvbmx5IQQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECG9sZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFE2FjcmVzU3Rha2VkVG90YWxLZXkAAAQJd2xnUmVzdWx0CQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwEDGNsYWltZWRBY3JlcwkBDWNsYWltSW50ZXJuYWwDBQdhZGRyZXNzBQ5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAJAJQKAgkAzQgCCQDNCAIJAM0IAgMJAAACBQxjbGFpbWVkQWNyZXMAAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUMY2xhaW1lZEFjcmVzBQxhY3Jlc0Fzc2V0SWQFA25pbAkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBkAgUOb2xkQWNyZXNBbW91bnQFA2FtdAkBDEludGVnZXJFbnRyeQIFE2FjcmVzU3Rha2VkVG90YWxLZXkJAGQCBQhvbGRUb3RhbAUDYW10CQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBDHVuc3Rha2VBY3JlcwEGYW1vdW50BAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAZwIAAAUGYW1vdW50CQACAQIZQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAADCQBmAgUGYW1vdW50BQ5vbGRBY3Jlc0Ftb3VudAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQEKZml4ZWRQb2ludAIFDm9sZEFjcmVzQW1vdW50AAgCICBBQ1JFUyBzdGFrZWQsIHRyaWVkIHRvIHVuc3Rha2UgCQEKZml4ZWRQb2ludAIFBmFtb3VudAAIBAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRNhY3Jlc1N0YWtlZFRvdGFsS2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlhbW91bnRLZXkJAGUCBQ5vbGRBY3Jlc0Ftb3VudAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBlAgUIb2xkVG90YWwFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGQCBQZhbW91bnQFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAJQKAgUMcHJvbG9nUmVzdWx0BQl3bGdSZXN1bHQBaQEIYnV5QWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFCndoYWxlc0xpc3QFB2FkZHJlc3MJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhNVU0RUIHBheW1lbnRzIG9ubHkhAwkAZgIFBU1VTFQ2BQNhbXQJAAIBCQCsAgIJAKwCAgIWTWluIHBheW1lbnQgc2hvdWxkIGJlIAkBCmZpeGVkUG9pbnQCBQVNVUxUNgAGAgUgVVNEVAQLYWNyZXNBbW91bnQJAGgCBQNhbXQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgQOYWNjU3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVBY2NTdGF0cwkAzAgCBQdhZGRyZXNzCQDMCAIJAGsDBQp4cE5ld1NMYW5kBQthY3Jlc0Ftb3VudAkAaAIAGQUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0BQNhbXQFC3VzZHRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYWNyZXNBbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUOYWNjU3RhdHNSZXN1bHQBaQEJYnVybkFjcmVzAQZhbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQCUCgIJAMwIAgkBBEJ1cm4CBQxhY3Jlc0Fzc2V0SWQFBmFtb3VudAUDbmlsBQZhbW91bnQBaQEKY2xhaW1BY3JlcwAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwAEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAJQKAgUMcHJvbG9nUmVzdWx0BQl3bGdSZXN1bHQBaQESY2xhaW1BY3Jlc1JFQURPTkxZAQdhZGRyZXNzBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBAthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIbGFzdFRpbWUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAABAxjbGFpbWVkQWNyZXMJARJjbGFpbUFjcmVzSW50ZXJuYWwDBQdhZGRyZXNzBQthY3Jlc0Ftb3VudAUIbGFzdFRpbWUJAJQKAgUDbmlsCQDMCAIFDGNsYWltZWRBY3JlcwkAzAgCBQhsYXN0VGltZQUDbmlsAPgVX48=",
    "height": 2778417,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6vv8YwYhwBUM2CT6p7RHVdVs6JH5KDXxvrAFjpSZaseE
Next: HySWJNj8Ji6a5We8tXu1FJrcw8ChqVoZ2jjqwujqr3iy

Diff: 

OldNewDifferences
147147     }
148148 
149149 
150-func aq () = Q(invoke(E, "saveLastTx", nil, nil))
150+let aq = ({
151+    let k = i
152+    if ((base58'2W' == k))
153+        then nil
154+        else if ((base58'2T' == k))
155+            then ["3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY", "3N3gSFrTwgiLAFZHMuJrEttht1nPhnkpvjs"]
156+            else throw("Unknown chain")
157+    } :+ toString(this))
158+
159+func ar () = Q(invoke(E, "saveLastTx", nil, nil))
151160 
152161 
153-func ar (d,as,at) = {
154-    let au = (lastBlock.timestamp - at)
155-    let av = fraction(au, (g * as), (b * o))
156-    let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
157-    let ax = max([0, aw])
158-    (ax * h)
162+func as (d,at,au) = {
163+    let av = (lastBlock.timestamp - au)
164+    let aw = fraction(av, (g * at), (b * o))
165+    let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
166+    let ay = max([0, ax])
167+    (ay * h)
159168     }
160169 
161170 
162-func ay (d,as,at) = {
163-    let au = (lastBlock.timestamp - at)
164-    if ((0 > au))
165-        then throw(((("Saved timestamp is in future, saved = " + toString(at)) + ", current = ") + toString(lastBlock.timestamp)))
171+func az (d,at,au) = {
172+    let av = (lastBlock.timestamp - au)
173+    if ((0 > av))
174+        then throw(((("Saved timestamp is in future, saved = " + toString(au)) + ", current = ") + toString(lastBlock.timestamp)))
166175         else {
167-            let av = fraction(au, (g * as), (b * o))
168-            let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
169-            let ax = if ((0 >= aw))
176+            let aw = fraction(av, (g * at), (b * o))
177+            let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
178+            let ay = if ((0 >= ax))
170179                 then 0
171-                else T(invoke(F, "sellResourcesWorld", [d, av], nil))._1
172-            (ax * h)
180+                else T(invoke(F, "sellResourcesWorld", [d, aw], nil))._1
181+            (ay * h)
173182             }
174183     }
175184 
176185 
177-@Callable(az)
178-func constructorV1 (aA,aB) = if ((az.caller != this))
186+@Callable(aA)
187+func constructorV1 (aB,aC) = if ((aA.caller != this))
179188     then throw("Permission denied")
180189     else if (isDefined(getBinary(J)))
181190         then throw("Already initialized")
182191         else {
183-            let aC = (W("")[M] + aB)
184-            let aD = (a - (aC * o))
185-            let aE = Issue("ACRES", "WavesLands land acres investment token", aD, 8, false, unit, 0)
186-            let aF = calculateAssetId(aE)
187-[aE, IntegerEntry(I, aD), BinaryEntry(J, aF), StringEntry(x(), aA)]
192+            let aD = (W("")[M] + aC)
193+            let aE = (a - (aD * o))
194+            let aF = Issue("ACRES", "WavesLands land acres investment token", aE, 8, false, unit, 0)
195+            let aG = calculateAssetId(aF)
196+[aF, IntegerEntry(I, aE), BinaryEntry(J, aG), StringEntry(x(), aB)]
188197             }
189198 
190199 
191200 
192-@Callable(az)
201+@Callable(aA)
193202 func stakeAcres () = {
194-    let aG = aq()
195-    let q = toString(az.caller)
196-    if ((size(az.payments) != 1))
203+    let aH = ar()
204+    let q = toString(aA.caller)
205+    if ((size(aA.payments) != 1))
197206         then throw("exactly 1 payment must be attached")
198207         else {
199-            let aH = az.payments[0]
200-            let aI = aH.amount
201-            if (if (!(isDefined(aH.assetId)))
208+            let aI = aA.payments[0]
209+            let aJ = aI.amount
210+            if (if (!(isDefined(aI.assetId)))
202211                 then true
203-                else (value(aH.assetId) != K))
212+                else (value(aI.assetId) != K))
204213                 then throw("ACRES payments only!")
205214                 else {
206-                    let aJ = L(q)
207-                    let aK = c(q)
208-                    let aL = valueOrElse(getInteger(aK), 0)
209-                    let aM = valueOrElse(getInteger(e), 0)
210-                    let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
211-                    let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
212-                    $Tuple2(((((if ((aO == 0))
215+                    let aK = L(q)
216+                    let aL = c(q)
217+                    let aM = valueOrElse(getInteger(aL), 0)
218+                    let aN = valueOrElse(getInteger(e), 0)
219+                    let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
220+                    let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
221+                    $Tuple2(((((if ((aP == 0))
213222                         then nil
214-                        else [ScriptTransfer(az.caller, aO, K)]) :+ IntegerEntry(aJ, lastBlock.timestamp)) :+ IntegerEntry(aK, (aL + aI))) :+ IntegerEntry(e, (aM + aI))), $Tuple2(aG, aN))
223+                        else [ScriptTransfer(aA.caller, aP, K)]) :+ IntegerEntry(aK, lastBlock.timestamp)) :+ IntegerEntry(aL, (aM + aJ))) :+ IntegerEntry(e, (aN + aJ))), $Tuple2(aH, aO))
215224                     }
216225             }
217226     }
218227 
219228 
220229 
221-@Callable(az)
222-func unstakeAcres (aP) = {
223-    let aG = aq()
224-    if ((0 >= aP))
230+@Callable(aA)
231+func unstakeAcres (aQ) = {
232+    let aH = ar()
233+    if ((0 >= aQ))
225234         then throw("Amount should be positive")
226235         else {
227-            let q = toString(az.caller)
228-            if ((size(az.payments) != 0))
236+            let q = toString(aA.caller)
237+            if ((size(aA.payments) != 0))
229238                 then throw("No payments required")
230239                 else {
231-                    let aJ = L(q)
232-                    let aK = c(q)
233-                    let aL = valueOrElse(getInteger(aK), 0)
234-                    if ((aP > aL))
235-                        then throw(((("You have only " + al(aL, 8)) + " ACRES staked, tried to unstake ") + al(aP, 8)))
240+                    let aK = L(q)
241+                    let aL = c(q)
242+                    let aM = valueOrElse(getInteger(aL), 0)
243+                    if ((aQ > aM))
244+                        then throw(((("You have only " + al(aM, 8)) + " ACRES staked, tried to unstake ") + al(aQ, 8)))
236245                         else {
237-                            let aM = valueOrElse(getInteger(e), 0)
238-                            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
239-                            let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
240-                            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), IntegerEntry(aK, (aL - aP)), IntegerEntry(e, (aM - aP)), ScriptTransfer(az.caller, (aP + aO), K)], $Tuple2(aG, aN))
246+                            let aN = valueOrElse(getInteger(e), 0)
247+                            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
248+                            let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
249+                            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), IntegerEntry(aL, (aM - aQ)), IntegerEntry(e, (aN - aQ)), ScriptTransfer(aA.caller, (aQ + aP), K)], $Tuple2(aH, aO))
241250                             }
242251                     }
243252             }
245254 
246255 
247256 
248-@Callable(az)
257+@Callable(aA)
249258 func buyAcres () = {
250-    let aG = aq()
251-    let q = toString(az.caller)
252-    if ((size(az.payments) != 1))
253-        then throw("exactly 1 payment must be attached")
259+    let aH = ar()
260+    let q = toString(aA.caller)
261+    if (!(containsElement(aq, q)))
262+        then throw("Permission denied")
263+        else if ((size(aA.payments) != 1))
264+            then throw("exactly 1 payment must be attached")
265+            else {
266+                let aI = aA.payments[0]
267+                let aJ = aI.amount
268+                if (if (!(isDefined(aI.assetId)))
269+                    then true
270+                    else (value(aI.assetId) != j))
271+                    then throw("USDT payments only!")
272+                    else if ((n > aJ))
273+                        then throw((("Min payment should be " + al(n, 6)) + " USDT"))
274+                        else {
275+                            let at = (aJ * h)
276+                            let aR = Q(invoke(E, "updateAccStats", [q, fraction(f, at, (25 * o))], nil))
277+                            $Tuple2([ScriptTransfer(F, aJ, j), ScriptTransfer(aA.caller, at, K)], $Tuple2(aH, aR))
278+                            }
279+                }
280+    }
281+
282+
283+
284+@Callable(aA)
285+func burnAcres (aQ) = if ((aA.caller != E))
286+    then throw("Permission denied")
287+    else $Tuple2([Burn(K, aQ)], aQ)
288+
289+
290+
291+@Callable(aA)
292+func claimAcres () = {
293+    let aH = ar()
294+    let q = toString(aA.caller)
295+    if ((size(aA.payments) != 0))
296+        then throw("No payments required")
254297         else {
255-            let aH = az.payments[0]
256-            let aI = aH.amount
257-            if (if (!(isDefined(aH.assetId)))
258-                then true
259-                else (value(aH.assetId) != j))
260-                then throw("USDT payments only!")
261-                else if ((n > aI))
262-                    then throw((("Min payment should be " + al(n, 6)) + " USDT"))
263-                    else {
264-                        let as = (aI * h)
265-                        let aQ = Q(invoke(E, "updateAccStats", [q, fraction(f, as, (25 * o))], nil))
266-                        $Tuple2([ScriptTransfer(F, aI, j), ScriptTransfer(az.caller, as, K)], $Tuple2(aG, aQ))
267-                        }
298+            let aK = L(q)
299+            let aL = c(q)
300+            let at = valueOrElse(getInteger(aL), 0)
301+            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
302+            let aP = az(q, at, valueOrElse(getInteger(aK), 0))
303+            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), ScriptTransfer(aA.caller, aP, K)], $Tuple2(aH, aO))
268304             }
269305     }
270306 
271307 
272308 
273-@Callable(az)
274-func burnAcres (aP) = if ((az.caller != E))
275-    then throw("Permission denied")
276-    else $Tuple2([Burn(K, aP)], aP)
277-
278-
279-
280-@Callable(az)
281-func claimAcres () = {
282-    let aG = aq()
283-    let q = toString(az.caller)
284-    if ((size(az.payments) != 0))
285-        then throw("No payments required")
286-        else {
287-            let aJ = L(q)
288-            let aK = c(q)
289-            let as = valueOrElse(getInteger(aK), 0)
290-            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
291-            let aO = ay(q, as, valueOrElse(getInteger(aJ), 0))
292-            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), ScriptTransfer(az.caller, aO, K)], $Tuple2(aG, aN))
293-            }
294-    }
295-
296-
297-
298-@Callable(az)
309+@Callable(aA)
299310 func claimAcresREADONLY (q) = {
300-    let aJ = L(q)
301-    let aK = c(q)
302-    let as = valueOrElse(getInteger(aK), 0)
303-    let aR = valueOrElse(getInteger(aJ), 0)
304-    let aO = ar(q, as, aR)
305-    $Tuple2(nil, [aO, aR])
311+    let aK = L(q)
312+    let aL = c(q)
313+    let at = valueOrElse(getInteger(aL), 0)
314+    let aS = valueOrElse(getInteger(aK), 0)
315+    let aP = as(q, at, aS)
316+    $Tuple2(nil, [aP, aS])
306317     }
307318 
308319 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = 100000000000000
55 
66 let b = 86400000
77 
88 func c (d) = ("acresStakedAmountByUser_" + d)
99 
1010 
1111 let e = "acresStakedAmountTotal"
1212 
1313 let f = 5000000
1414 
1515 let g = 3456000
1616 
1717 let h = 10
1818 
1919 let i = take(drop(this.bytes, 1), 1)
2020 
2121 let j = {
2222     let k = i
2323     if ((base58'2W' == k))
2424         then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
2525         else if ((base58'2T' == k))
2626             then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
2727             else throw("Unknown chain")
2828     }
2929 
3030 let l = {
3131     let k = i
3232     if ((base58'2W' == k))
3333         then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
3434         else if ((base58'2T' == k))
3535             then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
3636             else throw("Unknown chain")
3737     }
3838 
3939 let m = "__"
4040 
4141 let n = 1000000
4242 
4343 let o = 100000000
4444 
4545 func p (q,r) = valueOrErrorMessage(getString(q, r), makeString(["mandatory ", toString(q), ".", r, " is not defined"], ""))
4646 
4747 
4848 let s = 1
4949 
5050 let t = 2
5151 
5252 let u = 4
5353 
5454 let v = 8
5555 
5656 func w () = "%s__restConfig"
5757 
5858 
5959 func x () = "%s__restAddr"
6060 
6161 
6262 func y (z) = split_4C(p(z, w()), m)
6363 
6464 
6565 func A (B,C) = valueOrErrorMessage(addressFromString(B[C]), ("Rest cfg doesn't contain address at index " + toString(C)))
6666 
6767 
6868 let D = addressFromStringValue(valueOrElse(getString(this, x()), l))
6969 
7070 let B = y(D)
7171 
7272 let E = A(B, s)
7373 
7474 let F = A(B, t)
7575 
7676 let G = A(B, u)
7777 
7878 let H = A(B, v)
7979 
8080 let I = "acresIssuedAmount"
8181 
8282 let J = "acresAssetId"
8383 
8484 let K = valueOrErrorMessage(getBinary(H, J), "ACRES is not issued yet")
8585 
8686 func L (d) = ("acresStakedTimeByUser_" + d)
8787 
8888 
8989 let M = 0
9090 
9191 func N () = "resTypesProportions"
9292 
9393 
9494 func O (P) = ("stakedPiecesByOwner_" + P)
9595 
9696 
9797 func Q (R) = {
9898     let k = R
9999     if ($isInstanceOf(k, "Int"))
100100         then {
101101             let S = k
102102             S
103103             }
104104         else throw("fail to cast into Int")
105105     }
106106 
107107 
108108 func T (U) = {
109109     let k = U
110110     if ($isInstanceOf(k, "(Int, Int)"))
111111         then {
112112             let V = k
113113             V
114114             }
115115         else throw("fail to cast into (Int, Int)")
116116     }
117117 
118118 
119119 func W (X) = {
120120     let Y = split(valueOrElse(getString(E, N()), "0_0_0_0_0_0"), "_")
121121     func Z (aa,ab) =     (aa + parseIntValue(ab))
122122 
123123     let ac = {
124124         let ad = Y
125125         let ae = size(ad)
126126         let af = 0
127127         func ag (ah,ai) =         if ((ai >= ae))
128128             then ah
129129             else Z(ah, ad[ai])
130130 
131131         func aj (ah,ai) =         if ((ai >= ae))
132132             then ah
133133             else throw("List size exceeds 6")
134134 
135135         aj(ag(ag(ag(ag(ag(ag(af, 0), 1), 2), 3), 4), 5), 6)
136136         }
137137     let ak = valueOrElse(getInteger(E, O(X)), 0)
138138 [ac, ak]
139139     }
140140 
141141 
142142 func al (U,am) = {
143143     let an = pow(10, 0, am, 0, 0, DOWN)
144144     let ao = toString((U % an))
145145     let ap = drop(toString(an), (1 + size(ao)))
146146     (((toString((U / an)) + ".") + ap) + ao)
147147     }
148148 
149149 
150-func aq () = Q(invoke(E, "saveLastTx", nil, nil))
150+let aq = ({
151+    let k = i
152+    if ((base58'2W' == k))
153+        then nil
154+        else if ((base58'2T' == k))
155+            then ["3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY", "3N3gSFrTwgiLAFZHMuJrEttht1nPhnkpvjs"]
156+            else throw("Unknown chain")
157+    } :+ toString(this))
158+
159+func ar () = Q(invoke(E, "saveLastTx", nil, nil))
151160 
152161 
153-func ar (d,as,at) = {
154-    let au = (lastBlock.timestamp - at)
155-    let av = fraction(au, (g * as), (b * o))
156-    let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
157-    let ax = max([0, aw])
158-    (ax * h)
162+func as (d,at,au) = {
163+    let av = (lastBlock.timestamp - au)
164+    let aw = fraction(av, (g * at), (b * o))
165+    let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
166+    let ay = max([0, ax])
167+    (ay * h)
159168     }
160169 
161170 
162-func ay (d,as,at) = {
163-    let au = (lastBlock.timestamp - at)
164-    if ((0 > au))
165-        then throw(((("Saved timestamp is in future, saved = " + toString(at)) + ", current = ") + toString(lastBlock.timestamp)))
171+func az (d,at,au) = {
172+    let av = (lastBlock.timestamp - au)
173+    if ((0 > av))
174+        then throw(((("Saved timestamp is in future, saved = " + toString(au)) + ", current = ") + toString(lastBlock.timestamp)))
166175         else {
167-            let av = fraction(au, (g * as), (b * o))
168-            let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
169-            let ax = if ((0 >= aw))
176+            let aw = fraction(av, (g * at), (b * o))
177+            let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
178+            let ay = if ((0 >= ax))
170179                 then 0
171-                else T(invoke(F, "sellResourcesWorld", [d, av], nil))._1
172-            (ax * h)
180+                else T(invoke(F, "sellResourcesWorld", [d, aw], nil))._1
181+            (ay * h)
173182             }
174183     }
175184 
176185 
177-@Callable(az)
178-func constructorV1 (aA,aB) = if ((az.caller != this))
186+@Callable(aA)
187+func constructorV1 (aB,aC) = if ((aA.caller != this))
179188     then throw("Permission denied")
180189     else if (isDefined(getBinary(J)))
181190         then throw("Already initialized")
182191         else {
183-            let aC = (W("")[M] + aB)
184-            let aD = (a - (aC * o))
185-            let aE = Issue("ACRES", "WavesLands land acres investment token", aD, 8, false, unit, 0)
186-            let aF = calculateAssetId(aE)
187-[aE, IntegerEntry(I, aD), BinaryEntry(J, aF), StringEntry(x(), aA)]
192+            let aD = (W("")[M] + aC)
193+            let aE = (a - (aD * o))
194+            let aF = Issue("ACRES", "WavesLands land acres investment token", aE, 8, false, unit, 0)
195+            let aG = calculateAssetId(aF)
196+[aF, IntegerEntry(I, aE), BinaryEntry(J, aG), StringEntry(x(), aB)]
188197             }
189198 
190199 
191200 
192-@Callable(az)
201+@Callable(aA)
193202 func stakeAcres () = {
194-    let aG = aq()
195-    let q = toString(az.caller)
196-    if ((size(az.payments) != 1))
203+    let aH = ar()
204+    let q = toString(aA.caller)
205+    if ((size(aA.payments) != 1))
197206         then throw("exactly 1 payment must be attached")
198207         else {
199-            let aH = az.payments[0]
200-            let aI = aH.amount
201-            if (if (!(isDefined(aH.assetId)))
208+            let aI = aA.payments[0]
209+            let aJ = aI.amount
210+            if (if (!(isDefined(aI.assetId)))
202211                 then true
203-                else (value(aH.assetId) != K))
212+                else (value(aI.assetId) != K))
204213                 then throw("ACRES payments only!")
205214                 else {
206-                    let aJ = L(q)
207-                    let aK = c(q)
208-                    let aL = valueOrElse(getInteger(aK), 0)
209-                    let aM = valueOrElse(getInteger(e), 0)
210-                    let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
211-                    let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
212-                    $Tuple2(((((if ((aO == 0))
215+                    let aK = L(q)
216+                    let aL = c(q)
217+                    let aM = valueOrElse(getInteger(aL), 0)
218+                    let aN = valueOrElse(getInteger(e), 0)
219+                    let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
220+                    let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
221+                    $Tuple2(((((if ((aP == 0))
213222                         then nil
214-                        else [ScriptTransfer(az.caller, aO, K)]) :+ IntegerEntry(aJ, lastBlock.timestamp)) :+ IntegerEntry(aK, (aL + aI))) :+ IntegerEntry(e, (aM + aI))), $Tuple2(aG, aN))
223+                        else [ScriptTransfer(aA.caller, aP, K)]) :+ IntegerEntry(aK, lastBlock.timestamp)) :+ IntegerEntry(aL, (aM + aJ))) :+ IntegerEntry(e, (aN + aJ))), $Tuple2(aH, aO))
215224                     }
216225             }
217226     }
218227 
219228 
220229 
221-@Callable(az)
222-func unstakeAcres (aP) = {
223-    let aG = aq()
224-    if ((0 >= aP))
230+@Callable(aA)
231+func unstakeAcres (aQ) = {
232+    let aH = ar()
233+    if ((0 >= aQ))
225234         then throw("Amount should be positive")
226235         else {
227-            let q = toString(az.caller)
228-            if ((size(az.payments) != 0))
236+            let q = toString(aA.caller)
237+            if ((size(aA.payments) != 0))
229238                 then throw("No payments required")
230239                 else {
231-                    let aJ = L(q)
232-                    let aK = c(q)
233-                    let aL = valueOrElse(getInteger(aK), 0)
234-                    if ((aP > aL))
235-                        then throw(((("You have only " + al(aL, 8)) + " ACRES staked, tried to unstake ") + al(aP, 8)))
240+                    let aK = L(q)
241+                    let aL = c(q)
242+                    let aM = valueOrElse(getInteger(aL), 0)
243+                    if ((aQ > aM))
244+                        then throw(((("You have only " + al(aM, 8)) + " ACRES staked, tried to unstake ") + al(aQ, 8)))
236245                         else {
237-                            let aM = valueOrElse(getInteger(e), 0)
238-                            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
239-                            let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
240-                            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), IntegerEntry(aK, (aL - aP)), IntegerEntry(e, (aM - aP)), ScriptTransfer(az.caller, (aP + aO), K)], $Tuple2(aG, aN))
246+                            let aN = valueOrElse(getInteger(e), 0)
247+                            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
248+                            let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
249+                            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), IntegerEntry(aL, (aM - aQ)), IntegerEntry(e, (aN - aQ)), ScriptTransfer(aA.caller, (aQ + aP), K)], $Tuple2(aH, aO))
241250                             }
242251                     }
243252             }
244253     }
245254 
246255 
247256 
248-@Callable(az)
257+@Callable(aA)
249258 func buyAcres () = {
250-    let aG = aq()
251-    let q = toString(az.caller)
252-    if ((size(az.payments) != 1))
253-        then throw("exactly 1 payment must be attached")
259+    let aH = ar()
260+    let q = toString(aA.caller)
261+    if (!(containsElement(aq, q)))
262+        then throw("Permission denied")
263+        else if ((size(aA.payments) != 1))
264+            then throw("exactly 1 payment must be attached")
265+            else {
266+                let aI = aA.payments[0]
267+                let aJ = aI.amount
268+                if (if (!(isDefined(aI.assetId)))
269+                    then true
270+                    else (value(aI.assetId) != j))
271+                    then throw("USDT payments only!")
272+                    else if ((n > aJ))
273+                        then throw((("Min payment should be " + al(n, 6)) + " USDT"))
274+                        else {
275+                            let at = (aJ * h)
276+                            let aR = Q(invoke(E, "updateAccStats", [q, fraction(f, at, (25 * o))], nil))
277+                            $Tuple2([ScriptTransfer(F, aJ, j), ScriptTransfer(aA.caller, at, K)], $Tuple2(aH, aR))
278+                            }
279+                }
280+    }
281+
282+
283+
284+@Callable(aA)
285+func burnAcres (aQ) = if ((aA.caller != E))
286+    then throw("Permission denied")
287+    else $Tuple2([Burn(K, aQ)], aQ)
288+
289+
290+
291+@Callable(aA)
292+func claimAcres () = {
293+    let aH = ar()
294+    let q = toString(aA.caller)
295+    if ((size(aA.payments) != 0))
296+        then throw("No payments required")
254297         else {
255-            let aH = az.payments[0]
256-            let aI = aH.amount
257-            if (if (!(isDefined(aH.assetId)))
258-                then true
259-                else (value(aH.assetId) != j))
260-                then throw("USDT payments only!")
261-                else if ((n > aI))
262-                    then throw((("Min payment should be " + al(n, 6)) + " USDT"))
263-                    else {
264-                        let as = (aI * h)
265-                        let aQ = Q(invoke(E, "updateAccStats", [q, fraction(f, as, (25 * o))], nil))
266-                        $Tuple2([ScriptTransfer(F, aI, j), ScriptTransfer(az.caller, as, K)], $Tuple2(aG, aQ))
267-                        }
298+            let aK = L(q)
299+            let aL = c(q)
300+            let at = valueOrElse(getInteger(aL), 0)
301+            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
302+            let aP = az(q, at, valueOrElse(getInteger(aK), 0))
303+            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), ScriptTransfer(aA.caller, aP, K)], $Tuple2(aH, aO))
268304             }
269305     }
270306 
271307 
272308 
273-@Callable(az)
274-func burnAcres (aP) = if ((az.caller != E))
275-    then throw("Permission denied")
276-    else $Tuple2([Burn(K, aP)], aP)
277-
278-
279-
280-@Callable(az)
281-func claimAcres () = {
282-    let aG = aq()
283-    let q = toString(az.caller)
284-    if ((size(az.payments) != 0))
285-        then throw("No payments required")
286-        else {
287-            let aJ = L(q)
288-            let aK = c(q)
289-            let as = valueOrElse(getInteger(aK), 0)
290-            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
291-            let aO = ay(q, as, valueOrElse(getInteger(aJ), 0))
292-            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), ScriptTransfer(az.caller, aO, K)], $Tuple2(aG, aN))
293-            }
294-    }
295-
296-
297-
298-@Callable(az)
309+@Callable(aA)
299310 func claimAcresREADONLY (q) = {
300-    let aJ = L(q)
301-    let aK = c(q)
302-    let as = valueOrElse(getInteger(aK), 0)
303-    let aR = valueOrElse(getInteger(aJ), 0)
304-    let aO = ar(q, as, aR)
305-    $Tuple2(nil, [aO, aR])
311+    let aK = L(q)
312+    let aL = c(q)
313+    let at = valueOrElse(getInteger(aL), 0)
314+    let aS = valueOrElse(getInteger(aK), 0)
315+    let aP = as(q, at, aS)
316+    $Tuple2(nil, [aP, aS])
306317     }
307318 
308319 
github/deemru/w8io/169f3d6 
82.57 ms ◑