tx · 37ceU5SKy3UcK963jaVgVEpCz9sWKXnLtqfQug7kvvpv

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.01300000 Waves

2023.11.19 23:22 [2850739] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "37ceU5SKy3UcK963jaVgVEpCz9sWKXnLtqfQug7kvvpv",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1700425372751,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "667z6oD2wrennwhMZmX5RZk81yBbte6Ed3AeTKvybi299DXuGWVPJrzjEvGWAXCj46kcGWP8huZUKAf7jyGDQpn8"
    ],
    "script": "base64:BgIqCAISBAoCCAESAwoBARIAEgASBAoCCAESBQoDCAEBEgMKAQESABIDCgEINQAITUlMTElPTjYAgIDpg7HeFgAJREFZTUlMTElTAIC4mSkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQRhZGRyCQCsAgICGGFjcmVzU3Rha2VkQW1vdW50QnlVc2VyXwUEYWRkcgEaa2V5QWNyZXNMb2NrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNMb2NrZWRBbW91bnRCeVVzZXJfBQRhZGRyARdrZXlBY3Jlc0xvY2tlZEV0YUJ5VXNlcgEEYWRkcgkArAICAhVhY3Jlc0xvY2tlZEV0YUJ5VXNlcl8FBGFkZHIAE2FjcmVzU3Rha2VkVG90YWxLZXkCFmFjcmVzU3Rha2VkQW1vdW50VG90YWwACnhwTmV3U0xhbmQAwJaxAgAPREFJTFlSRVNCWVBJRUNFAID40gEAFVVTRFQyQUNSRVNfTVVMVElQTElFUgAKAAVjaGFpbgkAyQECCQDKAQIIBQR0aGlzBWJ5dGVzAAEAAQALdXNkdEFzc2V0SWQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDABIITaerIIAz9O0bvKju6Lk7zJgt0LXfoHlqjUI/moD/+5AwkAAAIBAVQFByRtYXRjaDABIFWx2J9yh4Lv5eNbjawFq2XemkOhLxa7BfMat4el8cUYCQACAQINVW5rbm93biBjaGFpbgAVZGVmYXVsdFJlc3RBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUFFDdXZGYnZoNExrUFVucm5VMXozam5iQTFwOW0zV05odgMJAAACAQFUBQckbWF0Y2gwAiMzTXVta0dHenRDS0FYcFdEcXhrZGRvZnFYU1VicVFrdlNKeQkAAgECDVVua25vd24gY2hhaW4ADHByb21vMk1hcEtleQIJcHJvbW8yTWFwAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5hc1R3b0ludHNUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQEOZ2V0Vm90aW5nUG93ZXIBEnVzZXJBZGRyU3RyT3JFbXB0eQQFcHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCgEFYWRkZXICA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0ECnRvdGFsUG93ZXIKAAIkbAUFcHJvcHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp1c2Vyc1Bvd2VyCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBRJ1c2VyQWRkclN0ck9yRW1wdHkAAAkAzAgCBQp0b3RhbFBvd2VyCQDMCAIFCnVzZXJzUG93ZXIFA25pbAEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQBBHBhZEwCA3ZhbANsZW4EBHZhbFMJAKQDAQUDdmFsBAZ6ZXJvZXMJALACAgkApAMBCQBsBgAKAAAJAGUCBQNsZW4JALECAQUEdmFsUwAAAAAFBERPV04AAQkArAICBQZ6ZXJvZXMFBHZhbFMAHU1JTl9BQ1JFU19BTU9VTlRfRFVSSU5HX1BST01PAICt4gQADEJMQUNLTElTVEVEMQLfBjNQMk5HWDRRNW5nZTFNQ2F1d1FXNWFxWUxka2NjU0dqMUVwXzNQMnhGQUhXOXloeU5vaFlveldkNEhGaEVYWnUzYnNOU29SXzNQMnlLYVoyZ3ZuOVhlNXR0aTgxYTdQOUxaaEhnanZUb1Y5XzNQMzd6UTNjZjJlY3U1NVJtSnFFaUdTaXZkek45YXZ0M205XzNQNGF6NmR0enN2R0NXRkF4YTk0VWRldkt6WHlFd3hFaUZHXzNQNGtaVTZYM1RUTEZjU1VlNTVKU3k4QnlTcWl0Y1BnTUJ6XzNQNWhDeEJFaDNOZ05pelpoTkJyZXlCU3F0YmhKWUxrS1BEXzNQN0hMdnVjeTExeXh5TUpVd2p6WEZISEtNRUR3aTFFd2ZDXzNQOEp1YXFIOVBUUUF2OEQ1SEJHZ1FmS2F1TFRZdDJOUWZ0XzNQOWdUREI0cnRERVZicFgzYXNVNjNINFppbmgyRW5UbVpFXzNQOWlOM3FydGZKaWNVVnk3YW1aZVZzZXRWRDN2VU1rOGJlXzNQQ2EyQnNBYTZKQkxpcnN6UWZWNXI5ZkpydWpmaHd0d2ZQXzNQRDNpNFhOOEt0eWdjRng0cnk1TTdVR3FkZkg4Vll2dFJUXzNQREVNbm5KTmMya3g5Y1BFbXZWdmhYVXI4U3ZoQU5LaHNhXzNQREdFOXRLUWl6YWVaRmVERHE1YVlTdjg5bndZYmZpcnBaXzNQRE1LUVRDclVQWkVDVlhFSko4bTFzSHR1dFN1MW5hU2YxXzNQR2gyUXU2WXZ4OEdUQ1JSVk52QlVWWkxkYWlkWVNheG81XzNQS2ttQXRiU0s1RDJoUWRvMVJmRWc4ZVh5TWJEY1JVYzkyXzNQTE1uYnh6c3NQOFc4RThYakoxUkxCQmc4VVpMOEN6M1AyXzNQTXV4bzRQQ0FveDlzNGE3UjFlc3poNGlxcXU4Z1M3akh2XzNQTnJNdEVRQ2h3ODdXWlUxSkFKN2FHSHlrQ2E4VGpuRE5LXzNQUHVCWGZXb0J5M0VFb3J5N2M3dmdpOVVzamthN281dEJqXzNQUXd5ZXlFaFQ0WTZhR0FMNnRnNzNhUVdKdFYxelJ0M25SXzNQUkdEU2h1TUdiODRNSnRUSnZ0VGc4cURmc3drWVdjbTNlAA1QUk9NTzFfQU1PVU5UAMKtrwIAF1BST01PXzJfU1RBUlRfVElNRVNUQU1QBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAIDwtPm+MQMJAAACAQFUBQckbWF0Y2gwAIDn0Me+MQkAAgECDVVua25vd24gY2hhaW4AFVBST01PXzJfRU5EX1RJTUVTVEFNUAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAD/v83wwDEDCQAAAgEBVAUHJG1hdGNoMACAiNfrvjEJAAIBAg1Vbmtub3duIGNoYWluARNpc0JsYWNrbGlzdGVkUHJvbW8xAQRhZGRyCQEIY29udGFpbnMCBQxCTEFDS0xJU1RFRDEFBGFkZHIBBnByb2xvZwAJAQVhc0ludAEJAP0HBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAESY2xhaW1BY3Jlc0ludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0CQCWAwEJAMwIAgAACQDMCAIFCmNhbkdldFVzZHQFA25pbAkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgENY2xhaW1JbnRlcm5hbAMEYWRkcgthY3Jlc0Ftb3VudA1sYXN0Q2xhaW1UaW1lBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUNbGFzdENsYWltVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFDWxhc3RDbGFpbVRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBQ9EQUlMWVJFU0JZUElFQ0UFC2FjcmVzQW1vdW50CQBoAgUJREFZTUlMTElTBQVNVUxUOAQKY2FuR2V0VXNkdAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAQHZ290VXNkdAMJAGcCAAAFCmNhbkdldFVzZHQAAAgJAQ5hc1R3b0ludHNUdXBsZQEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhJzZWxsUmVzb3VyY2VzV29ybGQJAMwIAgUEYWRkcgkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwCXzEJAGgCBQdnb3RVc2R0BRVVU0RUMkFDUkVTX01VTFRJUExJRVIBC21lcmdlTG9ja2VkBAlvbGRBbW91bnQGb2xkRVRBCW5ld0Ftb3VudAZuZXdFVEEEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEA2R0MQkAlgMBCQDMCAIAAAkAzAgCCQBlAgUGb2xkRVRBBQNub3cFA25pbAQDZHQyCQCWAwEJAMwIAgAACQDMCAIJAGUCBQZuZXdFVEEFA25vdwUDbmlsBANzdW0JAGQCBQlvbGRBbW91bnQFCW5ld0Ftb3VudAQCZHQDCQAAAgUDc3VtAAAAAAkAZAIJAGsDBQNkdDEFCW9sZEFtb3VudAUDc3VtCQBrAwUDZHQyBQluZXdBbW91bnQFA3N1bQkAZAIFA25vdwUCZHQJAWkBDWNvbnN0cnVjdG9yVjECCHJlc3RBZGRyDnVuc3Rha2VkUGllY2VzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ9hY3Jlc0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAhuZnRBY3JlcwkAZAIJAJEDAgkBDmdldFZvdGluZ1Bvd2VyAQIABQtJZHhFZmZUb3RhbAUOdW5zdGFrZWRQaWVjZXMEDGlzc3VlZEFtb3VudAkAZQIFCE1JTExJT042CQBoAgUIbmZ0QWNyZXMFBU1VTFQ4BAVpc3N1ZQkAwwgHAgVBQ1JFUwImV2F2ZXNMYW5kcyBsYW5kIGFjcmVzIGludmVzdG1lbnQgdG9rZW4FDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQtCaW5hcnlFbnRyeQIFD2FjcmVzQXNzZXRJZEtleQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBDHVuc3Rha2VBY3JlcwEGYW1vdW50BAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0AwkAZwIAAAUGYW1vdW50CQACAQIZQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAADCQBmAgUGYW1vdW50BQ5vbGRBY3Jlc0Ftb3VudAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQEKZml4ZWRQb2ludAIFDm9sZEFjcmVzQW1vdW50AAgCICBBQ1JFUyBzdGFrZWQsIHRyaWVkIHRvIHVuc3Rha2UgCQEKZml4ZWRQb2ludAIFBmFtb3VudAAIBAxsb2NrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBGmtleUFjcmVzTG9ja2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwAABAlsb2NrZWRFVEEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBF2tleUFjcmVzTG9ja2VkRXRhQnlVc2VyAQUHYWRkcmVzcwAABANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwMJAGcCBQNub3cFF1BST01PXzJfU1RBUlRfVElNRVNUQU1QCQBnAgUVUFJPTU9fMl9FTkRfVElNRVNUQU1QBQNub3cHCQACAQImWW91IGNhbm5vdCB1bnN0YWtlIEFDUkVTIGR1cmluZyBQcm9tbzIEEHVuc3Rha2FibGVBbW91bnQDCQETaXNCbGFja2xpc3RlZFByb21vMQEFB2FkZHJlc3MJAGUCCQBlAgUOb2xkQWNyZXNBbW91bnQFDGxvY2tlZEFtb3VudAUNUFJPTU8xX0FNT1VOVAkAZQIFDm9sZEFjcmVzQW1vdW50BQxsb2NrZWRBbW91bnQDAwkAZgIFCWxvY2tlZEVUQQUDbm93CQBmAgUGYW1vdW50BRB1bnN0YWthYmxlQW1vdW50BwkAAgEJAKwCAgkArAICCQCsAgICBU9ubHkgCQEKZml4ZWRQb2ludAIFEHVuc3Rha2FibGVBbW91bnQACAInIEFDUkVTIGNhbiBiZSB1bnN0YWtlZCBub3csIHdhaXQgdW50aWwgCQCkAwEFCWxvY2tlZEVUQQQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYWNyZXNTdGFrZWRUb3RhbEtleQkAZQIFCG9sZFRvdGFsBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnN0YWtlQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsAwkAAAIFCXdsZ1Jlc3VsdAUJd2xnUmVzdWx0BANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwMJAGYCBRdQUk9NT18yX1NUQVJUX1RJTUVTVEFNUAUDbm93BgkAZgIFA25vdwUVUFJPTU9fMl9FTkRfVElNRVNUQU1QBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBA5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAM0IAgkAzQgCCQDNCAIDCQAAAgUMY2xhaW1lZEFjcmVzAAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQNhbXQJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFA2FtdAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAMJAGYCBR1NSU5fQUNSRVNfQU1PVU5UX0RVUklOR19QUk9NTwUDYW10CQACAQkArAICCQCsAgICOU1pbiBzdGFrZWQgYW1vdW50IGR1cmluZyBwcm9tbyBhY3Rpb24gc2hvdWxkIGJlIGF0IGxlYXN0IAkBCmZpeGVkUG9pbnQCBR1NSU5fQUNSRVNfQU1PVU5UX0RVUklOR19QUk9NTwAIAgYgQUNSRVMEC3N0YWtlUmVzdWx0CQD8BwQFBHRoaXMCD3NlbmRMb2NrZWRBY3JlcwkAzAgCBQdhZGRyZXNzCQDMCAIFA2FtdAkAzAgCAB4FA25pbAUDbmlsBAlwcm9tbzJNYXAJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcHJvbW8yTWFwS2V5AgAEB25ld01hcDIDCQEIY29udGFpbnMCBQlwcm9tbzJNYXAFB2FkZHJlc3MEBXBhcnRzCQC9CQIFCXByb21vMk1hcAUHYWRkcmVzcwQJb2xkQW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAK8CAgkAsAICCQCRAwIFBXBhcnRzAAEAAQAOCQCsAgIJAKwCAgkArAICCQCsAgIJAJEDAgUFcGFydHMAAAUHYWRkcmVzcwIBOgkBBHBhZEwCCQBkAgUJb2xkQW1vdW50BQNhbXQADgkAsAICCQCRAwIFBXBhcnRzAAEADwQJZmluYWxQYXJ0CQCsAgIJAKwCAgUHYWRkcmVzcwIBOgkBBHBhZEwCBQNhbXQADgMJAAACBQlwcm9tbzJNYXACAAUJZmluYWxQYXJ0CQCsAgIJAKwCAgUJcHJvbW8yTWFwAgFfBQlmaW5hbFBhcnQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQxwcm9tbzJNYXBLZXkFB25ld01hcDIFA25pbAkAlQoDBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAULc3Rha2VSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIYnV5QWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhNVU0RUIHBheW1lbnRzIG9ubHkhAwkAZgIFBU1VTFQ2BQNhbXQJAAIBCQCsAgIJAKwCAgIWTWluIHBheW1lbnQgc2hvdWxkIGJlIAkBCmZpeGVkUG9pbnQCBQVNVUxUNgAGAgUgVVNEVAQLYWNyZXNBbW91bnQJAGgCBQNhbXQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgQOYWNjU3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVBY2NTdGF0cwkAzAgCBQdhZGRyZXNzCQDMCAIJAGsDBQp4cE5ld1NMYW5kBQthY3Jlc0Ftb3VudAkAaAIAGQUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0BQNhbXQFC3VzZHRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYWNyZXNBbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUOYWNjU3RhdHNSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJc2VuZEFjcmVzAgRhZGRyBmFtb3VudAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQIRUGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQRhZGRyBQZhbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsBQZhbW91bnQBaQEPc2VuZExvY2tlZEFjcmVzAwRhZGRyBmFtb3VudAhsb2NrRGF5cwMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAQIhPQIIBQFpBmNhbGxlcgUMcmVzdENvbnRyYWN0BwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUEYWRkcgQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQRhZGRyBA5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAdvbGRUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkFA25vdwQGZXRhS2V5CQEXa2V5QWNyZXNMb2NrZWRFdGFCeVVzZXIBBQRhZGRyBA9sb2NrZWRBbW91bnRLZXkJARprZXlBY3Jlc0xvY2tlZEFtb3VudEJ5VXNlcgEFBGFkZHIED29sZExvY2tlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ9sb2NrZWRBbW91bnRLZXkAAAQMb2xkTG9ja2VkRVRBCQELdmFsdWVPckVsc2UCCQCfCAEFBmV0YUtleQAABAltZXJnZWRFVEEJAQttZXJnZUxvY2tlZAQFD29sZExvY2tlZEFtb3VudAUMb2xkTG9ja2VkRVRBBQZhbW91bnQJAGQCBQNub3cJAGgCBQhsb2NrRGF5cwUJREFZTUlMTElTCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkFB29sZFRpbWUJAMwIAgkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFE2FjcmVzU3Rha2VkVG90YWxLZXkJAGQCBQhvbGRUb3RhbAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZldGFLZXkFCW1lcmdlZEVUQQkAzAgCCQEMSW50ZWdlckVudHJ5AgUPbG9ja2VkQW1vdW50S2V5CQBkAgUPb2xkTG9ja2VkQW1vdW50BQZhbW91bnQFA25pbAUGYW1vdW50AWkBCWJ1cm5BY3JlcwEGYW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBQ9zdGFraW5nQ29udHJhY3QJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQKYW1vdW50TGVmdAkAZQIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUUYWNyZXNJc3N1ZWRBbW91bnRLZXkAAAUGYW1vdW50AwkAZgIAAAUKYW1vdW50TGVmdAkAAgECJ0F0dGVtcHQgdG8gYnVybiBtb3JlIEFDUkVTLCB0aGFuIGV4aXN0cwkAlAoCCQDMCAIJAQRCdXJuAgUMYWNyZXNBc3NldElkBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFFGFjcmVzSXNzdWVkQW1vdW50S2V5BQphbW91bnRMZWZ0BQNuaWwFBmFtb3VudAFpAQpjbGFpbUFjcmVzAAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAMJAAACBQxwcm9sb2dSZXN1bHQFDHByb2xvZ1Jlc3VsdAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQLYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwULYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUMY2xhaW1lZEFjcmVzBQxhY3Jlc0Fzc2V0SWQFA25pbAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARJjbGFpbUFjcmVzUkVBRE9OTFkBB2FkZHJlc3MEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAhsYXN0VGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAEDGNsYWltZWRBY3JlcwkBEmNsYWltQWNyZXNJbnRlcm5hbAMFB2FkZHJlc3MFC2FjcmVzQW1vdW50BQhsYXN0VGltZQkAlAoCBQNuaWwJAMwIAgUMY2xhaW1lZEFjcmVzCQDMCAIFCGxhc3RUaW1lBQNuaWwAmWuMTg==",
    "height": 2850739,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2gMXPUhHd9EYANm6KQ5hd9dVFQniBYQFjfNBWHurPhUq
