w8 · tx · k9w···Hqm

tx · k9we15it79grTzFQsYa925Nh4fPwNyc3xGEWdPeZHqm

3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx:  -0.01200000 Waves

2023.08.31 17:28 [2734971] smart account 3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "k9we15it79grTzFQsYa925Nh4fPwNyc3xGEWdPeZHqm",
    "fee": 1200000,
    "feeAssetId": null,
    "timestamp": 1693492209449,
    "version": 2,
    "chainId": 84,
    "sender": "3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx",
    "senderPublicKey": "UGqkWsCpv7xRVXkQRXyLd6pWPDtYGXmPip7FxSd1pAu",
    "proofs": [
        "51PJJQ6LxToakii9pomJUHZ6QT481g7Q5mr9z7o6qdiEYgCBwTMAUuhfCUMf9wGM6iF1STGyscL6buPheWsGZNhF"
    ],
    "script": "base64:BgIfCAISBgoEAQEBARIAEgASBAoCCAESBAoCCAESAwoBATQAD0RFRkFVTFRMT0NBVElPTgIPQWZyaWNhX0ZfQWZyaWNhARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkAA1sYXN0VG91cklkS2V5Ag4lc19fbGFzdFRvdXJJZAEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQN0SWQJAKwCAgIWJXMlZF9fdG91clN0YXRpY0RhdGFfXwkApAMBBQN0SWQBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBA3RJZAkArAICAhclcyVkX190b3VyRHluYW1pY0RhdGFfXwkApAMBBQN0SWQBE2tleVNjb3JlQm9hcmRCeVRvdXIBA3RJZAkArAICAhIlcyVkX19zY29yZUJvYXJkX18JAKQDAQUDdElkARtrZXlMYXN0UmVnaXN0ZXJlZFRvdXJCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICICVzJXNfX2xhc3RSZWdpc3RlcmVkVG91ckJ5RHVja19fBQtkdWNrQXNzZXRJZAEca2V5SXNSZWdpc3RlcmVkQnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIhJXMlZCVzX19pc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrCQDMCAIJAKQDAQUDdElkCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwCAl9fARtrZXlMYXN0QXR0ZW1wdEJ5VG91ckFuZER1Y2sCA3RJZAtkdWNrQXNzZXRJZAkAuQkCCQDMCAICICVzJWQlc19fbGFzdEF0dGVtcHRCeVRvdXJBbmREdWNrCQDMCAIJAKQDAQUDdElkCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwCAl9fARprZXlCZXN0UmVzdWx0QnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIfJXMlZCVzX19iZXN0UmVzdWx0QnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwAJaWR4U3RhdGljAAAACmlkeER5bmFtaWMAAQELZ2V0VG91ckRhdGECDHRvdXJDb250cmFjdAN0SWQEBnN0YXRpYwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMdG91ckNvbnRyYWN0CQEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwQHZHluYW1pYwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMdG91ckNvbnRyYWN0CQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAkArAICCQCsAgICGUVycm9yIHJlYWRpbmcgdG91cm5hbWVudCAJAKQDAQUDdElkAgUgZGF0YQICX18JAMwIAgUGc3RhdGljCQDMCAIFB2R5bmFtaWMFA25pbAATdFN0YXRpY1JlZ2lzdGVyQ29zdAACABJ0U3RhdGljQXR0ZW1wdENvc3QAAwAMdFN0YXRpY1N0YXJ0AAUACnRTdGF0aWNFbmQABgAOdER5bmFtaWNTdGF0dXMAAQAPdER5bmFtaWNXaW5EdWNrAAIAEXREeW5hbWljV2luUmVzdWx0AAMAFXREeW5hbWljVG90YWxSZWdDb3VudAAEABV0RHluYW1pY1RvdGFsQXR0ZW1wdHMABQAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQANSWR4Q2ZnV2xnRGFwcAAEAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFDUlkeENmZ1dsZ0RhcHAADXdsZ0Fzc2V0SWRLZXkCC3dsZ19hc3NldElkAAp3bGdBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgULd2xnQ29udHJhY3QFDXdsZ0Fzc2V0SWRLZXkCE05vdCBpbml0aWFsaXplZCB5ZXQBCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQpmaXhlZFBvaW50AgN2YWwIZGVjaW1hbHMEBnRlblBvdwkAbAYACgAABQhkZWNpbWFscwAAAAAFBERPV04EB2xvd1BhcnQJAKQDAQkAagIFA3ZhbAUGdGVuUG93BAZ6ZXJvZXMJALACAgkApAMBBQZ0ZW5Qb3cJAGQCAAEJALECAQUHbG93UGFydAkArAICCQCsAgIJAKwCAgkApAMBCQBpAgUDdmFsBQZ0ZW5Qb3cCAS4FBnplcm9lcwUHbG93UGFydAEEcGFkTAIDdmFsA2xlbgQEdmFsUwkApAMBBQN2YWwEBnplcm9lcwkAsAICCQCkAwEJAGwGAAoAAAkAZQIFA2xlbgkAsQIBBQR2YWxTAAAAAAUERE9XTgABCQCsAgIFBnplcm9lcwUEdmFsUwATTUFYVE9VUk5BTUVOVExFTkdUSACAmP/NAQAESE9VUgCA3dsBAAphZG1pbnNMaXN0CQDMCAIJAKUIAQUEdGhpcwkAzAgCBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUEVlMlJFTFVIQ0ZDQnNtU0NOY0JKOE4zVVJMVlFlbmRlNwMJAAACAQFUBQckbWF0Y2gwAiMzTXRCZ0pUYUx4UEIzQzdVSkQxVUU4cWprSHRoZkt2RlFZWQkAAgECDVVua25vd24gY2hhaW4FA25pbAEKc3RhdGljRGF0YQYEdHhJZAxyZWdpc3RlckNvc3QLYXR0ZW1wdENvc3QMY3JlYXRpb25UaW1lCXN0YXJ0VGltZQdlbmRUaW1lCQC5CQIJAMwIAgIMJXMlZCVkJWQlZCVkCQDMCAIFBHR4SWQJAMwIAgkApAMBBQxyZWdpc3RlckNvc3QJAMwIAgkApAMBBQthdHRlbXB0Q29zdAkAzAgCCQCkAwEFDGNyZWF0aW9uVGltZQkAzAgCCQCkAwEFCXN0YXJ0VGltZQkAzAgCCQCkAwEFB2VuZFRpbWUFA25pbAUDU0VQAQtkeW5hbWljRGF0YQUGc3RhdHVzB3dpbkR1Y2sJd2luUmVzdWx0CXRvdGFsUmVncw10b3RhbEF0dGVtcHRzCQC5CQIJAMwIAgIKJXMlcyVkJWQlZAkAzAgCBQZzdGF0dXMJAMwIAgUHd2luRHVjawkAzAgCCQCkAwEFCXdpblJlc3VsdAkAzAgCCQCkAwEFCXRvdGFsUmVncwkAzAgCCQCkAwEFDXRvdGFsQXR0ZW1wdHMFA25pbAUDU0VQAQZwcm9sb2cACQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIKc2F2ZUxhc3RUeAUDbmlsBQNuaWwBDGR1Y2tCeUNhbGxlcgEGY2FsbGVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEFBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAYBaQEQY3JlYXRlVG91cm5hbWVudAQJc3RhcnRUaW1lB2VuZFRpbWUMcmVnaXN0ZXJDb3N0C2F0dGVtcHRDb3N0BAZjYWxsZXIJAKUIAQgFAWkGY2FsbGVyAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUKYWRtaW5zTGlzdAUGY2FsbGVyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEBmxhc3RJZAkAnwgBBQ1sYXN0VG91cklkS2V5BAN0SWQDCQEJaXNEZWZpbmVkAQUGbGFzdElkBApsYXN0VG91cklkCQEFdmFsdWUBBQZsYXN0SWQEB2R5bmFtaWMJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFCmxhc3RUb3VySWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFCmxhc3RUb3VySWQCBSBkYXRhBAZzdGF0dXMJAJEDAgkAtQkCBQdkeW5hbWljBQNTRVAFDnREeW5hbWljU3RhdHVzAwkBAiE9AgUGc3RhdHVzAghBUkNISVZFRAkAAgEJAKwCAgIsQ3VycmVudCB0b3VybmVtZW50IGlzIG5vdCBjb21wbGV0ZWQsIHN0YXR1cz0FBnN0YXR1cwkAZAIFCmxhc3RUb3VySWQAAQABBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwkAZgIFA25vdwUJc3RhcnRUaW1lCQACAQkArAICCQCsAgIJAKwCAgIKc3RhcnRUaW1lPQkApAMBBQlzdGFydFRpbWUCECA8IGNyZWF0aW9uVGltZT0JAKQDAQUDbm93AwkAZgIFCXN0YXJ0VGltZQUHZW5kVGltZQkAAgEJAKwCAgkArAICCQCsAgICCGVuZFRpbWU9CQCkAwEFB2VuZFRpbWUCDSA8IHN0YXJ0VGltZT0JAKQDAQUJc3RhcnRUaW1lAwkAZgIJAGUCBQdlbmRUaW1lBQlzdGFydFRpbWUFE01BWFRPVVJOQU1FTlRMRU5HVEgJAAIBCQCsAgIJAKwCAgkArAICAh9Ub3VybmFtZW50IHBlcmlvZCBleGNlZWRzIG1heDogCQCkAwEJAGUCBQdlbmRUaW1lBQlzdGFydFRpbWUCAyA+IAkApAMBBRNNQVhUT1VSTkFNRU5UTEVOR1RIAwMJAGcCAAAFDHJlZ2lzdGVyQ29zdAYJAGcCAAAFC2F0dGVtcHRDb3N0CQACAQkArAICCQCsAgIJAKwCAgIkQ29zdCBzaG91bGQgYmUgcG9zaXRpdmUsIGJ1dCBwYXNzZWQgCQCkAwEFDHJlZ2lzdGVyQ29zdAIFIGFuZCAJAKQDAQULYXR0ZW1wdENvc3QJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUNbGFzdFRvdXJJZEtleQUDdElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAQpzdGF0aWNEYXRhBgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBQxyZWdpc3RlckNvc3QFC2F0dGVtcHRDb3N0BQNub3cFCXN0YXJ0VGltZQUHZW5kVGltZQkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAkBC2R5bmFtaWNEYXRhBQIHQ1JFQVRFRAIBIAAAAAAAAAUDbmlsBQN0SWQBaQEIcmVnaXN0ZXIABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEBndsZ0FtdAgFA3BtdAZhbW91bnQECnBtdEFzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFA3BtdAdhc3NldElkAhVXTEdPTEQgcGF5bWVudHMgb25seSEDCQECIT0CBQpwbXRBc3NldElkBQp3bGdBc3NldElkCQACAQIVV0xHT0xEIHBheW1lbnRzIG9ubHkhBAZsYXN0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBBQ1sYXN0VG91cklkS2V5AhVObyBhY3RpdmUgdG91cm5hbWVudHMEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBXREYXRhCQELZ2V0VG91ckRhdGECBQR0aGlzBQZsYXN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAZzdGF0dXMJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMDCQEBIQEDAwMJAAACBQZzdGF0dXMCB0NSRUFURUQJAGYCBQNub3cJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFDHRTdGF0aWNTdGFydAcJAGYCCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUESE9VUgUDbm93BwYDCQAAAgUGc3RhdHVzAgpJTlBST0dSRVNTCQBmAgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQFBEhPVVIFA25vdwcJAAIBAhNDYW5ub3QgcmVnaXN0ZXIgbm93BAdyZWdDb3N0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBRN0U3RhdGljUmVnaXN0ZXJDb3N0AwkBAiE9AgUGd2xnQW10BQdyZWdDb3N0CQACAQkArAICCQCsAgICEE5lZWQgcGF5bWVudCBvZiAJAQpmaXhlZFBvaW50AgUHcmVnQ29zdAAIAgcgV0xHT0xEBAtkdWNrQXNzZXRJZAkBDGR1Y2tCeUNhbGxlcgEIBQFpDG9yaWdpbkNhbGxlcgQNb2xkU2NvcmVCb2FyZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQETa2V5U2NvcmVCb2FyZEJ5VG91cgEFBmxhc3RJZAIAAwMJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBHGtleUlzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBwYJAQhjb250YWlucwIFDW9sZFNjb3JlQm9hcmQFC2R1Y2tBc3NldElkCQACAQkArAICCQCsAgIJAKwCAgIKWW91ciBkdWNrIAULZHVja0Fzc2V0SWQCJSBpcyBhbHJlYWR5IHJlZ2lzdGVyZWQgYXQgdG91cm5hbWVudCAJAKQDAQUGbGFzdElkBBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCCklOUFJPR1JFU1MJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNXaW5EdWNrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50AAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBG2tleUxhc3RSZWdpc3RlcmVkVG91ckJ5RHVjawEFC2R1Y2tBc3NldElkBQZsYXN0SWQJAMwIAgkBDEJvb2xlYW5FbnRyeQIJARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAYJAMwIAgkBC1N0cmluZ0VudHJ5AgkBE2tleVNjb3JlQm9hcmRCeVRvdXIBBQZsYXN0SWQDCQAAAgUNb2xkU2NvcmVCb2FyZAIACQCsAgIFC2R1Y2tBc3NldElkAgQ6MDAwCQCsAgIJAKwCAgkArAICBQ1vbGRTY29yZUJvYXJkAgFfBQtkdWNrQXNzZXRJZAIEOjAwMAkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFBmxhc3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwFDHByb2xvZ1Jlc3VsdAFpAQpuZXdBdHRlbXB0AAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQLZHVja0Fzc2V0SWQJAQxkdWNrQnlDYWxsZXIBCAUBaQxvcmlnaW5DYWxsZXIEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEBnN0YXR1cwkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwMJAQEhAQMJAAACBQZzdGF0dXMCCklOUFJPR1JFU1MJAGYCCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUESE9VUgUDbm93BwkAAgECF0F0dGVtcHQgaXMgbm90IHBvc3NpYmxlAwkBASEBCQELdmFsdWVPckVsc2UCCQCgCAEJARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAcJAAIBCQCsAgIJAKwCAgkArAICAgpZb3VyIGR1Y2sgBQtkdWNrQXNzZXRJZAIhIGlzIG5vdCByZWdpc3RlcmVkIGF0IHRvdXJuYW1lbnQgCQCkAwEFBmxhc3RJZAQTYXR0ZW1wdHNJdGVyYXRvcktleQkBG2tleUxhc3RBdHRlbXB0QnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQEC2xhc3RBdHRlbXB0CQCfCAEFE2F0dGVtcHRzSXRlcmF0b3JLZXkECyR0MDU5MjQ2NTU2AwkBASEBCQEJaXNEZWZpbmVkAQULbGFzdEF0dGVtcHQJAJQKAgAAAAADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGd2xnQW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCFVdMR09MRCBwYXltZW50cyBvbmx5IQMJAQIhPQIFCnBtdEFzc2V0SWQFCndsZ0Fzc2V0SWQJAAIBAhVXTEdPTEQgcGF5bWVudHMgb25seSEEB2F0dENvc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFEnRTdGF0aWNBdHRlbXB0Q29zdAMJAQIhPQIFBndsZ0FtdAUHYXR0Q29zdAkAAgEJAKwCAgkArAICAhBOZWVkIHBheW1lbnQgb2YgCQEKZml4ZWRQb2ludAIFB2F0dENvc3QACAIHIFdMR09MRAkAlAoCCQBkAgkBBXZhbHVlAQULbGFzdEF0dGVtcHQAAQABBA1wYXllZEF0dGVtcHRzCAULJHQwNTkyNDY1NTYCXzEECWluY3JlbWVudAgFCyR0MDU5MjQ2NTU2Al8yBBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCCklOUFJPR1JFU1MJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNXaW5EdWNrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbEF0dGVtcHRzBQlpbmNyZW1lbnQEC2N1ckxvY2F0aW9uCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgIBXwQHdG91ckxvYwkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCE2luaXREdWNrVG91ckF0dGVtcHQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAUDbmlsCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFE2F0dGVtcHRzSXRlcmF0b3JLZXkFDXBheWVkQXR0ZW1wdHMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQZsYXN0SWQFEnVwZGF0ZWREeW5hbWljRGF0YQUDbmlsCQDMCAIFDHByb2xvZ1Jlc3VsdAkAzAgCBQ1wYXllZEF0dGVtcHRzCQDMCAIFB3RvdXJMb2MFA25pbAFpARF1cGRhdGVEeW5hbWljRGF0YQILZHVja0Fzc2V0SWQHbmV3QmVzdAMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQGbGFzdElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUNbGFzdFRvdXJJZEtleQIVTm8gYWN0aXZlIHRvdXJuYW1lbnRzBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwMDAwkAZwIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAUHbmV3QmVzdAYJAQIhPQIJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMCCklOUFJPR1JFU1MGCQBmAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQJAJQKAgUDbmlsAAAEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwULZHVja0Fzc2V0SWQFB25ld0Jlc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFBmxhc3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwAAAFpAQ5zYXZlRHVja1Jlc3VsdAILZHVja0Fzc2V0SWQHbmV3QmVzdAMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQGbGFzdElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUNbGFzdFRvdXJJZEtleQIVTm8gYWN0aXZlIHRvdXJuYW1lbnRzBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfBA1iZXN0UmVzdWx0S2V5CQEaa2V5QmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkAwMDAwkAAAIJAJEDAgULY3VyTG9jYXRpb24FCmxvY0lkeFR5cGUCAVQJAAACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FD2xvY0lkeENvbnRpbmVudAUGbGFzdElkBwkAAAIJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMCCklOUFJPR1JFU1MHCQBnAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAgFCWxhc3RCbG9jawl0aW1lc3RhbXAHBA1vbGRCZXN0UmVzdWx0CQELdmFsdWVPckVsc2UCCQCfCAEFDWJlc3RSZXN1bHRLZXkAAAQIc2NvcmVLZXkJARNrZXlTY29yZUJvYXJkQnlUb3VyAQUGbGFzdElkBA1vbGRTY29yZUJvYXJkCQELdmFsdWVPckVsc2UCCQCiCAEFCHNjb3JlS2V5AgAEB3VwZGF0ZWQDCQBmAgUHbmV3QmVzdAUNb2xkQmVzdFJlc3VsdAMJAQEhAQkBCGNvbnRhaW5zAgUNb2xkU2NvcmVCb2FyZAULZHVja0Fzc2V0SWQJAAIBCQCsAgICHHNjb3JlQm9hcmQgZG9lcyBub3QgY29udGFpbiAFC2R1Y2tBc3NldElkBAVwYXJ0cwkAvQkCBQ1vbGRTY29yZUJvYXJkBQtkdWNrQXNzZXRJZAkArAICCQCsAgIJAKwCAgkArAICCQCRAwIFBXBhcnRzAAAFC2R1Y2tBc3NldElkAgE6CQEEcGFkTAIFB25ld0Jlc3QAAwkAsAICCQCRAwIFBXBhcnRzAAEABAUNb2xkU2NvcmVCb2FyZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ1iZXN0UmVzdWx0S2V5CQCWAwEJAMwIAgUNb2xkQmVzdFJlc3VsdAkAzAgCBQduZXdCZXN0BQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgUIc2NvcmVLZXkFB3VwZGF0ZWQFA25pbAAACQCUCgIFA25pbAAAAWkBEGZpbmlzaFRvdXJuYW1lbnQBA3RJZAQGY2FsbGVyCQClCAEIBQFpBmNhbGxlcgMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFCmFkbWluc0xpc3QFBmNhbGxlcgkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUDdElkBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAZzdGF0dXMJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMDCQAAAgUGc3RhdHVzAghBUkNISVZFRAkAAgEJAKwCAgkArAICAgtUb3VybmFtZW50IAkApAMBBQN0SWQCFCBpcyBhbHJlYWR5IEFSQ0hJVkVEBBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCCEFSQ0hJVkVECQCRAwIFB2R5bmFtaWMFD3REeW5hbWljV2luRHVjawkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFEXREeW5hbWljV2luUmVzdWx0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbEF0dGVtcHRzCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQN0SWQFEnVwZGF0ZWREeW5hbWljRGF0YQUDbmlsAAAA8n+NqA==",
    "height": 2734971,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Ard2KekPMgzREu9fkdMxuL8atrT6Sn8u33oYpCRjYiE8
