w8 · tx · 2SF···ndX

tx · 2SFwhzQcmyifc9R4pTxhQE7gxp823tV6Exq8LGtGxndX

3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh:  -0.01100000 Waves

2024.09.12 20:21 [3280713] smart account 3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2SFwhzQcmyifc9R4pTxhQE7gxp823tV6Exq8LGtGxndX",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1726161782589,
    "version": 2,
    "chainId": 84,
    "sender": "3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh",
    "senderPublicKey": "3QtfC1XbLZXdeawMDeSERy9vvjUmj1XYd2GFmrvx7pWQ",
    "proofs": [
        "2jyr3AGVK4EP5o9LgjSnR8crjCe7tE1eVKFswaUUZ5kWSG9MGK2yTzXbKUaRbJ53btyPBimBYX52q8EJ8yVokHF9"
    ],
    "script": "base64:BgIjCAISBAoCCAgSBAoCCAESAwoBBBIDCgEBEgASABIAEgMKAQgmAANTRVACAl9fAAVNVUxUOACAwtcvABRXTEcyQUNSRVNfTVVMVElQTElFUgDIAQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQRndZdGE4YmlFejMxenBlRmU1REpLOHdFNXRyU3BRVkY4AwkAAAIBAVQFByRtYXRjaDACIzNON1V1WWFyNjI2NFA1OEZCaFZXS1BRQWg0WXVhMmhnbmd2CQACAQINVW5rbm93biBjaGFpbgAVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUExuY1h0UzFVODNENmNRYkZEM0g4ckJIUExnenhTRktaMQMJAAACAQFUBQckbWF0Y2gwAiMzTkRDeUJHNXE4NUp1YVJpaWdVZUV0YWlueWpDUVQzWHBabQkAAgECDVVua25vd24gY2hhaW4BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABBJZHhDZmdBY3JlczJEYXBwAAEADUlkeENmZ1dsZ0RhcHAAAgEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ9rZXlSZXN0MkFkZHJlc3MAAg0lc19fcmVzdDJBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIIcmVzdDJDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQhyZXN0MkNmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADXJlc3QyQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBD2tleVJlc3QyQWRkcmVzcwAFFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIACHJlc3QyQ2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQ1yZXN0MkNvbnRyYWN0AA5hY3JlczJDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRBJZHhDZmdBY3JlczJEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBQ1JZHhDZmdXbGdEYXBwABNvbGRBY3Jlc0NvbnRyYWN0S2V5AhBvbGRBY3Jlc0NvbnRyYWN0AQprZXlCbG9ja2VkAAIQY29udHJhY3RzQmxvY2tlZAERa2V5TGFzdFR4SWRCeVVzZXIBBGFkZHIJAKwCAgIPbGFzdFR4SWRCeVVzZXJfBQRhZGRyAA13bGdBc3NldElkS2V5Agt3bGdfYXNzZXRJZAAKd2xnQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFC3dsZ0NvbnRyYWN0BQ13bGdBc3NldElkS2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQAFGFjcmVzSXNzdWVkQW1vdW50S2V5AhFhY3Jlc0lzc3VlZEFtb3VudAAPYWNyZXNBc3NldElkS2V5AgxhY3Jlc0Fzc2V0SWQADGFjcmVzQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFDmFjcmVzMkNvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQlvd25lckFkZHIJAKwCAgITc3Rha2VkTGFuZHNCeU93bmVyXwUJb3duZXJBZGRyARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBDGFzVHVwbGU1SW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIZKEludCwgSW50LCBJbnQsIEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECK2ZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCwgSW50LCBJbnQsIEludCkBDGFzVHVwbGU0SW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIUKEludCwgSW50LCBJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAiZmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQsIEludCwgSW50KQEMYXNUdXBsZTNJbnRzAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAg8oSW50LCBJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAiFmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQsIEludCkBDGFzVHVwbGUySW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECHGZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCkBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0ARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIAEmFjcmVzU3Rha2RUb3RhbEtleQIWYWNyZXNTdGFrZWRBbW91bnRUb3RhbAEGcHJvbG9nAQFpAwMJAQIhPQIIBQFpDG9yaWdpbkNhbGxlcgUNcmVzdDJDb250cmFjdAkBC3ZhbHVlT3JFbHNlAgkAoAgBCQEKa2V5QmxvY2tlZAAHBwkAAgECH0NvbnRyYWN0cyBhcmUgdW5kZXIgbWFpbnRlbmFuY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhc3RUeElkQnlVc2VyAQkApQgBCAUBaQxvcmlnaW5DYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAUDbmlsARJzdGFrZUFjcmVzSW50ZXJuYWwCA2FtdAdhZGRyZXNzBAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAMJAAACBQl3bGdSZXN1bHQFCXdsZ1Jlc3VsdAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECG9sZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFEmFjcmVzU3Rha2RUb3RhbEtleQAACQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlhbW91bnRLZXkJAGQCBQ5vbGRBY3Jlc0Ftb3VudAUDYW10CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJhY3Jlc1N0YWtkVG90YWxLZXkJAGQCBQhvbGRUb3RhbAUDYW10BQNuaWwFCXdsZ1Jlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLggBaQENY29uc3RydWN0b3JWMQIJcmVzdDJBZGRyDm9sZEFjckNvbnRyYWN0AwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDm9sZEFjckNvbnRBZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBBQ5vbGRBY3JDb250cmFjdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUYWNyZXNJc3N1ZWRBbW91bnRLZXkJARFAZXh0ck5hdGl2ZSgxMDUwKQIFDm9sZEFjckNvbnRBZGRyBRRhY3Jlc0lzc3VlZEFtb3VudEtleQkAzAgCCQELQmluYXJ5RW50cnkCBQ9hY3Jlc0Fzc2V0SWRLZXkJARFAZXh0ck5hdGl2ZSgxMDUyKQIFDm9sZEFjckNvbnRBZGRyBQ9hY3Jlc0Fzc2V0SWRLZXkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBD2tleVJlc3QyQWRkcmVzcwAFCXJlc3QyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCBRNvbGRBY3Jlc0NvbnRyYWN0S2V5BQ5vbGRBY3JDb250cmFjdAUDbmlsAWkBC3NhdmVJbnRlZ2VyAgNrZXkGYW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIgc2F2ZUludGVnZXIgaXMgbm90IHB1YmxpYyBtZXRob2QJAMwIAgkBDEludGVnZXJFbnRyeQIFA2tleQUGYW1vdW50BQNuaWwBaQEKc2V0QmxvY2tlZAEJaXNCbG9ja2VkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQprZXlCbG9ja2VkAAUJaXNCbG9ja2VkBQNuaWwBaQEMdW5zdGFrZUFjcmVzAQZhbW91bnQEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkAZwIAAAUGYW1vdW50CQACAQIZQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAADCQBmAgUGYW1vdW50BQ5vbGRBY3Jlc0Ftb3VudAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQEKZml4ZWRQb2ludAIFDm9sZEFjcmVzQW1vdW50AAgCICBBQ1JFUyBzdGFrZWQsIHRyaWVkIHRvIHVuc3Rha2UgCQEKZml4ZWRQb2ludAIFBmFtb3VudAAIBAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJhY3Jlc1N0YWtkVG90YWxLZXkAAAQJd2xnUmVzdWx0CQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSYWNyZXNTdGFrZFRvdGFsS2V5CQBlAgUIb2xkVG90YWwFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAUMYWNyZXNBc3NldElkBQNuaWwFDXByb2xvZ0FjdGlvbnMFCXdsZ1Jlc3VsdAFpAQpzdGFrZUFjcmVzAAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQxhY3Jlc0Fzc2V0SWQJAAIBAhRBQ1JFUyBwYXltZW50cyBvbmx5IQQLJHQwMzEzMzMxOTkJARJzdGFrZUFjcmVzSW50ZXJuYWwCBQNhbXQFB2FkZHJlc3MEB2FjdGlvbnMIBQskdDAzMTMzMzE5OQJfMQQQd2xnQ2xhaW1lZEFtb3VudAgFCyR0MDMxMzMzMTk5Al8yCQCUCgIJAM4IAgUHYWN0aW9ucwUNcHJvbG9nQWN0aW9ucwUQd2xnQ2xhaW1lZEFtb3VudAFpAQhidXlBY3JlcwAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUKd2xnQXNzZXRJZAkAAgECFVdMR09MRCBwYXltZW50cyBvbmx5IQMJAGYCBQVNVUxUOAUDYW10CQACAQkArAICCQCsAgICFk1pbiBwYXltZW50IHNob3VsZCBiZSAJAQpmaXhlZFBvaW50AgUFTVVMVDgACAIHIFdMR09MRAQLYWNyZXNBbW91bnQJAGgCBQNhbXQFFFdMRzJBQ1JFU19NVUxUSVBMSUVSBAl3bGdSZW1haW4JAQVhc0ludAEJAPwHBAUOYWNyZXMyQ29udHJhY3QCCmJ1cm5XbGdvbGQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKd2xnQXNzZXRJZAUDYW10BQNuaWwJAJQKAgkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYWNyZXNBbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsBQ1wcm9sb2dBY3Rpb25zBQl3bGdSZW1haW4BaQEQY29udmVydE9sZFN0YWtlcwAEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQED29sZEFjcmVzQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUTb2xkQWNyZXNDb250cmFjdEtleQQGYW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFD29sZEFjcmVzQWRkcmVzcwkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUHYWRkcmVzcwAABAlnb3RBY3JlczADCQBmAgUGYW1vdW50AAAJAQxhc1R1cGxlMkludHMBCQD8BwQFD29sZEFjcmVzQWRkcmVzcwIUdW5zdGFrZUFjcmVzQ2FsbGJhY2sJAMwIAgUGYW1vdW50CQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCUCgIAAAAABBFvbGRTdGFraW5nQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAhsYW5kc1N0cgkAnQgCBRFvbGRTdGFraW5nQWRkcmVzcwkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MEC2xhbmRzUmVzdWx0AwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyBAVsYW5kcwkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQEAXIJAQxhc1R1cGxlNUludHMBCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhN1bnN0YWtlTGFuZENhbGxiYWNrCQDMCAIFC2xhbmRBc3NldElkCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCWCgQJAGQCCAUDYWNjAl8xCAUBcgJfMQkAZAIIBQNhY2MCXzIIBQFyAl8yCQBkAggFA2FjYwJfMwgFAXICXzMJAGQCCAUDYWNjAl80CAUBcgJfNAQCcnIKAAIkbAUFbGFuZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAAAAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHb25lTGFuZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQECGZpbmFsaXplCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhx1bnN0YWtlTGFuZHNGaW5hbGl6ZUNhbGxiYWNrCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsAwkAAAIFCGZpbmFsaXplBQhmaW5hbGl6ZQQDcmVxCQD8BwQFD29sZEFjcmVzQWRkcmVzcwIUcmVxdWVzdEFjcmVzQ2FsbGJhY2sJAMwIAgkAZAIJAGQCCQBkAggFAnJyAl8xCAUCcnICXzIIBQJycgJfMwgFAnJyAl80CQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsAwkAAAIFA3JlcQUDcmVxBAVpc3N1ZQkAwggFAghGUE9XRVIxMAIpRmFybWluZ1Bvd2VyICsxMCUgTkZUIGZvciBXYXZlc0xhbmRzIGdhbWUAAQAABwkAlwoFCAUCcnICXzEIBQJycgJfMggFAnJyAl8zCAUCcnICXzQJAMwIAgUFaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJALgIAQUFaXNzdWUFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlwoFAAAAAAAAAAAFA25pbAQLZHVja0Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgURb2xkU3Rha2luZ0FkZHJlc3MJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MCAAQKZHVja1Jlc3VsdAMJAQIhPQIFC2R1Y2tBc3NldElkAgAJAQxhc1R1cGxlM0ludHMBCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhN1bnN0YWtlRHVja0NhbGxiYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCVCgMAAAAAAAAEAXgJARJzdGFrZUFjcmVzSW50ZXJuYWwCCQBkAgkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIIBQlnb3RBY3JlczACXzEIBQlnb3RBY3JlczACXzIIBQtsYW5kc1Jlc3VsdAJfMQgFC2xhbmRzUmVzdWx0Al8yCAULbGFuZHNSZXN1bHQCXzMIBQtsYW5kc1Jlc3VsdAJfNAgFCmR1Y2tSZXN1bHQCXzEIBQpkdWNrUmVzdWx0Al8yCAUKZHVja1Jlc3VsdAJfMwUHYWRkcmVzcwkAlAoCCQDOCAIIBQtsYW5kc1Jlc3VsdAJfNQgFAXgCXzEIBQF4Al8yAWkBFHVuc3Rha2VMYW5kc1JFQURPTkxZAQdhZGRyZXNzBBFvbGRTdGFraW5nQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAhsYW5kc1N0cgkAnQgCBRFvbGRTdGFraW5nQWRkcmVzcwkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MEC2xhbmRzUmVzdWx0AwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyBAVsYW5kcwkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQEAXIJAQxhc1R1cGxlNEludHMBCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhN1bnN0YWtlTGFuZFJFQURPTkxZCQDMCAIFC2xhbmRBc3NldElkCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCWCgQJAGQCCAUDYWNjAl8xCAUBcgJfMQkAZAIIBQNhY2MCXzIIBQFyAl8yCQBkAggFA2FjYwJfMwgFAXICXzMJAGQCCAUDYWNjAl80CAUBcgJfNAoAAiRsBQVsYW5kcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAAAAAAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdvbmVMYW5kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAlgoEAAAAAAAAAAAJAJQKAgUDbmlsBQtsYW5kc1Jlc3VsdACTnsTq",
    "height": 3280713,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EAb2VRaotmCe9EYZtDqibgkXBDWcTfkg1YMvoKaNfTo1