Next: BGvizN92u9sZsWk31nuG8jFjXjeqFEuggia5JXhAVH26

Diff: 
Old
New
Differences
257
257
 
                                let lockedAmount = valueOrElse(getInteger(keyAcresLockedAmountByUser(address)), 0)
258
258
 
                                let lockedETA = valueOrElse(getInteger(keyAcresLockedEtaByUser(address)), 0)
259
259
 
                                let now = lastBlock.timestamp
260
-
                                let unstakableAmount = if (isBlacklistedPromo1(address))
261
-
                                    then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
262
-
                                    else (oldAcresAmount - lockedAmount)
263
-
                                if (if ((lockedETA > now))
264
-
                                    then (amount > unstakableAmount)
260
+
                                if (if ((now >= PROMO_2_START_TIMESTAMP))
261
+
                                    then (PROMO_2_END_TIMESTAMP >= now)
265
262
 
                                    else false)
266
-
                                    then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
263
+
                                    then throw("You cannot unstake ACRES during Promo2")
267
264
 
                                    else {
268
-
                                        let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
269
-
                                        let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
270
-
                                        let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
271
-
                                        $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
265
+
                                        let unstakableAmount = if (isBlacklistedPromo1(address))
266
+
                                            then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
267
+
                                            else (oldAcresAmount - lockedAmount)
268
+
                                        if (if ((lockedETA > now))
269
+
                                            then (amount > unstakableAmount)
270
+
                                            else false)
271
+
                                            then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
272
+
                                            else {
273
+
                                                let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
274
+
                                                let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
275
+
                                                let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
276
+
                                                $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
277
+
                                                }
272
278
 
                                        }
273
279
 
                                }
