w8 · tx · CcW···1xP

tx · CcWe6nSyg5XsK2swkVP3k79v1Bcz5gZcbb9cm25Kq1xP

3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx:  -0.01300000 Waves

2023.09.05 23:49 [2742578] smart account 3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CcWe6nSyg5XsK2swkVP3k79v1Bcz5gZcbb9cm25Kq1xP",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1693946976532,
    "version": 2,
    "chainId": 84,
    "sender": "3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx",
    "senderPublicKey": "UGqkWsCpv7xRVXkQRXyLd6pWPDtYGXmPip7FxSd1pAu",
    "proofs": [
        "yyPCQzqPB97r5zngrX9NJ8t9tb4KWNjPPoEKP41H92qTfYqjEUhKjEjERnoBPBH6K6BChzc9sL3qpSgnbGyv9pT"
    ],
    "script": "base64:BgIlCAISBwoFAQEBAQESABIAEgQKAggBEgQKAggBEgMKAQESAwoBATYAD0RFRkFVTFRMT0NBVElPTgIPQWZyaWNhX0ZfQWZyaWNhARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkAA1sYXN0VG91cklkS2V5Ag4lc19fbGFzdFRvdXJJZAEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQN0SWQJAKwCAgIWJXMlZF9fdG91clN0YXRpY0RhdGFfXwkApAMBBQN0SWQBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBA3RJZAkArAICAhclcyVkX190b3VyRHluYW1pY0RhdGFfXwkApAMBBQN0SWQBE2tleVNjb3JlQm9hcmRCeVRvdXIBA3RJZAkArAICAhIlcyVkX19zY29yZUJvYXJkX18JAKQDAQUDdElkARJrZXlTdW1TY29yZXNCeVRvdXIBA3RJZAkArAICAhElcyVkX19zdW1TY29yZXNfXwkApAMBBQN0SWQBEGtleVdpbm5lcnNCeVRvdXIBA3RJZAkArAICAg8lcyVkX193aW5uZXJzX18JAKQDAQUDdElkARtrZXlMYXN0UmVnaXN0ZXJlZFRvdXJCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICICVzJXNfX2xhc3RSZWdpc3RlcmVkVG91ckJ5RHVja19fBQtkdWNrQXNzZXRJZAEca2V5SXNSZWdpc3RlcmVkQnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIhJXMlZCVzX19pc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrCQDMCAIJAKQDAQUDdElkCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwCAl9fARtrZXlMYXN0QXR0ZW1wdEJ5VG91ckFuZER1Y2sCA3RJZAtkdWNrQXNzZXRJZAkAuQkCCQDMCAICICVzJWQlc19fbGFzdEF0dGVtcHRCeVRvdXJBbmREdWNrCQDMCAIJAKQDAQUDdElkCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwCAl9fARprZXlCZXN0UmVzdWx0QnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIfJXMlZCVzX19iZXN0UmVzdWx0QnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwAJaWR4U3RhdGljAAAACmlkeER5bmFtaWMAAQELZ2V0VG91ckRhdGECDHRvdXJDb250cmFjdAN0SWQEBnN0YXRpYwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMdG91ckNvbnRyYWN0CQEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwQHZHluYW1pYwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMdG91ckNvbnRyYWN0CQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAkArAICCQCsAgICGUVycm9yIHJlYWRpbmcgdG91cm5hbWVudCAJAKQDAQUDdElkAgUgZGF0YQICX18JAMwIAgUGc3RhdGljCQDMCAIFB2R5bmFtaWMFA25pbAATdFN0YXRpY1JlZ2lzdGVyQ29zdAACABJ0U3RhdGljQXR0ZW1wdENvc3QAAwAMdFN0YXRpY1N0YXJ0AAUACnRTdGF0aWNFbmQABgAOdER5bmFtaWNTdGF0dXMAAQAPdER5bmFtaWNXaW5EdWNrAAIAEXREeW5hbWljV2luUmVzdWx0AAMAFXREeW5hbWljVG90YWxSZWdDb3VudAAEABV0RHluYW1pY1RvdGFsQXR0ZW1wdHMABQAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQANSWR4Q2ZnV2xnRGFwcAAEAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFDUlkeENmZ1dsZ0RhcHAADXdsZ0Fzc2V0SWRLZXkCC3dsZ19hc3NldElkAAp3bGdBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgULd2xnQ29udHJhY3QFDXdsZ0Fzc2V0SWRLZXkCE05vdCBpbml0aWFsaXplZCB5ZXQBCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQpmaXhlZFBvaW50AgN2YWwIZGVjaW1hbHMEBnRlblBvdwkAbAYACgAABQhkZWNpbWFscwAAAAAFBERPV04EB2xvd1BhcnQJAKQDAQkAagIFA3ZhbAUGdGVuUG93BAZ6ZXJvZXMJALACAgkApAMBBQZ0ZW5Qb3cJAGQCAAEJALECAQUHbG93UGFydAkArAICCQCsAgIJAKwCAgkApAMBCQBpAgUDdmFsBQZ0ZW5Qb3cCAS4FBnplcm9lcwUHbG93UGFydAEEcGFkTAIDdmFsA2xlbgQEdmFsUwkApAMBBQN2YWwEBnplcm9lcwkAsAICCQCkAwEJAGwGAAoAAAkAZQIFA2xlbgkAsQIBBQR2YWxTAAAAAAUERE9XTgABCQCsAgIFBnplcm9lcwUEdmFsUwATTUFYVE9VUk5BTUVOVExFTkdUSACAmP/NAQAESE9VUgCA3dsBAAphZG1pbnNMaXN0CQDMCAIJAKUIAQUEdGhpcwkAzAgCBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUEVlMlJFTFVIQ0ZDQnNtU0NOY0JKOE4zVVJMVlFlbmRlNwMJAAACAQFUBQckbWF0Y2gwAiMzTXRCZ0pUYUx4UEIzQzdVSkQxVUU4cWprSHRoZkt2RlFZWQkAAgECDVVua25vd24gY2hhaW4FA25pbAEKc3RhdGljRGF0YQcEdHhJZAxyZWdpc3RlckNvc3QLYXR0ZW1wdENvc3QMY3JlYXRpb25UaW1lCXN0YXJ0VGltZQdlbmRUaW1lCW51bUdyYW5kcwkAuQkCCQDMCAICDiVzJWQlZCVkJWQlZCVkCQDMCAIFBHR4SWQJAMwIAgkApAMBBQxyZWdpc3RlckNvc3QJAMwIAgkApAMBBQthdHRlbXB0Q29zdAkAzAgCCQCkAwEFDGNyZWF0aW9uVGltZQkAzAgCCQCkAwEFCXN0YXJ0VGltZQkAzAgCCQCkAwEFB2VuZFRpbWUJAMwIAgkApAMBBQludW1HcmFuZHMFA25pbAUDU0VQAQtkeW5hbWljRGF0YQUGc3RhdHVzB3dpbkR1Y2sJd2luUmVzdWx0CXRvdGFsUmVncw10b3RhbEF0dGVtcHRzCQC5CQIJAMwIAgIKJXMlcyVkJWQlZAkAzAgCBQZzdGF0dXMJAMwIAgUHd2luRHVjawkAzAgCCQCkAwEFCXdpblJlc3VsdAkAzAgCCQCkAwEFCXRvdGFsUmVncwkAzAgCCQCkAwEFDXRvdGFsQXR0ZW1wdHMFA25pbAUDU0VQAQZwcm9sb2cACQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIKc2F2ZUxhc3RUeAUDbmlsBQNuaWwBDGR1Y2tCeUNhbGxlcgEGY2FsbGVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEFBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAcBaQEQY3JlYXRlVG91cm5hbWVudAUJc3RhcnRUaW1lB2VuZFRpbWUMcmVnaXN0ZXJDb3N0C2F0dGVtcHRDb3N0CW51bUdyYW5kcwQGY2FsbGVyCQClCAEIBQFpBmNhbGxlcgMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFCmFkbWluc0xpc3QFBmNhbGxlcgkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAZsYXN0SWQJAJ8IAQUNbGFzdFRvdXJJZEtleQQDdElkAwkBCWlzRGVmaW5lZAEFBmxhc3RJZAQKbGFzdFRvdXJJZAkBBXZhbHVlAQUGbGFzdElkBAdkeW5hbWljCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQpsYXN0VG91cklkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQpsYXN0VG91cklkAgUgZGF0YQQGc3RhdHVzCQCRAwIJALUJAgUHZHluYW1pYwUDU0VQBQ50RHluYW1pY1N0YXR1cwMJAQIhPQIFBnN0YXR1cwIIQVJDSElWRUQJAAIBCQCsAgICLEN1cnJlbnQgdG91cm5lbWVudCBpcyBub3QgY29tcGxldGVkLCBzdGF0dXM9BQZzdGF0dXMJAGQCBQpsYXN0VG91cklkAAEAAQQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAMJAGYCBQNub3cFCXN0YXJ0VGltZQkAAgEJAKwCAgkArAICCQCsAgICCnN0YXJ0VGltZT0JAKQDAQUJc3RhcnRUaW1lAhAgPCBjcmVhdGlvblRpbWU9CQCkAwEFA25vdwMJAGYCBQlzdGFydFRpbWUFB2VuZFRpbWUJAAIBCQCsAgIJAKwCAgkArAICAghlbmRUaW1lPQkApAMBBQdlbmRUaW1lAg0gPCBzdGFydFRpbWU9CQCkAwEFCXN0YXJ0VGltZQMJAGYCCQBlAgUHZW5kVGltZQUJc3RhcnRUaW1lBRNNQVhUT1VSTkFNRU5UTEVOR1RICQACAQkArAICCQCsAgIJAKwCAgIfVG91cm5hbWVudCBwZXJpb2QgZXhjZWVkcyBtYXg6IAkApAMBCQBlAgUHZW5kVGltZQUJc3RhcnRUaW1lAgMgPiAJAKQDAQUTTUFYVE9VUk5BTUVOVExFTkdUSAMDCQBnAgAABQxyZWdpc3RlckNvc3QGCQBnAgAABQthdHRlbXB0Q29zdAkAAgEJAKwCAgkArAICCQCsAgICJENvc3Qgc2hvdWxkIGJlIHBvc2l0aXZlLCBidXQgcGFzc2VkIAkApAMBBQxyZWdpc3RlckNvc3QCBSBhbmQgCQCkAwEFC2F0dGVtcHRDb3N0AwkAZgIAAAUJbnVtR3JhbmRzCQACAQItTnVtYmVyIG9mIEdyYW5kIFByaXplcyBzaG91bGQgYmUgbm9uLW5lZ2F0aXZlCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFDWxhc3RUb3VySWRLZXkFA3RJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQUDdElkCQEKc3RhdGljRGF0YQcJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAUMcmVnaXN0ZXJDb3N0BQthdHRlbXB0Q29zdAUDbm93BQlzdGFydFRpbWUFB2VuZFRpbWUFCW51bUdyYW5kcwkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAkBC2R5bmFtaWNEYXRhBQIHQ1JFQVRFRAIBIAAAAAAAAAUDbmlsBQN0SWQBaQEIcmVnaXN0ZXIABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEBndsZ0FtdAgFA3BtdAZhbW91bnQECnBtdEFzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFA3BtdAdhc3NldElkAhVXTEdPTEQgcGF5bWVudHMgb25seSEDCQECIT0CBQpwbXRBc3NldElkBQp3bGdBc3NldElkCQACAQIVV0xHT0xEIHBheW1lbnRzIG9ubHkhBAZsYXN0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBBQ1sYXN0VG91cklkS2V5AhVObyBhY3RpdmUgdG91cm5hbWVudHMEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBXREYXRhCQELZ2V0VG91ckRhdGECBQR0aGlzBQZsYXN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAZzdGF0dXMJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMDCQEBIQEDAwMJAAACBQZzdGF0dXMCB0NSRUFURUQJAGYCBQNub3cJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFDHRTdGF0aWNTdGFydAcJAGYCCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUESE9VUgUDbm93BwYDCQAAAgUGc3RhdHVzAgpJTlBST0dSRVNTCQBmAgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQFBEhPVVIFA25vdwcJAAIBAhNDYW5ub3QgcmVnaXN0ZXIgbm93BAdyZWdDb3N0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBRN0U3RhdGljUmVnaXN0ZXJDb3N0AwkBAiE9AgUGd2xnQW10BQdyZWdDb3N0CQACAQkArAICCQCsAgICEE5lZWQgcGF5bWVudCBvZiAJAQpmaXhlZFBvaW50AgUHcmVnQ29zdAAIAgcgV0xHT0xEBAtkdWNrQXNzZXRJZAkBDGR1Y2tCeUNhbGxlcgEIBQFpDG9yaWdpbkNhbGxlcgQNb2xkU2NvcmVCb2FyZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQETa2V5U2NvcmVCb2FyZEJ5VG91cgEFBmxhc3RJZAIAAwMJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBHGtleUlzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBwYJAQhjb250YWlucwIFDW9sZFNjb3JlQm9hcmQFC2R1Y2tBc3NldElkCQACAQkArAICCQCsAgIJAKwCAgIKWW91ciBkdWNrIAULZHVja0Fzc2V0SWQCJSBpcyBhbHJlYWR5IHJlZ2lzdGVyZWQgYXQgdG91cm5hbWVudCAJAKQDAQUGbGFzdElkBBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCCklOUFJPR1JFU1MJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNXaW5EdWNrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50AAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBG2tleUxhc3RSZWdpc3RlcmVkVG91ckJ5RHVjawEFC2R1Y2tBc3NldElkBQZsYXN0SWQJAMwIAgkBDEJvb2xlYW5FbnRyeQIJARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAYJAMwIAgkBC1N0cmluZ0VudHJ5AgkBE2tleVNjb3JlQm9hcmRCeVRvdXIBBQZsYXN0SWQDCQAAAgUNb2xkU2NvcmVCb2FyZAIACQCsAgIFC2R1Y2tBc3NldElkAgQ6MDAwCQCsAgIJAKwCAgkArAICBQ1vbGRTY29yZUJvYXJkAgFfBQtkdWNrQXNzZXRJZAIEOjAwMAkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFBmxhc3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwFDHByb2xvZ1Jlc3VsdAFpAQpuZXdBdHRlbXB0AAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQLZHVja0Fzc2V0SWQJAQxkdWNrQnlDYWxsZXIBCAUBaQxvcmlnaW5DYWxsZXIEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEBnN0YXR1cwkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwMJAQEhAQMJAAACBQZzdGF0dXMCCklOUFJPR1JFU1MJAGYCCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUESE9VUgUDbm93BwkAAgECF0F0dGVtcHQgaXMgbm90IHBvc3NpYmxlAwkBASEBCQELdmFsdWVPckVsc2UCCQCgCAEJARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAcJAAIBCQCsAgIJAKwCAgkArAICAgpZb3VyIGR1Y2sgBQtkdWNrQXNzZXRJZAIhIGlzIG5vdCByZWdpc3RlcmVkIGF0IHRvdXJuYW1lbnQgCQCkAwEFBmxhc3RJZAQTYXR0ZW1wdHNJdGVyYXRvcktleQkBG2tleUxhc3RBdHRlbXB0QnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQEC2xhc3RBdHRlbXB0CQCfCAEFE2F0dGVtcHRzSXRlcmF0b3JLZXkECyR0MDYwODg2NzIwAwkBASEBCQEJaXNEZWZpbmVkAQULbGFzdEF0dGVtcHQJAJQKAgAAAAADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGd2xnQW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCFVdMR09MRCBwYXltZW50cyBvbmx5IQMJAQIhPQIFCnBtdEFzc2V0SWQFCndsZ0Fzc2V0SWQJAAIBAhVXTEdPTEQgcGF5bWVudHMgb25seSEEB2F0dENvc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFEnRTdGF0aWNBdHRlbXB0Q29zdAMJAQIhPQIFBndsZ0FtdAUHYXR0Q29zdAkAAgEJAKwCAgkArAICAhBOZWVkIHBheW1lbnQgb2YgCQEKZml4ZWRQb2ludAIFB2F0dENvc3QACAIHIFdMR09MRAkAlAoCCQBkAgkBBXZhbHVlAQULbGFzdEF0dGVtcHQAAQABBA1wYXllZEF0dGVtcHRzCAULJHQwNjA4ODY3MjACXzEECWluY3JlbWVudAgFCyR0MDYwODg2NzIwAl8yBBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCCklOUFJPR1JFU1MJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNXaW5EdWNrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbEF0dGVtcHRzBQlpbmNyZW1lbnQEB3RvdXJMb2MJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhNpbml0RHVja1RvdXJBdHRlbXB0CQDMCAIFC2R1Y2tBc3NldElkBQNuaWwFA25pbAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRNhdHRlbXB0c0l0ZXJhdG9yS2V5BQ1wYXllZEF0dGVtcHRzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUGbGFzdElkBRJ1cGRhdGVkRHluYW1pY0RhdGEFA25pbAkAzAgCBQxwcm9sb2dSZXN1bHQJAMwIAgUNcGF5ZWRBdHRlbXB0cwkAzAgCBQd0b3VyTG9jBQNuaWwBaQERdXBkYXRlRHluYW1pY0RhdGECC2R1Y2tBc3NldElkB25ld0Jlc3QDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEB29sZEJlc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAMDAwkAZgIFB29sZEJlc3QFB25ld0Jlc3QGCQECIT0CCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAgpJTlBST0dSRVNTBgkAZgIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kCQCUCgIFA25pbAAABAp3aW5uZXJzS2V5CQEQa2V5V2lubmVyc0J5VG91cgEFBmxhc3RJZAQHd2lubmVycwkAoggBBQp3aW5uZXJzS2V5BA5vbGRXaW5uZXJzTGlzdAMJAQEhAQkBCWlzRGVmaW5lZAEFB3dpbm5lcnMFA25pbAkAvAkCCQEFdmFsdWUBBQd3aW5uZXJzAgFfBA5uZXdXaW5uZXJzTGlzdAMJAGYCBQduZXdCZXN0BQdvbGRCZXN0CQDMCAIFC2R1Y2tBc3NldElkBQNuaWwDCQEPY29udGFpbnNFbGVtZW50AgUOb2xkV2lubmVyc0xpc3QFC2R1Y2tBc3NldElkBQ5vbGRXaW5uZXJzTGlzdAkAzQgCBQ5vbGRXaW5uZXJzTGlzdAULZHVja0Fzc2V0SWQEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwULZHVja0Fzc2V0SWQFB25ld0Jlc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFBmxhc3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhCQDMCAIJAQtTdHJpbmdFbnRyeQIFCndpbm5lcnNLZXkJALoJAgUObmV3V2lubmVyc0xpc3QCAV8FA25pbAAAAWkBDnNhdmVEdWNrUmVzdWx0AgtkdWNrQXNzZXRJZAtkdWNrTmV3QmVzdAMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQGbGFzdElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUNbGFzdFRvdXJJZEtleQIVTm8gYWN0aXZlIHRvdXJuYW1lbnRzBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfBA1iZXN0UmVzdWx0S2V5CQEaa2V5QmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBAxzdW1TY29yZXNLZXkJARJrZXlTdW1TY29yZXNCeVRvdXIBBQZsYXN0SWQEDG9sZFN1bVNjb3JlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQxzdW1TY29yZXNLZXkAAAMDAwMJAAACCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFUCQAAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFC2N1ckxvY2F0aW9uBQ9sb2NJZHhDb250aW5lbnQFBmxhc3RJZAcJAAACCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAgpJTlBST0dSRVNTBwkAZwIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBwQLZHVja09sZEJlc3QJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNYmVzdFJlc3VsdEtleQAABAhzY29yZUtleQkBE2tleVNjb3JlQm9hcmRCeVRvdXIBBQZsYXN0SWQEDW9sZFNjb3JlQm9hcmQJAQt2YWx1ZU9yRWxzZQIJAKIIAQUIc2NvcmVLZXkCAAQMJHQwOTY5NzEwMDk2AwkAZgIFC2R1Y2tOZXdCZXN0BQtkdWNrT2xkQmVzdAMJAQEhAQkBCGNvbnRhaW5zAgUNb2xkU2NvcmVCb2FyZAULZHVja0Fzc2V0SWQJAAIBCQCsAgICHHNjb3JlQm9hcmQgZG9lcyBub3QgY29udGFpbiAFC2R1Y2tBc3NldElkBAVwYXJ0cwkAvQkCBQ1vbGRTY29yZUJvYXJkBQtkdWNrQXNzZXRJZAkAlAoCCQCsAgIJAKwCAgkArAICCQCsAgIJAJEDAgUFcGFydHMAAAULZHVja0Fzc2V0SWQCAToJAQRwYWRMAgULZHVja05ld0Jlc3QAAwkAsAICCQCRAwIFBXBhcnRzAAEABAkAZQIJAGQCBQxvbGRTdW1TY29yZXMFC2R1Y2tOZXdCZXN0BQtkdWNrT2xkQmVzdAkAlAoCBQ1vbGRTY29yZUJvYXJkBQxvbGRTdW1TY29yZXMEDW5ld1Njb3JlQm9hcmQIBQwkdDA5Njk3MTAwOTYCXzEEDG5ld1N1bVNjb3JlcwgFDCR0MDk2OTcxMDA5NgJfMgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ1iZXN0UmVzdWx0S2V5CQCWAwEJAMwIAgULZHVja09sZEJlc3QJAMwIAgULZHVja05ld0Jlc3QFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgUMc3VtU2NvcmVzS2V5BQxuZXdTdW1TY29yZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgUIc2NvcmVLZXkFDW5ld1Njb3JlQm9hcmQFA25pbAAACQCUCgIFA25pbAAAAWkBEXByb2Nlc3NUb3VybmFtZW50AQN0SWQEBmNhbGxlcgkApQgBCAUBaQZjYWxsZXIDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCBQphZG1pbnNMaXN0BQZjYWxsZXIJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFA3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEBnN0YXR1cwkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwMJAAACBQZzdGF0dXMCCEFSQ0hJVkVECQACAQkArAICCQCsAgICC1RvdXJuYW1lbnQgCQCkAwEFA3RJZAIUIGlzIGFscmVhZHkgQVJDSElWRUQDAwkAAAIFBnN0YXR1cwIKSU5QUk9HUkVTUwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQFA25vdwcJAAIBCQCsAgIJAKwCAgILVG91cm5hbWVudCAJAKQDAQUDdElkAhAgaXMgbm90IG92ZXIgeWV0BBJ1cGRhdGVkRHluYW1pY0RhdGEJAQtkeW5hbWljRGF0YQUCClBST0NFU1NJTkcJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNXaW5EdWNrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwAAAFpARBmaW5pc2hUb3VybmFtZW50AQN0SWQEBmNhbGxlcgkApQgBCAUBaQZjYWxsZXIDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCBQphZG1pbnNMaXN0BQZjYWxsZXIJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFA3RJZAQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwQGc3RhdHVzCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAwkAAAIFBnN0YXR1cwIIQVJDSElWRUQJAAIBCQCsAgIJAKwCAgILVG91cm5hbWVudCAJAKQDAQUDdElkAhQgaXMgYWxyZWFkeSBBUkNISVZFRAQSdXBkYXRlZER5bmFtaWNEYXRhCQELZHluYW1pY0RhdGEFAghBUkNISVZFRAkAkQMCBQdkeW5hbWljBQ90RHluYW1pY1dpbkR1Y2sJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxSZWdDb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxBdHRlbXB0cwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkBRJ1cGRhdGVkRHluYW1pY0RhdGEFA25pbAAAAAgTRDY=",
    "height": 2742578,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9iiwT1LASVMPfQGFTWbMTRfNsirwT1jUcnHy6CQqRRkw