Next: 9YC1hZU7qSPga9Ts4kUWFAtsycG6RRXnCFPiP3exZyRE

Diff: 
Old New Differences
64 64  let locIdxContinent = 0
65 65  
66 66  let locIdxType = 1
67 - 
68 - let locIdxId = 2
69 67  
70 68  let chain = take(drop(this.bytes, 1), 1)
71 69  
294 292                  let increment = $t059246556._2
295 293                  let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), (parseIntValue(dynamic[tDynamicTotalAttempts]) + increment))
296 294                  let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
297 -                 let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
298 -                 let best = if (if ((curLocation[locIdxType] == "T"))
299 -                     then (parseIntValue(curLocation[locIdxContinent]) == lastId)
300 -                     else false)
301 -                     then {
302 -                         let bestResult = valueOrElse(getInteger(bestResultKey), 0)
303 -                         let curResult = parseIntValue(curLocation[locIdxId])
304 -                         max([bestResult, curResult])
305 -                         }
306 -                     else 0
307 295                  let tourLoc = asString(invoke(stakingContract, "initDuckTourAttempt", [duckAssetId], nil))
308 -                 $Tuple2([IntegerEntry(bestResultKey, best), IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
296 +                 $Tuple2([IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
309 297                  }
310 298      }
311 299  
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  func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
7 7  
8 8  
9 9  func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
10 10  
11 11  
12 12  let lastTourIdKey = "%s__lastTourId"
13 13  
14 14  func keyTourStaticDataById (tId) = ("%s%d__tourStaticData__" + toString(tId))
15 15  
16 16  
17 17  func keyTourDynamicDataById (tId) = ("%s%d__tourDynamicData__" + toString(tId))
18 18  
19 19  
20 20  func keyScoreBoardByTour (tId) = ("%s%d__scoreBoard__" + toString(tId))
21 21  
22 22  
23 23  func keyLastRegisteredTourByDuck (duckAssetId) = ("%s%s__lastRegisteredTourByDuck__" + duckAssetId)
24 24  
25 25  
26 26  func keyIsRegisteredByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__isRegisteredByTourAndDuck", toString(tId), duckAssetId], "__")
27 27  
28 28  
29 29  func keyLastAttemptByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__lastAttemptByTourAndDuck", toString(tId), duckAssetId], "__")
30 30  
31 31  
32 32  func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
33 33  
34 34  
35 35  let idxStatic = 0
36 36  
37 37  let idxDynamic = 1
38 38  
39 39  func getTourData (tourContract,tId) = {
40 40      let static = split(valueOrErrorMessage(getString(tourContract, keyTourStaticDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
41 41      let dynamic = split(valueOrErrorMessage(getString(tourContract, keyTourDynamicDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
42 42  [static, dynamic]
43 43      }
44 44  
45 45  
46 46  let tStaticRegisterCost = 2
47 47  
48 48  let tStaticAttemptCost = 3
49 49  
50 50  let tStaticStart = 5
51 51  
52 52  let tStaticEnd = 6
53 53  
54 54  let tDynamicStatus = 1
55 55  
56 56  let tDynamicWinDuck = 2
57 57  
58 58  let tDynamicWinResult = 3
59 59  
60 60  let tDynamicTotalRegCount = 4
61 61  
62 62  let tDynamicTotalAttempts = 5
63 63  
64 64  let locIdxContinent = 0
65 65  
66 66  let locIdxType = 1
67 - 
68 - let locIdxId = 2
69 67  
70 68  let chain = take(drop(this.bytes, 1), 1)
71 69  
72 70  let defaultRestAddressStr = match chain {
73 71      case _ => 
74 72          if ((base58'2W' == $match0))
75 73              then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
76 74              else if ((base58'2T' == $match0))
77 75                  then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
78 76                  else throw("Unknown chain")
79 77  }
80 78  
81 79  let SEP = "__"
82 80  
83 81  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
84 82  
85 83  
86 84  let IdxCfgStakingDapp = 1
87 85  
88 86  let IdxCfgWlgDapp = 4
89 87  
90 88  func keyRestCfg () = "%s__restConfig"
91 89  
92 90  
93 91  func keyRestAddress () = "%s__restAddr"
94 92  
95 93  
96 94  func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
97 95  
98 96  
99 97  func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
100 98  
101 99  
102 100  let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
103 101  
104 102  let restCfg = readRestCfgOrFail(restContract)
105 103  
106 104  let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
107 105  
108 106  let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
109 107  
110 108  let wlgAssetIdKey = "wlg_assetId"
111 109  
112 110  let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "Not initialized yet")
113 111  
114 112  func asString (v) = match v {
115 113      case s: String => 
116 114          s
117 115      case _ => 
118 116          throw("fail to cast into String")
119 117  }
120 118  
121 119  
122 120  func asInt (v) = match v {
123 121      case n: Int => 
124 122          n
125 123      case _ => 
126 124          throw("fail to cast into Int")
127 125  }
128 126  
129 127  
130 128  func fixedPoint (val,decimals) = {
131 129      let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
132 130      let lowPart = toString((val % tenPow))
133 131      let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
134 132      (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
135 133      }
136 134  
137 135  
138 136  func padL (val,len) = {
139 137      let valS = toString(val)
140 138      let zeroes = drop(toString(pow(10, 0, (len - size(valS)), 0, 0, DOWN)), 1)
141 139      (zeroes + valS)
142 140      }
143 141  
144 142  
145 143  let MAXTOURNAMENTLENGTH = 432000000
146 144  
147 145  let HOUR = 3600000
148 146  
149 147  let adminsList = [toString(this), match chain {
150 148      case _ => 
151 149          if ((base58'2W' == $match0))
152 150              then "3PEe2RELUHCFCBsmSCNcBJ8N3URLVQende7"
153 151              else if ((base58'2T' == $match0))
154 152                  then "3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY"
155 153                  else throw("Unknown chain")
156 154  }]
157 155  
158 156  func staticData (txId,registerCost,attemptCost,creationTime,startTime,endTime) = makeString(["%s%d%d%d%d%d", txId, toString(registerCost), toString(attemptCost), toString(creationTime), toString(startTime), toString(endTime)], SEP)
159 157  
160 158  
161 159  func dynamicData (status,winDuck,winResult,totalRegs,totalAttempts) = makeString(["%s%s%d%d%d", status, winDuck, toString(winResult), toString(totalRegs), toString(totalAttempts)], SEP)
162 160  
163 161  
164 162  func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
165 163  
166 164  
167 165  func duckByCaller (caller) = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(caller))), "You don't have a duck staked")
168 166  
169 167  
170 168  @Callable(i)
171 169  func createTournament (startTime,endTime,registerCost,attemptCost) = {
172 170      let caller = toString(i.caller)
173 171      if (!(containsElement(adminsList, caller)))
174 172          then throw("Permission denied")
175 173          else {
176 174              let lastId = getInteger(lastTourIdKey)
177 175              let tId = if (isDefined(lastId))
178 176                  then {
179 177                      let lastTourId = value(lastId)
180 178                      let dynamic = valueOrErrorMessage(getString(keyTourDynamicDataById(lastTourId)), (("Error reading tournament " + toString(lastTourId)) + " data"))
181 179                      let status = split(dynamic, SEP)[tDynamicStatus]
182 180                      if ((status != "ARCHIVED"))
183 181                          then throw(("Current tournement is not completed, status=" + status))
184 182                          else (lastTourId + 1)
185 183                      }
186 184                  else 1
187 185              let now = lastBlock.timestamp
188 186              if ((now > startTime))
189 187                  then throw(((("startTime=" + toString(startTime)) + " < creationTime=") + toString(now)))
190 188                  else if ((startTime > endTime))
191 189                      then throw(((("endTime=" + toString(endTime)) + " < startTime=") + toString(startTime)))
192 190                      else if (((endTime - startTime) > MAXTOURNAMENTLENGTH))
193 191                          then throw(((("Tournament period exceeds max: " + toString((endTime - startTime))) + " > ") + toString(MAXTOURNAMENTLENGTH)))
194 192                          else if (if ((0 >= registerCost))
195 193                              then true
196 194                              else (0 >= attemptCost))
197 195                              then throw(((("Cost should be positive, but passed " + toString(registerCost)) + " and ") + toString(attemptCost)))
198 196                              else $Tuple2([IntegerEntry(lastTourIdKey, tId), StringEntry(keyTourStaticDataById(tId), staticData(toBase58String(i.transactionId), registerCost, attemptCost, now, startTime, endTime)), StringEntry(keyTourDynamicDataById(tId), dynamicData("CREATED", " ", 0, 0, 0))], tId)
199 197              }
200 198      }
201 199  
202 200  
203 201  
204 202  @Callable(i)
205 203  func register () = {
206 204      let prologResult = prolog()
207 205      if ((size(i.payments) != 1))
208 206          then throw("exactly 1 payment must be attached")
209 207          else {
210 208              let pmt = i.payments[0]
211 209              let wlgAmt = pmt.amount
212 210              let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
213 211              if ((pmtAssetId != wlgAssetId))
214 212                  then throw("WLGOLD payments only!")
215 213                  else {
216 214                      let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
217 215                      let now = lastBlock.timestamp
218 216                      let tData = getTourData(this, lastId)
219 217                      let static = tData[idxStatic]
220 218                      let dynamic = tData[idxDynamic]
221 219                      let status = dynamic[tDynamicStatus]
222 220                      if (!(if (if (if ((status == "CREATED"))
223 221                          then (now > parseIntValue(static[tStaticStart]))
224 222                          else false)
225 223                          then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
226 224                          else false)
227 225                          then true
228 226                          else if ((status == "INPROGRESS"))
229 227                              then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
230 228                              else false))
231 229                          then throw("Cannot register now")
232 230                          else {
233 231                              let regCost = parseIntValue(static[tStaticRegisterCost])
234 232                              if ((wlgAmt != regCost))
235 233                                  then throw((("Need payment of " + fixedPoint(regCost, 8)) + " WLGOLD"))
236 234                                  else {
237 235                                      let duckAssetId = duckByCaller(i.originCaller)
238 236                                      let oldScoreBoard = valueOrElse(getString(keyScoreBoardByTour(lastId)), "")
239 237                                      if (if (valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false))
240 238                                          then true
241 239                                          else contains(oldScoreBoard, duckAssetId))
242 240                                          then throw(((("Your duck " + duckAssetId) + " is already registered at tournament ") + toString(lastId)))
243 241                                          else {
244 242                                              let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), (parseIntValue(dynamic[tDynamicTotalRegCount]) + 1), parseIntValue(dynamic[tDynamicTotalAttempts]))
245 243                                              $Tuple2([IntegerEntry(keyLastRegisteredTourByDuck(duckAssetId), lastId), BooleanEntry(keyIsRegisteredByTourAndDuck(lastId, duckAssetId), true), StringEntry(keyScoreBoardByTour(lastId), if ((oldScoreBoard == ""))
246 244                                                  then (duckAssetId + ":000")
247 245                                                  else (((oldScoreBoard + "_") + duckAssetId) + ":000")), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], prologResult)
248 246                                              }
249 247                                      }
250 248                              }
251 249                      }
252 250              }
253 251      }
254 252  
255 253  
256 254  
257 255  @Callable(i)
258 256  func newAttempt () = {
259 257      let prologResult = prolog()
260 258      let duckAssetId = duckByCaller(i.originCaller)
261 259      let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
262 260      let now = lastBlock.timestamp
263 261      let tData = getTourData(this, lastId)
264 262      let static = tData[idxStatic]
265 263      let dynamic = tData[idxDynamic]
266 264      let status = dynamic[tDynamicStatus]
267 265      if (!(if ((status == "INPROGRESS"))
268 266          then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
269 267          else false))
270 268          then throw("Attempt is not possible")
271 269          else if (!(valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false)))
272 270              then throw(((("Your duck " + duckAssetId) + " is not registered at tournament ") + toString(lastId)))
273 271              else {
274 272                  let attemptsIteratorKey = keyLastAttemptByTourAndDuck(lastId, duckAssetId)
275 273                  let lastAttempt = getInteger(attemptsIteratorKey)
276 274                  let $t059246556 = if (!(isDefined(lastAttempt)))
277 275                      then $Tuple2(0, 0)
278 276                      else if ((size(i.payments) != 1))
279 277                          then throw("exactly 1 payment must be attached")
280 278                          else {
281 279                              let pmt = i.payments[0]
282 280                              let wlgAmt = pmt.amount
283 281                              let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
284 282                              if ((pmtAssetId != wlgAssetId))
285 283                                  then throw("WLGOLD payments only!")
286 284                                  else {
287 285                                      let attCost = parseIntValue(static[tStaticAttemptCost])
288 286                                      if ((wlgAmt != attCost))
289 287                                          then throw((("Need payment of " + fixedPoint(attCost, 8)) + " WLGOLD"))
290 288                                          else $Tuple2((value(lastAttempt) + 1), 1)
291 289                                      }
292 290                              }
293 291                  let payedAttempts = $t059246556._1
294 292                  let increment = $t059246556._2
295 293                  let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), (parseIntValue(dynamic[tDynamicTotalAttempts]) + increment))
296 294                  let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
297 -                 let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
298 -                 let best = if (if ((curLocation[locIdxType] == "T"))
299 -                     then (parseIntValue(curLocation[locIdxContinent]) == lastId)
300 -                     else false)
301 -                     then {
302 -                         let bestResult = valueOrElse(getInteger(bestResultKey), 0)
303 -                         let curResult = parseIntValue(curLocation[locIdxId])
304 -                         max([bestResult, curResult])
305 -                         }
306 -                     else 0
307 295                  let tourLoc = asString(invoke(stakingContract, "initDuckTourAttempt", [duckAssetId], nil))
308 -                 $Tuple2([IntegerEntry(bestResultKey, best), IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
296 +                 $Tuple2([IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
309 297                  }
310 298      }
311 299  
312 300  
313 301  
314 302  @Callable(i)
315 303  func updateDynamicData (duckAssetId,newBest) = if ((i.caller != stakingContract))
316 304      then throw("Access denied")
317 305      else {
318 306          let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
319 307          let tData = getTourData(this, lastId)
320 308          let static = tData[idxStatic]
321 309          let dynamic = tData[idxDynamic]
322 310          if (if (if ((parseIntValue(dynamic[tDynamicWinResult]) >= newBest))
323 311              then true
324 312              else (dynamic[tDynamicStatus] != "INPROGRESS"))
325 313              then true
326 314              else (lastBlock.timestamp > parseIntValue(static[tStaticEnd])))
327 315              then $Tuple2(nil, 0)
328 316              else {
329 317                  let updatedDynamicData = dynamicData("INPROGRESS", duckAssetId, newBest, parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
330 318                  $Tuple2([StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], 0)
331 319                  }
332 320          }
333 321  
334 322  
335 323  
336 324  @Callable(i)
337 325  func saveDuckResult (duckAssetId,newBest) = if ((i.caller != stakingContract))
338 326      then throw("Access denied")
339 327      else {
340 328          let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
341 329          let tData = getTourData(this, lastId)
342 330          let static = tData[idxStatic]
343 331          let dynamic = tData[idxDynamic]
344 332          let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
345 333          let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
346 334          if (if (if (if ((curLocation[locIdxType] == "T"))
347 335              then (parseIntValue(curLocation[locIdxContinent]) == lastId)
348 336              else false)
349 337              then (dynamic[tDynamicStatus] == "INPROGRESS")
350 338              else false)
351 339              then (parseIntValue(static[tStaticEnd]) >= lastBlock.timestamp)
352 340              else false)
353 341              then {
354 342                  let oldBestResult = valueOrElse(getInteger(bestResultKey), 0)
355 343                  let scoreKey = keyScoreBoardByTour(lastId)
356 344                  let oldScoreBoard = valueOrElse(getString(scoreKey), "")
357 345                  let updated = if ((newBest > oldBestResult))
358 346                      then if (!(contains(oldScoreBoard, duckAssetId)))
359 347                          then throw(("scoreBoard does not contain " + duckAssetId))
360 348                          else {
361 349                              let parts = split_51C(oldScoreBoard, duckAssetId)
362 350                              ((((parts[0] + duckAssetId) + ":") + padL(newBest, 3)) + drop(parts[1], 4))
363 351                              }
364 352                      else oldScoreBoard
365 353                  $Tuple2([IntegerEntry(bestResultKey, max([oldBestResult, newBest])), StringEntry(scoreKey, updated)], 0)
366 354                  }
367 355              else $Tuple2(nil, 0)
368 356          }
369 357  
370 358  
371 359  
372 360  @Callable(i)
373 361  func finishTournament (tId) = {
374 362      let caller = toString(i.caller)
375 363      if (!(containsElement(adminsList, caller)))
376 364          then throw("Permission denied")
377 365          else {
378 366              let tData = getTourData(this, tId)
379 367              let dynamic = tData[idxDynamic]
380 368              let status = dynamic[tDynamicStatus]
381 369              if ((status == "ARCHIVED"))
382 370                  then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
383 371                  else {
384 372                      let updatedDynamicData = dynamicData("ARCHIVED", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
385 373                      $Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)], 0)
386 374                      }
387 375              }
388 376      }
389 377  
390 378

Old	New		Differences
64	64		let locIdxContinent = 0
65	65
66	66		let locIdxType = 1
67		-
68		-	let locIdxId = 2
69	67
70	68		let chain = take(drop(this.bytes, 1), 1)
71	69

294	292		let increment = $t059246556._2
295	293		let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), (parseIntValue(dynamic[tDynamicTotalAttempts]) + increment))
296	294		let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
297		-	let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
298		-	let best = if (if ((curLocation[locIdxType] == "T"))
299		-	then (parseIntValue(curLocation[locIdxContinent]) == lastId)
300		-	else false)
301		-	then {
302		-	let bestResult = valueOrElse(getInteger(bestResultKey), 0)
303		-	let curResult = parseIntValue(curLocation[locIdxId])
304		-	max([bestResult, curResult])
305		-	}
306		-	else 0
307	295		let tourLoc = asString(invoke(stakingContract, "initDuckTourAttempt", [duckAssetId], nil))
308		-	$Tuple2([~~IntegerEntry(bestResultKey, best),~~ IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
	296	+	$Tuple2([IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
309	297		}
310	298		}
311	299

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		func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
7	7
8	8
9	9		func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
10	10
11	11
12	12		let lastTourIdKey = "%s__lastTourId"
13	13
14	14		func keyTourStaticDataById (tId) = ("%s%d__tourStaticData__" + toString(tId))
15	15
16	16
17	17		func keyTourDynamicDataById (tId) = ("%s%d__tourDynamicData__" + toString(tId))
18	18
19	19
20	20		func keyScoreBoardByTour (tId) = ("%s%d__scoreBoard__" + toString(tId))
21	21
22	22
23	23		func keyLastRegisteredTourByDuck (duckAssetId) = ("%s%s__lastRegisteredTourByDuck__" + duckAssetId)
24	24
25	25
26	26		func keyIsRegisteredByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__isRegisteredByTourAndDuck", toString(tId), duckAssetId], "__")
27	27
28	28
29	29		func keyLastAttemptByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__lastAttemptByTourAndDuck", toString(tId), duckAssetId], "__")
30	30
31	31
32	32		func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
33	33
34	34
35	35		let idxStatic = 0
36	36
37	37		let idxDynamic = 1
38	38
39	39		func getTourData (tourContract,tId) = {
40	40		let static = split(valueOrErrorMessage(getString(tourContract, keyTourStaticDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
41	41		let dynamic = split(valueOrErrorMessage(getString(tourContract, keyTourDynamicDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
42	42		[static, dynamic]
43	43		}
44	44
45	45
46	46		let tStaticRegisterCost = 2
47	47
48	48		let tStaticAttemptCost = 3
49	49
50	50		let tStaticStart = 5
51	51
52	52		let tStaticEnd = 6
53	53
54	54		let tDynamicStatus = 1
55	55
56	56		let tDynamicWinDuck = 2
57	57
58	58		let tDynamicWinResult = 3
59	59
60	60		let tDynamicTotalRegCount = 4
61	61
62	62		let tDynamicTotalAttempts = 5
63	63
64	64		let locIdxContinent = 0
65	65
66	66		let locIdxType = 1
67		-
68		-	let locIdxId = 2
69	67
70	68		let chain = take(drop(this.bytes, 1), 1)
71	69
72	70		let defaultRestAddressStr = match chain {
73	71		case _ =>
74	72		if ((base58'2W' == $match0))
75	73		then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
76	74		else if ((base58'2T' == $match0))
77	75		then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
78	76		else throw("Unknown chain")
79	77		}
80	78
81	79		let SEP = "__"
82	80
83	81		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
84	82
85	83
86	84		let IdxCfgStakingDapp = 1
87	85
88	86		let IdxCfgWlgDapp = 4
89	87
90	88		func keyRestCfg () = "%s__restConfig"
91	89
92	90
93	91		func keyRestAddress () = "%s__restAddr"
94	92
95	93
96	94		func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
97	95
98	96
99	97		func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
100	98
101	99
102	100		let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
103	101
104	102		let restCfg = readRestCfgOrFail(restContract)
105	103
106	104		let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
107	105
108	106		let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
109	107
110	108		let wlgAssetIdKey = "wlg_assetId"
111	109
112	110		let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "Not initialized yet")
113	111
114	112		func asString (v) = match v {
115	113		case s: String =>
116	114		s
117	115		case _ =>
118	116		throw("fail to cast into String")
119	117		}
120	118
121	119
122	120		func asInt (v) = match v {
123	121		case n: Int =>
124	122		n
125	123		case _ =>
126	124		throw("fail to cast into Int")
127	125		}
128	126
129	127
130	128		func fixedPoint (val,decimals) = {
131	129		let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
132	130		let lowPart = toString((val % tenPow))
133	131		let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
134	132		(((toString((val / tenPow)) + ".") + zeroes) + lowPart)
135	133		}
136	134
137	135
138	136		func padL (val,len) = {
139	137		let valS = toString(val)
140	138		let zeroes = drop(toString(pow(10, 0, (len - size(valS)), 0, 0, DOWN)), 1)
141	139		(zeroes + valS)
142	140		}
143	141
144	142
145	143		let MAXTOURNAMENTLENGTH = 432000000
146	144
147	145		let HOUR = 3600000
148	146
149	147		let adminsList = [toString(this), match chain {
150	148		case _ =>
151	149		if ((base58'2W' == $match0))
152	150		then "3PEe2RELUHCFCBsmSCNcBJ8N3URLVQende7"
153	151		else if ((base58'2T' == $match0))
154	152		then "3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY"
155	153		else throw("Unknown chain")
156	154		}]
157	155
158	156		func staticData (txId,registerCost,attemptCost,creationTime,startTime,endTime) = makeString(["%s%d%d%d%d%d", txId, toString(registerCost), toString(attemptCost), toString(creationTime), toString(startTime), toString(endTime)], SEP)
159	157
160	158
161	159		func dynamicData (status,winDuck,winResult,totalRegs,totalAttempts) = makeString(["%s%s%d%d%d", status, winDuck, toString(winResult), toString(totalRegs), toString(totalAttempts)], SEP)
162	160
163	161
164	162		func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
165	163
166	164
167	165		func duckByCaller (caller) = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(caller))), "You don't have a duck staked")
168	166
169	167
170	168		@Callable(i)
171	169		func createTournament (startTime,endTime,registerCost,attemptCost) = {
172	170		let caller = toString(i.caller)
173	171		if (!(containsElement(adminsList, caller)))
174	172		then throw("Permission denied")
175	173		else {
176	174		let lastId = getInteger(lastTourIdKey)
177	175		let tId = if (isDefined(lastId))
178	176		then {
179	177		let lastTourId = value(lastId)
180	178		let dynamic = valueOrErrorMessage(getString(keyTourDynamicDataById(lastTourId)), (("Error reading tournament " + toString(lastTourId)) + " data"))
181	179		let status = split(dynamic, SEP)[tDynamicStatus]
182	180		if ((status != "ARCHIVED"))
183	181		then throw(("Current tournement is not completed, status=" + status))
184	182		else (lastTourId + 1)
185	183		}
186	184		else 1
187	185		let now = lastBlock.timestamp
188	186		if ((now > startTime))
189	187		then throw(((("startTime=" + toString(startTime)) + " < creationTime=") + toString(now)))
190	188		else if ((startTime > endTime))
191	189		then throw(((("endTime=" + toString(endTime)) + " < startTime=") + toString(startTime)))
192	190		else if (((endTime - startTime) > MAXTOURNAMENTLENGTH))
193	191		then throw(((("Tournament period exceeds max: " + toString((endTime - startTime))) + " > ") + toString(MAXTOURNAMENTLENGTH)))
194	192		else if (if ((0 >= registerCost))
195	193		then true
196	194		else (0 >= attemptCost))
197	195		then throw(((("Cost should be positive, but passed " + toString(registerCost)) + " and ") + toString(attemptCost)))
198	196		else $Tuple2([IntegerEntry(lastTourIdKey, tId), StringEntry(keyTourStaticDataById(tId), staticData(toBase58String(i.transactionId), registerCost, attemptCost, now, startTime, endTime)), StringEntry(keyTourDynamicDataById(tId), dynamicData("CREATED", " ", 0, 0, 0))], tId)
199	197		}
200	198		}
201	199
202	200
203	201
204	202		@Callable(i)
205	203		func register () = {
206	204		let prologResult = prolog()
207	205		if ((size(i.payments) != 1))
208	206		then throw("exactly 1 payment must be attached")
209	207		else {
210	208		let pmt = i.payments[0]
211	209		let wlgAmt = pmt.amount
212	210		let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
213	211		if ((pmtAssetId != wlgAssetId))
214	212		then throw("WLGOLD payments only!")
215	213		else {
216	214		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
217	215		let now = lastBlock.timestamp
218	216		let tData = getTourData(this, lastId)
219	217		let static = tData[idxStatic]
220	218		let dynamic = tData[idxDynamic]
221	219		let status = dynamic[tDynamicStatus]
222	220		if (!(if (if (if ((status == "CREATED"))
223	221		then (now > parseIntValue(static[tStaticStart]))
224	222		else false)
225	223		then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
226	224		else false)
227	225		then true
228	226		else if ((status == "INPROGRESS"))
229	227		then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
230	228		else false))
231	229		then throw("Cannot register now")
232	230		else {
233	231		let regCost = parseIntValue(static[tStaticRegisterCost])
234	232		if ((wlgAmt != regCost))
235	233		then throw((("Need payment of " + fixedPoint(regCost, 8)) + " WLGOLD"))
236	234		else {
237	235		let duckAssetId = duckByCaller(i.originCaller)
238	236		let oldScoreBoard = valueOrElse(getString(keyScoreBoardByTour(lastId)), "")
239	237		if (if (valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false))
240	238		then true
241	239		else contains(oldScoreBoard, duckAssetId))
242	240		then throw(((("Your duck " + duckAssetId) + " is already registered at tournament ") + toString(lastId)))
243	241		else {
244	242		let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), (parseIntValue(dynamic[tDynamicTotalRegCount]) + 1), parseIntValue(dynamic[tDynamicTotalAttempts]))
245	243		$Tuple2([IntegerEntry(keyLastRegisteredTourByDuck(duckAssetId), lastId), BooleanEntry(keyIsRegisteredByTourAndDuck(lastId, duckAssetId), true), StringEntry(keyScoreBoardByTour(lastId), if ((oldScoreBoard == ""))
246	244		then (duckAssetId + ":000")
247	245		else (((oldScoreBoard + "_") + duckAssetId) + ":000")), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], prologResult)
248	246		}
249	247		}
250	248		}
251	249		}
252	250		}
253	251		}
254	252
255	253
256	254
257	255		@Callable(i)
258	256		func newAttempt () = {
259	257		let prologResult = prolog()
260	258		let duckAssetId = duckByCaller(i.originCaller)
261	259		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
262	260		let now = lastBlock.timestamp
263	261		let tData = getTourData(this, lastId)
264	262		let static = tData[idxStatic]
265	263		let dynamic = tData[idxDynamic]
266	264		let status = dynamic[tDynamicStatus]
267	265		if (!(if ((status == "INPROGRESS"))
268	266		then ((parseIntValue(static[tStaticEnd]) - HOUR) > now)
269	267		else false))
270	268		then throw("Attempt is not possible")
271	269		else if (!(valueOrElse(getBoolean(keyIsRegisteredByTourAndDuck(lastId, duckAssetId)), false)))
272	270		then throw(((("Your duck " + duckAssetId) + " is not registered at tournament ") + toString(lastId)))
273	271		else {
274	272		let attemptsIteratorKey = keyLastAttemptByTourAndDuck(lastId, duckAssetId)
275	273		let lastAttempt = getInteger(attemptsIteratorKey)
276	274		let $t059246556 = if (!(isDefined(lastAttempt)))
277	275		then $Tuple2(0, 0)
278	276		else if ((size(i.payments) != 1))
279	277		then throw("exactly 1 payment must be attached")
280	278		else {
281	279		let pmt = i.payments[0]
282	280		let wlgAmt = pmt.amount
283	281		let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WLGOLD payments only!")
284	282		if ((pmtAssetId != wlgAssetId))
285	283		then throw("WLGOLD payments only!")
286	284		else {
287	285		let attCost = parseIntValue(static[tStaticAttemptCost])
288	286		if ((wlgAmt != attCost))
289	287		then throw((("Need payment of " + fixedPoint(attCost, 8)) + " WLGOLD"))
290	288		else $Tuple2((value(lastAttempt) + 1), 1)
291	289		}
292	290		}
293	291		let payedAttempts = $t059246556._1
294	292		let increment = $t059246556._2
295	293		let updatedDynamicData = dynamicData("INPROGRESS", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), (parseIntValue(dynamic[tDynamicTotalAttempts]) + increment))
296	294		let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
297		-	let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
298		-	let best = if (if ((curLocation[locIdxType] == "T"))
299		-	then (parseIntValue(curLocation[locIdxContinent]) == lastId)
300		-	else false)
301		-	then {
302		-	let bestResult = valueOrElse(getInteger(bestResultKey), 0)
303		-	let curResult = parseIntValue(curLocation[locIdxId])
304		-	max([bestResult, curResult])
305		-	}
306		-	else 0
307	295		let tourLoc = asString(invoke(stakingContract, "initDuckTourAttempt", [duckAssetId], nil))
308		-	$Tuple2([~~IntegerEntry(bestResultKey, best),~~ IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
	296	+	$Tuple2([IntegerEntry(attemptsIteratorKey, payedAttempts), StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], [prologResult, payedAttempts, tourLoc])
309	297		}
310	298		}
311	299
312	300
313	301
314	302		@Callable(i)
315	303		func updateDynamicData (duckAssetId,newBest) = if ((i.caller != stakingContract))
316	304		then throw("Access denied")
317	305		else {
318	306		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
319	307		let tData = getTourData(this, lastId)
320	308		let static = tData[idxStatic]
321	309		let dynamic = tData[idxDynamic]
322	310		if (if (if ((parseIntValue(dynamic[tDynamicWinResult]) >= newBest))
323	311		then true
324	312		else (dynamic[tDynamicStatus] != "INPROGRESS"))
325	313		then true
326	314		else (lastBlock.timestamp > parseIntValue(static[tStaticEnd])))
327	315		then $Tuple2(nil, 0)
328	316		else {
329	317		let updatedDynamicData = dynamicData("INPROGRESS", duckAssetId, newBest, parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
330	318		$Tuple2([StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], 0)
331	319		}
332	320		}
333	321
334	322
335	323
336	324		@Callable(i)
337	325		func saveDuckResult (duckAssetId,newBest) = if ((i.caller != stakingContract))
338	326		then throw("Access denied")
339	327		else {
340	328		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")
341	329		let tData = getTourData(this, lastId)
342	330		let static = tData[idxStatic]
343	331		let dynamic = tData[idxDynamic]
344	332		let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
345	333		let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
346	334		if (if (if (if ((curLocation[locIdxType] == "T"))
347	335		then (parseIntValue(curLocation[locIdxContinent]) == lastId)
348	336		else false)
349	337		then (dynamic[tDynamicStatus] == "INPROGRESS")
350	338		else false)
351	339		then (parseIntValue(static[tStaticEnd]) >= lastBlock.timestamp)
352	340		else false)
353	341		then {
354	342		let oldBestResult = valueOrElse(getInteger(bestResultKey), 0)
355	343		let scoreKey = keyScoreBoardByTour(lastId)
356	344		let oldScoreBoard = valueOrElse(getString(scoreKey), "")
357	345		let updated = if ((newBest > oldBestResult))
358	346		then if (!(contains(oldScoreBoard, duckAssetId)))
359	347		then throw(("scoreBoard does not contain " + duckAssetId))
360	348		else {
361	349		let parts = split_51C(oldScoreBoard, duckAssetId)
362	350		((((parts[0] + duckAssetId) + ":") + padL(newBest, 3)) + drop(parts[1], 4))
363	351		}
364	352		else oldScoreBoard
365	353		$Tuple2([IntegerEntry(bestResultKey, max([oldBestResult, newBest])), StringEntry(scoreKey, updated)], 0)
366	354		}
367	355		else $Tuple2(nil, 0)
368	356		}
369	357
370	358
371	359
372	360		@Callable(i)
373	361		func finishTournament (tId) = {
374	362		let caller = toString(i.caller)
375	363		if (!(containsElement(adminsList, caller)))
376	364		then throw("Permission denied")
377	365		else {
378	366		let tData = getTourData(this, tId)
379	367		let dynamic = tData[idxDynamic]
380	368		let status = dynamic[tDynamicStatus]
381	369		if ((status == "ARCHIVED"))
382	370		then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
383	371		else {
384	372		let updatedDynamicData = dynamicData("ARCHIVED", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
385	373		$Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)], 0)
386	374		}
387	375		}
388	376		}
389	377
390	378

github/deemru/w8io/169f3d6 
62.78 ms ◑