274
280
 
                        }
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
 
func keyAcresLockedAmountByUser (addr) = ("acresLockedAmountByUser_" + addr)
12
12
 
13
13
 
14
14
 
func keyAcresLockedEtaByUser (addr) = ("acresLockedEtaByUser_" + addr)
15
15
 
16
16
 
17
17
 
let acresStakedTotalKey = "acresStakedAmountTotal"
18
18
 
19
19
 
let xpNewSLand = 5000000
20
20
 
21
21
 
let DAILYRESBYPIECE = 3456000
22
22
 
23
23
 
let USDT2ACRES_MULTIPLIER = 10
24
24
 
25
25
 
let chain = take(drop(this.bytes, 1), 1)
26
26
 
27
27
 
let usdtAssetId = match chain {
28
28
 
    case _ => 
29
29
 
        if ((base58'2W' == $match0))
30
30
 
            then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
31
31
 
            else if ((base58'2T' == $match0))
32
32
 
                then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
33
33
 
                else throw("Unknown chain")
34
34
 
}
35
35
 
36
36
 
let defaultRestAddressStr = match chain {
37
37
 
    case _ => 
38
38
 
        if ((base58'2W' == $match0))
39
39
 
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
40
40
 
            else if ((base58'2T' == $match0))
41
41
 
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
42
42
 
                else throw("Unknown chain")
43
43
 
}
44
44
 
