w8 · tx · 96B···8WE

tx · 96Bmj119hwHbRa5eShmBtahyEDE4gF8wAHN4T1eJP8WE

3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx:  -0.01600000 Waves

2023.09.08 00:25 [2745503] smart account 3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "96Bmj119hwHbRa5eShmBtahyEDE4gF8wAHN4T1eJP8WE",
    "fee": 1600000,
    "feeAssetId": null,
    "timestamp": 1694121923934,
    "version": 2,
    "chainId": 84,
    "sender": "3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx",
    "senderPublicKey": "UGqkWsCpv7xRVXkQRXyLd6pWPDtYGXmPip7FxSd1pAu",
    "proofs": [
        "5SSuLWBBHwHQwNehbzroRGTEq8vTLsYQXFci69hPz4ZnoDuhakBHumjxw1DdWW1HGgHtevKCBrEJb9T6xSs8U8iP"
    ],
    "script": "base64:BgIkCAISBwoFAQEBAQESABIAEgQKAggBEgMKAQESAwoBARIDCgEBOgAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EAD2xvY0lkeENvbnRpbmVudAAAAApsb2NJZHhUeXBlAAEBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBD2tleUR1Y2tMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgINZHVja0xvY2F0aW9uXwULZHVja0Fzc2V0SWQADWxhc3RUb3VySWRLZXkCDiVzX19sYXN0VG91cklkARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBA3RJZAkArAICAhYlcyVkX190b3VyU3RhdGljRGF0YV9fCQCkAwEFA3RJZAEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEDdElkCQCsAgICFyVzJWRfX3RvdXJEeW5hbWljRGF0YV9fCQCkAwEFA3RJZAETa2V5U2NvcmVCb2FyZEJ5VG91cgEDdElkCQCsAgICEiVzJWRfX3Njb3JlQm9hcmRfXwkApAMBBQN0SWQBEmtleVN1bVNjb3Jlc0J5VG91cgEDdElkCQCsAgICESVzJWRfX3N1bVNjb3Jlc19fCQCkAwEFA3RJZAEWa2V5VW5wYWlkUmV3YXJkc0J5VG91cgEDdElkCQCsAgICFSVzJWRfX3VucGFpZFJld2FyZHNfXwkApAMBBQN0SWQBG2tleUxhc3RSZWdpc3RlcmVkVG91ckJ5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIgJXMlc19fbGFzdFJlZ2lzdGVyZWRUb3VyQnlEdWNrX18FC2R1Y2tBc3NldElkARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgN0SWQLZHVja0Fzc2V0SWQJALkJAgkAzAgCAiElcyVkJXNfX2lzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sJAMwIAgkApAMBBQN0SWQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAICX18BGWtleUlzQXdhcmRlZEJ5VG91ckFuZER1Y2sCA3RJZAtkdWNrQXNzZXRJZAkAuQkCCQDMCAICHiVzJWQlc19faXNBd2FyZGVkQnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwEba2V5TGFzdEF0dGVtcHRCeVRvdXJBbmREdWNrAgN0SWQLZHVja0Fzc2V0SWQJALkJAgkAzAgCAiAlcyVkJXNfX2xhc3RBdHRlbXB0QnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwEaa2V5QmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sCA3RJZAtkdWNrQXNzZXRJZAkAuQkCCQDMCAICHyVzJWQlc19fYmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sJAMwIAgkApAMBBQN0SWQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAICX18BFmtleUJlc3RUeEJ5VG91ckFuZER1Y2sCA3RJZAtkdWNrQXNzZXRJZAkAuQkCCQDMCAICGyVzJWQlc19fYmVzdFR4QnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwAJaWR4U3RhdGljAAAACmlkeER5bmFtaWMAAQATdFN0YXRpY1JlZ2lzdGVyQ29zdAACABJ0U3RhdGljQXR0ZW1wdENvc3QAAwAMdFN0YXRpY1N0YXJ0AAUACnRTdGF0aWNFbmQABgAQdFN0YXRpY051bUdyYW5kcwAHAA50RHluYW1pY1N0YXR1cwABAA90RHluYW1pY0xlYWRlcnMAAgARdER5bmFtaWNXaW5SZXN1bHQAAwAVdER5bmFtaWNUb3RhbFJlZ0NvdW50AAQAFXREeW5hbWljVG90YWxBdHRlbXB0cwAFAQtnZXRUb3VyRGF0YQIMdG91ckNvbnRyYWN0A3RJZAQGc3RhdGljCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFA3RJZAIFIGRhdGECAl9fBAdkeW5hbWljCQC8CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwkAzAgCBQZzdGF0aWMJAMwIAgUHZHluYW1pYwUDbmlsAQ5pc0luVG91cm5hbWVudAIMdG91ckNvbnRyYWN0CGxvY2F0aW9uBAZsYXN0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUMdG91ckNvbnRyYWN0BQ1sYXN0VG91cklkS2V5AAAEA2xvYwkAtQkCBQhsb2NhdGlvbgIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFDHRvdXJDb250cmFjdAUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwMDAwkAAAIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFUCQAAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUPbG9jSWR4Q29udGluZW50BQZsYXN0SWQHCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHAAVjaGFpbgkAyQECCQDKAQIIBQR0aGlzBWJ5dGVzAAEAAQAVZGVmYXVsdFJlc3RBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUFFDdXZGYnZoNExrUFVucm5VMXozam5iQTFwOW0zV05odgMJAAACAQFUBQckbWF0Y2gwAiMzTXVta0dHenRDS0FYcFdEcXhrZGRvZnFYU1VicVFrdlNKeQkAAgECDVVua25vd24gY2hhaW4AA1NFUAICX18BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABAA1JZHhDZmdXbGdEYXBwAAQBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEOa2V5UmVzdEFkZHJlc3MAAgwlc19fcmVzdEFkZHIBEXJlYWRSZXN0Q2ZnT3JGYWlsAQRyZXN0CQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQRyZXN0CQEKa2V5UmVzdENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgdyZXN0Q2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHcmVzdENmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADHJlc3RDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEOa2V5UmVzdEFkZHJlc3MABRVkZWZhdWx0UmVzdEFkZHJlc3NTdHIAB3Jlc3RDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDHJlc3RDb250cmFjdAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAC3dsZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUNSWR4Q2ZnV2xnRGFwcAANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQITTm90IGluaXRpYWxpemVkIHlldAEIYXNTdHJpbmcBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AQRwYWRMAgN2YWwDbGVuBAR2YWxTCQCkAwEFA3ZhbAQGemVyb2VzCQCwAgIJAKQDAQkAbAYACgAACQBlAgUDbGVuCQCxAgEFBHZhbFMAAAAABQRET1dOAAEJAKwCAgUGemVyb2VzBQR2YWxTABNNQVhUT1VSTkFNRU5UTEVOR1RIAICY/80BAARIT1VSAIDd2wEACmFkbWluc0xpc3QJAMwIAgkApQgBBQR0aGlzCQDMCAIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQRWUyUkVMVUhDRkNCc21TQ05jQko4TjNVUkxWUWVuZGU3AwkAAAIBAVQFByRtYXRjaDACIzNNdEJnSlRhTHhQQjNDN1VKRDFVRThxamtIdGhmS3ZGUVlZCQACAQINVW5rbm93biBjaGFpbgUDbmlsAQpzdGF0aWNEYXRhBwR0eElkDHJlZ2lzdGVyQ29zdAthdHRlbXB0Q29zdAxjcmVhdGlvblRpbWUJc3RhcnRUaW1lB2VuZFRpbWUJbnVtR3JhbmRzCQC5CQIJAMwIAgIOJXMlZCVkJWQlZCVkJWQJAMwIAgUEdHhJZAkAzAgCCQCkAwEFDHJlZ2lzdGVyQ29zdAkAzAgCCQCkAwEFC2F0dGVtcHRDb3N0CQDMCAIJAKQDAQUMY3JlYXRpb25UaW1lCQDMCAIJAKQDAQUJc3RhcnRUaW1lCQDMCAIJAKQDAQUHZW5kVGltZQkAzAgCCQCkAwEFCW51bUdyYW5kcwUDbmlsBQNTRVABC2R5bmFtaWNEYXRhBQZzdGF0dXMHbGVhZGVycwl3aW5SZXN1bHQJdG90YWxSZWdzDXRvdGFsQXR0ZW1wdHMJALoJAgkAzAgCAgolcyVzJWQlZCVkCQDMCAIFBnN0YXR1cwkAzAgCBQdsZWFkZXJzCQDMCAIJAKQDAQUJd2luUmVzdWx0CQDMCAIJAKQDAQUJdG90YWxSZWdzCQDMCAIJAKQDAQUNdG90YWxBdHRlbXB0cwUDbmlsBQNTRVABBnByb2xvZwAJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAEMZHVja0J5Q2FsbGVyAQZjYWxsZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQUGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBwFpARBjcmVhdGVUb3VybmFtZW50BQlzdGFydFRpbWUHZW5kVGltZQxyZWdpc3RlckNvc3QLYXR0ZW1wdENvc3QJbnVtR3JhbmRzBAZjYWxsZXIJAKUIAQgFAWkGY2FsbGVyAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUKYWRtaW5zTGlzdAUGY2FsbGVyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEBmxhc3RJZAkAnwgBBQ1sYXN0VG91cklkS2V5BAN0SWQDCQEJaXNEZWZpbmVkAQUGbGFzdElkBApsYXN0VG91cklkCQEFdmFsdWUBBQZsYXN0SWQEB2R5bmFtaWMJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFCmxhc3RUb3VySWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFCmxhc3RUb3VySWQCBSBkYXRhBAZzdGF0dXMJAJEDAgkAtQkCBQdkeW5hbWljBQNTRVAFDnREeW5hbWljU3RhdHVzAwkBAiE9AgUGc3RhdHVzAghBUkNISVZFRAkAAgEJAKwCAgIsQ3VycmVudCB0b3VybmVtZW50IGlzIG5vdCBjb21wbGV0ZWQsIHN0YXR1cz0FBnN0YXR1cwkAZAIFCmxhc3RUb3VySWQAAQABBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwkAZgIFA25vdwUJc3RhcnRUaW1lCQACAQkArAICCQCsAgIJAKwCAgIKc3RhcnRUaW1lPQkApAMBBQlzdGFydFRpbWUCECA8IGNyZWF0aW9uVGltZT0JAKQDAQUDbm93AwkAZgIFCXN0YXJ0VGltZQUHZW5kVGltZQkAAgEJAKwCAgkArAICCQCsAgICCGVuZFRpbWU9CQCkAwEFB2VuZFRpbWUCDSA8IHN0YXJ0VGltZT0JAKQDAQUJc3RhcnRUaW1lAwkAZgIJAGUCBQdlbmRUaW1lBQlzdGFydFRpbWUFE01BWFRPVVJOQU1FTlRMRU5HVEgJAAIBCQCsAgIJAKwCAgkArAICAh9Ub3VybmFtZW50IHBlcmlvZCBleGNlZWRzIG1heDogCQCkAwEJAGUCBQdlbmRUaW1lBQlzdGFydFRpbWUCAyA+IAkApAMBBRNNQVhUT1VSTkFNRU5UTEVOR1RIAwMJAGcCAAAFDHJlZ2lzdGVyQ29zdAYJAGcCAAAFC2F0dGVtcHRDb3N0CQACAQkArAICCQCsAgIJAKwCAgIkQ29zdCBzaG91bGQgYmUgcG9zaXRpdmUsIGJ1dCBwYXNzZWQgCQCkAwEFDHJlZ2lzdGVyQ29zdAIFIGFuZCAJAKQDAQULYXR0ZW1wdENvc3QDCQBmAgAABQludW1HcmFuZHMJAAIBAi1OdW1iZXIgb2YgR3JhbmQgUHJpemVzIHNob3VsZCBiZSBub24tbmVnYXRpdmUJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUNbGFzdFRvdXJJZEtleQUDdElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAQpzdGF0aWNEYXRhBwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBQxyZWdpc3RlckNvc3QFC2F0dGVtcHRDb3N0BQNub3cFCXN0YXJ0VGltZQUHZW5kVGltZQUJbnVtR3JhbmRzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkCQELZHluYW1pY0RhdGEFAgdDUkVBVEVEAgEgAAAAAAAABQNuaWwFA3RJZAFpAQhyZWdpc3RlcgAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGd2xnQW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCFVdMR09MRCBwYXltZW50cyBvbmx5IQMJAQIhPQIFCnBtdEFzc2V0SWQFCndsZ0Fzc2V0SWQJAAIBAhVXTEdPTEQgcGF5bWVudHMgb25seSEEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEBnN0YXR1cwkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwMJAQEhAQMDAwkAAAIFBnN0YXR1cwIHQ1JFQVRFRAkAZgIFA25vdwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUMdFN0YXRpY1N0YXJ0BwkAZgIJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQRIT1VSBQNub3cHBgMJAAACBQZzdGF0dXMCCklOUFJPR1JFU1MJAGYCCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUESE9VUgUDbm93BwkAAgECE0Nhbm5vdCByZWdpc3RlciBub3cEB3JlZ0Nvc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFE3RTdGF0aWNSZWdpc3RlckNvc3QDCQECIT0CBQZ3bGdBbXQFB3JlZ0Nvc3QJAAIBCQCsAgIJAKwCAgIQTmVlZCBwYXltZW50IG9mIAkBCmZpeGVkUG9pbnQCBQdyZWdDb3N0AAgCByBXTEdPTEQEC2R1Y2tBc3NldElkCQEMZHVja0J5Q2FsbGVyAQgFAWkMb3JpZ2luQ2FsbGVyBA1vbGRTY29yZUJvYXJkCQELdmFsdWVPckVsc2UCCQCiCAEJARNrZXlTY29yZUJvYXJkQnlUb3VyAQUGbGFzdElkAgADAwkBC3ZhbHVlT3JFbHNlAgkAoAgBCQEca2V5SXNSZWdpc3RlcmVkQnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQHBgkBCGNvbnRhaW5zAgUNb2xkU2NvcmVCb2FyZAULZHVja0Fzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAgpZb3VyIGR1Y2sgBQtkdWNrQXNzZXRJZAIlIGlzIGFscmVhZHkgcmVnaXN0ZXJlZCBhdCB0b3VybmFtZW50IAkApAMBBQZsYXN0SWQEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwkAkQMCBQdkeW5hbWljBQ90RHluYW1pY0xlYWRlcnMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxBdHRlbXB0cwkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEba2V5TGFzdFJlZ2lzdGVyZWRUb3VyQnlEdWNrAQULZHVja0Fzc2V0SWQFBmxhc3RJZAkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBHGtleUlzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBgkAzAgCCQELU3RyaW5nRW50cnkCCQETa2V5U2NvcmVCb2FyZEJ5VG91cgEFBmxhc3RJZAMJAAACBQ1vbGRTY29yZUJvYXJkAgAJAKwCAgULZHVja0Fzc2V0SWQCBDowMDAJAKwCAgkArAICCQCsAgIFDW9sZFNjb3JlQm9hcmQCAV8FC2R1Y2tBc3NldElkAgQ6MDAwCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUGbGFzdElkBRJ1cGRhdGVkRHluYW1pY0RhdGEFA25pbAUMcHJvbG9nUmVzdWx0AWkBCm5ld0F0dGVtcHQABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBDGR1Y2tCeUNhbGxlcgEIBQFpDG9yaWdpbkNhbGxlcgQGbGFzdElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUNbGFzdFRvdXJJZEtleQIVTm8gYWN0aXZlIHRvdXJuYW1lbnRzBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwQGc3RhdHVzCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAwkBASEBAwkAAAIFBnN0YXR1cwIKSU5QUk9HUkVTUwkAZgIJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQRIT1VSBQNub3cHCQACAQIXQXR0ZW1wdCBpcyBub3QgcG9zc2libGUDCQEBIQEJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBHGtleUlzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBwkAAgEJAKwCAgkArAICCQCsAgICCllvdXIgZHVjayAFC2R1Y2tBc3NldElkAiEgaXMgbm90IHJlZ2lzdGVyZWQgYXQgdG91cm5hbWVudCAJAKQDAQUGbGFzdElkBBNhdHRlbXB0c0l0ZXJhdG9yS2V5CQEba2V5TGFzdEF0dGVtcHRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAQLbGFzdEF0dGVtcHQJAJ8IAQUTYXR0ZW1wdHNJdGVyYXRvcktleQQLJHQwNjEwNDY3MzYDCQEBIQEJAQlpc0RlZmluZWQBBQtsYXN0QXR0ZW1wdAkAlAoCAAAAAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABAZ3bGdBbXQIBQNwbXQGYW1vdW50BApwbXRBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQNwbXQHYXNzZXRJZAIVV0xHT0xEIHBheW1lbnRzIG9ubHkhAwkBAiE9AgUKcG10QXNzZXRJZAUKd2xnQXNzZXRJZAkAAgECFVdMR09MRCBwYXltZW50cyBvbmx5IQQHYXR0Q29zdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUSdFN0YXRpY0F0dGVtcHRDb3N0AwkBAiE9AgUGd2xnQW10BQdhdHRDb3N0CQACAQkArAICCQCsAgICEE5lZWQgcGF5bWVudCBvZiAJAQpmaXhlZFBvaW50AgUHYXR0Q29zdAAIAgcgV0xHT0xECQCUCgIJAGQCCQEFdmFsdWUBBQtsYXN0QXR0ZW1wdAABAAEEDXBheWVkQXR0ZW1wdHMIBQskdDA2MTA0NjczNgJfMQQJaW5jcmVtZW50CAULJHQwNjEwNDY3MzYCXzIEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwkAkQMCBQdkeW5hbWljBQ90RHluYW1pY0xlYWRlcnMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxSZWdDb3VudAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMFCWluY3JlbWVudAQHdG91ckxvYwkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCE2luaXREdWNrVG91ckF0dGVtcHQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAUDbmlsCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFE2F0dGVtcHRzSXRlcmF0b3JLZXkFDXBheWVkQXR0ZW1wdHMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQZsYXN0SWQFEnVwZGF0ZWREeW5hbWljRGF0YQUDbmlsCQDMCAIFDHByb2xvZ1Jlc3VsdAkAzAgCBQ1wYXllZEF0dGVtcHRzCQDMCAIFB3RvdXJMb2MFA25pbAFpAQ5zYXZlRHVja1Jlc3VsdAILZHVja0Fzc2V0SWQLZHVja05ld0Jlc3QDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EDWJlc3RSZXN1bHRLZXkJARprZXlCZXN0UmVzdWx0QnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQEDHN1bVNjb3Jlc0tleQkBEmtleVN1bVNjb3Jlc0J5VG91cgEFBmxhc3RJZAQMb2xkU3VtU2NvcmVzCQELdmFsdWVPckVsc2UCCQCfCAEFDHN1bVNjb3Jlc0tleQAAAwkBDmlzSW5Ub3VybmFtZW50AgUEdGhpcwULY3VyTG9jYXRpb24EC2R1Y2tPbGRCZXN0CQELdmFsdWVPckVsc2UCCQCfCAEFDWJlc3RSZXN1bHRLZXkAAAQIc2NvcmVLZXkJARNrZXlTY29yZUJvYXJkQnlUb3VyAQUGbGFzdElkBA1vbGRTY29yZUJvYXJkCQELdmFsdWVPckVsc2UCCQCiCAEFCHNjb3JlS2V5AgAECyR0MDgyMjk5MzkwAwkAZgIFC2R1Y2tOZXdCZXN0BQtkdWNrT2xkQmVzdAMJAQEhAQkBCGNvbnRhaW5zAgUNb2xkU2NvcmVCb2FyZAULZHVja0Fzc2V0SWQJAAIBCQCsAgICHHNjb3JlQm9hcmQgZG9lcyBub3QgY29udGFpbiAFC2R1Y2tBc3NldElkBAdvbGRCZXN0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQEB2xlYWRlcnMJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNMZWFkZXJzBA5vbGRMZWFkZXJzTGlzdAMDCQAAAgUHbGVhZGVycwIABgkAAAIFB2xlYWRlcnMCASAFA25pbAkAvAkCBQdsZWFkZXJzAgEsBA5uZXdMZWFkZXJzTGlzdAMJAGYCBQtkdWNrTmV3QmVzdAUHb2xkQmVzdAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAwMJAGYCBQdvbGRCZXN0BQtkdWNrTmV3QmVzdAYJAQ9jb250YWluc0VsZW1lbnQCBQ5vbGRMZWFkZXJzTGlzdAULZHVja0Fzc2V0SWQFDm9sZExlYWRlcnNMaXN0CQDNCAIFDm9sZExlYWRlcnNMaXN0BQtkdWNrQXNzZXRJZAQSdXBkYXRlZER5bmFtaWNEYXRhCQELZHluYW1pY0RhdGEFAgpJTlBST0dSRVNTCQC6CQIFDm5ld0xlYWRlcnNMaXN0AgEsCQCWAwEJAMwIAgULZHVja05ld0Jlc3QJAMwIAgUHb2xkQmVzdAUDbmlsCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbEF0dGVtcHRzBAVwYXJ0cwkAvQkCBQ1vbGRTY29yZUJvYXJkBQtkdWNrQXNzZXRJZAkAlQoDCQCsAgIJAKwCAgkArAICCQCsAgIJAJEDAgUFcGFydHMAAAULZHVja0Fzc2V0SWQCAToJAQRwYWRMAgULZHVja05ld0Jlc3QAAwkAsAICCQCRAwIFBXBhcnRzAAEABAkAZQIJAGQCBQxvbGRTdW1TY29yZXMFC2R1Y2tOZXdCZXN0BQtkdWNrT2xkQmVzdAkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFBmxhc3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwJAJUKAwUNb2xkU2NvcmVCb2FyZAUMb2xkU3VtU2NvcmVzBQNuaWwEDW5ld1Njb3JlQm9hcmQIBQskdDA4MjI5OTM5MAJfMQQMbmV3U3VtU2NvcmVzCAULJHQwODIyOTkzOTACXzIEDWdsb2JhbEFjdGlvbnMIBQskdDA4MjI5OTM5MAJfMwkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFDWJlc3RSZXN1bHRLZXkJAJYDAQkAzAgCBQtkdWNrT2xkQmVzdAkAzAgCBQtkdWNrTmV3QmVzdAUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxzdW1TY29yZXNLZXkFDG5ld1N1bVNjb3JlcwkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5QmVzdFR4QnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkAzAgCCQELU3RyaW5nRW50cnkCBQhzY29yZUtleQUNbmV3U2NvcmVCb2FyZAUDbmlsBQ1nbG9iYWxBY3Rpb25zAAAJAJQKAgUDbmlsAAABaQERcHJvY2Vzc1RvdXJuYW1lbnQBA3RJZAQGY2FsbGVyCQClCAEIBQFpBmNhbGxlcgMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFCmFkbWluc0xpc3QFBmNhbGxlcgkAAgECEVBlcm1pc3Npb24gZGVuaWVkBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUDdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwQGc3RhdHVzCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzBA1yZWdpc3RyYXRpb25zCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50BAxwYWlkQXR0ZW1wdHMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMEB3JlZ0Nvc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFE3RTdGF0aWNSZWdpc3RlckNvc3QEB2F0dENvc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFEnRTdGF0aWNBdHRlbXB0Q29zdAMJAAACBQZzdGF0dXMCCEFSQ0hJVkVECQACAQkArAICCQCsAgICC1RvdXJuYW1lbnQgCQCkAwEFA3RJZAIUIGlzIGFscmVhZHkgQVJDSElWRUQDAwkAAAIFBnN0YXR1cwIKSU5QUk9HUkVTUwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQFA25vdwcJAAIBCQCsAgIJAKwCAgILVG91cm5hbWVudCAJAKQDAQUDdElkAhAgaXMgbm90IG92ZXIgeWV0BBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCClBST0NFU1NJTkcJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNMZWFkZXJzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQFDXJlZ2lzdHJhdGlvbnMFDHBhaWRBdHRlbXB0cwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkBRJ1cGRhdGVkRHluYW1pY0RhdGEJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlVbnBhaWRSZXdhcmRzQnlUb3VyAQUDdElkCQBpAgkAZAIJAGgCBQ1yZWdpc3RyYXRpb25zBQdyZWdDb3N0CQBoAgUMcGFpZEF0dGVtcHRzBQdhdHRDb3N0AAIFA25pbAAAAWkBEGZpbmlzaFRvdXJuYW1lbnQBA3RJZAQGY2FsbGVyCQClCAEIBQFpBmNhbGxlcgMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFCmFkbWluc0xpc3QFBmNhbGxlcgkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUDdElkBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAZzdGF0dXMJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMDCQAAAgUGc3RhdHVzAghBUkNISVZFRAkAAgEJAKwCAgkArAICAgtUb3VybmFtZW50IAkApAMBBQN0SWQCFCBpcyBhbHJlYWR5IEFSQ0hJVkVEBBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCCEFSQ0hJVkVECQCRAwIFB2R5bmFtaWMFD3REeW5hbWljTGVhZGVycwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFEXREeW5hbWljV2luUmVzdWx0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbEF0dGVtcHRzCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQN0SWQFEnVwZGF0ZWREeW5hbWljRGF0YQUDbmlsAAABaQEKY2xhaW1Qcml6ZQEDdElkBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBXREYXRhCQELZ2V0VG91ckRhdGECBQR0aGlzBQN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAZzdGF0dXMJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMDCQECIT0CBQZzdGF0dXMCClBST0NFU1NJTkcJAAIBCQCsAgIJAKwCAgILVG91cm5hbWVudCAJAKQDAQUDdElkAhIgaXMgbm90IFBST0NFU1NJTkcEDXJlZ2lzdHJhdGlvbnMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQEDHBhaWRBdHRlbXB0cwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxBdHRlbXB0cwQHcmVnQ29zdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUTdFN0YXRpY1JlZ2lzdGVyQ29zdAQHYXR0Q29zdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUSdFN0YXRpY0F0dGVtcHRDb3N0BAphd2FyZEZ1bmRzCQBpAgkAZAIJAGgCBQ1yZWdpc3RyYXRpb25zBQdyZWdDb3N0CQBoAgUMcGFpZEF0dGVtcHRzBQdhdHRDb3N0AAIECXVucGFpZEtleQkBFmtleVVucGFpZFJld2FyZHNCeVRvdXIBBQN0SWQEC3VucGFpZEZ1bmRzCQELdmFsdWVPckVsc2UCCQCfCAEFCXVucGFpZEtleQAABAtkdWNrQXNzZXRJZAkBDGR1Y2tCeUNhbGxlcgEIBQFpDG9yaWdpbkNhbGxlcgQKc2NvcmVCb2FyZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQETa2V5U2NvcmVCb2FyZEJ5VG91cgEFA3RJZAIAAwkBASEBCQELdmFsdWVPckVsc2UCCQCgCAEJARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgUDdElkBQtkdWNrQXNzZXRJZAcJAAIBCQCsAgIJAKwCAgkArAICAgpZb3VyIGR1Y2sgBQtkdWNrQXNzZXRJZAIhIGlzIG5vdCByZWdpc3RlcmVkIGF0IHRvdXJuYW1lbnQgCQCkAwEFA3RJZAQNYmVzdFJlc3VsdEtleQkBGmtleUJlc3RSZXN1bHRCeVRvdXJBbmREdWNrAgUDdElkBQtkdWNrQXNzZXRJZAQIZHVja0Jlc3QJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNYmVzdFJlc3VsdEtleQAAAwkAAAIFCGR1Y2tCZXN0AAAJAAIBAhhZb3VyIGR1Y2sgZ290IHplcm8gc2NvcmUECmF3YXJkZWRLZXkJARlrZXlJc0F3YXJkZWRCeVRvdXJBbmREdWNrAgUDdElkBQtkdWNrQXNzZXRJZAMJAQt2YWx1ZU9yRWxzZQIJAKAIAQUKYXdhcmRlZEtleQcJAAIBCQCsAgIJAKwCAgkArAICAgpZb3VyIGR1Y2sgBQtkdWNrQXNzZXRJZAIiIGlzIGFscmVhZHkgYXdhcmRlZCBhdCB0b3VybmFtZW50IAkApAMBBQN0SWQEDHN1bVNjb3Jlc0tleQkBEmtleVN1bVNjb3Jlc0J5VG91cgEFA3RJZAQJc3VtU2NvcmVzCQELdmFsdWVPckVsc2UCCQCfCAEFDHN1bVNjb3Jlc0tleQAABAdsZWFkZXJzCQCRAwIFB2R5bmFtaWMFD3REeW5hbWljTGVhZGVycwQLbGVhZGVyc0xpc3QDAwkAAAIFB2xlYWRlcnMCAAYJAAACBQdsZWFkZXJzAgEgBQNuaWwJALwJAgUHbGVhZGVycwIBLAQKbnVtTGVhZGVycwkAkAMBBQtsZWFkZXJzTGlzdAMJAAACBQpudW1MZWFkZXJzAAAJAAIBCQCsAgICGU5vIGxlYWRlcnMgYXQgdG91cm5hbWVudCAJAKQDAQUDdElkBAludW1HcmFuZHMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFEHRTdGF0aWNOdW1HcmFuZHMECXdpblJlc3VsdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFEXREeW5hbWljV2luUmVzdWx0BA9zdW1MZWFkZXJTY29yZXMDCQBmAgUKbnVtTGVhZGVycwUJbnVtR3JhbmRzAAADCQEPY29udGFpbnNFbGVtZW50AgULbGVhZGVyc0xpc3QFC2R1Y2tBc3NldElkCQACAQIwQXMgb25lIG9mIHdpbm5lcnMsIHlvdSB3aWxsIGJlIGF3YXJkZWQgYnkgYWRtaW5zCQBoAgUKbnVtTGVhZGVycwUJd2luUmVzdWx0BAp5b3VyQW1vdW50CQCXAwEJAMwIAgkAawMFCGR1Y2tCZXN0BQphd2FyZEZ1bmRzCQBlAgUJc3VtU2NvcmVzBQ9zdW1MZWFkZXJTY29yZXMJAMwIAgULdW5wYWlkRnVuZHMFA25pbAQPbmV3VW5wYWlkQW1vdW50CQBlAgULdW5wYWlkRnVuZHMFCnlvdXJBbW91bnQEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIIQVJDSElWRUQJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNMZWFkZXJzBQl3aW5SZXN1bHQFDXJlZ2lzdHJhdGlvbnMFDHBhaWRBdHRlbXB0cwQNYXJjaGl2ZUFjdGlvbgMJAGcCAAAFD25ld1VucGFpZEFtb3VudAkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwFA25pbAkAlAoCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQp5b3VyQW1vdW50BQp3bGdBc3NldElkCQDMCAIJAQxCb29sZWFuRW50cnkCBQphd2FyZGVkS2V5BgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJdW5wYWlkS2V5BQ9uZXdVbnBhaWRBbW91bnQFA25pbAUNYXJjaGl2ZUFjdGlvbgAAAIkF/zA=",
    "height": 2745503,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BCacf5hMi9hLL11KHiSLFv2k2eMnq8Ujuszg7H8Az7AX
