tx · 92prLSCSo3FpKHrPZBpKaSzFa4LEkYnSFgzBNurasFps

3Mq6KL6Qy7hHXhW6LDjfkZ5Sw9DH6gdDfQp:  -0.01000000 Waves

2024.06.20 17:48 [3159207] smart account 3Mq6KL6Qy7hHXhW6LDjfkZ5Sw9DH6gdDfQp > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "92prLSCSo3FpKHrPZBpKaSzFa4LEkYnSFgzBNurasFps",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1718894890806,
    "version": 2,
    "chainId": 84,
    "sender": "3Mq6KL6Qy7hHXhW6LDjfkZ5Sw9DH6gdDfQp",
    "senderPublicKey": "ASeX5tfrbMqQLdJh21b7R1EwFQqF9ShvfKd1razmL24y",
    "proofs": [
        "Fiz4tVpFo1Yn15EnsGAX27p8RkRm6BviP67zVWJrenzjfagJCdS8jmDb6uzPvj2fdD72KqsVM8HeorthJ73kjFM"
    ],
    "script": "base64:CAISCAISBgoECBgICBIECgIICBIAEAAUcHJlZGljdGlvbk1heENvdW50ZXIArAIACm1heENvdW50ZXIAFAANZGVmYXVsdFJhdGluZwBkAA5yYXRlQWRqdXN0bWVudAAUAAd0b2tlbklkASBt93onpps//ItTlanjngVbHCIvW03oUTBbAaEGqQDGGAAMcGF5b3V0QW1vdW50AIDh6xcADHJhdGluZ0N1dG9mZgA8AAVyX21heAD0AwAFc2NhbGUAZAERc2VhcmNoRm9yQ291bnRlcnMCBml0ZW1JZAdjb3VudGVyBBFzZWFyY2hGb3JDb3VudGVycwQHJG1hdGNoMAkAoggBCQCsAgIJAKwCAgUGaXRlbUlkAgFfCQCkAwEFB2NvdW50ZXIDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAgdObyBVc2VyBRFzZWFyY2hGb3JDb3VudGVycwEPc2VhcmNoRm9yUmF0aW5nAQdhZGRyZXNzBAZyYXRpbmcEByRtYXRjaDAJAJ8IAQkArAICBQdhZGRyZXNzAgdfcmF0aW5nAwkAAQIFByRtYXRjaDACA0ludAQBcgUHJG1hdGNoMAUBcgUNZGVmYXVsdFJhdGluZwUGcmF0aW5nARpzZWFyY2hGb3JBZGRyZXNzUHJlZGljdGlvbgIGaXRlbUlkBmFkcmVzcwQTc2VhcmNoRm9yUHJlZGljdGlvbgQHJG1hdGNoMAkAoggBCQCsAgIJAKwCAgUGaXRlbUlkAgFfBQZhZHJlc3MDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAglOb3QgRm91bmQFE3NlYXJjaEZvclByZWRpY3Rpb24BGnNlYXJjaEZvclByZWRpY3Rpb25Db3VudGVyAgZpdGVtSWQKcHJlZGljdGlvbgQTc2VhcmNoRm9yUHJlZGljdGlvbgQHJG1hdGNoMAkAnwgBCQCsAgIJAKwCAgUGaXRlbUlkAgxfcHJlZGljdGlvbl8FCnByZWRpY3Rpb24DCQABAgUHJG1hdGNoMAIDSW50BAFzBQckbWF0Y2gwBQFzAglOb3QgRm91bmQFE3NlYXJjaEZvclByZWRpY3Rpb24BFmZpbmRQcmVkaWN0aW9uQWRyZXNzZXMCBml0ZW1JZAdjb3VudGVyBAphZHJlc3NMaXN0AwkAZwIFB2NvdW50ZXIABQQHYWRyZXNzMQkBEXNlYXJjaEZvckNvdW50ZXJzAgUGaXRlbUlkAAEEB2FkcmVzczIJARFzZWFyY2hGb3JDb3VudGVycwIFBml0ZW1JZAACBAdhZHJlc3MzCQERc2VhcmNoRm9yQ291bnRlcnMCBQZpdGVtSWQAAwQHYWRyZXNzNAkBEXNlYXJjaEZvckNvdW50ZXJzAgUGaXRlbUlkAAQEB2FkcmVzczUJARFzZWFyY2hGb3JDb3VudGVycwIFBml0ZW1JZAAFCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgUDbmlsBQdhZHJlc3MxBQdhZHJlc3MyBQdhZHJlc3MzBQdhZHJlc3M0BQdhZHJlc3M1AwkAZwIFB2NvdW50ZXIABAQHYWRyZXNzMQkBEXNlYXJjaEZvckNvdW50ZXJzAgUGaXRlbUlkAAEEB2FkcmVzczIJARFzZWFyY2hGb3JDb3VudGVycwIFBml0ZW1JZAACBAdhZHJlc3MzCQERc2VhcmNoRm9yQ291bnRlcnMCBQZpdGVtSWQAAwQHYWRyZXNzNAkBEXNlYXJjaEZvckNvdW50ZXJzAgUGaXRlbUlkAAQJAM0IAgkAzQgCCQDNCAIJAM0IAgUDbmlsBQdhZHJlc3MxBQdhZHJlc3MyBQdhZHJlc3MzBQdhZHJlc3M0AwkAZwIFB2NvdW50ZXIAAwQHYWRyZXNzMQkBEXNlYXJjaEZvckNvdW50ZXJzAgUGaXRlbUlkAAEEB2FkcmVzczIJARFzZWFyY2hGb3JDb3VudGVycwIFBml0ZW1JZAACBAdhZHJlc3MzCQERc2VhcmNoRm9yQ291bnRlcnMCBQZpdGVtSWQAAwkAzQgCCQDNCAIJAM0IAgUDbmlsBQdhZHJlc3MxBQdhZHJlc3MyBQdhZHJlc3MzAwkAZwIFB2NvdW50ZXIAAgQHYWRyZXNzMQkBEXNlYXJjaEZvckNvdW50ZXJzAgUGaXRlbUlkAAEEB2FkcmVzczIJARFzZWFyY2hGb3JDb3VudGVycwIFBml0ZW1JZAACCQDNCAIJAM0IAgUDbmlsBQdhZHJlc3MxBQdhZHJlc3MyBAdhZHJlc3MxCQERc2VhcmNoRm9yQ291bnRlcnMCBQZpdGVtSWQAAQkAzQgCBQNuaWwFB2FkcmVzczEFCmFkcmVzc0xpc3QBD2NhbGN1bGF0ZVBheW91dAIIcl9wbGF5ZXIFcl9tYXgEBXJhdGlvCQBpAgkAaAIFCHJfcGxheWVyAGQFBXJfbWF4BAZwYXlvdXQJAGkCCQBoAgUMcGF5b3V0QW1vdW50BQVyYXRpbwBkAwkAZwIAAAUGcGF5b3V0AAEFBnBheW91dAESY2FsY3VsYXRlTmV3UmF0aW5nBAhyX3BsYXllcgVyX21heAFrC2FjdHVhbFNjb3JlBAxyYXRpbl9mYWN0b3IJAGkCCQBoAgUIcl9wbGF5ZXIFBXNjYWxlBQVyX21heAMJAAACBQthY3R1YWxTY29yZQABBAphZGp1c3RtZW50CQBpAgkAaAIFAWsJAGUCAGQFDHJhdGluX2ZhY3RvcgUFc2NhbGUJAGQCBQhyX3BsYXllcgUKYWRqdXN0bWVudAQKYWRqdXN0bWVudAkAaQIJAGgCCQEBLQEFAWsJAGQCABQFDHJhdGluX2ZhY3RvcgUFc2NhbGUJAGQCBQhyX3BsYXllcgUKYWRqdXN0bWVudAMBaQEiYWRqdXN0UmF0aW5nc0FuZFBheW91dFBhcnRpY2lwYW50cwQGaXRlbUlkC2FkZHJlc3NMaXN0EWxhc3RDYWxsZXJBZGRyZXNzD2ZpbmFsUHJlZGljdGlvbgQGY2FsbGVyCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIFBmNhbGxlcgkApQgBBQR0aGlzCQACAQIpWW91IGFyZSBub3QgYWxsb3dlZCB0byBjYWxsIHRoaXMgZnVuY3Rpb24KARF1cGRhdGVSYXRpbmdzRnVuYwIFYWNjdW0HYWRkcmVzcwQGcmF0aW5nCQEPc2VhcmNoRm9yUmF0aW5nAQUHYWRkcmVzcwQKcHJlZGljdGlvbgkBGnNlYXJjaEZvckFkZHJlc3NQcmVkaWN0aW9uAgUGaXRlbUlkBQdhZGRyZXNzBAthY3R1YWxTY29yZQMJAAACBQpwcmVkaWN0aW9uBQ9maW5hbFByZWRpY3Rpb24AAQAABAluZXdSYXRpbmcJARJjYWxjdWxhdGVOZXdSYXRpbmcEBQZyYXRpbmcFBXJfbWF4BQ5yYXRlQWRqdXN0bWVudAULYWN0dWFsU2NvcmUEBnBheW91dAMJAAACBQpwcmVkaWN0aW9uBQ9maW5hbFByZWRpY3Rpb24GBwQOdXBkYXRlZEVudHJpZXMJAM0IAgUFYWNjdW0JAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCB19yYXRpbmcFCW5ld1JhdGluZwQQY2FsY3VsYXRlZEFtb3VudAkBD2NhbGN1bGF0ZVBheW91dAIFCW5ld1JhdGluZwUFcl9tYXgDBQZwYXlvdXQJAM0IAgUOdXBkYXRlZEVudHJpZXMJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQdhZGRyZXNzBRBjYWxjdWxhdGVkQW1vdW50BQd0b2tlbklkBQ51cGRhdGVkRW50cmllcwQOdXBkYXRlZFJhdGluZ3MKAAIkbAULYWRkcmVzc0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEXVwZGF0ZVJhdGluZ3NGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQkAzQgCBQ51cGRhdGVkUmF0aW5ncwkBDEJvb2xlYW5FbnRyeQIJAKwCAgUGaXRlbUlkAglfYWRqdXN0ZWQGAWkBDnNhdmVQcmVkaWN0aW9uAgZpdGVtSWQKcHJlZGljdGlvbgQMY2xpZW50QWRyZXNzCQClCAEIBQFpBmNhbGxlcgQNc2VhcmNoRm9yVXNlcgQHJG1hdGNoMAkAnwgBCQCsAgIFDGNsaWVudEFkcmVzcwIHX3JhdGluZwMJAAECBQckbWF0Y2gwAgNJbnQEAXMFByRtYXRjaDAFAXMCE1VzZXIgZG9lcyBub3QgZXhpc3QDCQAAAgUNc2VhcmNoRm9yVXNlcgITVXNlciBkb2VzIG5vdCBleGlzdAkAAgECE1VzZXIgZG9lcyBub3QgZXhpc3QEB2lzRmluYWwEByRtYXRjaDAJAKAIAQkArAICBQZpdGVtSWQCBl9maW5hbAMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFzBQckbWF0Y2gwBQFzBwMFB2lzRmluYWwJAAIBAh1GaW5hbCBwcmVkaWN0aW9uIGFscmVhZHkgbWFkZQQKaXNDYW5jZWxlZAQHJG1hdGNoMAkAoAgBCQCsAgIFBml0ZW1JZAIKX2NhbmNlbGxlZAMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFzBQckbWF0Y2gwBQFzBwMFCmlzQ2FuY2VsZWQJAAIBAh1GaW5hbCBwcmVkaWN0aW9uIGFscmVhZHkgbWFkZQQMY2xpZW50UmF0aW5nCQEPc2VhcmNoRm9yUmF0aW5nAQUMY2xpZW50QWRyZXNzAwkAZwIFDHJhdGluZ0N1dG9mZgUMY2xpZW50UmF0aW5nCQACAQIqWW91IGFyZSBub3QgYWxsb3dlZCB0byBwYXJ0aWNpcGF0ZSBhbnltb3JlBBBzZWFyY2hGb3JDb3VudGVyBAckbWF0Y2gwCQCfCAEJAKwCAgUGaXRlbUlkAghfY291bnRlcgMJAAECBQckbWF0Y2gwAgNJbnQEAXMFByRtYXRjaDAFAXMA////////////AQMJAGcCBRBzZWFyY2hGb3JDb3VudGVyAAEECmFkcmVzc0xpc3QJARZmaW5kUHJlZGljdGlvbkFkcmVzc2VzAgUGaXRlbUlkBRBzZWFyY2hGb3JDb3VudGVyAwkBD2NvbnRhaW5zRWxlbWVudAIFCmFkcmVzc0xpc3QFDGNsaWVudEFkcmVzcwkAAgECI1RoaXMgVXNlciBhbHJlYWR5IGdhdmUgYSBQcmVkaWN0aW9uBBFwcmVkaWN0aW9uQ291bnRlcgQHJG1hdGNoMAkAnwgBCQCsAgIJAKwCAgUGaXRlbUlkAgxfcHJlZGljdGlvbl8FCnByZWRpY3Rpb24DCQABAgUHJG1hdGNoMAIDSW50BAFzBQckbWF0Y2gwBQFzAJQDBApuZXdDb3VudGVyCQBkAgUQc2VhcmNoRm9yQ291bnRlcgABAwkBAiE9AgURcHJlZGljdGlvbkNvdW50ZXIAlAMDCQBnAgkAZAIFEXByZWRpY3Rpb25Db3VudGVyBQxjbGllbnRSYXRpbmcFFHByZWRpY3Rpb25NYXhDb3VudGVyBAluZXdSYXRpbmcJARJjYWxjdWxhdGVOZXdSYXRpbmcEBQxjbGllbnRSYXRpbmcFBXJfbWF4BQ5yYXRlQWRqdXN0bWVudAABBBBjYWxjdWxhdGVkQW1vdW50CQEPY2FsY3VsYXRlUGF5b3V0AgUJbmV3UmF0aW5nBQVyX21heAQSaW52b2tlQWRqdXN0UmF0aW5nCQD8BwQFBHRoaXMCImFkanVzdFJhdGluZ3NBbmRQYXlvdXRQYXJ0aWNpcGFudHMJAMwIAgUGaXRlbUlkCQDMCAIFCmFkcmVzc0xpc3QJAMwIAgUMY2xpZW50QWRyZXNzCQDMCAIFCnByZWRpY3Rpb24FA25pbAUDbmlsAwkBAiE9AgUSaW52b2tlQWRqdXN0UmF0aW5nBRJpbnZva2VBZGp1c3RSYXRpbmcJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIBXwkApAMBBQpuZXdDb3VudGVyBQxjbGllbnRBZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIBXwUMY2xpZW50QWRyZXNzBQpwcmVkaWN0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgUGaXRlbUlkAgxfcHJlZGljdGlvbl8FCnByZWRpY3Rpb24JAGQCBRFwcmVkaWN0aW9uQ291bnRlcgUMY2xpZW50UmF0aW5nCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBml0ZW1JZAIIX2NvdW50ZXIFCm5ld0NvdW50ZXIJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgUGaXRlbUlkAgZfZmluYWwGCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIFBml0ZW1JZAIKX2NhbmNlbGxlZAcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICAgh1cGRhdGVkXwUGaXRlbUlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIGZmluYWxfBQZpdGVtSWQFBml0ZW1JZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUMY2xpZW50QWRyZXNzBRBjYWxjdWxhdGVkQW1vdW50BQd0b2tlbklkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFDGNsaWVudEFkcmVzcwIHX3JhdGluZwUJbmV3UmF0aW5nCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGaXRlbUlkAhFfZmluYWxfcHJlZGljdGlvbgUKcHJlZGljdGlvbgUDbmlsAwkAZwIFCm5ld0NvdW50ZXIFCm1heENvdW50ZXIECW5ld1JhdGluZwkBEmNhbGN1bGF0ZU5ld1JhdGluZwQFDGNsaWVudFJhdGluZwUFcl9tYXgFDnJhdGVBZGp1c3RtZW50AAEEEmludm9rZUFkanVzdFJhdGluZwkA/AcEBQR0aGlzAiJhZGp1c3RSYXRpbmdzQW5kUGF5b3V0UGFydGljaXBhbnRzCQDMCAIFBml0ZW1JZAkAzAgCBQphZHJlc3NMaXN0CQDMCAIFDGNsaWVudEFkcmVzcwkAzAgCAgROb25lBQNuaWwFA25pbAMJAQIhPQIFEmludm9rZUFkanVzdFJhdGluZwUSaW52b2tlQWRqdXN0UmF0aW5nCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZpdGVtSWQCAV8JAKQDAQUKbmV3Q291bnRlcgUMY2xpZW50QWRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZpdGVtSWQCAV8FDGNsaWVudEFkcmVzcwUKcHJlZGljdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIMX3ByZWRpY3Rpb25fBQpwcmVkaWN0aW9uCQBkAgURcHJlZGljdGlvbkNvdW50ZXIFDGNsaWVudFJhdGluZwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQZpdGVtSWQCCF9jb3VudGVyBQpuZXdDb3VudGVyCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIFBml0ZW1JZAIKX2NhbmNlbGxlZAYJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgUGaXRlbUlkAgZfZmluYWwHCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgIIdXBkYXRlZF8FBml0ZW1JZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICBmZpbmFsXwUGaXRlbUlkBQZpdGVtSWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUMY2xpZW50QWRyZXNzAgdfcmF0aW5nBQluZXdSYXRpbmcFA25pbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGaXRlbUlkAgFfCQCkAwEFCm5ld0NvdW50ZXIFDGNsaWVudEFkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGaXRlbUlkAgFfBQxjbGllbnRBZHJlc3MFCnByZWRpY3Rpb24JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICBQZpdGVtSWQCDF9wcmVkaWN0aW9uXwUKcHJlZGljdGlvbgkAZAIFEXByZWRpY3Rpb25Db3VudGVyBQxjbGllbnRSYXRpbmcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUGaXRlbUlkAghfY291bnRlcgUKbmV3Q291bnRlcgkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICBQZpdGVtSWQCBl9maW5hbAcJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgUGaXRlbUlkAgpfY2FuY2VsbGVkBwUDbmlsAwkAZwIFCm5ld0NvdW50ZXIFCm1heENvdW50ZXIECW5ld1JhdGluZwkBEmNhbGN1bGF0ZU5ld1JhdGluZwQFDGNsaWVudFJhdGluZwUFcl9tYXgFDnJhdGVBZGp1c3RtZW50AAEEEmludm9rZUFkanVzdFJhdGluZwkA/AcEBQR0aGlzAiJhZGp1c3RSYXRpbmdzQW5kUGF5b3V0UGFydGljaXBhbnRzCQDMCAIFBml0ZW1JZAkAzAgCBQphZHJlc3NMaXN0CQDMCAIFDGNsaWVudEFkcmVzcwkAzAgCAgROb25lBQNuaWwFA25pbAMJAQIhPQIFEmludm9rZUFkanVzdFJhdGluZwUSaW52b2tlQWRqdXN0UmF0aW5nCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZpdGVtSWQCAV8JAKQDAQUKbmV3Q291bnRlcgUMY2xpZW50QWRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZpdGVtSWQCAV8FDGNsaWVudEFkcmVzcwUKcHJlZGljdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIMX3ByZWRpY3Rpb25fBQpwcmVkaWN0aW9uBQxjbGllbnRSYXRpbmcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUGaXRlbUlkAghfY291bnRlcgUKbmV3Q291bnRlcgkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICBQZpdGVtSWQCCl9jYW5jZWxsZWQGCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIFBml0ZW1JZAIGX2ZpbmFsBwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgICCHVwZGF0ZWRfBQZpdGVtSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgZmaW5hbF8FBml0ZW1JZAUGaXRlbUlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFDGNsaWVudEFkcmVzcwIHX3JhdGluZwUJbmV3UmF0aW5nBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIBXwkApAMBBQpuZXdDb3VudGVyBQxjbGllbnRBZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIBXwUMY2xpZW50QWRyZXNzBQpwcmVkaWN0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgUGaXRlbUlkAgxfcHJlZGljdGlvbl8FCnByZWRpY3Rpb24FDGNsaWVudFJhdGluZwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQZpdGVtSWQCCF9jb3VudGVyBQpuZXdDb3VudGVyCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIFBml0ZW1JZAIKX2NhbmNlbGxlZAcJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgUGaXRlbUlkAgZfZmluYWwHBQNuaWwEEHNlYXJjaEZvck5ld0l0ZW0EByRtYXRjaDAJAKIIAQkArAICAgRuZXdfBQZpdGVtSWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzAg5JdGVtIG5vdCBGb3VuZAMJAAACBRBzZWFyY2hGb3JOZXdJdGVtAg5JdGVtIG5vdCBGb3VuZAkAAgECDkl0ZW0gbm90IGZvdW5kCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZpdGVtSWQCAV8JAKQDAQABBQxjbGllbnRBZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIBXwUMY2xpZW50QWRyZXNzBQpwcmVkaWN0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBml0ZW1JZAIIX2NvdW50ZXIAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFBml0ZW1JZAIMX3ByZWRpY3Rpb25fBQpwcmVkaWN0aW9uAAEJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICAgRuZXdfBQZpdGVtSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgh1cGRhdGVkXwUGaXRlbUlkBQZpdGVtSWQFA25pbAFpAQxyZWdpc3RlclVzZXIABAxjbGllbnRBZHJlc3MJAKUIAQgFAWkGY2FsbGVyBA1zZWFyY2hGb3JVc2VyBAckbWF0Y2gwCQCfCAEJAKwCAgUMY2xpZW50QWRyZXNzAgdfcmF0aW5nAwkAAQIFByRtYXRjaDACA0ludAQBcwUHJG1hdGNoMAUBcwD///////////8BAwkBAiE9AgUNc2VhcmNoRm9yVXNlcgD///////////8BCQACAQITVXNlciBhbHJlYWR5IGV4aXN0cwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQxjbGllbnRBZHJlc3MCB19yYXRpbmcFDWRlZmF1bHRSYXRpbmcFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXnjnzE8",
    "height": 3159207,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: CAuCxAcy2ff7Kj9PzHGe3APYjy3PerNBNsWZuqQMx8Kj

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 8 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let predictionMaxCounter = 300
5+
6+let maxCounter = 20
7+
8+let defaultRating = 100
9+
10+let rateAdjustment = 20
11+
12+let tokenId = base58'8QGJvsXqJ43q5ksFymoPKF1NWWhwUfr2F7h52oeWgVhH'
13+
14+let payoutAmount = 50000000
15+
16+let ratingCutoff = 60
17+
18+let r_max = 500
19+
20+let scale = 100
21+
22+func searchForCounters (itemId,counter) = {
23+    let searchForCounters =     match getString(((itemId + "_") + toString(counter))) {
24+        case s: String => 
25+            s
26+        case _ => 
27+            "No User"
28+    }
29+    searchForCounters
30+    }
31+
32+
33+func searchForRating (address) = {
34+    let rating =     match getInteger((address + "_rating")) {
35+        case r: Int => 
36+            r
37+        case _ => 
38+            defaultRating
39+    }
40+    rating
41+    }
42+
43+
44+func searchForAddressPrediction (itemId,adress) = {
45+    let searchForPrediction =     match getString(((itemId + "_") + adress)) {
46+        case s: String => 
47+            s
48+        case _ => 
49+            "Not Found"
50+    }
51+    searchForPrediction
52+    }
53+
54+
55+func searchForPredictionCounter (itemId,prediction) = {
56+    let searchForPrediction =     match getInteger(((itemId + "_prediction_") + prediction)) {
57+        case s: Int => 
58+            s
59+        case _ => 
60+            "Not Found"
61+    }
62+    searchForPrediction
63+    }
64+
65+
66+func findPredictionAdresses (itemId,counter) = {
67+    let adressList = if ((counter >= 5))
68+        then {
69+            let adress1 = searchForCounters(itemId, 1)
70+            let adress2 = searchForCounters(itemId, 2)
71+            let adress3 = searchForCounters(itemId, 3)
72+            let adress4 = searchForCounters(itemId, 4)
73+            let adress5 = searchForCounters(itemId, 5)
74+            (((((nil :+ adress1) :+ adress2) :+ adress3) :+ adress4) :+ adress5)
75+            }
76+        else if ((counter >= 4))
77+            then {
78+                let adress1 = searchForCounters(itemId, 1)
79+                let adress2 = searchForCounters(itemId, 2)
80+                let adress3 = searchForCounters(itemId, 3)
81+                let adress4 = searchForCounters(itemId, 4)
82+                ((((nil :+ adress1) :+ adress2) :+ adress3) :+ adress4)
83+                }
84+            else if ((counter >= 3))
85+                then {
86+                    let adress1 = searchForCounters(itemId, 1)
87+                    let adress2 = searchForCounters(itemId, 2)
88+                    let adress3 = searchForCounters(itemId, 3)
89+                    (((nil :+ adress1) :+ adress2) :+ adress3)
90+                    }
91+                else if ((counter >= 2))
92+                    then {
93+                        let adress1 = searchForCounters(itemId, 1)
94+                        let adress2 = searchForCounters(itemId, 2)
95+                        ((nil :+ adress1) :+ adress2)
96+                        }
97+                    else {
98+                        let adress1 = searchForCounters(itemId, 1)
99+                        (nil :+ adress1)
100+                        }
101+    adressList
102+    }
103+
104+
105+func calculatePayout (r_player,r_max) = {
106+    let ratio = ((r_player * 100) / r_max)
107+    let payout = ((payoutAmount * ratio) / 100)
108+    if ((0 >= payout))
109+        then 1
110+        else payout
111+    }
112+
113+
114+func calculateNewRating (r_player,r_max,k,actualScore) = {
115+    let ratin_factor = ((r_player * scale) / r_max)
116+    if ((actualScore == 1))
117+        then {
118+            let adjustment = ((k * (100 - ratin_factor)) / scale)
119+            (r_player + adjustment)
120+            }
121+        else {
122+            let adjustment = ((-(k) * (20 + ratin_factor)) / scale)
123+            (r_player + adjustment)
124+            }
125+    }
126+
127+
128+@Callable(i)
129+func adjustRatingsAndPayoutParticipants (itemId,addressList,lastCallerAddress,finalPrediction) = {
130+    let caller = toString(i.caller)
131+    if ((caller != toString(this)))
132+        then throw("You are not allowed to call this function")
133+        else {
134+            func updateRatingsFunc (accum,address) =             {
135+                let rating = searchForRating(address)
136+                let prediction = searchForAddressPrediction(itemId, address)
137+                let actualScore = if ((prediction == finalPrediction))
138+                    then 1
139+                    else 0
140+                let newRating = calculateNewRating(rating, r_max, rateAdjustment, actualScore)
141+                let payout = if ((prediction == finalPrediction))
142+                    then true
143+                    else false
144+                let updatedEntries = (accum :+ IntegerEntry((address + "_rating"), newRating))
145+                let calculatedAmount = calculatePayout(newRating, r_max)
146+                if (payout)
147+                    then (updatedEntries :+ ScriptTransfer(Address(fromBase58String(address)), calculatedAmount, tokenId))
148+                    else updatedEntries
149+                }
150+
151+            let updatedRatings = {
152+                let $l = addressList
153+                let $s = size($l)
154+                let $acc0 = nil
155+                func $f0_1 ($a,$i) =                 if (($i >= $s))
156+                    then $a
157+                    else updateRatingsFunc($a, $l[$i])
158+
159+                func $f0_2 ($a,$i) =                 if (($i >= $s))
160+                    then $a
161+                    else throw("List size exceeds 5")
162+
163+                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
164+                }
165+            (updatedRatings :+ BooleanEntry((itemId + "_adjusted"), true))
166+            }
167+    }
168+
169+
170+
171+@Callable(i)
172+func savePrediction (itemId,prediction) = {
173+    let clientAdress = toString(i.caller)
174+    let searchForUser =     match getInteger((clientAdress + "_rating")) {
175+        case s: Int => 
176+            s
177+        case _ => 
178+            "User does not exist"
179+    }
180+    if ((searchForUser == "User does not exist"))
181+        then throw("User does not exist")
182+        else {
183+            let isFinal =             match getBoolean((itemId + "_final")) {
184+                case s: Boolean => 
185+                    s
186+                case _ => 
187+                    false
188+            }
189+            if (isFinal)
190+                then throw("Final prediction already made")
191+                else {
192+                    let isCanceled =                     match getBoolean((itemId + "_cancelled")) {
193+                        case s: Boolean => 
194+                            s
195+                        case _ => 
196+                            false
197+                    }
198+                    if (isCanceled)
199+                        then throw("Final prediction already made")
200+                        else {
201+                            let clientRating = searchForRating(clientAdress)
202+                            if ((ratingCutoff >= clientRating))
203+                                then throw("You are not allowed to participate anymore")
204+                                else {
205+                                    let searchForCounter =                                     match getInteger((itemId + "_counter")) {
206+                                        case s: Int => 
207+                                            s
208+                                        case _ => 
209+                                            -1
210+                                    }
211+                                    if ((searchForCounter >= 1))
212+                                        then {
213+                                            let adressList = findPredictionAdresses(itemId, searchForCounter)
214+                                            if (containsElement(adressList, clientAdress))
215+                                                then throw("This User already gave a Prediction")
216+                                                else {
217+                                                    let predictionCounter =                                                     match getInteger(((itemId + "_prediction_") + prediction)) {
218+                                                        case s: Int => 
219+                                                            s
220+                                                        case _ => 
221+                                                            404
222+                                                    }
223+                                                    let newCounter = (searchForCounter + 1)
224+                                                    if ((predictionCounter != 404))
225+                                                        then if (((predictionCounter + clientRating) >= predictionMaxCounter))
226+                                                            then {
227+                                                                let newRating = calculateNewRating(clientRating, r_max, rateAdjustment, 1)
228+                                                                let calculatedAmount = calculatePayout(newRating, r_max)
229+                                                                let invokeAdjustRating = invoke(this, "adjustRatingsAndPayoutParticipants", [itemId, adressList, clientAdress, prediction], nil)
230+                                                                if ((invokeAdjustRating != invokeAdjustRating))
231+                                                                    then throw("Strict value is not equal to itself.")
232+                                                                    else [StringEntry(((itemId + "_") + toString(newCounter)), clientAdress), StringEntry(((itemId + "_") + clientAdress), prediction), IntegerEntry(((itemId + "_prediction_") + prediction), (predictionCounter + clientRating)), IntegerEntry((itemId + "_counter"), newCounter), BooleanEntry((itemId + "_final"), true), BooleanEntry((itemId + "_cancelled"), false), DeleteEntry(("updated_" + itemId)), StringEntry(("final_" + itemId), itemId), ScriptTransfer(Address(fromBase58String(clientAdress)), calculatedAmount, tokenId), IntegerEntry((clientAdress + "_rating"), newRating), StringEntry((itemId + "_final_prediction"), prediction)]
233+                                                                }
234+                                                            else if ((newCounter >= maxCounter))
235+                                                                then {
236+                                                                    let newRating = calculateNewRating(clientRating, r_max, rateAdjustment, 1)
237+                                                                    let invokeAdjustRating = invoke(this, "adjustRatingsAndPayoutParticipants", [itemId, adressList, clientAdress, "None"], nil)
238+                                                                    if ((invokeAdjustRating != invokeAdjustRating))
239+                                                                        then throw("Strict value is not equal to itself.")
240+                                                                        else [StringEntry(((itemId + "_") + toString(newCounter)), clientAdress), StringEntry(((itemId + "_") + clientAdress), prediction), IntegerEntry(((itemId + "_prediction_") + prediction), (predictionCounter + clientRating)), IntegerEntry((itemId + "_counter"), newCounter), BooleanEntry((itemId + "_cancelled"), true), BooleanEntry((itemId + "_final"), false), DeleteEntry(("updated_" + itemId)), StringEntry(("final_" + itemId), itemId), IntegerEntry((clientAdress + "_rating"), newRating)]
241+                                                                    }
242+                                                                else [StringEntry(((itemId + "_") + toString(newCounter)), clientAdress), StringEntry(((itemId + "_") + clientAdress), prediction), IntegerEntry(((itemId + "_prediction_") + prediction), (predictionCounter + clientRating)), IntegerEntry((itemId + "_counter"), newCounter), BooleanEntry((itemId + "_final"), false), BooleanEntry((itemId + "_cancelled"), false)]
243+                                                        else if ((newCounter >= maxCounter))
244+                                                            then {
245+                                                                let newRating = calculateNewRating(clientRating, r_max, rateAdjustment, 1)
246+                                                                let invokeAdjustRating = invoke(this, "adjustRatingsAndPayoutParticipants", [itemId, adressList, clientAdress, "None"], nil)
247+                                                                if ((invokeAdjustRating != invokeAdjustRating))
248+                                                                    then throw("Strict value is not equal to itself.")
249+                                                                    else [StringEntry(((itemId + "_") + toString(newCounter)), clientAdress), StringEntry(((itemId + "_") + clientAdress), prediction), IntegerEntry(((itemId + "_prediction_") + prediction), clientRating), IntegerEntry((itemId + "_counter"), newCounter), BooleanEntry((itemId + "_cancelled"), true), BooleanEntry((itemId + "_final"), false), DeleteEntry(("updated_" + itemId)), StringEntry(("final_" + itemId), itemId), IntegerEntry((clientAdress + "_rating"), newRating)]
250+                                                                }
251+                                                            else [StringEntry(((itemId + "_") + toString(newCounter)), clientAdress), StringEntry(((itemId + "_") + clientAdress), prediction), IntegerEntry(((itemId + "_prediction_") + prediction), clientRating), IntegerEntry((itemId + "_counter"), newCounter), BooleanEntry((itemId + "_cancelled"), false), BooleanEntry((itemId + "_final"), false)]
252+                                                    }
253+                                            }
254+                                        else {
255+                                            let searchForNewItem =                                             match getString(("new_" + itemId)) {
256+                                                case s: String => 
257+                                                    s
258+                                                case _ => 
259+                                                    "Item not Found"
260+                                            }
261+                                            if ((searchForNewItem == "Item not Found"))
262+                                                then throw("Item not found")
263+                                                else [StringEntry(((itemId + "_") + toString(1)), clientAdress), StringEntry(((itemId + "_") + clientAdress), prediction), IntegerEntry((itemId + "_counter"), 1), IntegerEntry(((itemId + "_prediction_") + prediction), 1), DeleteEntry(("new_" + itemId)), StringEntry(("updated_" + itemId), itemId)]
264+                                            }
265+                                    }
266+                            }
267+                    }
268+            }
269+    }
270+
271+
272+
273+@Callable(i)
274+func registerUser () = {
275+    let clientAdress = toString(i.caller)
276+    let searchForUser =     match getInteger((clientAdress + "_rating")) {
277+        case s: Int => 
278+            s
279+        case _ => 
280+            -1
281+    }
282+    if ((searchForUser != -1))
283+        then throw("User already exists")
284+        else [IntegerEntry((clientAdress + "_rating"), defaultRating)]
285+    }
286+
287+
288+@Verifier(tx)
289+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
290+
github/deemru/w8io/026f985 
19.53 ms ◑