45
45
 
let promo2MapKey = "promo2Map"
46
46
 
47
47
 
let SEP = "__"
48
48
 
49
49
 
let MULT6 = 1000000
50
50
 
51
51
 
let MULT8 = 100000000
52
52
 
53
53
 
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
54
54
 
55
55
 
56
56
 
let IdxCfgStakingDapp = 1
57
57
 
58
58
 
let IdxCfgEconomyDapp = 2
59
59
 
60
60
 
let IdxCfgWlgDapp = 4
61
61
 
62
62
 
let IdxCfgAcresDapp = 8
63
63
 
64
64
 
func keyRestCfg () = "%s__restConfig"
65
65
 
66
66
 
67
67
 
func keyRestAddress () = "%s__restAddr"
68
68
 
69
69
 
70
70
 
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
71
71
 
72
72
 
73
73
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
74
74
 
75
75
 
76
76
 
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
77
77
 
78
78
 
let restCfg = readRestCfgOrFail(restContract)
79
79
 
80
80
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
81
81
 
82
82
 
let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
83
83
 
84
84
 
let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
85
85
 
86
86
 
let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
87
87
 
88
88
 
let acresIssuedAmountKey = "acresIssuedAmount"
89
89
 
90
90
 
let acresAssetIdKey = "acresAssetId"
91
91
 