Next: 2Lt9XTqmK62tLhMwRwXrXxvMvCPGqqyLGMBZX1v1aSnj

Diff: 
Old New Differences
43 43  
44 44  
45 45  func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
46 + 
47 + 
48 + func keyBestTxByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestTxByTourAndDuck", toString(tId), duckAssetId], "__")
46 49  
47 50  
48 51  let idxStatic = 0
371 374                  let newScoreBoard = $t082299390._1
372 375                  let newSumScores = $t082299390._2
373 376                  let globalActions = $t082299390._3
374 -                 $Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
377 +                 $Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(keyBestTxByTourAndDuck(lastId, duckAssetId), toBase58String(i.transactionId)), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
375 378                  }
376 379              else $Tuple2(nil, 0)
377 380          }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let DEFAULTLOCATION = "Africa_F_Africa"
5 5  
6 6  let locIdxContinent = 0
7 7  
8 8  let locIdxType = 1
9 9  
10 10  func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
11 11  
12 12  
13 13  func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
14 14  
15 15  
16 16  let lastTourIdKey = "%s__lastTourId"
17 17  
18 18  func keyTourStaticDataById (tId) = ("%s%d__tourStaticData__" + toString(tId))
19 19  
20 20  
21 21  func keyTourDynamicDataById (tId) = ("%s%d__tourDynamicData__" + toString(tId))
22 22  
23 23  
24 24  func keyScoreBoardByTour (tId) = ("%s%d__scoreBoard__" + toString(tId))
25 25  
26 26  
27 27  func keySumScoresByTour (tId) = ("%s%d__sumScores__" + toString(tId))
28 28  
29 29  
30 30  func keyUnpaidRewardsByTour (tId) = ("%s%d__unpaidRewards__" + toString(tId))
31 31  
32 32  
33 33  func keyLastRegisteredTourByDuck (duckAssetId) = ("%s%s__lastRegisteredTourByDuck__" + duckAssetId)
34 34  
35 35  
36 36  func keyIsRegisteredByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__isRegisteredByTourAndDuck", toString(tId), duckAssetId], "__")
37 37  
38 38  
39 39  func keyIsAwardedByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__isAwardedByTourAndDuck", toString(tId), duckAssetId], "__")
40 40  
41 41  
42 42  func keyLastAttemptByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__lastAttemptByTourAndDuck", toString(tId), duckAssetId], "__")
43 43  
44 44  
45 45  func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
46 + 
47 + 
48 + func keyBestTxByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestTxByTourAndDuck", toString(tId), duckAssetId], "__")
46 49  
47 50  
48 51  let idxStatic = 0
49 52  
50 53  let idxDynamic = 1
51 54  
52 55  let tStaticRegisterCost = 2
53 56  
54 57  let tStaticAttemptCost = 3
55 58  
56 59  let tStaticStart = 5
57 60  
58 61  let tStaticEnd = 6
59 62  
60 63  let tStaticNumGrands = 7
61 64  
62 65  let tDynamicStatus = 1
63 66  
64 67  let tDynamicLeaders = 2
65 68  
66 69  let tDynamicWinResult = 3
67 70  
68 71  let tDynamicTotalRegCount = 4
69 72  
70 73  let tDynamicTotalAttempts = 5
71 74  
72 75  func getTourData (tourContract,tId) = {
73 76      let static = split(valueOrErrorMessage(getString(tourContract, keyTourStaticDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
74 77      let dynamic = split_4C(valueOrErrorMessage(getString(tourContract, keyTourDynamicDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
75 78  [static, dynamic]
76 79      }
77 80  
78 81  
79 82  func isInTournament (tourContract,location) = {
80 83      let lastId = valueOrElse(getInteger(tourContract, lastTourIdKey), 0)
81 84      let loc = split(location, "_")
82 85      let now = lastBlock.timestamp
83 86      let tData = getTourData(tourContract, lastId)
84 87      let static = tData[idxStatic]
85 88      let dynamic = tData[idxDynamic]
86 89      if (if (if ((loc[locIdxType] == "T"))
87 90          then (parseIntValue(loc[locIdxContinent]) == lastId)
88 91          else false)
89 92          then (dynamic[tDynamicStatus] == "INPROGRESS")
90 93          else false)
91 94          then (parseIntValue(static[tStaticEnd]) > now)
92 95          else false
93 96      }
94 97  
95 98  
96 99  let chain = take(drop(this.bytes, 1), 1)
97 100  
98 101  let defaultRestAddressStr = match chain {
99 102      case _ => 
100 103          if ((base58'2W' == $match0))
101 104              then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
102 105              else if ((base58'2T' == $match0))
103 106                  then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
104 107                  else throw("Unknown chain")
105 108  }
106 109  
107 110  let SEP = "__"
108 111  
109 112  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
110 113  
111 114  
112 115  let IdxCfgStakingDapp = 1
113 116  
114 117  let IdxCfgWlgDapp = 4
115 118  
116 119  func keyRestCfg () = "%s__restConfig"
117 120  
118 121  
119 122  func keyRestAddress () = "%s__restAddr"
120 123  
121 124  
122 125  func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
123 126  
124 127  
125 128  func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
126 129  
127 130  
128 131  let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
129 132  
130 133  let restCfg = readRestCfgOrFail(restContract)
131 134  
132 135  let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
133 136  
134 137  let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
135 138  
136 139  let wlgAssetIdKey = "wlg_assetId"
137 140  
138 141  let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "Not initialized yet")
139 142  
140 143  func asString (v) = match v {
141 144      case s: String => 
142 145          s
143 146      case _ => 
144 147          throw("fail to cast into String")
145 148  }
146 149  
147 150  
148 151  func asInt (v) = match v {
149 152      case n: Int => 
150 153          n
151 154      case _ => 
152 155          throw("fail to cast into Int")
153 156  }
154 157  
155 158  
156 159  func fixedPoint (val,decimals) = {
157 160      let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
158 161      let lowPart = toString((val % tenPow))
159 162      let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
160 163      (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
161 164      }
162 165  
163 166  
164 167  func padL (val,len) = {
165 168      let valS = toString(val)
166 169      let zeroes = drop(toString(pow(10, 0, (len - size(valS)), 0, 0, DOWN)), 1)
167 170      (zeroes + valS)
168 171      }
169 172  
170 173  
171 174  let MAXTOURNAMENTLENGTH = 432000000
172 175  
173 176  let HOUR = 3600000
174 177  
175 178  let adminsList = [toString(this), match chain {
176 179      case _ => 
177 180          if ((base58'2W' == $match0))
178 181              then "3PEe2RELUHCFCBsmSCNcBJ8N3URLVQende7"
179 182              else if ((base58'2T' == $match0))
180 183                  then "3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY"
181 184                  else throw("Unknown chain")
182 185  }]
183 186  
184 187  func staticData (txId,registerCost,attemptCost,creationTime,startTime,endTime,numGrands) = makeString(["%s%d%d%d%d%d%d", txId, toString(registerCost), toString(attemptCost), toString(creationTime), toString(startTime), toString(endTime), toString(numGrands)], SEP)
185 188  
186 189  
187 190  func dynamicData (status,leaders,winResult,totalRegs,totalAttempts) = makeString_2C(["%s%s%d%d%d", status, leaders, toString(winResult), toString(totalRegs), toString(totalAttempts)], SEP)
188 191  
189 192  
190 193  func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
191 194  
192 195  
193 196  func duckByCaller (caller) = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(caller))), "You don't have a duck staked")
194 197  
195 198  
196 199  @Callable(i)
197 200  func createTournament (startTime,endTime,registerCost,attemptCost,numGrands) = {
198 201      let caller = toString(i.caller)
199 202      if (!(containsElement(adminsList, caller)))
200 203          then throw("Permission denied")
201 204          else {
202 205              let lastId = getInteger(lastTourIdKey)
203 206              let tId = if (isDefined(lastId))
204 207                  then {
205 208                      let lastTourId = value(lastId)
206 209                      let dynamic = valueOrErrorMessage(getString(keyTourDynamicDataById(lastTourId)), (("Error reading tournament " + toString(lastTourId)) + " data"))
207 210                      let status = split(dynamic, SEP)[tDynamicStatus]
208 211                      if ((status != "ARCHIVED"))
209 212                          then throw(("Current tournement is not completed, status=" + status))
210 213                          else (lastTourId + 1)
211 214                      }
212 215                  else 1
213 216              let now = lastBlock.timestamp
214 217              if ((now > startTime))
215 218                  then throw(((("startTime=" + toString(startTime)) + " < creationTime=") + toString(now)))
216 219                  else if ((startTime > endTime))
217 220                      then throw(((("endTime=" + toString(endTime)) + " < startTime=") + toString(startTime)))
218 221                      else if (((endTime - startTime) > MAXTOURNAMENTLENGTH))
219 222                          then throw(((("Tournament period exceeds max: " + toString((endTime - startTime))) + " > ") + toString(MAXTOURNAMENTLENGTH)))
220 223                          else if (if ((0 >= registerCost))
221 224                              then true
222 225                              else (0 >= attemptCost))
223 226                              then throw(((("Cost should be positive, but passed " + toString(registerCost)) + " and ") + toString(attemptCost)))
224 227                              else if ((0 > numGrands))
225 228                                  then throw("Number of Grand Prizes should be non-negative")
226 229                                  else $Tuple2([IntegerEntry(lastTourIdKey, tId), StringEntry(keyTourStaticDataById(tId), staticData(toBase58String(i.transactionId), registerCost, attemptCost, now, startTime, endTime, numGrands)), StringEntry(keyTourDynamicDataById(tId), dynamicData("CREATED", " ", 0, 0, 0))], tId)
227 230              }
228 231      }
229 232  
230 233  
231 234  
232 235  @Callable(i)
233 236  func register () = {
234 237      let prologResult = prolog()
235 238      if ((size(i.payments) != 1))
236 239          then throw("exactly 1 payment must be attached")
237 240          else {
238 241              let pmt = i.payments[0]
239 242              let wlgAmt = pmt.amount
240 243              let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
241 244              if ((pmtAssetId != wlgAssetId))
242 245                  then throw("WLGOLD payments only!")
243 246                  else {
244 247                      let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
245 248                      let now = lastBlock.timestamp
246 249                      let tData = getTourData(this, lastId)
247 250                      let static = tData[idxStatic]
248 251                      let dynamic = tData[idxDynamic]
249 252                      let status = dynamic[tDynamicStatus]
250 253                      if (!(if (if (if ((status == "CREATED"))
251 254                          then (now > parseIntValue(static[tStaticStart]))
252 255                          else false)
253 256                          then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
254 257                          else false)
255 258                          then true
256 259                          else if ((status == "INPROGRESS"))
257 260                              then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
258 261                              else false))
259 262                          then throw("Cannot register now")
260 263                          else {
261 264                              let regCost = parseIntValue(static[tStaticRegisterCost])
262 265                              if ((wlgAmt != regCost))
263 266                                  then throw((("Need payment of " + fixedPoint(regCost, 8)) + " WLGOLD"))
264 267                                  else {
265 268                                      let duckAssetId = duckByCaller(i.originCaller)
266 269                                      let oldScoreBoard = valueOrElse(getString(keyScoreBoardByTour(lastId)), "")
267 270                                      if (if (valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false))
268 271                                          then true
269 272                                          else contains(oldScoreBoard, duckAssetId))
270 273                                          then throw(((("Your duck " + duckAssetId) + " is already registered at tournament ") + toString(lastId)))
271 274                                          else {
272 275                                              let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), (parseIntValue(dynamic[tDynamicTotalRegCount]) + 1), parseIntValue(dynamic[tDynamicTotalAttempts]))
273 276                                              $Tuple2([IntegerEntry(keyLastRegisteredTourByDuck(duckAssetId), lastId), BooleanEntry(keyIsRegisteredByTourAndDuck(lastId, duckAssetId), true), StringEntry(keyScoreBoardByTour(lastId), if ((oldScoreBoard == ""))
274 277                                                  then (duckAssetId + ":000")
275 278                                                  else (((oldScoreBoard + "_") + duckAssetId) + ":000")), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], prologResult)
276 279                                              }
277 280                                      }
278 281                              }
279 282                      }
280 283              }
281 284      }
282 285  
283 286  
284 287  
285 288  @Callable(i)
286 289  func newAttempt () = {
287 290      let prologResult = prolog()
288 291      let duckAssetId = duckByCaller(i.originCaller)
289 292      let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
290 293      let now = lastBlock.timestamp
291 294      let tData = getTourData(this, lastId)
292 295      let static = tData[idxStatic]
293 296      let dynamic = tData[idxDynamic]
294 297      let status = dynamic[tDynamicStatus]
295 298      if (!(if ((status == "INPROGRESS"))
296 299          then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
297 300          else false))
298 301          then throw("Attempt is not possible")
299 302          else if (!(valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false)))
300 303              then throw(((("Your duck " + duckAssetId) + " is not registered at tournament ") + toString(lastId)))
301 304              else {
302 305                  let attemptsIteratorKey = keyLastAttemptByTourAndDuck(lastId, duckAssetId)
303 306                  let lastAttempt = getInteger(attemptsIteratorKey)
304 307                  let $t061046736 = if (!(isDefined(lastAttempt)))
305 308                      then $Tuple2(0, 0)
306 309                      else if ((size(i.payments) != 1))
307 310                          then throw("exactly 1 payment must be attached")
308 311                          else {
309 312                              let pmt = i.payments[0]
310 313                              let wlgAmt = pmt.amount
311 314                              let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
312 315                              if ((pmtAssetId != wlgAssetId))
313 316                                  then throw("WLGOLD payments only!")
314 317                                  else {
315 318                                      let attCost = parseIntValue(static[tStaticAttemptCost])
316 319                                      if ((wlgAmt != attCost))
317 320                                          then throw((("Need payment of " + fixedPoint(attCost, 8)) + " WLGOLD"))
318 321                                          else $Tuple2((value(lastAttempt) + 1), 1)
319 322                                      }
320 323                              }
321 324                  let payedAttempts = $t061046736._1
322 325                  let increment = $t061046736._2
323 326                  let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), (parseIntValue(dynamic[tDynamicTotalAttempts]) + increment))
324 327                  let tourLoc = asString(invoke(stakingContract, "initDuckTourAttempt", [duckAssetId], nil))
325 328                  $Tuple2([IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
326 329                  }
327 330      }
328 331  
329 332  
330 333  
331 334  @Callable(i)
332 335  func saveDuckResult (duckAssetId,duckNewBest) = if ((i.caller != stakingContract))
333 336      then throw("Access denied")
334 337      else {
335 338          let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
336 339          let tData = getTourData(this, lastId)
337 340          let static = tData[idxStatic]
338 341          let dynamic = tData[idxDynamic]
339 342          let curLocation = valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION)
340 343          let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
341 344          let sumScoresKey = keySumScoresByTour(lastId)
342 345          let oldSumScores = valueOrElse(getInteger(sumScoresKey), 0)
343 346          if (isInTournament(this, curLocation))
344 347              then {
345 348                  let duckOldBest = valueOrElse(getInteger(bestResultKey), 0)
346 349                  let scoreKey = keyScoreBoardByTour(lastId)
347 350                  let oldScoreBoard = valueOrElse(getString(scoreKey), "")
348 351                  let $t082299390 = if ((duckNewBest > duckOldBest))
349 352                      then if (!(contains(oldScoreBoard, duckAssetId)))
350 353                          then throw(("scoreBoard does not contain " + duckAssetId))
351 354                          else {
352 355                              let oldBest = parseIntValue(dynamic[tDynamicWinResult])
353 356                              let leaders = dynamic[tDynamicLeaders]
354 357                              let oldLeadersList = if (if ((leaders == ""))
355 358                                  then true
356 359                                  else (leaders == " "))
357 360                                  then nil
358 361                                  else split_4C(leaders, ",")
359 362                              let newLeadersList = if ((duckNewBest > oldBest))
360 363                                  then [duckAssetId]
361 364                                  else if (if ((oldBest > duckNewBest))
362 365                                      then true
363 366                                      else containsElement(oldLeadersList, duckAssetId))
364 367                                      then oldLeadersList
365 368                                      else (oldLeadersList :+ duckAssetId)
366 369                              let updatedDynamicData = dynamicData("INPROGRESS", makeString_2C(newLeadersList, ","), max([duckNewBest, oldBest]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
367 370                              let parts = split_51C(oldScoreBoard, duckAssetId)
368 371                              $Tuple3(((((parts[0] + duckAssetId) + ":") + padL(duckNewBest, 3)) + drop(parts[1], 4)), ((oldSumScores + duckNewBest) - duckOldBest), [StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)])
369 372                              }
370 373                      else $Tuple3(oldScoreBoard, oldSumScores, nil)
371 374                  let newScoreBoard = $t082299390._1
372 375                  let newSumScores = $t082299390._2
373 376                  let globalActions = $t082299390._3
374 -                 $Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
377 +                 $Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(keyBestTxByTourAndDuck(lastId, duckAssetId), toBase58String(i.transactionId)), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
375 378                  }
376 379              else $Tuple2(nil, 0)
377 380          }
378 381  
379 382  
380 383  
381 384  @Callable(i)
382 385  func processTournament (tId) = {
383 386      let caller = toString(i.caller)
384 387      if (!(containsElement(adminsList, caller)))
385 388          then throw("Permission denied")
386 389          else {
387 390              let now = lastBlock.timestamp
388 391              let tData = getTourData(this, tId)
389 392              let static = tData[idxStatic]
390 393              let dynamic = tData[idxDynamic]
391 394              let status = dynamic[tDynamicStatus]
392 395              let registrations = parseIntValue(dynamic[tDynamicTotalRegCount])
393 396              let paidAttempts = parseIntValue(dynamic[tDynamicTotalAttempts])
394 397              let regCost = parseIntValue(static[tStaticRegisterCost])
395 398              let attCost = parseIntValue(static[tStaticAttemptCost])
396 399              if ((status == "ARCHIVED"))
397 400                  then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
398 401                  else if (if ((status == "INPROGRESS"))
399 402                      then (parseIntValue(static[tStaticEnd]) > now)
400 403                      else false)
401 404                      then throw((("Tournament " + toString(tId)) + " is not over yet"))
402 405                      else {
403 406                          let updatedDynamicData = dynamicData("PROCESSING", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), registrations, paidAttempts)
404 407                          $Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData), IntegerEntry(keyUnpaidRewardsByTour(tId), (((registrations * regCost) + (paidAttempts * attCost)) / 2))], 0)
405 408                          }
406 409              }
407 410      }
408 411  
409 412  
410 413  
411 414  @Callable(i)
412 415  func finishTournament (tId) = {
413 416      let caller = toString(i.caller)
414 417      if (!(containsElement(adminsList, caller)))
415 418          then throw("Permission denied")
416 419          else {
417 420              let tData = getTourData(this, tId)
418 421              let dynamic = tData[idxDynamic]
419 422              let status = dynamic[tDynamicStatus]
420 423              if ((status == "ARCHIVED"))
421 424                  then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
422 425                  else {
423 426                      let updatedDynamicData = dynamicData("ARCHIVED", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
424 427                      $Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)], 0)
425 428                      }
426 429              }
427 430      }
428 431  
429 432  
430 433  
431 434  @Callable(i)
432 435  func claimPrize (tId) = {
433 436      let prologResult = prolog()
434 437      if ((size(i.payments) != 0))
435 438          then throw("No payments required")
436 439          else {
437 440              let tData = getTourData(this, tId)
438 441              let static = tData[idxStatic]
439 442              let dynamic = tData[idxDynamic]
440 443              let status = dynamic[tDynamicStatus]
441 444              if ((status != "PROCESSING"))
442 445                  then throw((("Tournament " + toString(tId)) + " is not PROCESSING"))
443 446                  else {
444 447                      let registrations = parseIntValue(dynamic[tDynamicTotalRegCount])
445 448                      let paidAttempts = parseIntValue(dynamic[tDynamicTotalAttempts])
446 449                      let regCost = parseIntValue(static[tStaticRegisterCost])
447 450                      let attCost = parseIntValue(static[tStaticAttemptCost])
448 451                      let awardFunds = (((registrations * regCost) + (paidAttempts * attCost)) / 2)
449 452                      let unpaidKey = keyUnpaidRewardsByTour(tId)
450 453                      let unpaidFunds = valueOrElse(getInteger(unpaidKey), 0)
451 454                      let duckAssetId = duckByCaller(i.originCaller)
452 455                      let scoreBoard = valueOrElse(getString(keyScoreBoardByTour(tId)), "")
453 456                      if (!(valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(tId, duckAssetId)), false)))
454 457                          then throw(((("Your duck " + duckAssetId) + " is not registered at tournament ") + toString(tId)))
455 458                          else {
456 459                              let bestResultKey = keyBestResultByTourAndDuck(tId, duckAssetId)
457 460                              let duckBest = valueOrElse(getInteger(bestResultKey), 0)
458 461                              if ((duckBest == 0))
459 462                                  then throw("Your duck got zero score")
460 463                                  else {
461 464                                      let awardedKey = keyIsAwardedByTourAndDuck(tId, duckAssetId)
462 465                                      if (valueOrElse(getBoolean(awardedKey), false))
463 466                                          then throw(((("Your duck " + duckAssetId) + " is already awarded at tournament ") + toString(tId)))
464 467                                          else {
465 468                                              let sumScoresKey = keySumScoresByTour(tId)
466 469                                              let sumScores = valueOrElse(getInteger(sumScoresKey), 0)
467 470                                              let leaders = dynamic[tDynamicLeaders]
468 471                                              let leadersList = if (if ((leaders == ""))
469 472                                                  then true
470 473                                                  else (leaders == " "))
471 474                                                  then nil
472 475                                                  else split_4C(leaders, ",")
473 476                                              let numLeaders = size(leadersList)
474 477                                              if ((numLeaders == 0))
475 478                                                  then throw(("No leaders at tournament " + toString(tId)))
476 479                                                  else {
477 480                                                      let numGrands = parseIntValue(static[tStaticNumGrands])
478 481                                                      let winResult = parseIntValue(dynamic[tDynamicWinResult])
479 482                                                      let sumLeaderScores = if ((numLeaders > numGrands))
480 483                                                          then 0
481 484                                                          else if (containsElement(leadersList, duckAssetId))
482 485                                                              then throw("As one of winners, you will be awarded by admins")
483 486                                                              else (numLeaders * winResult)
484 487                                                      let yourAmount = min([fraction(duckBest, awardFunds, (sumScores - sumLeaderScores)), unpaidFunds])
485 488                                                      let newUnpaidAmount = (unpaidFunds - yourAmount)
486 489                                                      let updatedDynamicData = dynamicData("ARCHIVED", dynamic[tDynamicLeaders], winResult, registrations, paidAttempts)
487 490                                                      let archiveAction = if ((0 >= newUnpaidAmount))
488 491                                                          then [StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)]
489 492                                                          else nil
490 493                                                      $Tuple2(([ScriptTransfer(i.caller, yourAmount, wlgAssetId), BooleanEntry(awardedKey, true), IntegerEntry(unpaidKey, newUnpaidAmount)] ++ archiveAction), 0)
491 494                                                      }
492 495                                              }
493 496                                      }
494 497                              }
495 498                      }
496 499              }
497 500      }
498 501  
499 502