Next: 9cd9kgwP15GTNXrGwYWsftcYSCoRWkWkiPRpVYtqhCjo

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

Old	New		Differences
21	21
22	22
23	23		func keySumScoresByTour (tId) = ("%s%d__sumScores__" + toString(tId))
	24	+
	25	+
	26	+	func keyWinnersByTour (tId) = ("%s%d__winners__" + toString(tId))
24	27
25	28
26	29		func keyLastRegisteredTourByDuck (duckAssetId) = ("%s%s__lastRegisteredTourByDuck__" + duckAssetId)

311	314		let tData = getTourData(this, lastId)
312	315		let static = tData[idxStatic]
313	316		let dynamic = tData[idxDynamic]
314		-	if (if (if ((parseIntValue(dynamic[tDynamicWinResult]) >= newBest))
	317	+	let oldBest = parseIntValue(dynamic[tDynamicWinResult])
	318	+	if (if (if ((oldBest > newBest))
315	319		then true
316	320		else (dynamic[tDynamicStatus] != "INPROGRESS"))
317	321		then true
318	322		else (lastBlock.timestamp > parseIntValue(static[tStaticEnd])))
319	323		then $Tuple2(nil, 0)
320	324		else {
	325	+	let winnersKey = keyWinnersByTour(lastId)
	326	+	let winners = getString(winnersKey)
	327	+	let oldWinnersList = if (!(isDefined(winners)))
	328	+	then nil
	329	+	else split_4C(value(winners), "_")
	330	+	let newWinnersList = if ((newBest > oldBest))
	331	+	then [duckAssetId]
	332	+	else if (containsElement(oldWinnersList, duckAssetId))
	333	+	then oldWinnersList
	334	+	else (oldWinnersList :+ duckAssetId)
321	335		let updatedDynamicData = dynamicData("INPROGRESS", duckAssetId, newBest, parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
322		-	$Tuple2([StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData)], 0)
	336	+	$Tuple2([StringEntry(keyTourDynamicDataById(lastId), updatedDynamicData), StringEntry(winnersKey, makeString_2C(newWinnersList, "_"))], 0)
323	337		}
324	338		}
325	339

348	362		let duckOldBest = valueOrElse(getInteger(bestResultKey), 0)
349	363		let scoreKey = keyScoreBoardByTour(lastId)
350	364		let oldScoreBoard = valueOrElse(getString(scoreKey), "")
351		-	let $~~t092539652~~ = if ((duckNewBest > duckOldBest))
	365	+	let $t0969710096 = if ((duckNewBest > duckOldBest))
352	366		then if (!(contains(oldScoreBoard, duckAssetId)))
353	367		then throw(("scoreBoard does not contain " + duckAssetId))
354	368		else {

356	370		$Tuple2(((((parts[0] + duckAssetId) + ":") + padL(duckNewBest, 3)) + drop(parts[1], 4)), ((oldSumScores + duckNewBest) - duckOldBest))
357	371		}
358	372		else $Tuple2(oldScoreBoard, oldSumScores)
359		-	let newScoreBoard = $~~t092539652~~._1
360		-	let newSumScores = $~~t092539652~~._2
	373	+	let newScoreBoard = $t0969710096._1
	374	+	let newSumScores = $t0969710096._2
361	375		$Tuple2([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(scoreKey, newScoreBoard)], 0)
362	376		}
363	377		else $Tuple2(nil, 0)

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

github/deemru/w8io/169f3d6 
61.44 ms ◑