w8 · tx · 9ii···Rkw

tx · 9iiwT1LASVMPfQGFTWbMTRfNsirwT1jUcnHy6CQqRRkw

3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx:  -0.01300000 Waves

2023.09.05 23:13 [2742544] smart account 3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9iiwT1LASVMPfQGFTWbMTRfNsirwT1jUcnHy6CQqRRkw",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1693944793733,
    "version": 2,
    "chainId": 84,
    "sender": "3N3nfqFcxXfd3T18V9icDdh58MJ9wQ2k2xx",
    "senderPublicKey": "UGqkWsCpv7xRVXkQRXyLd6pWPDtYGXmPip7FxSd1pAu",
    "proofs": [
        "qWMcmHiZxUXz2S2Gnz6zKt4EdiRsmzpBNc6svZvVypacxd8paKT8rxPdX2Za2n1n3PEEifxSdQKZTbmnr4cAVkZ"
    ],
    "script": "base64:BgIlCAISBwoFAQEBAQESABIAEgQKAggBEgQKAggBEgMKAQESAwoBATUAD0RFRkFVTFRMT0NBVElPTgIPQWZyaWNhX0ZfQWZyaWNhARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkAA1sYXN0VG91cklkS2V5Ag4lc19fbGFzdFRvdXJJZAEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQN0SWQJAKwCAgIWJXMlZF9fdG91clN0YXRpY0RhdGFfXwkApAMBBQN0SWQBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBA3RJZAkArAICAhclcyVkX190b3VyRHluYW1pY0RhdGFfXwkApAMBBQN0SWQBE2tleVNjb3JlQm9hcmRCeVRvdXIBA3RJZAkArAICAhIlcyVkX19zY29yZUJvYXJkX18JAKQDAQUDdElkARJrZXlTdW1TY29yZXNCeVRvdXIBA3RJZAkArAICAhElcyVkX19zdW1TY29yZXNfXwkApAMBBQN0SWQBG2tleUxhc3RSZWdpc3RlcmVkVG91ckJ5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIgJXMlc19fbGFzdFJlZ2lzdGVyZWRUb3VyQnlEdWNrX18FC2R1Y2tBc3NldElkARxrZXlJc1JlZ2lzdGVyZWRCeVRvdXJBbmREdWNrAgN0SWQLZHVja0Fzc2V0SWQJALkJAgkAzAgCAiElcyVkJXNfX2lzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sJAMwIAgkApAMBBQN0SWQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAICX18BG2tleUxhc3RBdHRlbXB0QnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIgJXMlZCVzX19sYXN0QXR0ZW1wdEJ5VG91ckFuZER1Y2sJAMwIAgkApAMBBQN0SWQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAICX18BGmtleUJlc3RSZXN1bHRCeVRvdXJBbmREdWNrAgN0SWQLZHVja0Fzc2V0SWQJALkJAgkAzAgCAh8lcyVkJXNfX2Jlc3RSZXN1bHRCeVRvdXJBbmREdWNrCQDMCAIJAKQDAQUDdElkCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwCAl9fAAlpZHhTdGF0aWMAAAAKaWR4RHluYW1pYwABAQtnZXRUb3VyRGF0YQIMdG91ckNvbnRyYWN0A3RJZAQGc3RhdGljCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFA3RJZAIFIGRhdGECAl9fBAdkeW5hbWljCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwkAzAgCBQZzdGF0aWMJAMwIAgUHZHluYW1pYwUDbmlsABN0U3RhdGljUmVnaXN0ZXJDb3N0AAIAEnRTdGF0aWNBdHRlbXB0Q29zdAADAAx0U3RhdGljU3RhcnQABQAKdFN0YXRpY0VuZAAGAA50RHluYW1pY1N0YXR1cwABAA90RHluYW1pY1dpbkR1Y2sAAgARdER5bmFtaWNXaW5SZXN1bHQAAwAVdER5bmFtaWNUb3RhbFJlZ0NvdW50AAQAFXREeW5hbWljVG90YWxBdHRlbXB0cwAFAA9sb2NJZHhDb250aW5lbnQAAAAKbG9jSWR4VHlwZQABAAVjaGFpbgkAyQECCQDKAQIIBQR0aGlzBWJ5dGVzAAEAAQAVZGVmYXVsdFJlc3RBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUFFDdXZGYnZoNExrUFVucm5VMXozam5iQTFwOW0zV05odgMJAAACAQFUBQckbWF0Y2gwAiMzTXVta0dHenRDS0FYcFdEcXhrZGRvZnFYU1VicVFrdlNKeQkAAgECDVVua25vd24gY2hhaW4AA1NFUAICX18BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABAA1JZHhDZmdXbGdEYXBwAAQBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEOa2V5UmVzdEFkZHJlc3MAAgwlc19fcmVzdEFkZHIBEXJlYWRSZXN0Q2ZnT3JGYWlsAQRyZXN0CQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQRyZXN0CQEKa2V5UmVzdENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgdyZXN0Q2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHcmVzdENmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADHJlc3RDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEOa2V5UmVzdEFkZHJlc3MABRVkZWZhdWx0UmVzdEFkZHJlc3NTdHIAB3Jlc3RDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDHJlc3RDb250cmFjdAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAC3dsZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUNSWR4Q2ZnV2xnRGFwcAANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQITTm90IGluaXRpYWxpemVkIHlldAEIYXNTdHJpbmcBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AQRwYWRMAgN2YWwDbGVuBAR2YWxTCQCkAwEFA3ZhbAQGemVyb2VzCQCwAgIJAKQDAQkAbAYACgAACQBlAgUDbGVuCQCxAgEFBHZhbFMAAAAABQRET1dOAAEJAKwCAgUGemVyb2VzBQR2YWxTABNNQVhUT1VSTkFNRU5UTEVOR1RIAICY/80BAARIT1VSAIDd2wEACmFkbWluc0xpc3QJAMwIAgkApQgBBQR0aGlzCQDMCAIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQRWUyUkVMVUhDRkNCc21TQ05jQko4TjNVUkxWUWVuZGU3AwkAAAIBAVQFByRtYXRjaDACIzNNdEJnSlRhTHhQQjNDN1VKRDFVRThxamtIdGhmS3ZGUVlZCQACAQINVW5rbm93biBjaGFpbgUDbmlsAQpzdGF0aWNEYXRhBwR0eElkDHJlZ2lzdGVyQ29zdAthdHRlbXB0Q29zdAxjcmVhdGlvblRpbWUJc3RhcnRUaW1lB2VuZFRpbWUJbnVtR3JhbmRzCQC5CQIJAMwIAgIOJXMlZCVkJWQlZCVkJWQJAMwIAgUEdHhJZAkAzAgCCQCkAwEFDHJlZ2lzdGVyQ29zdAkAzAgCCQCkAwEFC2F0dGVtcHRDb3N0CQDMCAIJAKQDAQUMY3JlYXRpb25UaW1lCQDMCAIJAKQDAQUJc3RhcnRUaW1lCQDMCAIJAKQDAQUHZW5kVGltZQkAzAgCCQCkAwEFCW51bUdyYW5kcwUDbmlsBQNTRVABC2R5bmFtaWNEYXRhBQZzdGF0dXMHd2luRHVjawl3aW5SZXN1bHQJdG90YWxSZWdzDXRvdGFsQXR0ZW1wdHMJALkJAgkAzAgCAgolcyVzJWQlZCVkCQDMCAIFBnN0YXR1cwkAzAgCBQd3aW5EdWNrCQDMCAIJAKQDAQUJd2luUmVzdWx0CQDMCAIJAKQDAQUJdG90YWxSZWdzCQDMCAIJAKQDAQUNdG90YWxBdHRlbXB0cwUDbmlsBQNTRVABBnByb2xvZwAJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAEMZHVja0J5Q2FsbGVyAQZjYWxsZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQUGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBwFpARBjcmVhdGVUb3VybmFtZW50BQlzdGFydFRpbWUHZW5kVGltZQxyZWdpc3RlckNvc3QLYXR0ZW1wdENvc3QJbnVtR3JhbmRzBAZjYWxsZXIJAKUIAQgFAWkGY2FsbGVyAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUKYWRtaW5zTGlzdAUGY2FsbGVyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEBmxhc3RJZAkAnwgBBQ1sYXN0VG91cklkS2V5BAN0SWQDCQEJaXNEZWZpbmVkAQUGbGFzdElkBApsYXN0VG91cklkCQEFdmFsdWUBBQZsYXN0SWQEB2R5bmFtaWMJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFCmxhc3RUb3VySWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFCmxhc3RUb3VySWQCBSBkYXRhBAZzdGF0dXMJAJEDAgkAtQkCBQdkeW5hbWljBQNTRVAFDnREeW5hbWljU3RhdHVzAwkBAiE9AgUGc3RhdHVzAghBUkNISVZFRAkAAgEJAKwCAgIsQ3VycmVudCB0b3VybmVtZW50IGlzIG5vdCBjb21wbGV0ZWQsIHN0YXR1cz0FBnN0YXR1cwkAZAIFCmxhc3RUb3VySWQAAQABBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwkAZgIFA25vdwUJc3RhcnRUaW1lCQACAQkArAICCQCsAgIJAKwCAgIKc3RhcnRUaW1lPQkApAMBBQlzdGFydFRpbWUCECA8IGNyZWF0aW9uVGltZT0JAKQDAQUDbm93AwkAZgIFCXN0YXJ0VGltZQUHZW5kVGltZQkAAgEJAKwCAgkArAICCQCsAgICCGVuZFRpbWU9CQCkAwEFB2VuZFRpbWUCDSA8IHN0YXJ0VGltZT0JAKQDAQUJc3RhcnRUaW1lAwkAZgIJAGUCBQdlbmRUaW1lBQlzdGFydFRpbWUFE01BWFRPVVJOQU1FTlRMRU5HVEgJAAIBCQCsAgIJAKwCAgkArAICAh9Ub3VybmFtZW50IHBlcmlvZCBleGNlZWRzIG1heDogCQCkAwEJAGUCBQdlbmRUaW1lBQlzdGFydFRpbWUCAyA+IAkApAMBBRNNQVhUT1VSTkFNRU5UTEVOR1RIAwMJAGcCAAAFDHJlZ2lzdGVyQ29zdAYJAGcCAAAFC2F0dGVtcHRDb3N0CQACAQkArAICCQCsAgIJAKwCAgIkQ29zdCBzaG91bGQgYmUgcG9zaXRpdmUsIGJ1dCBwYXNzZWQgCQCkAwEFDHJlZ2lzdGVyQ29zdAIFIGFuZCAJAKQDAQULYXR0ZW1wdENvc3QDCQBmAgAABQludW1HcmFuZHMJAAIBAi1OdW1iZXIgb2YgR3JhbmQgUHJpemVzIHNob3VsZCBiZSBub24tbmVnYXRpdmUJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUNbGFzdFRvdXJJZEtleQUDdElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAQpzdGF0aWNEYXRhBwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBQxyZWdpc3RlckNvc3QFC2F0dGVtcHRDb3N0BQNub3cFCXN0YXJ0VGltZQUHZW5kVGltZQUJbnVtR3JhbmRzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkCQELZHluYW1pY0RhdGEFAgdDUkVBVEVEAgEgAAAAAAAABQNuaWwFA3RJZAFpAQhyZWdpc3RlcgAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGd2xnQW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCFVdMR09MRCBwYXltZW50cyBvbmx5IQMJAQIhPQIFCnBtdEFzc2V0SWQFCndsZ0Fzc2V0SWQJAAIBAhVXTEdPTEQgcGF5bWVudHMgb25seSEEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEBnN0YXR1cwkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwMJAQEhAQMDAwkAAAIFBnN0YXR1cwIHQ1JFQVRFRAkAZgIFA25vdwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUMdFN0YXRpY1N0YXJ0BwkAZgIJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQRIT1VSBQNub3cHBgMJAAACBQZzdGF0dXMCCklOUFJPR1JFU1MJAGYCCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUESE9VUgUDbm93BwkAAgECE0Nhbm5vdCByZWdpc3RlciBub3cEB3JlZ0Nvc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFE3RTdGF0aWNSZWdpc3RlckNvc3QDCQECIT0CBQZ3bGdBbXQFB3JlZ0Nvc3QJAAIBCQCsAgIJAKwCAgIQTmVlZCBwYXltZW50IG9mIAkBCmZpeGVkUG9pbnQCBQdyZWdDb3N0AAgCByBXTEdPTEQEC2R1Y2tBc3NldElkCQEMZHVja0J5Q2FsbGVyAQgFAWkMb3JpZ2luQ2FsbGVyBA1vbGRTY29yZUJvYXJkCQELdmFsdWVPckVsc2UCCQCiCAEJARNrZXlTY29yZUJvYXJkQnlUb3VyAQUGbGFzdElkAgADAwkBC3ZhbHVlT3JFbHNlAgkAoAgBCQEca2V5SXNSZWdpc3RlcmVkQnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQHBgkBCGNvbnRhaW5zAgUNb2xkU2NvcmVCb2FyZAULZHVja0Fzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAgpZb3VyIGR1Y2sgBQtkdWNrQXNzZXRJZAIlIGlzIGFscmVhZHkgcmVnaXN0ZXJlZCBhdCB0b3VybmFtZW50IAkApAMBBQZsYXN0SWQEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwkAkQMCBQdkeW5hbWljBQ90RHluYW1pY1dpbkR1Y2sJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxBdHRlbXB0cwkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEba2V5TGFzdFJlZ2lzdGVyZWRUb3VyQnlEdWNrAQULZHVja0Fzc2V0SWQFBmxhc3RJZAkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBHGtleUlzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBgkAzAgCCQELU3RyaW5nRW50cnkCCQETa2V5U2NvcmVCb2FyZEJ5VG91cgEFBmxhc3RJZAMJAAACBQ1vbGRTY29yZUJvYXJkAgAJAKwCAgULZHVja0Fzc2V0SWQCBDowMDAJAKwCAgkArAICCQCsAgIFDW9sZFNjb3JlQm9hcmQCAV8FC2R1Y2tBc3NldElkAgQ6MDAwCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUGbGFzdElkBRJ1cGRhdGVkRHluYW1pY0RhdGEFA25pbAUMcHJvbG9nUmVzdWx0AWkBCm5ld0F0dGVtcHQABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBDGR1Y2tCeUNhbGxlcgEIBQFpDG9yaWdpbkNhbGxlcgQGbGFzdElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUNbGFzdFRvdXJJZEtleQIVTm8gYWN0aXZlIHRvdXJuYW1lbnRzBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwQGc3RhdHVzCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAwkBASEBAwkAAAIFBnN0YXR1cwIKSU5QUk9HUkVTUwkAZgIJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQRIT1VSBQNub3cHCQACAQIXQXR0ZW1wdCBpcyBub3QgcG9zc2libGUDCQEBIQEJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBHGtleUlzUmVnaXN0ZXJlZEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkBwkAAgEJAKwCAgkArAICCQCsAgICCllvdXIgZHVjayAFC2R1Y2tBc3NldElkAiEgaXMgbm90IHJlZ2lzdGVyZWQgYXQgdG91cm5hbWVudCAJAKQDAQUGbGFzdElkBBNhdHRlbXB0c0l0ZXJhdG9yS2V5CQEba2V5TGFzdEF0dGVtcHRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAQLbGFzdEF0dGVtcHQJAJ8IAQUTYXR0ZW1wdHNJdGVyYXRvcktleQQLJHQwNjA4ODY3MjADCQEBIQEJAQlpc0RlZmluZWQBBQtsYXN0QXR0ZW1wdAkAlAoCAAAAAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABAZ3bGdBbXQIBQNwbXQGYW1vdW50BApwbXRBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQNwbXQHYXNzZXRJZAIVV0xHT0xEIHBheW1lbnRzIG9ubHkhAwkBAiE9AgUKcG10QXNzZXRJZAUKd2xnQXNzZXRJZAkAAgECFVdMR09MRCBwYXltZW50cyBvbmx5IQQHYXR0Q29zdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUSdFN0YXRpY0F0dGVtcHRDb3N0AwkBAiE9AgUGd2xnQW10BQdhdHRDb3N0CQACAQkArAICCQCsAgICEE5lZWQgcGF5bWVudCBvZiAJAQpmaXhlZFBvaW50AgUHYXR0Q29zdAAIAgcgV0xHT0xECQCUCgIJAGQCCQEFdmFsdWUBBQtsYXN0QXR0ZW1wdAABAAEEDXBheWVkQXR0ZW1wdHMIBQskdDA2MDg4NjcyMAJfMQQJaW5jcmVtZW50CAULJHQwNjA4ODY3MjACXzIEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwkAkQMCBQdkeW5hbWljBQ90RHluYW1pY1dpbkR1Y2sJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFFXREeW5hbWljVG90YWxSZWdDb3VudAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMFCWluY3JlbWVudAQHdG91ckxvYwkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCE2luaXREdWNrVG91ckF0dGVtcHQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAUDbmlsCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFE2F0dGVtcHRzSXRlcmF0b3JLZXkFDXBheWVkQXR0ZW1wdHMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQZsYXN0SWQFEnVwZGF0ZWREeW5hbWljRGF0YQUDbmlsCQDMCAIFDHByb2xvZ1Jlc3VsdAkAzAgCBQ1wYXllZEF0dGVtcHRzCQDMCAIFB3RvdXJMb2MFA25pbAFpARF1cGRhdGVEeW5hbWljRGF0YQILZHVja0Fzc2V0SWQHbmV3QmVzdAMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQGbGFzdElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUNbGFzdFRvdXJJZEtleQIVTm8gYWN0aXZlIHRvdXJuYW1lbnRzBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUEdGhpcwUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwMDAwkAZwIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRF0RHluYW1pY1dpblJlc3VsdAUHbmV3QmVzdAYJAQIhPQIJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMCCklOUFJPR1JFU1MGCQBmAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQJAJQKAgUDbmlsAAAEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIKSU5QUk9HUkVTUwULZHVja0Fzc2V0SWQFB25ld0Jlc3QJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFBmxhc3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwAAAFpAQ5zYXZlRHVja1Jlc3VsdAILZHVja0Fzc2V0SWQLZHVja05ld0Jlc3QDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBmxhc3RJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFDWxhc3RUb3VySWRLZXkCFU5vIGFjdGl2ZSB0b3VybmFtZW50cwQFdERhdGEJAQtnZXRUb3VyRGF0YQIFBHRoaXMFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEC2N1ckxvY2F0aW9uCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgIBXwQNYmVzdFJlc3VsdEtleQkBGmtleUJlc3RSZXN1bHRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAQMc3VtU2NvcmVzS2V5CQESa2V5U3VtU2NvcmVzQnlUb3VyAQUGbGFzdElkBAxvbGRTdW1TY29yZXMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUMc3VtU2NvcmVzS2V5AAADAwMDCQAAAgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBVAkAAAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtjdXJMb2NhdGlvbgUPbG9jSWR4Q29udGluZW50BQZsYXN0SWQHCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGcCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAcEC2R1Y2tPbGRCZXN0CQELdmFsdWVPckVsc2UCCQCfCAEFDWJlc3RSZXN1bHRLZXkAAAQIc2NvcmVLZXkJARNrZXlTY29yZUJvYXJkQnlUb3VyAQUGbGFzdElkBA1vbGRTY29yZUJvYXJkCQELdmFsdWVPckVsc2UCCQCiCAEFCHNjb3JlS2V5AgAECyR0MDkyNTM5NjUyAwkAZgIFC2R1Y2tOZXdCZXN0BQtkdWNrT2xkQmVzdAMJAQEhAQkBCGNvbnRhaW5zAgUNb2xkU2NvcmVCb2FyZAULZHVja0Fzc2V0SWQJAAIBCQCsAgICHHNjb3JlQm9hcmQgZG9lcyBub3QgY29udGFpbiAFC2R1Y2tBc3NldElkBAVwYXJ0cwkAvQkCBQ1vbGRTY29yZUJvYXJkBQtkdWNrQXNzZXRJZAkAlAoCCQCsAgIJAKwCAgkArAICCQCsAgIJAJEDAgUFcGFydHMAAAULZHVja0Fzc2V0SWQCAToJAQRwYWRMAgULZHVja05ld0Jlc3QAAwkAsAICCQCRAwIFBXBhcnRzAAEABAkAZQIJAGQCBQxvbGRTdW1TY29yZXMFC2R1Y2tOZXdCZXN0BQtkdWNrT2xkQmVzdAkAlAoCBQ1vbGRTY29yZUJvYXJkBQxvbGRTdW1TY29yZXMEDW5ld1Njb3JlQm9hcmQIBQskdDA5MjUzOTY1MgJfMQQMbmV3U3VtU2NvcmVzCAULJHQwOTI1Mzk2NTICXzIJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUNYmVzdFJlc3VsdEtleQkAlgMBCQDMCAIFC2R1Y2tPbGRCZXN0CQDMCAIFC2R1Y2tOZXdCZXN0BQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIFDHN1bVNjb3Jlc0tleQUMbmV3U3VtU2NvcmVzCQDMCAIJAQtTdHJpbmdFbnRyeQIFCHNjb3JlS2V5BQ1uZXdTY29yZUJvYXJkBQNuaWwAAAkAlAoCBQNuaWwAAAFpARFwcm9jZXNzVG91cm5hbWVudAEDdElkBAZjYWxsZXIJAKUIAQgFAWkGY2FsbGVyAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUKYWRtaW5zTGlzdAUGY2FsbGVyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBXREYXRhCQELZ2V0VG91ckRhdGECBQR0aGlzBQN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAZzdGF0dXMJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMDCQAAAgUGc3RhdHVzAghBUkNISVZFRAkAAgEJAKwCAgkArAICAgtUb3VybmFtZW50IAkApAMBBQN0SWQCFCBpcyBhbHJlYWR5IEFSQ0hJVkVEAwMJAAACBQZzdGF0dXMCCklOUFJPR1JFU1MJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHCQACAQkArAICCQCsAgICC1RvdXJuYW1lbnQgCQCkAwEFA3RJZAIQIGlzIG5vdCBvdmVyIHlldAQSdXBkYXRlZER5bmFtaWNEYXRhCQELZHluYW1pY0RhdGEFAgpQUk9DRVNTSU5HCQCRAwIFB2R5bmFtaWMFD3REeW5hbWljV2luRHVjawkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2R5bmFtaWMFEXREeW5hbWljV2luUmVzdWx0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbFJlZ0NvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwUVdER5bmFtaWNUb3RhbEF0dGVtcHRzCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVRvdXJEeW5hbWljRGF0YUJ5SWQBBQN0SWQFEnVwZGF0ZWREeW5hbWljRGF0YQUDbmlsAAABaQEQZmluaXNoVG91cm5hbWVudAEDdElkBAZjYWxsZXIJAKUIAQgFAWkGY2FsbGVyAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUKYWRtaW5zTGlzdAUGY2FsbGVyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEBXREYXRhCQELZ2V0VG91ckRhdGECBQR0aGlzBQN0SWQEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEBnN0YXR1cwkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwMJAAACBQZzdGF0dXMCCEFSQ0hJVkVECQACAQkArAICCQCsAgICC1RvdXJuYW1lbnQgCQCkAwEFA3RJZAIUIGlzIGFscmVhZHkgQVJDSElWRUQEEnVwZGF0ZWREeW5hbWljRGF0YQkBC2R5bmFtaWNEYXRhBQIIQVJDSElWRUQJAJEDAgUHZHluYW1pYwUPdER5bmFtaWNXaW5EdWNrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHZHluYW1pYwURdER5bmFtaWNXaW5SZXN1bHQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsUmVnQ291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdkeW5hbWljBRV0RHluYW1pY1RvdGFsQXR0ZW1wdHMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAUSdXBkYXRlZER5bmFtaWNEYXRhBQNuaWwAAAAEE5eH",
    "height": 2742544,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3aoN9AuXMwdLHaBekAL7buTEmtTJQuxrgBgzypWPaab7