Old	New		Differences
43	43
44	44
45	45		func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
	46	+
	47	+
	48	+	func keyBestTxByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestTxByTourAndDuck", toString(tId), duckAssetId], "__")
46	49
47	50
48	51		let idxStatic = 0

371	374		let newScoreBoard = $t082299390._1
372	375		let newSumScores = $t082299390._2
373	376		let globalActions = $t082299390._3
374		-	$Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
	377	+	$Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(keyBestTxByTourAndDuck(lastId, duckAssetId), toBase58String(i.transactionId)), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
375	378		}
376	379		else $Tuple2(nil, 0)
377	380		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let DEFAULTLOCATION = "Africa_F_Africa"
5	5
6	6		let locIdxContinent = 0
7	7
8	8		let locIdxType = 1
9	9
10	10		func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
11	11
12	12
13	13		func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
14	14
15	15
16	16		let lastTourIdKey = "%s__lastTourId"
17	17
18	18		func keyTourStaticDataById (tId) = ("%s%d__tourStaticData__" + toString(tId))
19	19
20	20
21	21		func keyTourDynamicDataById (tId) = ("%s%d__tourDynamicData__" + toString(tId))
22	22
23	23
24	24		func keyScoreBoardByTour (tId) = ("%s%d__scoreBoard__" + toString(tId))
25	25
26	26
27	27		func keySumScoresByTour (tId) = ("%s%d__sumScores__" + toString(tId))
28	28
29	29
30	30		func keyUnpaidRewardsByTour (tId) = ("%s%d__unpaidRewards__" + toString(tId))
31	31
32	32
33	33		func keyLastRegisteredTourByDuck (duckAssetId) = ("%s%s__lastRegisteredTourByDuck__" + duckAssetId)
34	34
35	35
36	36		func keyIsRegisteredByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__isRegisteredByTourAndDuck", toString(tId), duckAssetId], "__")
37	37
38	38
39	39		func keyIsAwardedByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__isAwardedByTourAndDuck", toString(tId), duckAssetId], "__")
40	40
41	41
42	42		func keyLastAttemptByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__lastAttemptByTourAndDuck", toString(tId), duckAssetId], "__")
43	43
44	44
45	45		func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
	46	+
	47	+
	48	+	func keyBestTxByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestTxByTourAndDuck", toString(tId), duckAssetId], "__")