92
92
 
let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
93
93
 
94
94
 
func keyAcresStakedTimeByUser (addr) = ("acresStakedTimeByUser_" + addr)
95
95
 
96
96
 
97
97
 
let IdxEffTotal = 0
98
98
 
99
99
 
func keyResProportions () = "resTypesProportions"
100
100
 
101
101
 
102
102
 
func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
103
103
 
104
104
 
105
105
 
func asInt (v) = match v {
106
106
 
    case n: Int => 
107
107
 
        n
108
108
 
    case _ => 
109
109
 
        throw("fail to cast into Int")
110
110
 
}
111
111
 
112
112
 
113
113
 
func asTwoIntsTuple (val) = match val {
114
114
 
    case t2: (Int, Int) => 
115
115
 
        t2
116
116
 
    case _ => 
117
117
 
        throw("fail to cast into (Int, Int)")
118
118
 
}
119
119
 
120
120
 
121
121
 
func getVotingPower (userAddrStrOrEmpty) = {
122
122
 
    let props = split(valueOrElse(getString(stakingContract, keyResProportions()), "0_0_0_0_0_0"), "_")
123
123
 
    func adder (acc,item) =     (acc + parseIntValue(item))
124
124
 
125
125
 
    let totalPower = {
126
126
 
        let $l = props
127
127
 
        let $s = size($l)
128
128
 
        let $acc0 = 0
129
129
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
130
130
 
            then $a
131
131
 
            else adder($a, $l[$i])
132
132
 
133
133
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
134
134
 
            then $a
135
135
 
            else throw("List size exceeds 6")
136
136
 
137
137
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
138
138
 
        }
139
139
 
    let usersPower = valueOrElse(getInteger(stakingContract, keyStakedPiecesByOwner(userAddrStrOrEmpty)), 0)
140
140
 
[totalPower, usersPower]
141
141
 
    }
142
142
 
143
143
 
144
144
 