Next: 3ZvBNMGscMe4p9anH7ECxscfYEsvpKUBvE7UwtAAEy7T

Diff: 
Old New Differences
130 130      if ($isInstanceOf(f, "(Int, Int)"))
131 131          then {
132 132              let O = f
133 -             O._1
133 +             O
134 134              }
135 135          else throw("fail to cast into (Int, Int)")
136 136      }
280 280              let am = valueOrElse(getInteger(av, X(i)), 0)
281 281              let aw = if ((am > 0))
282 282                  then R(invoke(av, "unstakeAcresCallback", [am, i], nil))
283 -                 else 0
283 +                 else $Tuple2(0, 0)
284 284              let ax = addressFromStringValue(g)
285 285              let ay = getString(ax, G(i))
286 286              let az = if (isDefined(ay))
325 325              let aR = if ((aQ != ""))
326 326                  then Q(invoke(ax, "unstakeDuckCallback", [aQ, i], nil))
327 327                  else $Tuple3(0, 0, 0)
328 -             let aS = ab((((((((aw + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
328 +             let aS = ab(((((((((aw._1 + aw._2) + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
329 329              $Tuple2((az._5 ++ aS._1), aS._2)
330 330              }
331 331      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = "__"
5 5  
6 6  let b = 100000000
7 7  
8 8  let c = 200
9 9  
10 10  let d = take(drop(this.bytes, 1), 1)
11 11  
12 12  let e = {
13 13      let f = d
14 14      if ((base58'2W' == f))
15 15          then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
16 16          else if ((base58'2T' == f))
17 17              then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
18 18              else throw("Unknown chain")
19 19      }
20 20  
21 21  let g = {
22 22      let f = d
23 23      if ((base58'2W' == f))
24 24          then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
25 25          else if ((base58'2T' == f))
26 26              then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
27 27              else throw("Unknown chain")
28 28      }
29 29  
30 30  func h (i,j) = valueOrErrorMessage(getString(i, j), makeString(["mandatory ", toString(i), ".", j, " is not defined"], ""))
31 31  
32 32  
33 33  let k = 1
34 34  
35 35  let l = 2
36 36  
37 37  func m () = "%s__restConfig"
38 38  
39 39  
40 40  func n () = "%s__rest2Addr"
41 41  
42 42  
43 43  func o (p) = split_4C(h(p, m()), a)
44 44  
45 45  
46 46  func q (r,s) = valueOrErrorMessage(addressFromString(r[s]), ("Rest cfg doesn't contain address at index " + toString(s)))
47 47  
48 48  
49 49  let t = addressFromStringValue(valueOrElse(getString(this, n()), e))
50 50  
51 51  let r = o(t)
52 52  
53 53  let u = q(r, k)
54 54  
55 55  let v = q(r, l)
56 56  
57 57  let w = "oldAcresContract"
58 58  
59 59  func x () = "contractsBlocked"
60 60  
61 61  
62 62  func y (z) = ("lastTxIdByUser_" + z)
63 63  
64 64  
65 65  let A = "wlg_assetId"
66 66  
67 67  let B = valueOrErrorMessage(getBinary(v, A), "WLGOLD is not issued yet")
68 68  
69 69  let C = "acresIssuedAmount"
70 70  
71 71  let D = "acresAssetId"
72 72  
73 73  let E = valueOrErrorMessage(getBinary(u, D), "ACRES is not issued yet")
74 74  
75 75  func F (z) = ("acresStakedTimeByUser_" + z)
76 76  
77 77  
78 78  func G (H) = ("stakedLandsByOwner_" + H)
79 79  
80 80  
81 81  func I (H) = ("stakedDuckByOwner_" + H)
82 82  
83 83  
84 84  func J (K) = {
85 85      let f = K
86 86      if ($isInstanceOf(f, "Int"))
87 87          then {
88 88              let L = f
89 89              L
90 90              }
91 91          else throw("fail to cast into Int")
92 92      }
93 93  
94 94  
95 95  func M (N) = {
96 96      let f = N
97 97      if ($isInstanceOf(f, "(Int, Int, Int, Int, Int)"))
98 98          then {
99 99              let O = f
100 100              O
101 101              }
102 102          else throw("fail to cast into (Int, Int, Int, Int, Int)")
103 103      }
104 104  
105 105  
106 106  func P (N) = {
107 107      let f = N
108 108      if ($isInstanceOf(f, "(Int, Int, Int, Int)"))
109 109          then {
110 110              let O = f
111 111              O
112 112              }
113 113          else throw("fail to cast into (Int, Int, Int, Int)")
114 114      }
115 115  
116 116  
117 117  func Q (N) = {
118 118      let f = N
119 119      if ($isInstanceOf(f, "(Int, Int, Int)"))
120 120          then {
121 121              let O = f
122 122              O
123 123              }
124 124          else throw("fail to cast into (Int, Int, Int)")
125 125      }
126 126  
127 127  
128 128  func R (N) = {
129 129      let f = N
130 130      if ($isInstanceOf(f, "(Int, Int)"))
131 131          then {
132 132              let O = f
133 -             O._1
133 +             O
134 134              }
135 135          else throw("fail to cast into (Int, Int)")
136 136      }
137 137  
138 138  
139 139  func S (N,T) = {
140 140      let U = pow(10, 0, T, 0, 0, DOWN)
141 141      let V = toString((N % U))
142 142      let W = drop(toString(U), (1 + size(V)))
143 143      (((toString((N / U)) + ".") + W) + V)
144 144      }
145 145  
146 146  
147 147  func X (z) = ("acresStakedAmountByUser_" + z)
148 148  
149 149  
150 150  let Y = "acresStakedAmountTotal"
151 151  
152 152  func Z (aa) = if (if ((aa.originCaller != t))
153 153      then valueOrElse(getBoolean(x()), false)
154 154      else false)
155 155      then throw("Contracts are under maintenance")
156 156      else [StringEntry(y(toString(aa.originCaller)), toBase58String(aa.transactionId))]
157 157  
158 158  
159 159  func ab (ac,i) = {
160 160      let ad = invoke(v, "onStakeUnstakeLand", [i], nil)
161 161      if ((ad == ad))
162 162          then {
163 163              let ae = lastBlock.timestamp
164 164              let af = F(i)
165 165              let ag = X(i)
166 166              let ah = valueOrElse(getInteger(ag), 0)
167 167              let ai = valueOrElse(getInteger(Y), 0)
168 168              $Tuple2([IntegerEntry(af, lastBlock.timestamp), IntegerEntry(ag, (ah + ac)), IntegerEntry(Y, (ai + ac))], ad)
169 169              }
170 170          else throw("Strict value is not equal to itself.")
171 171      }
172 172  
173 173  
174 174  @Callable(aa)
175 175  func constructorV1 (aj,ak) = if ((aa.caller != this))
176 176      then throw("Permission denied")
177 177      else {
178 178          let al = addressFromStringValue(ak)
179 179  [IntegerEntry(C, getIntegerValue(al, C)), BinaryEntry(D, getBinaryValue(al, D)), StringEntry(n(), aj), StringEntry(w, ak)]
180 180          }
181 181  
182 182  
183 183  
184 184  @Callable(aa)
185 185  func saveInteger (j,am) = if ((aa.caller != this))
186 186      then throw("saveInteger is not public method")
187 187      else [IntegerEntry(j, am)]
188 188  
189 189  
190 190  
191 191  @Callable(aa)
192 192  func setBlocked (an) = if ((aa.caller != this))
193 193      then throw("permission denied")
194 194      else [BooleanEntry(x(), an)]
195 195  
196 196  
197 197  
198 198  @Callable(aa)
199 199  func unstakeAcres (am) = {
200 200      let ao = Z(aa)
201 201      if ((0 >= am))
202 202          then throw("Amount should be positive")
203 203          else {
204 204              let i = toString(aa.caller)
205 205              if ((size(aa.payments) != 0))
206 206                  then throw("No payments required")
207 207                  else {
208 208                      let af = F(i)
209 209                      let ag = X(i)
210 210                      let ah = valueOrElse(getInteger(ag), 0)
211 211                      if ((am > ah))
212 212                          then throw(((("You have only " + S(ah, 8)) + " ACRES staked, tried to unstake ") + S(am, 8)))
213 213                          else {
214 214                              let ai = valueOrElse(getInteger(Y), 0)
215 215                              let ad = invoke(v, "onStakeUnstakeLand", [i], nil)
216 216                              $Tuple2(([IntegerEntry(af, lastBlock.timestamp), IntegerEntry(ag, (ah - am)), IntegerEntry(Y, (ai - am)), ScriptTransfer(aa.caller, am, E)] ++ ao), ad)
217 217                              }
218 218                      }
219 219              }
220 220      }
221 221  
222 222  
223 223  
224 224  @Callable(aa)
225 225  func stakeAcres () = {
226 226      let ao = Z(aa)
227 227      let i = toString(aa.caller)
228 228      if ((size(aa.payments) != 1))
229 229          then throw("exactly 1 payment must be attached")
230 230          else {
231 231              let ap = aa.payments[0]
232 232              let ac = ap.amount
233 233              if (if (!(isDefined(ap.assetId)))
234 234                  then true
235 235                  else (value(ap.assetId) != E))
236 236                  then throw("ACRES payments only!")
237 237                  else {
238 238                      let aq = ab(ac, i)
239 239                      let ar = aq._1
240 240                      let as = aq._2
241 241                      $Tuple2((ar ++ ao), as)
242 242                      }
243 243              }
244 244      }
245 245  
246 246  
247 247  
248 248  @Callable(aa)
249 249  func buyAcres () = {
250 250      let ao = Z(aa)
251 251      let i = toString(aa.caller)
252 252      if ((size(aa.payments) != 1))
253 253          then throw("exactly 1 payment must be attached")
254 254          else {
255 255              let ap = aa.payments[0]
256 256              let ac = ap.amount
257 257              if (if (!(isDefined(ap.assetId)))
258 258                  then true
259 259                  else (value(ap.assetId) != B))
260 260                  then throw("WLGOLD payments only!")
261 261                  else if ((b > ac))
262 262                      then throw((("Min payment should be " + S(b, 8)) + " WLGOLD"))
263 263                      else {
264 264                          let at = (ac * c)
265 265                          let au = J(invoke(u, "burnWlgold", nil, [AttachedPayment(B, ac)]))
266 266                          $Tuple2(([ScriptTransfer(aa.caller, at, E)] ++ ao), au)
267 267                          }
268 268              }
269 269      }
270 270  
271 271  
272 272  
273 273  @Callable(aa)
274 274  func convertOldStakes () = {
275 275      let i = toString(aa.caller)
276 276      if ((size(aa.payments) != 0))
277 277          then throw("No payments required")
278 278          else {
279 279              let av = addressFromStringValue(getStringValue(w))
280 280              let am = valueOrElse(getInteger(av, X(i)), 0)
281 281              let aw = if ((am > 0))
282 282                  then R(invoke(av, "unstakeAcresCallback", [am, i], nil))
283 -                 else 0
283 +                 else $Tuple2(0, 0)
284 284              let ax = addressFromStringValue(g)
285 285              let ay = getString(ax, G(i))
286 286              let az = if (isDefined(ay))
287 287                  then {
288 288                      let aA = split_51C(value(ay), "_")
289 289                      func aB (aC,aD) =                     if ((aD == ""))
290 290                          then throw("landAssetId is required")
291 291                          else {
292 292                              let aE = M(invoke(ax, "unstakeLandCallback", [aD, i], nil))
293 293                              $Tuple4((aC._1 + aE._1), (aC._2 + aE._2), (aC._3 + aE._3), (aC._4 + aE._4))
294 294                              }
295 295  
296 296                      let aF = {
297 297                          let aG = aA
298 298                          let aH = size(aG)
299 299                          let aI = $Tuple4(0, 0, 0, 0)
300 300                          func aJ (aK,aL) =                         if ((aL >= aH))
301 301                              then aK
302 302                              else aB(aK, aG[aL])
303 303  
304 304                          func aM (aK,aL) =                         if ((aL >= aH))
305 305                              then aK
306 306                              else throw("List size exceeds 100")
307 307  
308 308                          aM(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aI, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
309 309                          }
310 310                      let aN = invoke(ax, "unstakeLandsFinalizeCallback", [i], nil)
311 311                      if ((aN == aN))
312 312                          then {
313 313                              let aO = invoke(av, "requestAcresCallback", [(((aF._1 + aF._2) + aF._3) + aF._4), i], nil)
314 314                              if ((aO == aO))
315 315                                  then {
316 316                                      let aP = Issue("FPOWER10", "FarmingPower +10% NFT for WavesLands game", 1, 0, false)
317 317                                      $Tuple5(aF._1, aF._2, aF._3, aF._4, [aP, ScriptTransfer(aa.caller, 1, calculateAssetId(aP))])
318 318                                      }
319 319                                  else throw("Strict value is not equal to itself.")
320 320                              }
321 321                          else throw("Strict value is not equal to itself.")
322 322                      }
323 323                  else $Tuple5(0, 0, 0, 0, nil)
324 324              let aQ = valueOrElse(getString(ax, I(i)), "")
325 325              let aR = if ((aQ != ""))
326 326                  then Q(invoke(ax, "unstakeDuckCallback", [aQ, i], nil))
327 327                  else $Tuple3(0, 0, 0)
328 -             let aS = ab((((((((aw + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
328 +             let aS = ab(((((((((aw._1 + aw._2) + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
329 329              $Tuple2((az._5 ++ aS._1), aS._2)
330 330              }
331 331      }
332 332  
333 333  
334 334  
335 335  @Callable(aa)
336 336  func unstakeLandsREADONLY (i) = {
337 337      let ax = addressFromStringValue(g)
338 338      let ay = getString(ax, G(i))
339 339      let az = if (isDefined(ay))
340 340          then {
341 341              let aA = split_51C(value(ay), "_")
342 342              func aB (aC,aD) =             if ((aD == ""))
343 343                  then throw("landAssetId is required")
344 344                  else {
345 345                      let aE = P(invoke(ax, "unstakeLandREADONLY", [aD, i], nil))
346 346                      $Tuple4((aC._1 + aE._1), (aC._2 + aE._2), (aC._3 + aE._3), (aC._4 + aE._4))
347 347                      }
348 348  
349 349              let aG = aA
350 350              let aH = size(aG)
351 351              let aI = $Tuple4(0, 0, 0, 0)
352 352              func aJ (aK,aL) =             if ((aL >= aH))
353 353                  then aK
354 354                  else aB(aK, aG[aL])
355 355  
356 356              func aM (aK,aL) =             if ((aL >= aH))
357 357                  then aK
358 358                  else throw("List size exceeds 100")
359 359  
360 360              aM(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aI, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
361 361              }
362 362          else $Tuple4(0, 0, 0, 0)
363 363      $Tuple2(nil, az)
364 364      }
365 365  
366 366

Old	New		Differences
130	130		if ($isInstanceOf(f, "(Int, Int)"))
131	131		then {
132	132		let O = f
133		-	O~~._1~~
	133	+	O
134	134		}
135	135		else throw("fail to cast into (Int, Int)")
136	136		}

280	280		let am = valueOrElse(getInteger(av, X(i)), 0)
281	281		let aw = if ((am > 0))
282	282		then R(invoke(av, "unstakeAcresCallback", [am, i], nil))
283		-	else 0
	283	+	else $Tuple2(0, 0)
284	284		let ax = addressFromStringValue(g)
285	285		let ay = getString(ax, G(i))
286	286		let az = if (isDefined(ay))

325	325		let aR = if ((aQ != ""))
326	326		then Q(invoke(ax, "unstakeDuckCallback", [aQ, i], nil))
327	327		else $Tuple3(0, 0, 0)
328		-	let aS = ab((((((((aw + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
	328	+	let aS = ab(((((((((aw._1 + aw._2) + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
329	329		$Tuple2((az._5 ++ aS._1), aS._2)
330	330		}
331	331		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = "__"
5	5
6	6		let b = 100000000
7	7
8	8		let c = 200
9	9
10	10		let d = take(drop(this.bytes, 1), 1)
11	11
12	12		let e = {
13	13		let f = d
14	14		if ((base58'2W' == f))
15	15		then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
16	16		else if ((base58'2T' == f))
17	17		then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
18	18		else throw("Unknown chain")
19	19		}
20	20
21	21		let g = {
22	22		let f = d
23	23		if ((base58'2W' == f))
24	24		then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
25	25		else if ((base58'2T' == f))
26	26		then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
27	27		else throw("Unknown chain")
28	28		}
29	29
30	30		func h (i,j) = valueOrErrorMessage(getString(i, j), makeString(["mandatory ", toString(i), ".", j, " is not defined"], ""))
31	31
32	32
33	33		let k = 1
34	34
35	35		let l = 2
36	36
37	37		func m () = "%s__restConfig"
38	38
39	39
40	40		func n () = "%s__rest2Addr"
41	41
42	42
43	43		func o (p) = split_4C(h(p, m()), a)
44	44
45	45
46	46		func q (r,s) = valueOrErrorMessage(addressFromString(r[s]), ("Rest cfg doesn't contain address at index " + toString(s)))
47	47
48	48
49	49		let t = addressFromStringValue(valueOrElse(getString(this, n()), e))
50	50
51	51		let r = o(t)
52	52
53	53		let u = q(r, k)
54	54
55	55		let v = q(r, l)
56	56
57	57		let w = "oldAcresContract"
58	58
59	59		func x () = "contractsBlocked"
60	60
61	61
62	62		func y (z) = ("lastTxIdByUser_" + z)
63	63
64	64
65	65		let A = "wlg_assetId"
66	66
67	67		let B = valueOrErrorMessage(getBinary(v, A), "WLGOLD is not issued yet")
68	68
69	69		let C = "acresIssuedAmount"
70	70
71	71		let D = "acresAssetId"
72	72
73	73		let E = valueOrErrorMessage(getBinary(u, D), "ACRES is not issued yet")
74	74
75	75		func F (z) = ("acresStakedTimeByUser_" + z)
76	76
77	77
78	78		func G (H) = ("stakedLandsByOwner_" + H)
79	79
80	80
81	81		func I (H) = ("stakedDuckByOwner_" + H)
82	82
83	83
84	84		func J (K) = {
85	85		let f = K
86	86		if ($isInstanceOf(f, "Int"))
87	87		then {
88	88		let L = f
89	89		L
90	90		}
91	91		else throw("fail to cast into Int")
92	92		}
93	93
94	94
95	95		func M (N) = {
96	96		let f = N
97	97		if ($isInstanceOf(f, "(Int, Int, Int, Int, Int)"))
98	98		then {
99	99		let O = f
100	100		O
101	101		}
102	102		else throw("fail to cast into (Int, Int, Int, Int, Int)")
103	103		}
104	104
105	105
106	106		func P (N) = {
107	107		let f = N
108	108		if ($isInstanceOf(f, "(Int, Int, Int, Int)"))
109	109		then {
110	110		let O = f
111	111		O
112	112		}
113	113		else throw("fail to cast into (Int, Int, Int, Int)")
114	114		}
115	115
116	116
117	117		func Q (N) = {
118	118		let f = N
119	119		if ($isInstanceOf(f, "(Int, Int, Int)"))
120	120		then {
121	121		let O = f
122	122		O
123	123		}
124	124		else throw("fail to cast into (Int, Int, Int)")
125	125		}
126	126
127	127
128	128		func R (N) = {
129	129		let f = N
130	130		if ($isInstanceOf(f, "(Int, Int)"))
131	131		then {
132	132		let O = f
133		-	O~~._1~~
	133	+	O
134	134		}
135	135		else throw("fail to cast into (Int, Int)")
136	136		}
137	137
138	138
139	139		func S (N,T) = {
140	140		let U = pow(10, 0, T, 0, 0, DOWN)
141	141		let V = toString((N % U))
142	142		let W = drop(toString(U), (1 + size(V)))
143	143		(((toString((N / U)) + ".") + W) + V)
144	144		}
145	145
146	146
147	147		func X (z) = ("acresStakedAmountByUser_" + z)
148	148
149	149
150	150		let Y = "acresStakedAmountTotal"
151	151
152	152		func Z (aa) = if (if ((aa.originCaller != t))
153	153		then valueOrElse(getBoolean(x()), false)
154	154		else false)
155	155		then throw("Contracts are under maintenance")
156	156		else [StringEntry(y(toString(aa.originCaller)), toBase58String(aa.transactionId))]
157	157
158	158
159	159		func ab (ac,i) = {
160	160		let ad = invoke(v, "onStakeUnstakeLand", [i], nil)
161	161		if ((ad == ad))
162	162		then {
163	163		let ae = lastBlock.timestamp
164	164		let af = F(i)
165	165		let ag = X(i)
166	166		let ah = valueOrElse(getInteger(ag), 0)
167	167		let ai = valueOrElse(getInteger(Y), 0)
168	168		$Tuple2([IntegerEntry(af, lastBlock.timestamp), IntegerEntry(ag, (ah + ac)), IntegerEntry(Y, (ai + ac))], ad)
169	169		}
170	170		else throw("Strict value is not equal to itself.")
171	171		}
172	172
173	173
174	174		@Callable(aa)
175	175		func constructorV1 (aj,ak) = if ((aa.caller != this))
176	176		then throw("Permission denied")
177	177		else {
178	178		let al = addressFromStringValue(ak)
179	179		[IntegerEntry(C, getIntegerValue(al, C)), BinaryEntry(D, getBinaryValue(al, D)), StringEntry(n(), aj), StringEntry(w, ak)]
180	180		}
181	181
182	182
183	183
184	184		@Callable(aa)
185	185		func saveInteger (j,am) = if ((aa.caller != this))
186	186		then throw("saveInteger is not public method")
187	187		else [IntegerEntry(j, am)]
188	188
189	189
190	190
191	191		@Callable(aa)
192	192		func setBlocked (an) = if ((aa.caller != this))
193	193		then throw("permission denied")
194	194		else [BooleanEntry(x(), an)]
195	195
196	196
197	197
198	198		@Callable(aa)
199	199		func unstakeAcres (am) = {
200	200		let ao = Z(aa)
201	201		if ((0 >= am))
202	202		then throw("Amount should be positive")
203	203		else {
204	204		let i = toString(aa.caller)
205	205		if ((size(aa.payments) != 0))
206	206		then throw("No payments required")
207	207		else {
208	208		let af = F(i)
209	209		let ag = X(i)
210	210		let ah = valueOrElse(getInteger(ag), 0)
211	211		if ((am > ah))
212	212		then throw(((("You have only " + S(ah, 8)) + " ACRES staked, tried to unstake ") + S(am, 8)))
213	213		else {
214	214		let ai = valueOrElse(getInteger(Y), 0)
215	215		let ad = invoke(v, "onStakeUnstakeLand", [i], nil)
216	216		$Tuple2(([IntegerEntry(af, lastBlock.timestamp), IntegerEntry(ag, (ah - am)), IntegerEntry(Y, (ai - am)), ScriptTransfer(aa.caller, am, E)] ++ ao), ad)
217	217		}
218	218		}
219	219		}
220	220		}
221	221
222	222
223	223
224	224		@Callable(aa)
225	225		func stakeAcres () = {
226	226		let ao = Z(aa)
227	227		let i = toString(aa.caller)
228	228		if ((size(aa.payments) != 1))
229	229		then throw("exactly 1 payment must be attached")
230	230		else {
231	231		let ap = aa.payments[0]
232	232		let ac = ap.amount
233	233		if (if (!(isDefined(ap.assetId)))
234	234		then true
235	235		else (value(ap.assetId) != E))
236	236		then throw("ACRES payments only!")
237	237		else {
238	238		let aq = ab(ac, i)
239	239		let ar = aq._1
240	240		let as = aq._2
241	241		$Tuple2((ar ++ ao), as)
242	242		}
243	243		}
244	244		}
245	245
246	246
247	247
248	248		@Callable(aa)
249	249		func buyAcres () = {
250	250		let ao = Z(aa)
251	251		let i = toString(aa.caller)
252	252		if ((size(aa.payments) != 1))
253	253		then throw("exactly 1 payment must be attached")
254	254		else {
255	255		let ap = aa.payments[0]
256	256		let ac = ap.amount
257	257		if (if (!(isDefined(ap.assetId)))
258	258		then true
259	259		else (value(ap.assetId) != B))
260	260		then throw("WLGOLD payments only!")
261	261		else if ((b > ac))
262	262		then throw((("Min payment should be " + S(b, 8)) + " WLGOLD"))
263	263		else {
264	264		let at = (ac * c)
265	265		let au = J(invoke(u, "burnWlgold", nil, [AttachedPayment(B, ac)]))
266	266		$Tuple2(([ScriptTransfer(aa.caller, at, E)] ++ ao), au)
267	267		}
268	268		}
269	269		}
270	270
271	271
272	272
273	273		@Callable(aa)
274	274		func convertOldStakes () = {
275	275		let i = toString(aa.caller)
276	276		if ((size(aa.payments) != 0))
277	277		then throw("No payments required")
278	278		else {
279	279		let av = addressFromStringValue(getStringValue(w))
280	280		let am = valueOrElse(getInteger(av, X(i)), 0)
281	281		let aw = if ((am > 0))
282	282		then R(invoke(av, "unstakeAcresCallback", [am, i], nil))
283		-	else 0
	283	+	else $Tuple2(0, 0)
284	284		let ax = addressFromStringValue(g)
285	285		let ay = getString(ax, G(i))
286	286		let az = if (isDefined(ay))
287	287		then {
288	288		let aA = split_51C(value(ay), "_")
289	289		func aB (aC,aD) = if ((aD == ""))
290	290		then throw("landAssetId is required")
291	291		else {
292	292		let aE = M(invoke(ax, "unstakeLandCallback", [aD, i], nil))
293	293		$Tuple4((aC._1 + aE._1), (aC._2 + aE._2), (aC._3 + aE._3), (aC._4 + aE._4))
294	294		}
295	295
296	296		let aF = {
297	297		let aG = aA
298	298		let aH = size(aG)
299	299		let aI = $Tuple4(0, 0, 0, 0)
300	300		func aJ (aK,aL) = if ((aL >= aH))
301	301		then aK
302	302		else aB(aK, aG[aL])
303	303
304	304		func aM (aK,aL) = if ((aL >= aH))
305	305		then aK
306	306		else throw("List size exceeds 100")
307	307
308	308		aM(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aI, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
309	309		}
310	310		let aN = invoke(ax, "unstakeLandsFinalizeCallback", [i], nil)
311	311		if ((aN == aN))
312	312		then {
313	313		let aO = invoke(av, "requestAcresCallback", [(((aF._1 + aF._2) + aF._3) + aF._4), i], nil)
314	314		if ((aO == aO))
315	315		then {
316	316		let aP = Issue("FPOWER10", "FarmingPower +10% NFT for WavesLands game", 1, 0, false)
317	317		$Tuple5(aF._1, aF._2, aF._3, aF._4, [aP, ScriptTransfer(aa.caller, 1, calculateAssetId(aP))])
318	318		}
319	319		else throw("Strict value is not equal to itself.")
320	320		}
321	321		else throw("Strict value is not equal to itself.")
322	322		}
323	323		else $Tuple5(0, 0, 0, 0, nil)
324	324		let aQ = valueOrElse(getString(ax, I(i)), "")
325	325		let aR = if ((aQ != ""))
326	326		then Q(invoke(ax, "unstakeDuckCallback", [aQ, i], nil))
327	327		else $Tuple3(0, 0, 0)
328		-	let aS = ab((((((((aw + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
	328	+	let aS = ab(((((((((aw._1 + aw._2) + az._1) + az._2) + az._3) + az._4) + aR._1) + aR._2) + aR._3), i)
329	329		$Tuple2((az._5 ++ aS._1), aS._2)
330	330		}
331	331		}
332	332
333	333
334	334
335	335		@Callable(aa)
336	336		func unstakeLandsREADONLY (i) = {
337	337		let ax = addressFromStringValue(g)
338	338		let ay = getString(ax, G(i))
339	339		let az = if (isDefined(ay))
340	340		then {
341	341		let aA = split_51C(value(ay), "_")
342	342		func aB (aC,aD) = if ((aD == ""))
343	343		then throw("landAssetId is required")
344	344		else {
345	345		let aE = P(invoke(ax, "unstakeLandREADONLY", [aD, i], nil))
346	346		$Tuple4((aC._1 + aE._1), (aC._2 + aE._2), (aC._3 + aE._3), (aC._4 + aE._4))
347	347		}
348	348
349	349		let aG = aA
350	350		let aH = size(aG)
351	351		let aI = $Tuple4(0, 0, 0, 0)
352	352		func aJ (aK,aL) = if ((aL >= aH))
353	353		then aK
354	354		else aB(aK, aG[aL])
355	355
356	356		func aM (aK,aL) = if ((aL >= aH))
357	357		then aK
358	358		else throw("List size exceeds 100")
359	359
360	360		aM(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aJ(aI, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
361	361		}
362	362		else $Tuple4(0, 0, 0, 0)
363	363		$Tuple2(nil, az)
364	364		}
365	365
366	366

github/deemru/w8io/169f3d6 
85.52 ms ◑