46	49
47	50
48	51		let idxStatic = 0
49	52
50	53		let idxDynamic = 1
51	54
52	55		let tStaticRegisterCost = 2
53	56
54	57		let tStaticAttemptCost = 3
55	58
56	59		let tStaticStart = 5
57	60
58	61		let tStaticEnd = 6
59	62
60	63		let tStaticNumGrands = 7
61	64
62	65		let tDynamicStatus = 1
63	66
64	67		let tDynamicLeaders = 2
65	68
66	69		let tDynamicWinResult = 3
67	70
68	71		let tDynamicTotalRegCount = 4
69	72
70	73		let tDynamicTotalAttempts = 5
71	74
72	75		func getTourData (tourContract,tId) = {
73	76		let static = split(valueOrErrorMessage(getString(tourContract, keyTourStaticDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
74	77		let dynamic = split_4C(valueOrErrorMessage(getString(tourContract, keyTourDynamicDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
75	78		[static, dynamic]
76	79		}
77	80
78	81
79	82		func isInTournament (tourContract,location) = {
80	83		let lastId = valueOrElse(getInteger(tourContract, lastTourIdKey), 0)
81	84		let loc = split(location, "_")
82	85		let now = lastBlock.timestamp
83	86		let tData = getTourData(tourContract, lastId)
84	87		let static = tData[idxStatic]
85	88		let dynamic = tData[idxDynamic]
86	89		if (if (if ((loc[locIdxType] == "T"))
87	90		then (parseIntValue(loc[locIdxContinent]) == lastId)
88	91		else false)
89	92		then (dynamic[tDynamicStatus] == "INPROGRESS")
90	93		else false)
91	94		then (parseIntValue(static[tStaticEnd]) > now)
92	95		else false
93	96		}
94	97
95	98
96	99		let chain = take(drop(this.bytes, 1), 1)
97	100
98	101		let defaultRestAddressStr = match chain {
99	102		case _ =>
100	103		if ((base58'2W' == $match0))
101	104		then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
102	105		else if ((base58'2T' == $match0))
103	106		then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
104	107		else throw("Unknown chain")
105	108		}
106	109
107	110		let SEP = "__"
108	111
109	112		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
110	113
111	114
112	115		let IdxCfgStakingDapp = 1
113	116
114	117		let IdxCfgWlgDapp = 4
115	118
116	119		func keyRestCfg () = "%s__restConfig"
117	120
118	121
119	122		func keyRestAddress () = "%s__restAddr"
120	123
121	124
122	125		func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
123	126
124	127
125	128		func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
126	129
127	130
128	131		let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
129	132
130	133		let restCfg = readRestCfgOrFail(restContract)
131	134
132	135		let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
133	136
134	137		let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
135	138
136	139		let wlgAssetIdKey = "wlg_assetId"
137	140
138	141		let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "Not initialized yet")
139	142
140	143		func asString (v) = match v {
141	144		case s: String =>
142	145		s
143	146		case _ =>
144	147		throw("fail to cast into String")
145	148		}
146	149
147	150
148	151		func asInt (v) = match v {
149	152		case n: Int =>
150	153		n
151	154		case _ =>
152	155		throw("fail to cast into Int")
153	156		}
154	157
155	158
156	159		func fixedPoint (val,decimals) = {
157	160		let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
158	161		let lowPart = toString((val % tenPow))
159	162		let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
160	163		(((toString((val / tenPow)) + ".") + zeroes) + lowPart)
161	164		}
162	165
163	166
164	167		func padL (val,len) = {
165	168		let valS = toString(val)
166	169		let zeroes = drop(toString(pow(10, 0, (len - size(valS)), 0, 0, DOWN)), 1)
167	170		(zeroes + valS)
168	171		}
169	172
170	173
171	174		let MAXTOURNAMENTLENGTH = 432000000
172	175
173	176		let HOUR = 3600000
174	177
175	178		let adminsList = [toString(this), match chain {
176	179		case _ =>
177	180		if ((base58'2W' == $match0))
178	181		then "3PEe2RELUHCFCBsmSCNcBJ8N3URLVQende7"
179	182		else if ((base58'2T' == $match0))
180	183		then "3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY"
181	184		else throw("Unknown chain")
182	185		}]
183	186
184	187		func staticData (txId,registerCost,attemptCost,creationTime,startTime,endTime,numGrands) = makeString(["%s%d%d%d%d%d%d", txId, toString(registerCost), toString(attemptCost), toString(creationTime), toString(startTime), toString(endTime), toString(numGrands)], SEP)
185	188
186	189
187	190		func dynamicData (status,leaders,winResult,totalRegs,totalAttempts) = makeString_2C(["%s%s%d%d%d", status, leaders, toString(winResult), toString(totalRegs), toString(totalAttempts)], SEP)
188	191
189	192
190	193		func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
191	194
192	195
193	196		func duckByCaller (caller) = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(caller))), "You don't have a duck staked")
194	197
195	198
196	199		@Callable(i)
197	200		func createTournament (startTime,endTime,registerCost,attemptCost,numGrands) = {
198	201		let caller = toString(i.caller)
199	202		if (!(containsElement(adminsList, caller)))
200	203		then throw("Permission denied")
201	204		else {
202	205		let lastId = getInteger(lastTourIdKey)
203	206		let tId = if (isDefined(lastId))
204	207		then {
205	208		let lastTourId = value(lastId)
206	209		let dynamic = valueOrErrorMessage(getString(keyTourDynamicDataById(lastTourId)), (("Error reading tournament " + toString(lastTourId)) + " data"))
207	210		let status = split(dynamic, SEP)[tDynamicStatus]
208	211		if ((status != "ARCHIVED"))
209	212		then throw(("Current tournement is not completed, status=" + status))
210	213		else (lastTourId + 1)
211	214		}
212	215		else 1
213	216		let now = lastBlock.timestamp
214	217		if ((now > startTime))
215	218		then throw(((("startTime=" + toString(startTime)) + " < creationTime=") + toString(now)))
216	219		else if ((startTime > endTime))
217	220		then throw(((("endTime=" + toString(endTime)) + " < startTime=") + toString(startTime)))
218	221		else if (((endTime - startTime) > MAXTOURNAMENTLENGTH))
219	222		then throw(((("Tournament period exceeds max: " + toString((endTime - startTime))) + " > ") + toString(MAXTOURNAMENTLENGTH)))
220	223		else if (if ((0 >= registerCost))
221	224		then true
222	225		else (0 >= attemptCost))
223	226		then throw(((("Cost should be positive, but passed " + toString(registerCost)) + " and ") + toString(attemptCost)))
224	227		else if ((0 > numGrands))
225	228		then throw("Number of Grand Prizes should be non-negative")
226	229		else $Tuple2([IntegerEntry(lastTourIdKey, tId), StringEntry(keyTourStaticDataById(tId), staticData(toBase58String(i.transactionId), registerCost, attemptCost, now, startTime, endTime, numGrands)), StringEntry(keyTourDynamicDataById(tId), dynamicData("CREATED", " ", 0, 0, 0))], tId)
227	230		}
228	231		}
229	232
230	233
231	234
232	235		@Callable(i)
233	236		func register () = {
234	237		let prologResult = prolog()
235	238		if ((size(i.payments) != 1))
236	239		then throw("exactly 1 payment must be attached")
237	240		else {
238	241		let pmt = i.payments[0]
239	242		let wlgAmt = pmt.amount
240	243		let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
241	244		if ((pmtAssetId != wlgAssetId))
242	245		then throw("WLGOLD payments only!")
243	246		else {
244	247		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
245	248		let now = lastBlock.timestamp
246	249		let tData = getTourData(this, lastId)
247	250		let static = tData[idxStatic]
248	251		let dynamic = tData[idxDynamic]
249	252		let status = dynamic[tDynamicStatus]
250	253		if (!(if (if (if ((status == "CREATED"))
251	254		then (now > parseIntValue(static[tStaticStart]))
252	255		else false)
253	256		then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
254	257		else false)
255	258		then true
256	259		else if ((status == "INPROGRESS"))
257	260		then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
258	261		else false))
259	262		then throw("Cannot register now")
260	263		else {
261	264		let regCost = parseIntValue(static[tStaticRegisterCost])
262	265		if ((wlgAmt != regCost))
263	266		then throw((("Need payment of " + fixedPoint(regCost, 8)) + " WLGOLD"))
264	267		else {
265	268		let duckAssetId = duckByCaller(i.originCaller)
266	269		let oldScoreBoard = valueOrElse(getString(keyScoreBoardByTour(lastId)), "")
267	270		if (if (valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false))
268	271		then true
269	272		else contains(oldScoreBoard, duckAssetId))
270	273		then throw(((("Your duck " + duckAssetId) + " is already registered at tournament ") + toString(lastId)))
271	274		else {
272	275		let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), (parseIntValue(dynamic[tDynamicTotalRegCount]) + 1), parseIntValue(dynamic[tDynamicTotalAttempts]))
273	276		$Tuple2([IntegerEntry(keyLastRegisteredTourByDuck(duckAssetId), lastId), BooleanEntry(keyIsRegisteredByTourAndDuck(lastId, duckAssetId), true), StringEntry(keyScoreBoardByTour(lastId), if ((oldScoreBoard == ""))
274	277		then (duckAssetId + ":000")
275	278		else (((oldScoreBoard + "_") + duckAssetId) + ":000")), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], prologResult)
276	279		}
277	280		}
278	281		}
279	282		}
280	283		}
281	284		}
282	285
283	286
284	287
285	288		@Callable(i)
286	289		func newAttempt () = {
287	290		let prologResult = prolog()
288	291		let duckAssetId = duckByCaller(i.originCaller)
289	292		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
290	293		let now = lastBlock.timestamp
291	294		let tData = getTourData(this, lastId)
292	295		let static = tData[idxStatic]
293	296		let dynamic = tData[idxDynamic]
294	297		let status = dynamic[tDynamicStatus]
295	298		if (!(if ((status == "INPROGRESS"))
296	299		then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
297	300		else false))
298	301		then throw("Attempt is not possible")
299	302		else if (!(valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false)))
300	303		then throw(((("Your duck " + duckAssetId) + " is not registered at tournament ") + toString(lastId)))
301	304		else {
302	305		let attemptsIteratorKey = keyLastAttemptByTourAndDuck(lastId, duckAssetId)
303	306		let lastAttempt = getInteger(attemptsIteratorKey)
304	307		let $t061046736 = if (!(isDefined(lastAttempt)))
305	308		then $Tuple2(0, 0)
306	309		else if ((size(i.payments) != 1))
307	310		then throw("exactly 1 payment must be attached")
308	311		else {
309	312		let pmt = i.payments[0]
310	313		let wlgAmt = pmt.amount
311	314		let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
312	315		if ((pmtAssetId != wlgAssetId))
313	316		then throw("WLGOLD payments only!")
314	317		else {
315	318		let attCost = parseIntValue(static[tStaticAttemptCost])
316	319		if ((wlgAmt != attCost))
317	320		then throw((("Need payment of " + fixedPoint(attCost, 8)) + " WLGOLD"))
318	321		else $Tuple2((value(lastAttempt) + 1), 1)
319	322		}
320	323		}
321	324		let payedAttempts = $t061046736._1
322	325		let increment = $t061046736._2
323	326		let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), (parseIntValue(dynamic[tDynamicTotalAttempts]) + increment))
324	327		let tourLoc = asString(invoke(stakingContract, "initDuckTourAttempt", [duckAssetId], nil))
325	328		$Tuple2([IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
326	329		}
327	330		}
328	331
329	332
330	333
331	334		@Callable(i)
332	335		func saveDuckResult (duckAssetId,duckNewBest) = if ((i.caller != stakingContract))
333	336		then throw("Access denied")
334	337		else {
335	338		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
336	339		let tData = getTourData(this, lastId)
337	340		let static = tData[idxStatic]
338	341		let dynamic = tData[idxDynamic]
339	342		let curLocation = valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION)
340	343		let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
341	344		let sumScoresKey = keySumScoresByTour(lastId)
342	345		let oldSumScores = valueOrElse(getInteger(sumScoresKey), 0)
343	346		if (isInTournament(this, curLocation))
344	347		then {
345	348		let duckOldBest = valueOrElse(getInteger(bestResultKey), 0)
346	349		let scoreKey = keyScoreBoardByTour(lastId)
347	350		let oldScoreBoard = valueOrElse(getString(scoreKey), "")
348	351		let $t082299390 = if ((duckNewBest > duckOldBest))
349	352		then if (!(contains(oldScoreBoard, duckAssetId)))
350	353		then throw(("scoreBoard does not contain " + duckAssetId))
351	354		else {
352	355		let oldBest = parseIntValue(dynamic[tDynamicWinResult])
353	356		let leaders = dynamic[tDynamicLeaders]
354	357		let oldLeadersList = if (if ((leaders == ""))
355	358		then true
356	359		else (leaders == " "))
357	360		then nil
358	361		else split_4C(leaders, ",")
359	362		let newLeadersList = if ((duckNewBest > oldBest))
360	363		then [duckAssetId]
361	364		else if (if ((oldBest > duckNewBest))
362	365		then true
363	366		else containsElement(oldLeadersList, duckAssetId))
364	367		then oldLeadersList
365	368		else (oldLeadersList :+ duckAssetId)
366	369		let updatedDynamicData = dynamicData("INPROGRESS", makeString_2C(newLeadersList, ","), max([duckNewBest, oldBest]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
367	370		let parts = split_51C(oldScoreBoard, duckAssetId)
368	371		$Tuple3(((((parts[0] + duckAssetId) + ":") + padL(duckNewBest, 3)) + drop(parts[1], 4)), ((oldSumScores + duckNewBest) - duckOldBest), [StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)])
369	372		}
370	373		else $Tuple3(oldScoreBoard, oldSumScores, nil)
371	374		let newScoreBoard = $t082299390._1
372	375		let newSumScores = $t082299390._2
373	376		let globalActions = $t082299390._3
374		-	$Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
	377	+	$Tuple2(([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(keyBestTxByTourAndDuck(lastId, duckAssetId), toBase58String(i.transactionId)), StringEntry(scoreKey, newScoreBoard)] ++ globalActions), 0)
375	378		}
376	379		else $Tuple2(nil, 0)
377	380		}
378	381
379	382
380	383
381	384		@Callable(i)
382	385		func processTournament (tId) = {
383	386		let caller = toString(i.caller)
384	387		if (!(containsElement(adminsList, caller)))
385	388		then throw("Permission denied")
386	389		else {
387	390		let now = lastBlock.timestamp
388	391		let tData = getTourData(this, tId)
389	392		let static = tData[idxStatic]
390	393		let dynamic = tData[idxDynamic]
391	394		let status = dynamic[tDynamicStatus]
392	395		let registrations = parseIntValue(dynamic[tDynamicTotalRegCount])
393	396		let paidAttempts = parseIntValue(dynamic[tDynamicTotalAttempts])
394	397		let regCost = parseIntValue(static[tStaticRegisterCost])
395	398		let attCost = parseIntValue(static[tStaticAttemptCost])
396	399		if ((status == "ARCHIVED"))
397	400		then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
398	401		else if (if ((status == "INPROGRESS"))
399	402		then (parseIntValue(static[tStaticEnd]) > now)
400	403		else false)
401	404		then throw((("Tournament " + toString(tId)) + " is not over yet"))
402	405		else {
403	406		let updatedDynamicData = dynamicData("PROCESSING", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), registrations, paidAttempts)
404	407		$Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData), IntegerEntry(keyUnpaidRewardsByTour(tId), (((registrations * regCost) + (paidAttempts * attCost)) / 2))], 0)
405	408		}
406	409		}
407	410		}
408	411
409	412
410	413
411	414		@Callable(i)
412	415		func finishTournament (tId) = {
413	416		let caller = toString(i.caller)
414	417		if (!(containsElement(adminsList, caller)))
415	418		then throw("Permission denied")
416	419		else {
417	420		let tData = getTourData(this, tId)
418	421		let dynamic = tData[idxDynamic]
419	422		let status = dynamic[tDynamicStatus]
420	423		if ((status == "ARCHIVED"))
421	424		then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
422	425		else {
423	426		let updatedDynamicData = dynamicData("ARCHIVED", dynamic[tDynamicLeaders], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
424	427		$Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)], 0)
425	428		}
426	429		}
427	430		}
428	431
429	432
430	433
431	434		@Callable(i)
432	435		func claimPrize (tId) = {
433	436		let prologResult = prolog()
434	437		if ((size(i.payments) != 0))
435	438		then throw("No payments required")
436	439		else {
437	440		let tData = getTourData(this, tId)
438	441		let static = tData[idxStatic]
439	442		let dynamic = tData[idxDynamic]
440	443		let status = dynamic[tDynamicStatus]
441	444		if ((status != "PROCESSING"))
442	445		then throw((("Tournament " + toString(tId)) + " is not PROCESSING"))
443	446		else {
444	447		let registrations = parseIntValue(dynamic[tDynamicTotalRegCount])
445	448		let paidAttempts = parseIntValue(dynamic[tDynamicTotalAttempts])
446	449		let regCost = parseIntValue(static[tStaticRegisterCost])
447	450		let attCost = parseIntValue(static[tStaticAttemptCost])
448	451		let awardFunds = (((registrations * regCost) + (paidAttempts * attCost)) / 2)
449	452		let unpaidKey = keyUnpaidRewardsByTour(tId)
450	453		let unpaidFunds = valueOrElse(getInteger(unpaidKey), 0)
451	454		let duckAssetId = duckByCaller(i.originCaller)
452	455		let scoreBoard = valueOrElse(getString(keyScoreBoardByTour(tId)), "")
453	456		if (!(valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(tId, duckAssetId)), false)))
454	457		then throw(((("Your duck " + duckAssetId) + " is not registered at tournament ") + toString(tId)))
455	458		else {
456	459		let bestResultKey = keyBestResultByTourAndDuck(tId, duckAssetId)
457	460		let duckBest = valueOrElse(getInteger(bestResultKey), 0)
458	461		if ((duckBest == 0))
459	462		then throw("Your duck got zero score")
460	463		else {
461	464		let awardedKey = keyIsAwardedByTourAndDuck(tId, duckAssetId)
462	465		if (valueOrElse(getBoolean(awardedKey), false))
463	466		then throw(((("Your duck " + duckAssetId) + " is already awarded at tournament ") + toString(tId)))
464	467		else {
465	468		let sumScoresKey = keySumScoresByTour(tId)
466	469		let sumScores = valueOrElse(getInteger(sumScoresKey), 0)
467	470		let leaders = dynamic[tDynamicLeaders]
468	471		let leadersList = if (if ((leaders == ""))
469	472		then true
470	473		else (leaders == " "))
471	474		then nil
472	475		else split_4C(leaders, ",")
473	476		let numLeaders = size(leadersList)
474	477		if ((numLeaders == 0))
475	478		then throw(("No leaders at tournament " + toString(tId)))
476	479		else {
477	480		let numGrands = parseIntValue(static[tStaticNumGrands])
478	481		let winResult = parseIntValue(dynamic[tDynamicWinResult])
479	482		let sumLeaderScores = if ((numLeaders > numGrands))
480	483		then 0
481	484		else if (containsElement(leadersList, duckAssetId))
482	485		then throw("As one of winners, you will be awarded by admins")
483	486		else (numLeaders * winResult)
484	487		let yourAmount = min([fraction(duckBest, awardFunds, (sumScores - sumLeaderScores)), unpaidFunds])
485	488		let newUnpaidAmount = (unpaidFunds - yourAmount)
486	489		let updatedDynamicData = dynamicData("ARCHIVED", dynamic[tDynamicLeaders], winResult, registrations, paidAttempts)
487	490		let archiveAction = if ((0 >= newUnpaidAmount))
488	491		then [StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)]
489	492		else nil
490	493		$Tuple2(([ScriptTransfer(i.caller, yourAmount, wlgAssetId), BooleanEntry(awardedKey, true), IntegerEntry(unpaidKey, newUnpaidAmount)] ++ archiveAction), 0)
491	494		}
492	495		}
493	496		}
494	497		}
495	498		}
496	499		}

github/deemru/w8io/169f3d6 
90.61 ms ◑