func fixedPoint (val,decimals) = {
145
145
 
    let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
146
146
 
    let lowPart = toString((val % tenPow))
147
147
 
    let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
148
148
 
    (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
149
149
 
    }
150
150
 
151
151
 
152
152
 
func padL (val,len) = {
153
153
 
    let valS = toString(val)
154
154
 
    let zeroes = drop(toString(pow(10, 0, (len - size(valS)), 0, 0, DOWN)), 1)
155
155
 
    (zeroes + valS)
156
156
 
    }
157
157
 
158
158
 
159
159
 
let MIN_ACRES_AMOUNT_DURING_PROMO = 10000000
160
160
 
161
161
 
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"
162
162
 
163
163
 
let PROMO1_AMOUNT = 4970178
164
164
 
165
165
 
let PROMO_2_START_TIMESTAMP = match chain {
166
166
 
    case _ => 
167
167
 
        if ((base58'2W' == $match0))
168
168
 
            then 1700524800000
169
169
 
            else if ((base58'2T' == $match0))
170
170
 
                then 1700420400000
171
171
 
                else throw("Unknown chain")
172
172
 
}
173
173
 
174
174
 
let PROMO_2_END_TIMESTAMP = match chain {
175
175
 
    case _ => 
176
176
 
        if ((base58'2W' == $match0))
177
177
 
            then 1701043199999
178
178
 
            else if ((base58'2T' == $match0))
179
179
 
                then 1700496000000
180
180
 
                else throw("Unknown chain")
181
181
 
}
182
182
 
183
183
 
func isBlacklistedPromo1 (addr) = contains(BLACKLISTED1, addr)
184
184
 
185
185
 
186
186
 
func prolog () = asInt(reentrantInvoke(stakingContract, "saveLastTx", nil, nil))
187
187
 
188
188
 
189
189
 
func claimAcresInternal (addr,acresAmount,lastClaimTime) = {
190
190
 
    let deltaTime = (lastBlock.timestamp - lastClaimTime)
191
191
 
    let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
192
192
 
    let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
193
193
 
    let gotUsdt = max([0, canGetUsdt])
194
194
 
    (gotUsdt * USDT2ACRES_MULTIPLIER)
195
195
 
    }
196
196
 
197
197
 
198
198
 
func claimInternal (addr,acresAmount,lastClaimTime) = {
199
199
 
    let deltaTime = (lastBlock.timestamp - lastClaimTime)
200
200
 
    if ((0 > deltaTime))
201
201
 
        then throw(((("Saved timestamp is in future, saved = " + toString(lastClaimTime)) + ", current = ") + toString(lastBlock.timestamp)))
202
202
 
        else {
203
203
 
            let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
204
204
 
            let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
205
205
 
            let gotUsdt = if ((0 >= canGetUsdt))
206
206
 
                then 0
207
207
 
                else asTwoIntsTuple(invoke(economyContract, "sellResourcesWorld", [addr, availRes], nil))._1
208
208
 
            (gotUsdt * USDT2ACRES_MULTIPLIER)
209
209
 
            }
210
210
 
    }
211
211
 
212
212
 
213
213
 
func mergeLocked (oldAmount,oldETA,newAmount,newETA) = {
214
214
 
    let now = lastBlock.timestamp
215
215
 
    let dt1 = max([0, (oldETA - now)])
216
216
 
    let dt2 = max([0, (newETA - now)])
217
217
 
    let sum = (oldAmount + newAmount)
218
218
 
    let dt = if ((sum == 0))
219
219
 
        then 0
220
220
 
        else (fraction(dt1, oldAmount, sum) + fraction(dt2, newAmount, sum))
221
221
 
    (now + dt)
222
222
 
    }
223
223
 
224
224
 
225
225
 
@Callable(i)
226
226
 
func constructorV1 (restAddr,unstakedPieces) = if ((i.caller != this))
227
227
 
    then throw("Permission denied")
228
228
 
    else if (isDefined(getBinary(acresAssetIdKey)))
229
229
 
        then throw("Already initialized")
230
230
 
        else {
231
231
 
            let nftAcres = (getVotingPower("")[IdxEffTotal] + unstakedPieces)
232
232
 
            let issuedAmount = (MILLION6 - (nftAcres * MULT8))
233
233
 
            let issue = Issue("ACRES", "WavesLands land acres investment token", issuedAmount, 8, false, unit, 0)
234
234
 
            let assetId = calculateAssetId(issue)
235
235
 
[issue, IntegerEntry(acresIssuedAmountKey, issuedAmount), BinaryEntry(acresAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr)]
236
236
 
            }
237
237
 
238
238
 
239
239
 
240
240
 
@Callable(i)
241
241
 
func unstakeAcres (amount) = {
242
242
 
    let prologResult = prolog()
243
243
 
    if ((prologResult == prologResult))
244
244
 
        then if ((0 >= amount))
245
245
 
            then throw("Amount should be positive")
246
246
 
            else {
247
247
 
                let address = toString(i.caller)
248
248
 
                if ((size(i.payments) != 0))
249
249
 
                    then throw("No payments required")
250
250
 
                    else {
251
251
 
                        let timeKey = keyAcresStakedTimeByUser(address)
252
252
 
                        let amountKey = keyAcresStakedAmountByUser(address)
253
253
 
                        let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
254
254
 
                        if ((amount > oldAcresAmount))
255
255
 
                            then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(amount, 8)))
256
256
 
                            else {
257
257
 
                                let lockedAmount = valueOrElse(getInteger(keyAcresLockedAmountByUser(address)), 0)
258
258
 
                                let lockedETA = valueOrElse(getInteger(keyAcresLockedEtaByUser(address)), 0)
259
259
 
                                let now = lastBlock.timestamp
260
-
                                let unstakableAmount = if (isBlacklistedPromo1(address))
261
-
                                    then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
262
-
                                    else (oldAcresAmount - lockedAmount)
263
-
                                if (if ((lockedETA > now))
264
-
                                    then (amount > unstakableAmount)
260
+
                                if (if ((now >= PROMO_2_START_TIMESTAMP))
261
+
                                    then (PROMO_2_END_TIMESTAMP >= now)
265
262
 
                                    else false)
266
-
                                    then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
263
+
                                    then throw("You cannot unstake ACRES during Promo2")
267
264
 
                                    else {
268
-
                                        let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
269
-
                                        let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
270
-
                                        let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
271
-
                                        $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
265
+
                                        let unstakableAmount = if (isBlacklistedPromo1(address))
266
+
                                            then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
267
+
                                            else (oldAcresAmount - lockedAmount)
268
+
                                        if (if ((lockedETA > now))
269
+
                                            then (amount > unstakableAmount)
270
+
                                            else false)
271
+
                                            then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
272
+
                                            else {
273
+
                                                let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
274
+
                                                let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
275
+
                                                let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
276
+
                                                $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
277
+
                                                }
272
278
 
                                        }
273
279
 
                                }
274
280
 
                        }
275
281
 
                }
276
282
 
        else throw("Strict value is not equal to itself.")
277
283
 
    }
