tx · BnnkbuXfnr18GZwqx7W4RJkEGZuD4eCk4ogdWtF4RGPE

3MxSzxLFZ1nfwaWFZ67Bf2fAasEuuJquWoX:  -0.01000000 Waves

2023.10.30 17:50 [2821516] smart account 3MxSzxLFZ1nfwaWFZ67Bf2fAasEuuJquWoX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BnnkbuXfnr18GZwqx7W4RJkEGZuD4eCk4ogdWtF4RGPE",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1698677501773,
    "version": 1,
    "sender": "3MxSzxLFZ1nfwaWFZ67Bf2fAasEuuJquWoX",
    "senderPublicKey": "5rEdgYaXznnkarSYFgDZuDgjBfUzz6eThxHA51P3tBkm",
    "proofs": [
        "3K3u56mehGEmT48Kdgcx3KMY44dkjt1Q3w1oKrZ5VfHywaZDmABG3ByJ9rkWz9PhBZXyf7MAmjR9YMfeiJtKeFJk"
    ],
    "script": "base64:BgIaCAISBgoECAgBCBIDCgEEEgMKAQgSBAoCCAJBAANTRVACAl9fAAdXQVZFU0lEAQQTq9kzAAZXQVZFU0QAgMLXLwEMZ2V0U3RyT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABDGdldEludE9yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQ1nZXRCb29sT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCbCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgAAEGFsbG93ZWRBc3NldHNLZXkCGCVzJXNfX2NmZ19fYWxsb3dlZEFzc2V0cwARYXNzZXRzRGVjaW1hbHNLZXkCGSVzJXNfX2NmZ19fYXNzZXRzRGVjaW1hbHMADmJldERpdmlkZXJzS2V5AhwlcyVzX19jZmdfX2Fzc2V0c0JldERpdmlkZXJzAA5SU0FQVUJMSUM2NEtFWQIWJXMlc19fY2ZnX19yc2FQdWJsaWM2NAAQU0VSVkVSQUREUkVTU0tFWQIWJXMlc19fY2ZnX19iZW56QWRkcmVzcwAQUkFORFRJTUVGUkFNRUtFWQIcJXMlc19fY2ZnX193aXRoZHJhd1RpbWVGcmFtZQAPR0FNRVNDT1VOVEVSS0VZAhYlcyVzX19ydW50aW1lX19nYW1lTnVtAApibG9ja2VkS2V5AiAlcyVzX19ydW50aW1lX19jb250cmFjdElzQmxvY2tlZAAScmVzZXJ2ZWRBbW91bnRzS2V5Ah4lcyVzX19ydW50aW1lX19yZXNlcnZlZEFtb3VudHMBC2dldEludEFycmF5AQNrZXkEAWEJAQxnZXRTdHJPckZhaWwCBQR0aGlzBQNrZXkKAQZmaWxsZXICA2FjYwJlbAkAzQgCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUCZWwKAAIkbAkAtQkCBQFhBQNTRVAKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmZpbGxlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgEJZ2V0QXNzZXRzAAkAtQkCCQEMZ2V0U3RyT3JGYWlsAgUEdGhpcwUQYWxsb3dlZEFzc2V0c0tleQUDU0VQAAZBU1NFVFMJAQlnZXRBc3NldHMAAAhERUNJTUFMUwkBC2dldEludEFycmF5AQURYXNzZXRzRGVjaW1hbHNLZXkAC0JFVERJVklERVJTCQELZ2V0SW50QXJyYXkBBQ5iZXREaXZpZGVyc0tleQETUkVTRVJWQVRJT05LRVlCWVNUUgEIYXNzZXRTdHIJAKwCAgIRJFJFU0VSVkVEX0FNT1VOVF8FCGFzc2V0U3RyAQ5SRVNFUlZBVElPTktFWQEIYXNzZXRJZHgJARNSRVNFUlZBVElPTktFWUJZU1RSAQkAkQMCBQZBU1NFVFMFCGFzc2V0SWR4AAtNSU5GRUVXQVZFUwkAaQIJAGgCAAUFBldBVkVTRADoBwAJaWR4QXNzZXRzAAAAC2lkeERlY2ltYWxzAAEAC2lkeERpdmlkZXJzAAIADmlkeFJlc2VydmF0aW9uAAMABEJFVDEAAQAEQkVUMgACAARCRVQ0AAQABEJFVDgACAAFQkVUMTQADgAIUkFURU1VTFQAkE4ABFJBVEUAuJQBAARCRVRTCQDMCAIFBEJFVDEJAMwIAgUEQkVUMgkAzAgCBQRCRVQ0CQDMCAIFBEJFVDgJAMwIAgUFQkVUMTQFA25pbAAMSWR4R2FtZVN0YXRlAAAAD0lkeFBsYXllckNob2ljZQABABFJZHhQbGF5ZXJQdWJLZXk1OAACABBJZHhTdGFydGVkSGVpZ2h0AAMADElkeFdpbkFtb3VudAAEAApJZHhBc3NldElkAAUADlNUQVRFU1VCTUlUVEVEAglTVUJNSVRURUQACFNUQVRFV09OAgNXT04ACVNUQVRFTE9TVAIETE9TVAEPZ2V0U3RyaW5nT3JGYWlsAQNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQNrZXkJAKwCAgUDa2V5AiMga2V5IGlzIG5vdCBzcGVjaWZpZWQgaW4gdGhpcy5zdGF0ZQAJUlNBUFVCTElDCQDbBAEJAQ9nZXRTdHJpbmdPckZhaWwBBQ5SU0FQVUJMSUM2NEtFWQAGU0VSVkVSCQERQGV4dHJOYXRpdmUoMTA2MikBCQEPZ2V0U3RyaW5nT3JGYWlsAQUQU0VSVkVSQUREUkVTU0tFWQATUkFORE9SQUNMRVRJTUVGUkFNRQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBRBSQU5EVElNRUZSQU1FS0VZAKA4AQhnZXRJbnRPcgIDa2V5B2RlZmF1bHQDCQEJaXNEZWZpbmVkAQkAnwgBBQNrZXkJARFAZXh0ck5hdGl2ZSgxMDU1KQEFA2tleQUHZGVmYXVsdAEGc2V0SW50AgNrZXkFdmFsdWUJAQxJbnRlZ2VyRW50cnkCBQNrZXkFBXZhbHVlAQxpbmNyZW1lbnRJbnQBA2tleQkBBnNldEludAIFA2tleQkAZAIJAQhnZXRJbnRPcgIFA2tleQD///////////8BAAEBCWNoYW5nZUludAIDa2V5AmJ5CQEGc2V0SW50AgUDa2V5CQBkAgkBCGdldEludE9yAgUDa2V5AAAFAmJ5AQxhc3NldElkVG9TdHIBDWFzc2V0SWRPclVuaXQEByRtYXRjaDAFDWFzc2V0SWRPclVuaXQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBYgUHJG1hdGNoMAkA2AQBBQFiAgVXQVZFUwEOYXNzZXRJZEZyb21TdHIBCmFzc2V0SWRTdHIDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMFBHVuaXQJANkEAQUKYXNzZXRJZFN0cgEPZ2V0QXNzZXRCYWxhbmNlAQ1hc3NldElkT3JVbml0BAckbWF0Y2gwBQ1hc3NldElkT3JVbml0AwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEB2Fzc2V0SWQFByRtYXRjaDAJAPAHAgUEdGhpcwUHYXNzZXRJZAgJAO8HAQUEdGhpcwlhdmFpbGFibGUBFWluY3JlYXNlUmVzZXJ2ZUFtb3VudAIJd2luQW1vdW50CGFzc2V0SWR4BAphc3NldElkU3RyCQCRAwIFBkFTU0VUUwUIYXNzZXRJZHgEEW5ld1Jlc2VydmVkQW1vdW50CQBkAgkBCGdldEludE9yAgkBDlJFU0VSVkFUSU9OS0VZAQUIYXNzZXRJZHgAAAUJd2luQW1vdW50AwkAZgIFEW5ld1Jlc2VydmVkQW1vdW50CQEPZ2V0QXNzZXRCYWxhbmNlAQkBDmFzc2V0SWRGcm9tU3RyAQUKYXNzZXRJZFN0cgkAAgECVEluc3VmZmljaWVudCBmdW5kcyBvbiBEaWNlIFJvbGxlciBhY2NvdW50LiBUcmFuc2FjdGlvbiB3YXMgcmVqZWN0ZWQgZm9yIHlvdXIgc2FmZXR5LgURbmV3UmVzZXJ2ZWRBbW91bnQBFmRlY3JlYXNlUmVzZXJ2ZWRBbW91bnQDBmdhbWVJZAhhc3NldElkeAl3aW5BbW91bnQDCQBmAgAACQBlAgkBCGdldEludE9yAgkBDlJFU0VSVkFUSU9OS0VZAQUIYXNzZXRJZHgAAAUJd2luQW1vdW50CQACAQJCSW52YWxpZCBEaWNlIFJvbGxlciBhY2NvdW50IHN0YXRlIC0gcmVzZXJ2ZWQgYW1vdW50IGlzIGxlc3MgdGhhbiAwCQEJY2hhbmdlSW50AgkBDlJFU0VSVkFUSU9OS0VZAQUIYXNzZXRJZHgJAQEtAQUJd2luQW1vdW50ARZ2YWxpZGF0ZUFuZEdldEFzc2V0SWR4AQphc3NldElkU3RyBANpZHgJAM8IAgUGQVNTRVRTBQphc3NldElkU3RyAwkBASEBCQEJaXNEZWZpbmVkAQUDaWR4CQACAQIVSW52YWxpZCBwYXltZW50IGFzc2V0CQEFdmFsdWUBBQNpZHgBGnZhbGlkYXRlQmV0QW5kR2V0V2luQW1vdW50AwNiZXQQaW50ZXJuYWxBc3NldElkeAxwbGF5ZXJDaG9pY2UECmRpY2VzQ291bnQJALECAQUMcGxheWVyQ2hvaWNlCgELY2hlY2tBbW91bnQCAWEBeAMFAWEGCQAAAgUDYmV0CQBpAgkAaAIFAXgJAJEDAgUIREVDSU1BTFMFEGludGVybmFsQXNzZXRJZHgJAJEDAgULQkVURElWSURFUlMFEGludGVybmFsQXNzZXRJZHgDCQEBIQEKAAIkbAUEQkVUUwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAHCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQtjaGVja0Ftb3VudAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUJAAIBAhdCZXQgYW1vdW50IGlzIG5vdCB2YWxpZAMJAAACCQC2CQEFDHBsYXllckNob2ljZQUEdW5pdAkAAgECF0ludmFsaWQgcGxheWVyJ3MgY2hvaWNlAwkBAiE9AgUKZGljZXNDb3VudAABCQACAQIhSW52YWxpZCBsZW5ndGggb2YgcGxheWVyJ3MgY2hvaWNlCQBpAgkAaAIFA2JldAUEUkFURQUIUkFURU1VTFQBEmdlbmVyYXRlUmFuZENob2lzZQIGZ2FtZUlkB3JzYVNpZ24EC3JzYVNpZ1ZhbGlkCQCoFAQFBlNIQTI1NgkAmwMBBQZnYW1lSWQFB3JzYVNpZ24FCVJTQVBVQkxJQwMJAQEhAQULcnNhU2lnVmFsaWQJAAIBAhVJbnZhbGlkIFJTQSBzaWduYXR1cmUEBHJhbmQJAGoCCQCxCQEJAPcDAQUHcnNhU2lnbgACBAZyZXN1bHQDCQBmAgAABQRyYW5kCQBoAgD///////////8BBQRyYW5kBQRyYW5kCQCkAwEFBnJlc3VsdAELaXNQbGF5ZXJXaW4CDHBsYXllckNob2ljZQpyYW5kQ2hvaXNlBAFzCQCxAgEFDHBsYXllckNob2ljZQMJAAACBQFzAAEJAAACBQxwbGF5ZXJDaG9pY2UFCnJhbmRDaG9pc2UHAQ9mb3JtYXRHYW1lRGF0YVMHCmdhbWVTdGF0dXMMcGxheWVyQ2hvaWNlDnBsYXllclB1YktleTU4DXN0YXJ0ZWRIZWlnaHQJd2luQW1vdW50CGFzc2V0SWR4C3JhbmRPckVtcHR5CQC5CQIJAMwIAgUKZ2FtZVN0YXR1cwkAzAgCBQxwbGF5ZXJDaG9pY2UJAMwIAgUOcGxheWVyUHViS2V5NTgJAMwIAgUNc3RhcnRlZEhlaWdodAkAzAgCBQl3aW5BbW91bnQJAMwIAgUIYXNzZXRJZHgJAMwIAgMJAAACBQtyYW5kT3JFbXB0eQIAAgAFC3JhbmRPckVtcHR5BQNuaWwCAV8BDmZvcm1hdEdhbWVEYXRhBwpnYW1lU3RhdHVzDHBsYXllckNob2ljZQ5wbGF5ZXJQdWJLZXk1OA1zdGFydGVkSGVpZ2h0CXdpbkFtb3VudAhhc3NldElkeAtyYW5kT3JFbXB0eQkBD2Zvcm1hdEdhbWVEYXRhUwcFCmdhbWVTdGF0dXMFDHBsYXllckNob2ljZQUOcGxheWVyUHViS2V5NTgJAKQDAQUNc3RhcnRlZEhlaWdodAkApAMBBQl3aW5BbW91bnQJAKQDAQUIYXNzZXRJZHgFC3JhbmRPckVtcHR5AQ5maW5pc2hHYW1lRGF0YQQMb3JpZ0dhbWVEYXRhCmdhbWVTdGF0dXMEcmFuZAx3aW5CeVRpbWVvdXQEDmZpbmlzaEdhbWVEYXRhCQEPZm9ybWF0R2FtZURhdGFTBwUKZ2FtZVN0YXR1cwkAkQMCBQxvcmlnR2FtZURhdGEFD0lkeFBsYXllckNob2ljZQkAkQMCBQxvcmlnR2FtZURhdGEFEUlkeFBsYXllclB1YktleTU4CQCRAwIFDG9yaWdHYW1lRGF0YQUQSWR4U3RhcnRlZEhlaWdodAkAkQMCBQxvcmlnR2FtZURhdGEFDElkeFdpbkFtb3VudAkAkQMCBQxvcmlnR2FtZURhdGEFCklkeEFzc2V0SWQFBHJhbmQDBQx3aW5CeVRpbWVvdXQJAKwCAgUOZmluaXNoR2FtZURhdGECCF9USU1FT1VUBQ5maW5pc2hHYW1lRGF0YQEPZXh0cmFjdEdhbWVEYXRhAQZnYW1lSWQJALUJAgQHJG1hdGNoMAkAnQgCBQR0aGlzBQZnYW1lSWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBANzdHIFByRtYXRjaDAFA3N0cgkAAgEJAKwCAgkArAICAgZHYW1lOiAFBmdhbWVJZAILIG5vdCBmb3VuZC4CAV8EAWkBDWNvbnN0cnVjdG9yVjEEC3JzYVB1YmxpYzY0C2JlbnpBZGRyZXNzE3JhbmRPcmFjbGVUaW1lRnJhbWUQdG9rZW5zRGVzY3JpcHRvcgMJAQIhPQIIBQFpBmNhbGxlcgUGU0VSVkVSCQACAQIObm90IGF1dGhvcml6ZWQKAQhzcGxpdHRlcgIDYWNjBGVsZW0EB3Rva0xpc3QJALUJAgUEZWxlbQIBOgMJAQIhPQIJAJADAQUHdG9rTGlzdAAECQACAQIUSW52YWxpZCBhc3NldCByZWNvcmQJAJUKAwkAzQgCCAUDYWNjAl8xCQCRAwIFB3Rva0xpc3QFCWlkeEFzc2V0cwkAzQgCCAUDYWNjAl8yCQCRAwIFB3Rva0xpc3QFC2lkeERlY2ltYWxzCQDNCAIIBQNhY2MCXzMJAJEDAgUHdG9rTGlzdAULaWR4RGl2aWRlcnMEAXIKAAIkbAkAvAkCBRB0b2tlbnNEZXNjcmlwdG9yAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEBQNuaWwFA25pbAUDbmlsBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCHNwbGl0dGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQDMCAIJAQtTdHJpbmdFbnRyeQIFDlJTQVBVQkxJQzY0S0VZBQtyc2FQdWJsaWM2NAkAzAgCCQELU3RyaW5nRW50cnkCBRBTRVJWRVJBRERSRVNTS0VZBQtiZW56QWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgUQUkFORFRJTUVGUkFNRUtFWQUTcmFuZE9yYWNsZVRpbWVGcmFtZQkAzAgCCQELU3RyaW5nRW50cnkCBRBhbGxvd2VkQXNzZXRzS2V5CQC6CQIIBQFyAl8xAgFfCQDMCAIJAQtTdHJpbmdFbnRyeQIFEWFzc2V0c0RlY2ltYWxzS2V5CQC5CQIIBQFyAl8yAgFfCQDMCAIJAQtTdHJpbmdFbnRyeQIFDmJldERpdmlkZXJzS2V5CQC5CQIIBQFyAl8zAgFfCQDMCAIJAQtTdHJpbmdFbnRyeQIFEnJlc2VydmVkQW1vdW50c0tleQkAugkCCAUBcgJfNAIBOgUDbmlsAWkBC21haW50ZW5hbmNlAQdibG9ja2VkAwkBAiE9AggFAWkGY2FsbGVyBQZTRVJWRVIJAAIBAg5ub3QgYXV0aG9yaXplZAkAzAgCCQEMQm9vbGVhbkVudHJ5AgUKYmxvY2tlZEtleQUHYmxvY2tlZAUDbmlsAWkBA2JldAEMcGxheWVyQ2hvaWNlAwkBC3ZhbHVlT3JFbHNlAgkAoAgBBQpibG9ja2VkS2V5BwkAAgECH0dhbWUgaXMgc3RvcHBlZCBmb3IgbWFpbnRlbmVuY2UEBmdhbWVJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkAwkAZwIAAQkAkAMBCAUBaQhwYXltZW50cwkAAgECGzIgcGF5bWVudHMgbXVzdCBiZSBhdHRhY2hlZAMJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMFBmdhbWVJZAkAAgEJAKwCAgkArAICAglCZXQgZm9yOiAFBmdhbWVJZAISIHdhcyBhbHJlYWR5IG1hZGUuBAZiZXRQbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQGZmVlUG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAEDCQEJaXNEZWZpbmVkAQgFBmZlZVBtdAdhc3NldElkCQACAQItZmVlUG10ICgybmQgcGF5bWVudCkgYXNzZXRJZCBtdXN0IGJlIGluIFdhdmVzAwkAZgIFC01JTkZFRVdBVkVTCAUGZmVlUG10BmFtb3VudAkAAgECK2ZlZVBtdCAoMm5kIHBheW1lbnQpIG11c3QgYmUgPj0gMC4wMDUgV2F2ZXMECmFzc2V0SWRTdHIJAQxhc3NldElkVG9TdHIBCAUGYmV0UG10B2Fzc2V0SWQEEGludGVybmFsQXNzZXRJZHgJARZ2YWxpZGF0ZUFuZEdldEFzc2V0SWR4AQUKYXNzZXRJZFN0cgQKY29tbWlzc2lvbggFBmZlZVBtdAZhbW91bnQECXdpbkFtb3VudAkBGnZhbGlkYXRlQmV0QW5kR2V0V2luQW1vdW50AwgFBmJldFBtdAZhbW91bnQFEGludGVybmFsQXNzZXRJZHgFDHBsYXllckNob2ljZQQOcGxheWVyUHViS2V5NTgJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5BAhnYW1lRGF0YQkBDmZvcm1hdEdhbWVEYXRhBwUOU1RBVEVTVUJNSVRURUQFDHBsYXllckNob2ljZQUOcGxheWVyUHViS2V5NTgFBmhlaWdodAUJd2luQW1vdW50BRBpbnRlcm5hbEFzc2V0SWR4AgAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ5SRVNFUlZBVElPTktFWQEFEGludGVybmFsQXNzZXRJZHgJARVpbmNyZWFzZVJlc2VydmVBbW91bnQCBQl3aW5BbW91bnQFEGludGVybmFsQXNzZXRJZHgJAMwIAgkBDGluY3JlbWVudEludAEFD0dBTUVTQ09VTlRFUktFWQkAzAgCCQELU3RyaW5nRW50cnkCBQZnYW1lSWQFCGdhbWVEYXRhCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBlNFUlZFUgUKY29tbWlzc2lvbggFBmZlZVBtdAdhc3NldElkBQNuaWwBaQEId2l0aGRyYXcCBmdhbWVJZAdyc2FTaWduBAhnYW1lRGF0YQkBD2V4dHJhY3RHYW1lRGF0YQEFBmdhbWVJZAQJZ2FtZVN0YXRlCQCRAwIFCGdhbWVEYXRhBQxJZHhHYW1lU3RhdGUEDHBsYXllckNob2ljZQkAkQMCBQhnYW1lRGF0YQUPSWR4UGxheWVyQ2hvaWNlBA1zdGFydGVkSGVpZ2h0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIZ2FtZURhdGEFEElkeFN0YXJ0ZWRIZWlnaHQECXdpbkFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCGdhbWVEYXRhBQxJZHhXaW5BbW91bnQECGFzc2V0SWR4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIZ2FtZURhdGEFCklkeEFzc2V0SWQEDnBsYXllclB1YktleTU4CQCRAwIFCGdhbWVEYXRhBRFJZHhQbGF5ZXJQdWJLZXk1OAQNcGxheWVyQWRkcmVzcwkApwgBCQDZBAEFDnBsYXllclB1YktleTU4AwkBAiE9AgUJZ2FtZVN0YXRlBQ5TVEFURVNVQk1JVFRFRAkAAgECJEludmFsaWQgZ2FtZSBzdGF0ZSBmb3IgcGFzc2VkIGdhbWVJZAMJAQIhPQIIBQFpBmNhbGxlcgUGU0VSVkVSCQACAQIrUmVndWxhciB3aXRoZHJhdyBjYW4gYmUgZG9uZSBieSBzZXJ2ZXIgb25seQQMd2luQnlUaW1lb3V0CQBmAgkAZQIFBmhlaWdodAUNc3RhcnRlZEhlaWdodAUTUkFORE9SQUNMRVRJTUVGUkFNRQQKcmFuZENob2lzZQMFDHdpbkJ5VGltZW91dAUMcGxheWVyQ2hvaWNlCQESZ2VuZXJhdGVSYW5kQ2hvaXNlAgUGZ2FtZUlkBQdyc2FTaWduBAlwbGF5ZXJXaW4JAQtpc1BsYXllcldpbgIFDHBsYXllckNob2ljZQUKcmFuZENob2lzZQQNbmV3R2FtZVN0YXR1cwMFCXBsYXllcldpbgUIU1RBVEVXT04FCVNUQVRFTE9TVAQLbmV3R2FtZURhdGEJAQ5maW5pc2hHYW1lRGF0YQQFCGdhbWVEYXRhBQ1uZXdHYW1lU3RhdHVzBQpyYW5kQ2hvaXNlBQx3aW5CeVRpbWVvdXQJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQZnYW1lSWQFC25ld0dhbWVEYXRhCQDMCAIJARZkZWNyZWFzZVJlc2VydmVkQW1vdW50AwUGZ2FtZUlkBQhhc3NldElkeAUJd2luQW1vdW50BQNuaWwDBQlwbGF5ZXJXaW4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUNcGxheWVyQWRkcmVzcwUJd2luQW1vdW50CQEOYXNzZXRJZEZyb21TdHIBCQCRAwIFBkFTU0VUUwUIYXNzZXRJZHgFA25pbAUDbmlsAQJ0eAEGdmVyaWZ5AAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXkEByRtYXRjaDAFAnR4AwkAAQIFByRtYXRjaDACE1RyYW5zZmVyVHJhbnNhY3Rpb24EA3R0eAUHJG1hdGNoMAQIYXNzZXRJZHgJARZ2YWxpZGF0ZUFuZEdldEFzc2V0SWR4AQkBDGFzc2V0SWRUb1N0cgEIBQN0dHgHYXNzZXRJZAkAZwIJAGUCCQEPZ2V0QXNzZXRCYWxhbmNlAQgFA3R0eAdhc3NldElkCAUDdHR4BmFtb3VudAkBCGdldEludE9yAgkBDlJFU0VSVkFUSU9OS0VZAQUIYXNzZXRJZHgAAAMJAAECBQckbWF0Y2gwAhRTZXRTY3JpcHRUcmFuc2FjdGlvbgQDc3R4BQckbWF0Y2gwCgEHY2hlY2tlcgIDYWNjAmVsAwUDYWNjCQAAAgkBCGdldEludE9yAgkBE1JFU0VSVkFUSU9OS0VZQllTVFIBBQJlbAAAAAAHCgACJGwFBkFTU0VUUwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAGCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjaGVja2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBweO1sJz",
    "chainId": 84,
    "height": 2821516,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: none

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let SEP = "__"
5+
6+let WAVESID = base58'WAVES'
7+
8+let WAVESD = 100000000
9+
10+func getStrOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
11+
12+
13+func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
14+
15+
16+func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
17+
18+
19+let allowedAssetsKey = "%s%s__cfg__allowedAssets"
20+
21+let assetsDecimalsKey = "%s%s__cfg__assetsDecimals"
22+
23+let betDividersKey = "%s%s__cfg__assetsBetDividers"
24+
25+let RSAPUBLIC64KEY = "%s%s__cfg__rsaPublic64"
26+
27+let SERVERADDRESSKEY = "%s%s__cfg__benzAddress"
28+
29+let RANDTIMEFRAMEKEY = "%s%s__cfg__withdrawTimeFrame"
30+
31+let GAMESCOUNTERKEY = "%s%s__runtime__gameNum"
32+
33+let blockedKey = "%s%s__runtime__contractIsBlocked"
34+
35+let reservedAmountsKey = "%s%s__runtime__reservedAmounts"
36+
37+func getIntArray (key) = {
38+    let a = getStrOrFail(this, key)
39+    func filler (acc,el) =     (acc :+ parseIntValue(el))
40+
41+    let $l = split(a, SEP)
42+    let $s = size($l)
43+    let $acc0 = nil
44+    func $f0_1 ($a,$i) =     if (($i >= $s))
45+        then $a
46+        else filler($a, $l[$i])
47+
48+    func $f0_2 ($a,$i) =     if (($i >= $s))
49+        then $a
50+        else throw("List size exceeds 10")
51+
52+    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
53+    }
54+
55+
56+func getAssets () = split(getStrOrFail(this, allowedAssetsKey), SEP)
57+
58+
59+let ASSETS = getAssets()
60+
61+let DECIMALS = getIntArray(assetsDecimalsKey)
62+
63+let BETDIVIDERS = getIntArray(betDividersKey)
64+
65+func RESERVATIONKEYBYSTR (assetStr) = ("$RESERVED_AMOUNT_" + assetStr)
66+
67+
68+func RESERVATIONKEY (assetIdx) = RESERVATIONKEYBYSTR(ASSETS[assetIdx])
69+
70+
71+let MINFEEWAVES = ((5 * WAVESD) / 1000)
72+
73+let idxAssets = 0
74+
75+let idxDecimals = 1
76+
77+let idxDividers = 2
78+
79+let idxReservation = 3
80+
81+let BET1 = 1
82+
83+let BET2 = 2
84+
85+let BET4 = 4
86+
87+let BET8 = 8
88+
89+let BET14 = 14
90+
91+let RATEMULT = 10000
92+
93+let RATE = 19000
94+
95+let BETS = [BET1, BET2, BET4, BET8, BET14]
96+
97+let IdxGameState = 0
98+
99+let IdxPlayerChoice = 1
100+
101+let IdxPlayerPubKey58 = 2
102+
103+let IdxStartedHeight = 3
104+
105+let IdxWinAmount = 4
106+
107+let IdxAssetId = 5
108+
109+let STATESUBMITTED = "SUBMITTED"
110+
111+let STATEWON = "WON"
112+
113+let STATELOST = "LOST"
114+
115+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (key + " key is not specified in this.state"))
116+
117+
118+let RSAPUBLIC = fromBase64String(getStringOrFail(RSAPUBLIC64KEY))
119+
120+let SERVER = addressFromStringValue(getStringOrFail(SERVERADDRESSKEY))
121+
122+let RANDORACLETIMEFRAME = valueOrElse(getInteger(this, RANDTIMEFRAMEKEY), 7200)
123+
124+func getIntOr (key,default) = if (isDefined(getInteger(key)))
125+    then getIntegerValue(key)
126+    else default
127+
128+
129+func setInt (key,value) = IntegerEntry(key, value)
130+
131+
132+func incrementInt (key) = setInt(key, (getIntOr(key, -1) + 1))
133+
134+
135+func changeInt (key,by) = setInt(key, (getIntOr(key, 0) + by))
136+
137+
138+func assetIdToStr (assetIdOrUnit) = match assetIdOrUnit {
139+    case b: ByteVector => 
140+        toBase58String(b)
141+    case _ => 
142+        "WAVES"
143+}
144+
145+
146+func assetIdFromStr (assetIdStr) = if ((assetIdStr == "WAVES"))
147+    then unit
148+    else fromBase58String(assetIdStr)
149+
150+
151+func getAssetBalance (assetIdOrUnit) = match assetIdOrUnit {
152+    case assetId: ByteVector => 
153+        assetBalance(this, assetId)
154+    case _ => 
155+        wavesBalance(this).available
156+}
157+
158+
159+func increaseReserveAmount (winAmount,assetIdx) = {
160+    let assetIdStr = ASSETS[assetIdx]
161+    let newReservedAmount = (getIntOr(RESERVATIONKEY(assetIdx), 0) + winAmount)
162+    if ((newReservedAmount > getAssetBalance(assetIdFromStr(assetIdStr))))
163+        then throw("Insufficient funds on Dice Roller account. Transaction was rejected for your safety.")
164+        else newReservedAmount
165+    }
166+
167+
168+func decreaseReservedAmount (gameId,assetIdx,winAmount) = if ((0 > (getIntOr(RESERVATIONKEY(assetIdx), 0) - winAmount)))
169+    then throw("Invalid Dice Roller account state - reserved amount is less than 0")
170+    else changeInt(RESERVATIONKEY(assetIdx), -(winAmount))
171+
172+
173+func validateAndGetAssetIdx (assetIdStr) = {
174+    let idx = indexOf(ASSETS, assetIdStr)
175+    if (!(isDefined(idx)))
176+        then throw("Invalid payment asset")
177+        else value(idx)
178+    }
179+
180+
181+func validateBetAndGetWinAmount (bet,internalAssetIdx,playerChoice) = {
182+    let dicesCount = size(playerChoice)
183+    func checkAmount (a,x) =     if (a)
184+        then true
185+        else (bet == ((x * DECIMALS[internalAssetIdx]) / BETDIVIDERS[internalAssetIdx]))
186+
187+    if (!({
188+        let $l = BETS
189+        let $s = size($l)
190+        let $acc0 = false
191+        func $f0_1 ($a,$i) =         if (($i >= $s))
192+            then $a
193+            else checkAmount($a, $l[$i])
194+
195+        func $f0_2 ($a,$i) =         if (($i >= $s))
196+            then $a
197+            else throw("List size exceeds 5")
198+
199+        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
200+        }))
201+        then throw("Bet amount is not valid")
202+        else if ((parseInt(playerChoice) == unit))
203+            then throw("Invalid player's choice")
204+            else if ((dicesCount != 1))
205+                then throw("Invalid length of player's choice")
206+                else ((bet * RATE) / RATEMULT)
207+    }
208+
209+
210+func generateRandChoise (gameId,rsaSign) = {
211+    let rsaSigValid = rsaVerify_16Kb(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
212+    if (!(rsaSigValid))
213+        then throw("Invalid RSA signature")
214+        else {
215+            let rand = (toInt(sha256(rsaSign)) % 2)
216+            let result = if ((0 > rand))
217+                then (-1 * rand)
218+                else rand
219+            toString(result)
220+            }
221+    }
222+
223+
224+func isPlayerWin (playerChoice,randChoise) = {
225+    let s = size(playerChoice)
226+    if ((s == 1))
227+        then (playerChoice == randChoise)
228+        else false
229+    }
230+
231+
232+func formatGameDataS (gameStatus,playerChoice,playerPubKey58,startedHeight,winAmount,assetIdx,randOrEmpty) = makeString([gameStatus, playerChoice, playerPubKey58, startedHeight, winAmount, assetIdx, if ((randOrEmpty == ""))
233+    then ""
234+    else randOrEmpty], "_")
235+
236+
237+func formatGameData (gameStatus,playerChoice,playerPubKey58,startedHeight,winAmount,assetIdx,randOrEmpty) = formatGameDataS(gameStatus, playerChoice, playerPubKey58, toString(startedHeight), toString(winAmount), toString(assetIdx), randOrEmpty)
238+
239+
240+func finishGameData (origGameData,gameStatus,rand,winByTimeout) = {
241+    let finishGameData = formatGameDataS(gameStatus, origGameData[IdxPlayerChoice], origGameData[IdxPlayerPubKey58], origGameData[IdxStartedHeight], origGameData[IdxWinAmount], origGameData[IdxAssetId], rand)
242+    if (winByTimeout)
243+        then (finishGameData + "_TIMEOUT")
244+        else finishGameData
245+    }
246+
247+
248+func extractGameData (gameId) = split(match getString(this, gameId) {
249+    case str: String => 
250+        str
251+    case _ => 
252+        throw((("Game: " + gameId) + " not found."))
253+}, "_")
254+
255+
256+@Callable(i)
257+func constructorV1 (rsaPublic64,benzAddress,randOracleTimeFrame,tokensDescriptor) = if ((i.caller != SERVER))
258+    then throw("not authorized")
259+    else {
260+        func splitter (acc,elem) =         {
261+            let tokList = split(elem, ":")
262+            if ((size(tokList) != 4))
263+                then throw("Invalid asset record")
264+                else $Tuple3((acc._1 :+ tokList[idxAssets]), (acc._2 :+ tokList[idxDecimals]), (acc._3 :+ tokList[idxDividers]))
265+            }
266+
267+        let r = {
268+            let $l = split_4C(tokensDescriptor, "_")
269+            let $s = size($l)
270+            let $acc0 = $Tuple4(nil, nil, nil, nil)
271+            func $f0_1 ($a,$i) =             if (($i >= $s))
272+                then $a
273+                else splitter($a, $l[$i])
274+
275+            func $f0_2 ($a,$i) =             if (($i >= $s))
276+                then $a
277+                else throw("List size exceeds 10")
278+
279+            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
280+            }
281+[StringEntry(RSAPUBLIC64KEY, rsaPublic64), StringEntry(SERVERADDRESSKEY, benzAddress), IntegerEntry(RANDTIMEFRAMEKEY, randOracleTimeFrame), StringEntry(allowedAssetsKey, makeString_2C(r._1, "_")), StringEntry(assetsDecimalsKey, makeString(r._2, "_")), StringEntry(betDividersKey, makeString(r._3, "_")), StringEntry(reservedAmountsKey, makeString_2C(r._4, ":"))]
282+        }
283+
284+
285+
286+@Callable(i)
287+func maintenance (blocked) = if ((i.caller != SERVER))
288+    then throw("not authorized")
289+    else [BooleanEntry(blockedKey, blocked)]
290+
291+
292+
293+@Callable(i)
294+func bet (playerChoice) = if (valueOrElse(getBoolean(blockedKey), false))
295+    then throw("Game is stopped for maintenence")
296+    else {
297+        let gameId = toBase58String(i.transactionId)
298+        if ((1 >= size(i.payments)))
299+            then throw("2 payments must be attached")
300+            else if (isDefined(getString(this, gameId)))
301+                then throw((("Bet for: " + gameId) + " was already made."))
302+                else {
303+                    let betPmt = value(i.payments[0])
304+                    let feePmt = value(i.payments[1])
305+                    if (isDefined(feePmt.assetId))
306+                        then throw("feePmt (2nd payment) assetId must be in Waves")
307+                        else if ((MINFEEWAVES > feePmt.amount))
308+                            then throw("feePmt (2nd payment) must be >= 0.005 Waves")
309+                            else {
310+                                let assetIdStr = assetIdToStr(betPmt.assetId)
311+                                let internalAssetIdx = validateAndGetAssetIdx(assetIdStr)
312+                                let commission = feePmt.amount
313+                                let winAmount = validateBetAndGetWinAmount(betPmt.amount, internalAssetIdx, playerChoice)
314+                                let playerPubKey58 = toBase58String(i.callerPublicKey)
315+                                let gameData = formatGameData(STATESUBMITTED, playerChoice, playerPubKey58, height, winAmount, internalAssetIdx, "")
316+[IntegerEntry(RESERVATIONKEY(internalAssetIdx), increaseReserveAmount(winAmount, internalAssetIdx)), incrementInt(GAMESCOUNTERKEY), StringEntry(gameId, gameData), ScriptTransfer(SERVER, commission, feePmt.assetId)]
317+                                }
318+                    }
319+        }
320+
321+
322+
323+@Callable(i)
324+func withdraw (gameId,rsaSign) = {
325+    let gameData = extractGameData(gameId)
326+    let gameState = gameData[IdxGameState]
327+    let playerChoice = gameData[IdxPlayerChoice]
328+    let startedHeight = parseIntValue(gameData[IdxStartedHeight])
329+    let winAmount = parseIntValue(gameData[IdxWinAmount])
330+    let assetIdx = parseIntValue(gameData[IdxAssetId])
331+    let playerPubKey58 = gameData[IdxPlayerPubKey58]
332+    let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
333+    if ((gameState != STATESUBMITTED))
334+        then throw("Invalid game state for passed gameId")
335+        else if ((i.caller != SERVER))
336+            then throw("Regular withdraw can be done by server only")
337+            else {
338+                let winByTimeout = ((height - startedHeight) > RANDORACLETIMEFRAME)
339+                let randChoise = if (winByTimeout)
340+                    then playerChoice
341+                    else generateRandChoise(gameId, rsaSign)
342+                let playerWin = isPlayerWin(playerChoice, randChoise)
343+                let newGameStatus = if (playerWin)
344+                    then STATEWON
345+                    else STATELOST
346+                let newGameData = finishGameData(gameData, newGameStatus, randChoise, winByTimeout)
347+                ([StringEntry(gameId, newGameData), decreaseReservedAmount(gameId, assetIdx, winAmount)] ++ (if (playerWin)
348+                    then [ScriptTransfer(playerAddress, winAmount, assetIdFromStr(ASSETS[assetIdx]))]
349+                    else nil))
350+                }
351+    }
352+
353+
354+@Verifier(tx)
355+func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
356+    then     match tx {
357+        case ttx: TransferTransaction => 
358+            let assetIdx = validateAndGetAssetIdx(assetIdToStr(ttx.assetId))
359+            ((getAssetBalance(ttx.assetId) - ttx.amount) >= getIntOr(RESERVATIONKEY(assetIdx), 0))
360+        case stx: SetScriptTransaction => 
361+            func checker (acc,el) =             if (acc)
362+                then (getIntOr(RESERVATIONKEYBYSTR(el), 0) == 0)
363+                else false
364+
365+            let $l = ASSETS
366+            let $s = size($l)
367+            let $acc0 = true
368+            func $f0_1 ($a,$i) =             if (($i >= $s))
369+                then $a
370+                else checker($a, $l[$i])
371+
372+            func $f0_2 ($a,$i) =             if (($i >= $s))
373+                then $a
374+                else throw("List size exceeds 10")
375+
376+            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
377+        case _ => 
378+            false
379+    }
380+    else false
381+
github/deemru/w8io/3ef1775 
33.32 ms ◑