Next: CcWe6nSyg5XsK2swkVP3k79v1Bcz5gZcbb9cm25Kq1xP

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

Old	New		Differences
18	18
19	19
20	20		func keyScoreBoardByTour (tId) = ("%s%d__scoreBoard__" + toString(tId))
	21	+
	22	+
	23	+	func keySumScoresByTour (tId) = ("%s%d__sumScores__" + toString(tId))
21	24
22	25
23	26		func keyLastRegisteredTourByDuck (duckAssetId) = ("%s%s__lastRegisteredTourByDuck__" + duckAssetId)

323	326
324	327
325	328		@Callable(i)
326		-	func saveDuckResult (duckAssetId,~~newBest~~) = if ((i.caller != stakingContract))
	329	+	func saveDuckResult (duckAssetId,duckNewBest) = if ((i.caller != stakingContract))
327	330		then throw("Access denied")
328	331		else {
329	332		let lastId = valueOrErrorMessage(getInteger(lastTourIdKey), "No active tournaments")

332	335		let dynamic = tData[idxDynamic]
333	336		let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
334	337		let bestResultKey = keyBestResultByTourAndDuck(lastId, duckAssetId)
	338	+	let sumScoresKey = keySumScoresByTour(lastId)
	339	+	let oldSumScores = valueOrElse(getInteger(sumScoresKey), 0)
335	340		if (if (if (if ((curLocation[locIdxType] == "T"))
336	341		then (parseIntValue(curLocation[locIdxContinent]) == lastId)
337	342		else false)

340	345		then (parseIntValue(static[tStaticEnd]) >= lastBlock.timestamp)
341	346		else false)
342	347		then {
343		-	let ~~oldBestResult~~ = valueOrElse(getInteger(bestResultKey), 0)
	348	+	let duckOldBest = valueOrElse(getInteger(bestResultKey), 0)
344	349		let scoreKey = keyScoreBoardByTour(lastId)
345	350		let oldScoreBoard = valueOrElse(getString(scoreKey), "")
346		-	let ~~updated~~ = if ((~~newBest~~ > ~~oldBestResult~~))
	351	+	let $t092539652 = if ((duckNewBest > duckOldBest))
347	352		then if (!(contains(oldScoreBoard, duckAssetId)))
348	353		then throw(("scoreBoard does not contain " + duckAssetId))
349	354		else {
350	355		let parts = split_51C(oldScoreBoard, duckAssetId)
351		-	((((parts[0] + duckAssetId) + ":") + padL(~~newBest~~, 3)) + drop(parts[1], 4))
	356	+	$Tuple2(((((parts[0] + duckAssetId) + ":") + padL(duckNewBest, 3)) + drop(parts[1], 4)), ((oldSumScores + duckNewBest) - duckOldBest))
352	357		}
353		-	else oldScoreBoard
354		-	$Tuple2([IntegerEntry(bestResultKey, max([oldBestResult, newBest])), StringEntry(scoreKey, updated)], 0)
	358	+	else $Tuple2(oldScoreBoard, oldSumScores)
	359	+	let newScoreBoard = $t092539652._1
	360	+	let newSumScores = $t092539652._2
	361	+	$Tuple2([IntegerEntry(bestResultKey, max([duckOldBest, duckNewBest])), IntegerEntry(sumScoresKey, newSumScores), StringEntry(scoreKey, newScoreBoard)], 0)
355	362		}
356	363		else $Tuple2(nil, 0)
357	364		}
	365	+
	366	+
	367	+
	368	+	@Callable(i)
	369	+	func processTournament (tId) = {
	370	+	let caller = toString(i.caller)
	371	+	if (!(containsElement(adminsList, caller)))
	372	+	then throw("Permission denied")
	373	+	else {
	374	+	let now = lastBlock.timestamp
	375	+	let tData = getTourData(this, tId)
	376	+	let static = tData[idxStatic]
	377	+	let dynamic = tData[idxDynamic]
	378	+	let status = dynamic[tDynamicStatus]
	379	+	if ((status == "ARCHIVED"))
	380	+	then throw((("Tournament " + toString(tId)) + " is already ARCHIVED"))
	381	+	else if (if ((status == "INPROGRESS"))
	382	+	then (parseIntValue(static[tStaticEnd]) > now)
	383	+	else false)
	384	+	then throw((("Tournament " + toString(tId)) + " is not over yet"))
	385	+	else {
	386	+	let updatedDynamicData = dynamicData("PROCESSING", dynamic[tDynamicWinDuck], parseIntValue(dynamic[tDynamicWinResult]), parseIntValue(dynamic[tDynamicTotalRegCount]), parseIntValue(dynamic[tDynamicTotalAttempts]))
	387	+	$Tuple2([StringEntry(keyTourDynamicDataById(tId), updatedDynamicData)], 0)
	388	+	}
	389	+	}
	390	+	}
358	391
359	392
360	393

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

github/deemru/w8io/169f3d6 
57.10 ms ◑