278
284
 
279
285
 
280
286
 
281
287
 
@Callable(i)
282
288
 
func stakeAcres () = {
283
289
 
    let prologResult = prolog()
284
290
 
    if ((prologResult == prologResult))
285
291
 
        then {
286
292
 
            let address = toString(i.caller)
287
293
 
            if ((size(i.payments) != 1))
288
294
 
                then throw("exactly 1 payment must be attached")
289
295
 
                else {
290
296
 
                    let pmt = i.payments[0]
291
297
 
                    let amt = pmt.amount
292
298
 
                    if (if (!(isDefined(pmt.assetId)))
293
299
 
                        then true
294
300
 
                        else (value(pmt.assetId) != acresAssetId))
295
301
 
                        then throw("ACRES payments only!")
296
302
 
                        else {
297
303
 
                            let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
298
304
 
                            if ((wlgResult == wlgResult))
299
305
 
                                then {
300
306
 
                                    let now = lastBlock.timestamp
301
307
 
                                    if (if ((PROMO_2_START_TIMESTAMP > now))
302
308
 
                                        then true
303
309
 
                                        else (now > PROMO_2_END_TIMESTAMP))
304
310
 
                                        then {
305
311
 
                                            let timeKey = keyAcresStakedTimeByUser(address)
306
312
 
                                            let amountKey = keyAcresStakedAmountByUser(address)
307
313
 
                                            let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
308
314
 
                                            let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
309
315
 
                                            let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
310
316
 
                                            $Tuple2(((((if ((claimedAcres == 0))
311
317
 
                                                then nil
312
318
 
                                                else [ScriptTransfer(i.caller, claimedAcres, acresAssetId)]) :+ IntegerEntry(timeKey, lastBlock.timestamp)) :+ IntegerEntry(amountKey, (oldAcresAmount + amt))) :+ IntegerEntry(acresStakedTotalKey, (oldTotal + amt))), $Tuple2(prologResult, wlgResult))
313
319
 
                                            }
314
320
 
                                        else if ((MIN_ACRES_AMOUNT_DURING_PROMO > amt))
315
321
 
                                            then throw((("Min staked amount during promo action should be at least " + fixedPoint(MIN_ACRES_AMOUNT_DURING_PROMO, 8)) + " ACRES"))
316
322
 
                                            else {
317
323
 
                                                let stakeResult = invoke(this, "sendLockedAcres", [address, amt, 30], nil)
318
324
 
                                                let promo2Map = valueOrElse(getString(promo2MapKey), "")
319
325
 
                                                let newMap2 = if (contains(promo2Map, address))
320
326
 
                                                    then {
321
327
 
                                                        let parts = split_51C(promo2Map, address)
322
328
 
                                                        let oldAmount = parseIntValue(take(drop(parts[1], 1), 14))
323
329
 
                                                        ((((parts[0] + address) + ":") + padL((oldAmount + amt), 14)) + drop(parts[1], 15))
324
330
 
                                                        }
325
331
 
                                                    else {
326
332
 
                                                        let finalPart = ((address + ":") + padL(amt, 14))
327
333
 
                                                        if ((promo2Map == ""))
328
334
 
                                                            then finalPart
329
335
 
                                                            else ((promo2Map + "_") + finalPart)
330
336
 
                                                        }
331
337
 
                                                $Tuple2([StringEntry(promo2MapKey, newMap2)], $Tuple3(prologResult, wlgResult, stakeResult))
332
338
 
                                                }
333
339
 
                                    }
334
340
 
                                else throw("Strict value is not equal to itself.")
335
341
 
                            }
336
342
 
                    }
337
343
 
            }
338
344
 
        else throw("Strict value is not equal to itself.")
339
345
 
    }
340
346
 
341
347
 
342
348
 
343
349
 
@Callable(i)
344
350
 
func buyAcres () = {
345
351
 
    let prologResult = prolog()
346
352
 
    if ((prologResult == prologResult))
347
353
 
        then {
348
354
 
            let address = toString(i.caller)
349
355
 
            if ((size(i.payments) != 1))
350
356
 
                then throw("exactly 1 payment must be attached")
351
357
 
                else {
352
358
 
                    let pmt = i.payments[0]
353
359
 
                    let amt = pmt.amount
354
360
 
                    if (if (!(isDefined(pmt.assetId)))
355
361
 
                        then true
356
362
 
                        else (value(pmt.assetId) != usdtAssetId))
357
363
 
                        then throw("USDT payments only!")
358
364
 
                        else if ((MULT6 > amt))
359
365
 
                            then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
360
366
 
                            else {
361
367
 
                                let acresAmount = (amt * USDT2ACRES_MULTIPLIER)
362
368
 
                                let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [address, fraction(xpNewSLand, acresAmount, (25 * MULT8))], nil))
363
369
 
                                $Tuple2([ScriptTransfer(economyContract, amt, usdtAssetId), ScriptTransfer(i.caller, acresAmount, acresAssetId)], $Tuple2(prologResult, accStatsResult))
364
370
 
                                }
365
371
 
                    }
366
372
 
            }
367
373
 
        else throw("Strict value is not equal to itself.")
368
374
 
    }
369
375
 
370
376
 
371
377
 
372
378
 
@Callable(i)
373
379
 
func sendAcres (addr,amount) = if ((i.caller != economyContract))
374
380
 
    then throw("Permission denied")
375
381
 
    else $Tuple2([ScriptTransfer(addressFromStringValue(addr), amount, acresAssetId)], amount)
376
382
 
377
383
 
378
384
 
379
385
 
@Callable(i)
380
386
 
func sendLockedAcres (addr,amount,lockDays) = if (if ((i.caller != this))
381
387
 
    then (i.caller != restContract)
382
388
 
    else false)
383
389
 
    then throw("Permission denied")
384
390
 
    else {
385
391
 
        let now = lastBlock.timestamp
386
392
 
        let timeKey = keyAcresStakedTimeByUser(addr)
387
393
 
        let amountKey = keyAcresStakedAmountByUser(addr)
388
394
 
        let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
389
395
 
        let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
390
396
 
        let oldTime = valueOrElse(getInteger(timeKey), now)
391
397
 
        let etaKey = keyAcresLockedEtaByUser(addr)
392
398
 
        let lockedAmountKey = keyAcresLockedAmountByUser(addr)
393
399
 
        let oldLockedAmount = valueOrElse(getInteger(lockedAmountKey), 0)
394
400
 
        let oldLockedETA = valueOrElse(getInteger(etaKey), 0)
395
401
 
        let mergedETA = mergeLocked(oldLockedAmount, oldLockedETA, amount, (now + (lockDays * DAYMILLIS)))
396
402
 
        $Tuple2([IntegerEntry(timeKey, oldTime), IntegerEntry(amountKey, (oldAcresAmount + amount)), IntegerEntry(acresStakedTotalKey, (oldTotal + amount)), IntegerEntry(etaKey, mergedETA), IntegerEntry(lockedAmountKey, (oldLockedAmount + amount))], amount)
397
403
 
        }
398
404
 
399
405
 
400
406
 
401
407
 
@Callable(i)
402
408
 
func burnAcres (amount) = if ((i.caller != stakingContract))
403
409
 
    then throw("Permission denied")
404
410
 
    else {
405
411
 
        let amountLeft = (valueOrElse(getInteger(acresIssuedAmountKey), 0) - amount)
406
412
 
        if ((0 > amountLeft))
407
413
 
            then throw("Attempt to burn more ACRES, than exists")
408
414
 
            else $Tuple2([Burn(acresAssetId, amount), IntegerEntry(acresIssuedAmountKey, amountLeft)], amount)
409
415
 
        }
410
416
 
411
417
 
412
418
 
413
419
 
@Callable(i)
414
420
 
func claimAcres () = {
415
421
 
    let prologResult = prolog()
416
422
 
    if ((prologResult == prologResult))
417
423
 
        then {
418
424
 
            let address = toString(i.caller)
419
425
 
            if ((size(i.payments) != 0))
420
426
 
                then throw("No payments required")
421
427
 
                else {
422
428
 
                    let timeKey = keyAcresStakedTimeByUser(address)
423
429
 
                    let amountKey = keyAcresStakedAmountByUser(address)
424
430
 
                    let acresAmount = valueOrElse(getInteger(amountKey), 0)
425
431
 
                    let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
426
432
 
                    let claimedAcres = claimInternal(address, acresAmount, valueOrElse(getInteger(timeKey), 0))
427
433
 
                    $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), ScriptTransfer(i.caller, claimedAcres, acresAssetId)], $Tuple2(prologResult, wlgResult))
428
434
 
                    }
429
435
 
            }
430
436
 
        else throw("Strict value is not equal to itself.")
431
437
 
    }
432
438
 
433
439
 
434
440
 
435
441
 
@Callable(i)
436
442
 
func claimAcresREADONLY (address) = {
437
443
 
    let timeKey = keyAcresStakedTimeByUser(address)
438
444
 
    let amountKey = keyAcresStakedAmountByUser(address)
439
445
 
    let acresAmount = valueOrElse(getInteger(amountKey), 0)
440
446
 
    let lastTime = valueOrElse(getInteger(timeKey), 0)
441
447
 
    let claimedAcres = claimAcresInternal(address, acresAmount, lastTime)
442
448
 
    $Tuple2(nil, [claimedAcres, lastTime])
443
449
 
    }
444
450
 
445
451
 

github/deemru/w8io/169f3d6 
71.96 ms ◑