w8 · tx · 9SB···ZyD

tx · 9SBX3dfcNRaE1YYScpjBKmgUbjb6gj997RL4P9e5TZyD

3NCGjbgqZVk7eaqrLMEnEnqRhozNm1KTG5z:  -0.01900000 Waves

2025.01.18 06:00 [3463974] smart account 3NCGjbgqZVk7eaqrLMEnEnqRhozNm1KTG5z > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9SBX3dfcNRaE1YYScpjBKmgUbjb6gj997RL4P9e5TZyD",
    "fee": 1900000,
    "feeAssetId": null,
    "timestamp": 1737169280406,
    "version": 2,
    "chainId": 84,
    "sender": "3NCGjbgqZVk7eaqrLMEnEnqRhozNm1KTG5z",
    "senderPublicKey": "5CoDbXxoqnvJpx9GrS6M4G5GYJXh9rcoiXJz7RYTPVkL",
    "proofs": [
        "4HLBj5mNqwyi4nsnfCtWTHw2PPUeYC9GkG9xJh4qUpM8ZN2iuSRAcTWn1rJTa2ssc3LDzkx1Ux56J7o2bmtj9vDX"
    ],
    "script": "base64:BgIyCAISCgoIAQgEAhEYFBISBAoCCAgSABIDCgEBEgASABIAEgMKAQESABIDCgEIEgMKAQg4AANNMTYAgICE/qbe4READlNUQUtFUlNfQU1PVU5UAICAzvK+j6oFAAtURUFNX0FNT1VOVACAgJqm6q/jAQANTUFSS0VUX0FNT1VOVACAgJzl/Z7UCgALWUVBUl9CTE9DS1MJAGgCAO0CAKALAAxTVEFLRV9QRVJJT0QJAGgCAAUFC1lFQVJfQkxPQ0tTAAtCTEVTU19QUklDRQCA0NvD9AIADUxPVFRFUllfUFJJQ0UAgNDbw/QCABNERUZBVUxUX0ZPTU9fUEVSSU9EADwAD01JTl9GT01PX1BFUklPRAACAAxSQU5ET01fREVMQVkAAgAUQ1VSUkVOVF9KQUNLUE9UX1BFUkMAMgARTkVYVF9KQUNLUE9UX1BFUkMAFAAJVEVBTV9QRVJDAAoADmdvcmNBc3NldElkS2V5Agtnb3JjQXNzZXRJZAALZ29yY0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoQgBBQ5nb3JjQXNzZXRJZEtleQIWR09SQyBpcyBub3QgaXNzdWVkIHlldAAMaXNzdWVUaW1lS2V5Aglpc3N1ZVRpbWUAFXN0YWtlcnNBbW91bnRUb3RhbEtleQISc3Rha2Vyc0Ftb3VudFRvdGFsABRzdGFrZXJzQW1vdW50TGVmdEtleQIRc3Rha2Vyc0Ftb3VudExlZnQAFHN0YWtlZEFtb3VudFRvdGFsS2V5AgtzdGFrZWRUb3RhbAEVc3Rha2VkQW1vdW50QnlVc2VyS2V5AQRhZGRyCQCsAgICDXN0YWtlZEFtb3VudF8FBGFkZHIBFmxhc3RDbGFpbVRpbWVCeVVzZXJLZXkBBGFkZHIJAKwCAgIObGFzdENsYWltVGltZV8FBGFkZHIADGZvbW9FcG9jaEtleQIJZm9tb0Vwb2NoABFjdXJyRm9tb1BlcmlvZEtleQIOY3VyckZvbW9QZXJpb2QAD2xhc3RGb21vVGltZUtleQIMbGFzdEZvbW9UaW1lABJjdXJyRm9tb0phY2twb3RLZXkCD2N1cnJGb21vSmFja3BvdAASbmV4dEZvbW9KYWNrcG90S2V5Ag9uZXh0Rm9tb0phY2twb3QAEWxhc3RGb21vUGxheWVyS2V5Ag5sYXN0Rm9tb1BsYXllcgARbGFzdEZvbW9XaW5uZXJLZXkCDmxhc3RGb21vV2lubmVyABdsYXN0Rm9tb1dpbm5lckFtb3VudEtleQIUbGFzdEZvbW9XaW5uZXJBbW91bnQAFWxhc3RGb21vV2lubmVyVGltZUtleQISbGFzdEZvbW9XaW5uZXJUaW1lABF0ZWFtV2FsbGV0QWRkcktleQIOdGVhbVdhbGxldEFkZHIADWJyb2tlckFkZHJLZXkCCmJyb2tlckFkZHIBCWtleUNvbW1pdAEHYWRkcmVzcwkArAICAg9maW5pc2hCbG9ja0Zvcl8FB2FkZHJlc3MBCGtleUd1ZXNzAQdhZGRyZXNzCQCsAgICCWd1ZXNzRm9yXwUHYWRkcmVzcwEHa2V5U2FsdAEHYWRkcmVzcwkArAICAghzYWx0Rm9yXwUHYWRkcmVzcwAVY3VyckxvdHRlcnlKYWNrcG90S2V5AhJjdXJyTG90dGVyeUphY2twb3QAFW5leHRMb3R0ZXJ5SmFja3BvdEtleQISbmV4dExvdHRlcnlKYWNrcG90ABRsYXN0TG90dGVyeVdpbm5lcktleQIRbGFzdExvdHRlcnlXaW5uZXIAGmxhc3RMb3R0ZXJ5V2lubmVyQW1vdW50S2V5AhdsYXN0TG90dGVyeVdpbm5lckFtb3VudAAYbGFzdExvdHRlcnlXaW5uZXJUaW1lS2V5AhVsYXN0TG90dGVyeVdpbm5lclRpbWUAF2ZvbW9OdW1VbmlxdWVQbGF5ZXJzS2V5AhRmb21vTnVtVW5pcXVlUGxheWVycwAVZm9tb1RvdGFsTnVtU3Rha2VzS2V5AhJmb21vVG90YWxOdW1TdGFrZXMAGGZvbW9Ub3RhbFN0YWtlZEFtb3VudEtleQIVZm9tb1RvdGFsU3Rha2VkQW1vdW50ARRmb21vVXNlck51bVN0YWtlc0tleQEHYWRkcmVzcwkArAICAhJmb21vVXNlck51bVN0YWtlc18FB2FkZHJlc3MBF2ZvbW9Vc2VyU3Rha2VkQW1vdW50S2V5AQdhZGRyZXNzCQCsAgICFWZvbW9Vc2VyU3Rha2VkQW1vdW50XwUHYWRkcmVzcwESZm9tb1VzZXJOdW1XaW5zS2V5AQdhZGRyZXNzCQCsAgICEGZvbW9Vc2VyTnVtV2luc18FB2FkZHJlc3MBFGZvbW9Vc2VyV29uQW1vdW50S2V5AQdhZGRyZXNzCQCsAgICEmZvbW9Vc2VyV29uQW1vdW50XwUHYWRkcmVzcwAZZm9tb0Zhdm9yaXRlQnlOdW1HYW1lc0tleQIWZm9tb0Zhdm9yaXRlQnlOdW1HYW1lcwAXZm9tb0Zhdm9yaXRlQnlBbW91bnRLZXkCFGZvbW9GYXZvcml0ZUJ5QW1vdW50AQlnb3JjU3RhdHMBC3VzZXJBZGRyT3B0BA9hbW91bnRMZWZ0VG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUUc3Rha2Vyc0Ftb3VudExlZnRLZXkAAAQMbGFzdFVzZXJUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEJARZsYXN0Q2xhaW1UaW1lQnlVc2VyS2V5AQULdXNlckFkZHJPcHQA////////////AQMJAGYCAAAFDGxhc3RVc2VyVGltZQkAlAoCAAAFD2Ftb3VudExlZnRUb3RhbAQJaXNzdWVUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUMaXNzdWVUaW1lS2V5AhZHT1JDIGlzIG5vdCBpc3N1ZWQgeWV0BApub3dMaW1pdGVkCQCXAwEJAMwIAgUGaGVpZ2h0CQDMCAIJAGQCBQlpc3N1ZVRpbWUFDFNUQUtFX1BFUklPRAUDbmlsBAp1c2VyU2hhcmVzCQELdmFsdWVPckVsc2UCCQCfCAEJARVzdGFrZWRBbW91bnRCeVVzZXJLZXkBBQt1c2VyQWRkck9wdAAABAt0b3RhbFNoYXJlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBRRzdGFrZWRBbW91bnRUb3RhbEtleQAABBJzdGFrZXJzQW1vdW50VG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUVc3Rha2Vyc0Ftb3VudFRvdGFsS2V5BQ5TVEFLRVJTX0FNT1VOVAQMdXNlclRlbXBvcmFsCQBrAwUSc3Rha2Vyc0Ftb3VudFRvdGFsCQBlAgUKbm93TGltaXRlZAUMbGFzdFVzZXJUaW1lBQxTVEFLRV9QRVJJT0QECnVzZXJBbW91bnQDCQECIT0CBQt0b3RhbFNoYXJlcwAACQBrAwUMdXNlclRlbXBvcmFsBQp1c2VyU2hhcmVzBQt0b3RhbFNoYXJlcwAACQCUCgIFCnVzZXJBbW91bnQJAGUCBQ9hbW91bnRMZWZ0VG90YWwFCnVzZXJBbW91bnQBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AQ1nZXROZXdMZWFkZXJzAw1vbGRMZWFkZXJzU3RyB25ld0FkZHIJbmV3QW1vdW50BAxuZXdDYW5kaWRhdGUJAKwCAgkArAICBQduZXdBZGRyAgFfCQCkAwEFCW5ld0Ftb3VudAMJAAACBQ1vbGRMZWFkZXJzU3RyAgAJAMwIAgUMbmV3Q2FuZGlkYXRlBQNuaWwKAQxzb3J0QnlBbW91bnQCA2FjYwJlbAQLYWRkcl9hbW91bnQJALUJAgUCZWwCAV8EBGFkZHIJAJEDAgULYWRkcl9hbW91bnQAAAQGYW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULYWRkcl9hbW91bnQAAQMIBQNhY2MCXzIDCQAAAgUEYWRkcgUHbmV3QWRkcgUDYWNjCQCUCgIJAM0IAggFA2FjYwJfMQUCZWwGAwkAAAIFBGFkZHIFB25ld0FkZHIJAJQKAgkAzQgCCAUDYWNjAl8xBQxuZXdDYW5kaWRhdGUGAwkAZgIFBmFtb3VudAUJbmV3QW1vdW50CQCUCgIJAM0IAggFA2FjYwJfMQUCZWwHCQCUCgIJAM0IAgkAzQgCCAUDYWNjAl8xBQxuZXdDYW5kaWRhdGUFAmVsBgQGcmVzdWx0CgACJGwJALUJAgUNb2xkTGVhZGVyc1N0cgIBOgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsBwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMc29ydEJ5QW1vdW50AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAzCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADBANhcnIIBQZyZXN1bHQCXzEDCAUGcmVzdWx0Al8yAwkAZgIJAJADAQUDYXJyAAMJAMwIAgkAkQMCBQNhcnIAAAkAzAgCCQCRAwIFA2FycgABCQDMCAIJAJEDAgUDYXJyAAIFA25pbAUDYXJyAwkAZwIJAJADAQUDYXJyAAMFA2FycgkAzQgCBQNhcnIFDG5ld0NhbmRpZGF0ZQEMZm9tb0ludGVybmFsAQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQtnb3JjQXNzZXRJZAkAAgECE0dPUkMgcGF5bWVudHMgb25seSEEBmNoYW5nZQkAZQIFA2FtdAULQkxFU1NfUFJJQ0UDCQBmAgAABQZjaGFuZ2UJAAIBCQCsAgIJAKwCAgkArAICAhZZb3UgbmVlZCB0byBzYWNyaWZpY2UgCQEKZml4ZWRQb2ludAIFC0JMRVNTX1BSSUNFAAgCFiBHT1JDLCBidXQgSSBzZWUgb25seSAJAQpmaXhlZFBvaW50AgUDYW10AAgEDWNoYW5nZUFjdGlvbnMDCQBmAgUGY2hhbmdlAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQZjaGFuZ2UFC2dvcmNBc3NldElkBQNuaWwFA25pbAQMbGFzdEZvbW9UaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFD2xhc3RGb21vVGltZUtleQAABA5sYXN0Rm9tb1BsYXllcgkBC3ZhbHVlT3JFbHNlAgkAoggBBRFsYXN0Rm9tb1BsYXllcktleQIABBJsYXN0Rm9tb051bVdpbnNLZXkJARJmb21vVXNlck51bVdpbnNLZXkBBQ5sYXN0Rm9tb1BsYXllcgQUbGFzdEZvbW9Xb25BbW91bnRLZXkJARRmb21vVXNlcldvbkFtb3VudEtleQEFDmxhc3RGb21vUGxheWVyBA9sYXN0Rm9tb051bVdpbnMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUSbGFzdEZvbW9OdW1XaW5zS2V5AAAEEWxhc3RGb21vV29uQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFFGxhc3RGb21vV29uQW1vdW50S2V5AAAEEGRlbHRhQ3VyckphY2twb3QJAGsDBQtCTEVTU19QUklDRQUUQ1VSUkVOVF9KQUNLUE9UX1BFUkMAZAQQZGVsdGFOZXh0SmFja3BvdAkAawMFC0JMRVNTX1BSSUNFBRFORVhUX0pBQ0tQT1RfUEVSQwBkBA9kZWx0YVRlYW1BbW91bnQJAGsDBQtCTEVTU19QUklDRQUJVEVBTV9QRVJDAGQEEmRlbHRhU3Rha2Vyc0Ftb3VudAkAZQIJAGUCCQBlAgULQkxFU1NfUFJJQ0UFEGRlbHRhQ3VyckphY2twb3QFEGRlbHRhTmV4dEphY2twb3QFD2RlbHRhVGVhbUFtb3VudAQJZm9tb0Vwb2NoCQELdmFsdWVPckVsc2UCCQCfCAEFDGZvbW9FcG9jaEtleQAABA5jdXJyRm9tb1BlcmlvZAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRFjdXJyRm9tb1BlcmlvZEtleQUTREVGQVVMVF9GT01PX1BFUklPRAQObmV4dEZvbW9QZXJpb2QJAJYDAQkAzAgCBQ9NSU5fRk9NT19QRVJJT0QJAMwIAgkAZQIFDmN1cnJGb21vUGVyaW9kAAEFA25pbAQPZm9tb0N1cnJKYWNrcG90CQELdmFsdWVPckVsc2UCCQCfCAEFEmN1cnJGb21vSmFja3BvdEtleQAABA9mb21vTmV4dEphY2twb3QJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUSbmV4dEZvbW9KYWNrcG90S2V5AAAED29sZExlYWRlcnNCeU51bQkBC3ZhbHVlT3JFbHNlAgkAoggBBRlmb21vRmF2b3JpdGVCeU51bUdhbWVzS2V5AgAEEm9sZExlYWRlcnNCeUFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAoggBBRdmb21vRmF2b3JpdGVCeUFtb3VudEtleQIABAtmb21vQWN0aW9ucwMDAwkAZgIFBmhlaWdodAkAZAIFDGxhc3RGb21vVGltZQUOY3VyckZvbW9QZXJpb2QJAGYCBQ9mb21vQ3VyckphY2twb3QAAAcJAQIhPQIFDmxhc3RGb21vUGxheWVyAgAHCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDmxhc3RGb21vUGxheWVyBQ9mb21vQ3VyckphY2twb3QFC2dvcmNBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIFEWxhc3RGb21vV2lubmVyS2V5BQ5sYXN0Rm9tb1BsYXllcgkAzAgCCQEMSW50ZWdlckVudHJ5AgUXbGFzdEZvbW9XaW5uZXJBbW91bnRLZXkFD2ZvbW9DdXJySmFja3BvdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUVbGFzdEZvbW9XaW5uZXJUaW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSY3VyckZvbW9KYWNrcG90S2V5CQBkAgUPZm9tb05leHRKYWNrcG90BRBkZWx0YUN1cnJKYWNrcG90CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJuZXh0Rm9tb0phY2twb3RLZXkFEGRlbHRhTmV4dEphY2twb3QJAMwIAgkBDEludGVnZXJFbnRyeQIFDGZvbW9FcG9jaEtleQkAZAIFCWZvbW9FcG9jaAABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFjdXJyRm9tb1BlcmlvZEtleQUTREVGQVVMVF9GT01PX1BFUklPRAkAzAgCCQELU3RyaW5nRW50cnkCBRlmb21vRmF2b3JpdGVCeU51bUdhbWVzS2V5CQC5CQIJAQ1nZXROZXdMZWFkZXJzAwUPb2xkTGVhZGVyc0J5TnVtBQ5sYXN0Rm9tb1BsYXllcgkAZAIFD2xhc3RGb21vTnVtV2lucwABAgE6CQDMCAIJAQtTdHJpbmdFbnRyeQIFF2ZvbW9GYXZvcml0ZUJ5QW1vdW50S2V5CQC5CQIJAQ1nZXROZXdMZWFkZXJzAwUSb2xkTGVhZGVyc0J5QW1vdW50BQ5sYXN0Rm9tb1BsYXllcgkAZAIFEWxhc3RGb21vV29uQW1vdW50BQ9mb21vQ3VyckphY2twb3QCAToJAMwIAgkBDEludGVnZXJFbnRyeQIFEmxhc3RGb21vTnVtV2luc0tleQkAZAIFD2xhc3RGb21vTnVtV2lucwABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRsYXN0Rm9tb1dvbkFtb3VudEtleQkAZAIFEWxhc3RGb21vV29uQW1vdW50BQ9mb21vQ3VyckphY2twb3QFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSY3VyckZvbW9KYWNrcG90S2V5CQBkAgUPZm9tb0N1cnJKYWNrcG90BRBkZWx0YUN1cnJKYWNrcG90CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJuZXh0Rm9tb0phY2twb3RLZXkJAGQCBQ9mb21vTmV4dEphY2twb3QFEGRlbHRhTmV4dEphY2twb3QJAMwIAgkBDEludGVnZXJFbnRyeQIFEWN1cnJGb21vUGVyaW9kS2V5BQ5uZXh0Rm9tb1BlcmlvZAUDbmlsBARhZGRyCQClCAEIBQFpBmNhbGxlcgQUZm9tb051bVVuaXF1ZVBsYXllcnMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUXZm9tb051bVVuaXF1ZVBsYXllcnNLZXkAAAQQdXNlck51bVN0YWtlc0tleQkBFGZvbW9Vc2VyTnVtU3Rha2VzS2V5AQUEYWRkcgQTdXNlclN0YWtlZEFtb3VudEtleQkBF2ZvbW9Vc2VyU3Rha2VkQW1vdW50S2V5AQUEYWRkcgQNdXNlck51bVN0YWtlcwkAnwgBBRB1c2VyTnVtU3Rha2VzS2V5BAxzdGF0c0FjdGlvbnMJAM4IAgMJAQlpc0RlZmluZWQBBQ11c2VyTnVtU3Rha2VzCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRB1c2VyTnVtU3Rha2VzS2V5CQBkAgkBBXZhbHVlAQUNdXNlck51bVN0YWtlcwABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRN1c2VyU3Rha2VkQW1vdW50S2V5CQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBRN1c2VyU3Rha2VkQW1vdW50S2V5AAAFC0JMRVNTX1BSSUNFBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIFF2ZvbW9OdW1VbmlxdWVQbGF5ZXJzS2V5CQBkAgUUZm9tb051bVVuaXF1ZVBsYXllcnMAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgUQdXNlck51bVN0YWtlc0tleQABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRN1c2VyU3Rha2VkQW1vdW50S2V5BQtCTEVTU19QUklDRQUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVmb21vVG90YWxOdW1TdGFrZXNLZXkJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFFWZvbW9Ub3RhbE51bVN0YWtlc0tleQAAAAEJAMwIAgkBDEludGVnZXJFbnRyeQIFGGZvbW9Ub3RhbFN0YWtlZEFtb3VudEtleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUYZm9tb1RvdGFsU3Rha2VkQW1vdW50S2V5AAAFC0JMRVNTX1BSSUNFBQNuaWwJAM4IAgkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFD2xhc3RGb21vVGltZUtleQUGaGVpZ2h0CQDMCAIJAQtTdHJpbmdFbnRyeQIFEWxhc3RGb21vUGxheWVyS2V5CQClCAEIBQFpBmNhbGxlcgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBRF0ZWFtV2FsbGV0QWRkcktleQUPZGVsdGFUZWFtQW1vdW50BQtnb3JjQXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUc3Rha2Vyc0Ftb3VudExlZnRLZXkJAGQCCQERQGV4dHJOYXRpdmUoMTA1NSkBBRRzdGFrZXJzQW1vdW50TGVmdEtleQUSZGVsdGFTdGFrZXJzQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVzdGFrZXJzQW1vdW50VG90YWxLZXkJAGQCCQERQGV4dHJOYXRpdmUoMTA1NSkBBRVzdGFrZXJzQW1vdW50VG90YWxLZXkFEmRlbHRhU3Rha2Vyc0Ftb3VudAUDbmlsBQ1jaGFuZ2VBY3Rpb25zBQtmb21vQWN0aW9ucwUMc3RhdHNBY3Rpb25zAQ9nZXRSYW5kb21OdW1iZXIDCG1heFZhbHVlBHNhbHQHZW50cm9weQMJAGcCAAAFCG1heFZhbHVlCQACAQIWbWF4VmFsdWUgc2hvdWxkIGJlID4gMAQKcmFuZG9tSGFzaAkA1BYBCQDLAQIFBHNhbHQFB2VudHJvcHkJAGoCCQCxCQEFCnJhbmRvbUhhc2gFCG1heFZhbHVlAQ53YWxsZXRJbnRlcm5hbAEOdXNlckFkZHJlc3NPcHQEBGFkZHIJAKYIAQUOdXNlckFkZHJlc3NPcHQEB2JhbGFuY2UDCQEJaXNEZWZpbmVkAQUEYWRkcgkA7wcBCQEFdmFsdWUBBQRhZGRyCQEOQmFsYW5jZURldGFpbHMEAAAAAAAAAAAEC2dvcmNCYWxhbmNlAwkBCWlzRGVmaW5lZAEFBGFkZHIJAPAHAgkBBXZhbHVlAQUEYWRkcgULZ29yY0Fzc2V0SWQAAAQKc3Rha2VkR29yYwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEVc3Rha2VkQW1vdW50QnlVc2VyS2V5AQUOdXNlckFkZHJlc3NPcHQAAAkAzAgCCQCsAgICFCVzJWRfX3dhdmVzQmFsYW5jZV9fCQCkAwEIBQdiYWxhbmNlCWF2YWlsYWJsZQkAzAgCCQCsAgICEyVzJWRfX2dvcmNCYWxhbmNlX18JAKQDAQULZ29yY0JhbGFuY2UJAMwIAgkArAICAhIlcyVkX19zdGFrZWRHb3JjX18JAKQDAQUKc3Rha2VkR29yYwUDbmlsCwFpAQh0ZXN0QXJncwgGaW50VmFsBnN0clZhbAdib29sVmFsBmJpblZhbAZhcnJJbnQGYXJyU3RyB2FyckJvb2wGYXJyQmluBQNuaWwBaQENY29uc3RydWN0b3JWMQIOdGVhbVdhbGxldEFkZHIKYnJva2VyQWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAxpc3N1ZWRBbW91bnQFA00xNgQFaXNzdWUJAMMIBwIER09SQwK1AU1lbWUgY29pbiBieSBHb2Qgb2YgUmFuZG9tIENoYW5jZS4gVmlzaXQgaHR0cHM6Ly9nb3JjLm1lbWUsIHNhY3JpZmljZSB0byB0aGUgR29kIG9mIFJhbmRvbSBhbmQgeW91IHdpbGwgcmVjZWl2ZSBhbiBhbnN3ZXIgdG8gYW55IHF1ZXN0aW9uIG9yIGEgYmxlc3NpbmcuIEx1Y2t5IG9uZSBnZXRzIGEgR2lmdCBvZiBHb2QFDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQtCaW5hcnlFbnRyeQIFDmdvcmNBc3NldElkS2V5BQdhc3NldElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxpc3N1ZVRpbWVLZXkFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUc3Rha2Vyc0Ftb3VudExlZnRLZXkFDlNUQUtFUlNfQU1PVU5UCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVzdGFrZXJzQW1vdW50VG90YWxLZXkFDlNUQUtFUlNfQU1PVU5UCQDMCAIJAQtTdHJpbmdFbnRyeQIFEXRlYW1XYWxsZXRBZGRyS2V5BQ50ZWFtV2FsbGV0QWRkcgkAzAgCCQELU3RyaW5nRW50cnkCBQ1icm9rZXJBZGRyS2V5BQpicm9rZXJBZGRyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDnRlYW1XYWxsZXRBZGRyBQtURUFNX0FNT1VOVAUHYXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQpicm9rZXJBZGRyBQ1NQVJLRVRfQU1PVU5UBQdhc3NldElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxmb21vRXBvY2hLZXkAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgURY3VyckZvbW9QZXJpb2RLZXkFE0RFRkFVTFRfRk9NT19QRVJJT0QFA25pbAFpAQlzdGFrZUdvcmMAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQtnb3JjQXNzZXRJZAkAAgECE0dPUkMgcGF5bWVudHMgb25seSEEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBA0kdDAxMjE2ODEyMjE5CQEJZ29yY1N0YXRzAQUEYWRkcgQKdXNlckFtb3VudAgFDSR0MDEyMTY4MTIyMTkCXzEED2Ftb3VudExlZnRUb3RhbAgFDSR0MDEyMTY4MTIyMTkCXzIEDXVzZXJBbW91bnRLZXkJARVzdGFrZWRBbW91bnRCeVVzZXJLZXkBBQRhZGRyBAxjbGFpbUFjdGlvbnMDCQBmAgUKdXNlckFtb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUKdXNlckFtb3VudAULZ29yY0Fzc2V0SWQFA25pbAUDbmlsCQCUCgIJAM4IAgUMY2xhaW1BY3Rpb25zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRzdGFrZWRBbW91bnRUb3RhbEtleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUUc3Rha2VkQW1vdW50VG90YWxLZXkAAAUDYW10CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQ11c2VyQW1vdW50S2V5CQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ11c2VyQW1vdW50S2V5AAAFA2FtdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmxhc3RDbGFpbVRpbWVCeVVzZXJLZXkBBQRhZGRyBQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIFFHN0YWtlcnNBbW91bnRMZWZ0S2V5BQ9hbW91bnRMZWZ0VG90YWwFA25pbAUKdXNlckFtb3VudAFpAQt1bnN0YWtlR29yYwEGYW1vdW50AwkAZwIAAAUGYW1vdW50CQACAQIZQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQEYWRkcgkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQNdXNlckFtb3VudEtleQkBFXN0YWtlZEFtb3VudEJ5VXNlcktleQEFBGFkZHIECW9sZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ11c2VyQW1vdW50S2V5AAADCQBmAgAACQBlAgUJb2xkQW1vdW50BQZhbW91bnQJAAIBCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkBCmZpeGVkUG9pbnQCBQlvbGRBbW91bnQACAIfIEdPUkMgc3Rha2VkLCB0cmllZCB0byB1bnN0YWtlIAkBCmZpeGVkUG9pbnQCBQZhbW91bnQACAQNJHQwMTMxODAxMzIzMQkBCWdvcmNTdGF0cwEFBGFkZHIECnVzZXJBbW91bnQIBQ0kdDAxMzE4MDEzMjMxAl8xBA9hbW91bnRMZWZ0VG90YWwIBQ0kdDAxMzE4MDEzMjMxAl8yBAxjbGFpbUFjdGlvbnMDCQBmAgUKdXNlckFtb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUKdXNlckFtb3VudAULZ29yY0Fzc2V0SWQFA25pbAUDbmlsCQCUCgIJAM4IAgUMY2xhaW1BY3Rpb25zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRzdGFrZWRBbW91bnRUb3RhbEtleQkAZQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBBRRzdGFrZWRBbW91bnRUb3RhbEtleQIOTm8gR09SQyBzdGFrZWQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUNdXNlckFtb3VudEtleQkAZQIFCW9sZEFtb3VudAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWbGFzdENsYWltVGltZUJ5VXNlcktleQEFBGFkZHIFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUc3Rha2Vyc0Ftb3VudExlZnRLZXkFD2Ftb3VudExlZnRUb3RhbAUDbmlsAAABaQEJY2xhaW1Hb3JjAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpBmNhbGxlcgQNJHQwMTM3OTUxMzg0NgkBCWdvcmNTdGF0cwEFBGFkZHIECnVzZXJBbW91bnQIBQ0kdDAxMzc5NTEzODQ2Al8xBA9hbW91bnRMZWZ0VG90YWwIBQ0kdDAxMzc5NTEzODQ2Al8yBAxjbGFpbUFjdGlvbnMDCQBmAgUKdXNlckFtb3VudAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUKdXNlckFtb3VudAULZ29yY0Fzc2V0SWQFA25pbAUDbmlsCQCUCgIJAM4IAgUMY2xhaW1BY3Rpb25zCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWbGFzdENsYWltVGltZUJ5VXNlcktleQEFBGFkZHIFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgUUc3Rha2Vyc0Ftb3VudExlZnRLZXkFD2Ftb3VudExlZnRUb3RhbAUDbmlsBQp1c2VyQW1vdW50AWkBCGFuc3dlck1lAAkAlAoCCQEMZm9tb0ludGVybmFsAQUBaQkAsQkBCAUBaQ10cmFuc2FjdGlvbklkAWkBB2JsZXNzTWUACQCUCgIJAQxmb21vSW50ZXJuYWwBBQFpACoBaQELY29tbWl0R3Vlc3MBBWd1ZXNzBARhZGRyCQClCAEIBQFpBmNhbGxlcgQJZmluaXNoS2V5CQEJa2V5Q29tbWl0AQUEYWRkcgQIZ3Vlc3NLZXkJAQhrZXlHdWVzcwEFBGFkZHIDCQEJaXNEZWZpbmVkAQkAnwgBBQlmaW5pc2hLZXkJAAIBAiVZb3UgYWxyZWFkeSBtYWRlIGEgYmV0LCBwbGVhc2UgdXNlIGl0AwMJAGYCAAAFBWd1ZXNzBgkAZgIFBWd1ZXNzAAsJAAIBAiVUaGUgbnVtYmVyIHNob3VsZCBiZSBiZXR3ZWVuIDAgYW5kIDExAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQtnb3JjQXNzZXRJZAkAAgECE0dPUkMgcGF5bWVudHMgb25seSEEBmNoYW5nZQkAZQIFA2FtdAUNTE9UVEVSWV9QUklDRQMJAGYCAAAFBmNoYW5nZQkAAgEJAKwCAgkArAICCQCsAgICFllvdSBuZWVkIHRvIHNhY3JpZmljZSAJAQpmaXhlZFBvaW50AgUNTE9UVEVSWV9QUklDRQAIAhYgR09SQywgYnV0IEkgc2VlIG9ubHkgCQEKZml4ZWRQb2ludAIFA2FtdAAIBA1jaGFuZ2VBY3Rpb25zAwkAZgIFBmNoYW5nZQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGY2hhbmdlBQtnb3JjQXNzZXRJZAUDbmlsBQNuaWwEC2ZpbmlzaEJsb2NrCQBkAgUGaGVpZ2h0BQxSQU5ET01fREVMQVkEEGRlbHRhQ3VyckphY2twb3QJAGsDBQ1MT1RURVJZX1BSSUNFBRRDVVJSRU5UX0pBQ0tQT1RfUEVSQwBkBBBkZWx0YU5leHRKYWNrcG90CQBrAwUNTE9UVEVSWV9QUklDRQURTkVYVF9KQUNLUE9UX1BFUkMAZAQPZGVsdGFUZWFtQW1vdW50CQBrAwUNTE9UVEVSWV9QUklDRQUJVEVBTV9QRVJDAGQEEmRlbHRhU3Rha2Vyc0Ftb3VudAkAZQIJAGUCCQBlAgUNTE9UVEVSWV9QUklDRQUQZGVsdGFDdXJySmFja3BvdAUQZGVsdGFOZXh0SmFja3BvdAUPZGVsdGFUZWFtQW1vdW50CQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJZmluaXNoS2V5BQtmaW5pc2hCbG9jawkAzAgCCQEMSW50ZWdlckVudHJ5AgUIZ3Vlc3NLZXkFBWd1ZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVjdXJyTG90dGVyeUphY2twb3RLZXkJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFFWN1cnJMb3R0ZXJ5SmFja3BvdEtleQAABRBkZWx0YUN1cnJKYWNrcG90CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRVuZXh0TG90dGVyeUphY2twb3RLZXkJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFFW5leHRMb3R0ZXJ5SmFja3BvdEtleQAABRBkZWx0YU5leHRKYWNrcG90CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARFAZXh0ck5hdGl2ZSgxMDU4KQEFEXRlYW1XYWxsZXRBZGRyS2V5BQ9kZWx0YVRlYW1BbW91bnQFC2dvcmNBc3NldElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRzdGFrZXJzQW1vdW50TGVmdEtleQkAZAIJARFAZXh0ck5hdGl2ZSgxMDU1KQEFFHN0YWtlcnNBbW91bnRMZWZ0S2V5BRJkZWx0YVN0YWtlcnNBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFFXN0YWtlcnNBbW91bnRUb3RhbEtleQkAZAIJARFAZXh0ck5hdGl2ZSgxMDU1KQEFFXN0YWtlcnNBbW91bnRUb3RhbEtleQUSZGVsdGFTdGFrZXJzQW1vdW50CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQdrZXlTYWx0AQUEYWRkcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBQNuaWwFDWNoYW5nZUFjdGlvbnMFC2ZpbmlzaEJsb2NrAWkBDGd1ZXNzTG90dGVyeQAEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAlmaW5pc2hLZXkJAQlrZXlDb21taXQBBQRhZGRyBAhndWVzc0tleQkBCGtleUd1ZXNzAQUEYWRkcgQFZ3Vlc3MJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBBQhndWVzc0tleQIXWW91IGhhdmUgbm90IG1hZGUgYSBiZXQEC2ZpbmlzaEJsb2NrCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUJZmluaXNoS2V5AhdZb3UgaGF2ZSBub3QgbWFkZSBhIGJldAMJAGYCBQtmaW5pc2hCbG9jawUGaGVpZ2h0CQACAQkArAICAjRSYW5kb20gbnVtYmVyIGlzIG5vdCByZWFkeSB5ZXQsIHdhaXQgdW50aWwgaGVpZ2h0ID0gCQCkAwEFC2ZpbmlzaEJsb2NrBAdlbnRyb3B5CQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBBQtmaW5pc2hCbG9jawN2cmYEB3NhbHRLZXkJAQdrZXlTYWx0AQUEYWRkcgQEc2FsdAkA2QQBCQELdmFsdWVPckVsc2UCCQCiCAEFB3NhbHRLZXkCB0RFRkFVTFQEBHJhbmQJAQ9nZXRSYW5kb21OdW1iZXIDAAwFBHNhbHQFB2VudHJvcHkEC2N1cnJKYWNrcG90CQELdmFsdWVPckVsc2UCCQCfCAEFFWN1cnJMb3R0ZXJ5SmFja3BvdEtleQAABAp3aW5BY3Rpb25zAwkAAAIFBHJhbmQFBWd1ZXNzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULY3VyckphY2twb3QFC2dvcmNBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIFFGxhc3RMb3R0ZXJ5V2lubmVyS2V5BQRhZGRyCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRpsYXN0TG90dGVyeVdpbm5lckFtb3VudEtleQULY3VyckphY2twb3QJAMwIAgkBDEludGVnZXJFbnRyeQIFGGxhc3RMb3R0ZXJ5V2lubmVyVGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIFFWN1cnJMb3R0ZXJ5SmFja3BvdEtleQkBC3ZhbHVlT3JFbHNlAgkAnwgBBRVuZXh0TG90dGVyeUphY2twb3RLZXkAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUVbmV4dExvdHRlcnlKYWNrcG90S2V5AAAFA25pbAUDbmlsCQCUCgIJAM4IAgkAzAgCCQELRGVsZXRlRW50cnkBBQlmaW5pc2hLZXkJAMwIAgkBC0RlbGV0ZUVudHJ5AQUIZ3Vlc3NLZXkJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHc2FsdEtleQUDbmlsBQp3aW5BY3Rpb25zBQRyYW5kAWkBDXN0YXRzUkVBRE9OTFkBC3VzZXJBZGRyT3B0BA0kdDAxODE5NTE4MjUzCQEJZ29yY1N0YXRzAQULdXNlckFkZHJPcHQECnVzZXJBbW91bnQIBQ0kdDAxODE5NTE4MjUzAl8xBA9hbW91bnRMZWZ0VG90YWwIBQ0kdDAxODE5NTE4MjUzAl8yBA9jdXJyRm9tb0phY2twb3QJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUSY3VyckZvbW9KYWNrcG90S2V5AAAED25leHRGb21vSmFja3BvdAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJuZXh0Rm9tb0phY2twb3RLZXkAAAQMbGFzdEZvbW9UaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFD2xhc3RGb21vVGltZUtleQAABA5sYXN0Rm9tb1BsYXllcgkBC3ZhbHVlT3JFbHNlAgkAoggBBRFsYXN0Rm9tb1BsYXllcktleQIABAlmb21vRXBvY2gJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUMZm9tb0Vwb2NoS2V5AAAEDmN1cnJGb21vUGVyaW9kCQELdmFsdWVPckVsc2UCCQCfCAEFEWN1cnJGb21vUGVyaW9kS2V5BRNERUZBVUxUX0ZPTU9fUEVSSU9EBBJjdXJyTG90dGVyeUphY2twb3QJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUVY3VyckxvdHRlcnlKYWNrcG90S2V5AAAEEm5leHRMb3R0ZXJ5SmFja3BvdAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRVuZXh0TG90dGVyeUphY2twb3RLZXkAAAQJZmluaXNoS2V5CQEJa2V5Q29tbWl0AQULdXNlckFkZHJPcHQECGd1ZXNzS2V5CQEIa2V5R3Vlc3MBBQt1c2VyQWRkck9wdAQFZ3Vlc3MJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUIZ3Vlc3NLZXkA////////////AQQLZmluaXNoQmxvY2sJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJZmluaXNoS2V5AP///////////wEEDmxhc3RGb21vV2lubmVyCQELdmFsdWVPckVsc2UCCQCiCAEFEWxhc3RGb21vV2lubmVyS2V5AgAEFGxhc3RGb21vV2lubmVyQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFF2xhc3RGb21vV2lubmVyQW1vdW50S2V5AAAEEmxhc3RGb21vV2lubmVyVGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBRVsYXN0Rm9tb1dpbm5lclRpbWVLZXkAAAQRbGFzdExvdHRlcnlXaW5uZXIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUUbGFzdExvdHRlcnlXaW5uZXJLZXkCAAQXbGFzdExvdHRlcnlXaW5uZXJBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUabGFzdExvdHRlcnlXaW5uZXJBbW91bnRLZXkAAAQVbGFzdExvdHRlcnlXaW5uZXJUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFGGxhc3RMb3R0ZXJ5V2lubmVyVGltZUtleQAABA9nb3JjU3Rha2VkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUUc3Rha2VkQW1vdW50VG90YWxLZXkAAAQUZm9tb051bVVuaXF1ZVBsYXllcnMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUXZm9tb051bVVuaXF1ZVBsYXllcnNLZXkAAAQSZm9tb1RvdGFsTnVtU3Rha2VzCQELdmFsdWVPckVsc2UCCQCfCAEFFWZvbW9Ub3RhbE51bVN0YWtlc0tleQAABBVmb21vVG90YWxTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUYZm9tb1RvdGFsU3Rha2VkQW1vdW50S2V5AAAEEWZvbW9Vc2VyTnVtU3Rha2VzCQELdmFsdWVPckVsc2UCCQCfCAEJARRmb21vVXNlck51bVN0YWtlc0tleQEFC3VzZXJBZGRyT3B0AAAEFGZvbW9Vc2VyU3Rha2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEJARdmb21vVXNlclN0YWtlZEFtb3VudEtleQEFC3VzZXJBZGRyT3B0AAAED2ZvbW9Vc2VyTnVtV2lucwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESZm9tb1VzZXJOdW1XaW5zS2V5AQULdXNlckFkZHJPcHQAAAQRZm9tb1VzZXJXb25BbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFGZvbW9Vc2VyV29uQW1vdW50S2V5AQULdXNlckFkZHJPcHQAAAQWZm9tb0Zhdm9yaXRlQnlOdW1HYW1lcwkBC3ZhbHVlT3JFbHNlAgkAoggBBRlmb21vRmF2b3JpdGVCeU51bUdhbWVzS2V5AgAEFGZvbW9GYXZvcml0ZUJ5QW1vdW50CQELdmFsdWVPckVsc2UCCQCiCAEFF2ZvbW9GYXZvcml0ZUJ5QW1vdW50S2V5AgAJAJQKAgUDbmlsCQDMCAIJAKwCAgIYJXMlZF9fZ29yY0F2YWlsVG9DbGFpbV9fCQCkAwEFCnVzZXJBbW91bnQJAMwIAgkArAICAhElcyVkX19mb21vRXBvY2hfXwkApAMBBQlmb21vRXBvY2gJAMwIAgkArAICAhYlcyVkX19jdXJyRm9tb1BlcmlvZF9fCQCkAwEFDmN1cnJGb21vUGVyaW9kCQDMCAIJAKwCAgIdJXMlZF9fY3VyckZvbW9KYWNrcG90QW1vdW50X18JAKQDAQUPY3VyckZvbW9KYWNrcG90CQDMCAIJAKwCAgIdJXMlZF9fbmV4dEZvbW9KYWNrcG90QW1vdW50X18JAKQDAQUPbmV4dEZvbW9KYWNrcG90CQDMCAIJAKwCAgIgJXMlZF9fY3VyckxvdHRlcnlKYWNrcG90QW1vdW50X18JAKQDAQUSY3VyckxvdHRlcnlKYWNrcG90CQDMCAIJAKwCAgIgJXMlZF9fbmV4dExvdHRlcnlKYWNrcG90QW1vdW50X18JAKQDAQUSbmV4dExvdHRlcnlKYWNrcG90CQDMCAIJAKwCAgIUJXMlZF9fbGFzdEZvbW9UaW1lX18JAKQDAQUMbGFzdEZvbW9UaW1lCQDMCAIJAKwCAgIWJXMlc19fbGFzdEZvbW9QbGF5ZXJfXwUObGFzdEZvbW9QbGF5ZXIJAMwIAgkArAICAhclcyVkX19hbW91bnRMZWZ0VG90YWxfXwkApAMBBQ9hbW91bnRMZWZ0VG90YWwJAMwIAgkArAICAhMlcyVkX19maW5pc2hCbG9ja19fCQCkAwEFC2ZpbmlzaEJsb2NrCQDMCAIJAKwCAgINJXMlZF9fZ3Vlc3NfXwkApAMBBQVndWVzcwkAzAgCCQCsAgICFiVzJXNfX2xhc3RGb21vV2lubmVyX18FDmxhc3RGb21vV2lubmVyCQDMCAIJAKwCAgIcJXMlZF9fbGFzdEZvbW9XaW5uZXJBbW91bnRfXwkApAMBBRRsYXN0Rm9tb1dpbm5lckFtb3VudAkAzAgCCQCsAgICGiVzJWRfX2xhc3RGb21vV2lubmVyVGltZV9fCQCkAwEFEmxhc3RGb21vV2lubmVyVGltZQkAzAgCCQCsAgICGSVzJXNfX2xhc3RMb3R0ZXJ5V2lubmVyX18FEWxhc3RMb3R0ZXJ5V2lubmVyCQDMCAIJAKwCAgIfJXMlZF9fbGFzdExvdHRlcnlXaW5uZXJBbW91bnRfXwkApAMBBRdsYXN0TG90dGVyeVdpbm5lckFtb3VudAkAzAgCCQCsAgICHSVzJWRfX2xhc3RMb3R0ZXJ5V2lubmVyVGltZV9fCQCkAwEFFWxhc3RMb3R0ZXJ5V2lubmVyVGltZQkAzAgCCQCsAgICEiVzJWRfX2dvcmNJc3N1ZWRfXwkApAMBBQNNMTYJAMwIAgkArAICAhclcyVkX19nb3JjU3Rha2VkVG90YWxfXwkApAMBBQ9nb3JjU3Rha2VkVG90YWwJAMwIAgkArAICAhwlcyVkX19mb21vTnVtVW5pcXVlUGxheWVyc19fCQCkAwEFFGZvbW9OdW1VbmlxdWVQbGF5ZXJzCQDMCAIJAKwCAgIaJXMlZF9fZm9tb1RvdGFsTnVtU3Rha2VzX18JAKQDAQUSZm9tb1RvdGFsTnVtU3Rha2VzCQDMCAIJAKwCAgIdJXMlZF9fZm9tb1RvdGFsU3Rha2VkQW1vdW50X18JAKQDAQUVZm9tb1RvdGFsU3Rha2VkQW1vdW50CQDMCAIJAKwCAgIZJXMlZF9fZm9tb1VzZXJOdW1TdGFrZXNfXwkApAMBBRFmb21vVXNlck51bVN0YWtlcwkAzAgCCQCsAgICHCVzJWRfX2ZvbW9Vc2VyU3Rha2VkQW1vdW50X18JAKQDAQUUZm9tb1VzZXJTdGFrZWRBbW91bnQJAMwIAgkArAICAhclcyVkX19mb21vVXNlck51bVdpbnNfXwkApAMBBQ9mb21vVXNlck51bVdpbnMJAMwIAgkArAICAhklcyVkX19mb21vVXNlcldvbkFtb3VudF9fCQCkAwEFEWZvbW9Vc2VyV29uQW1vdW50CQDMCAIJAKwCAgIeJXMlc19fZm9tb0Zhdm9yaXRlQnlOdW1HYW1lc19fBRZmb21vRmF2b3JpdGVCeU51bUdhbWVzCQDMCAIJAKwCAgIcJXMlc19fZm9tb0Zhdm9yaXRlQnlBbW91bnRfXwUUZm9tb0Zhdm9yaXRlQnlBbW91bnQFA25pbAFpARJ3YWxsZXRJbmZvUkVBRE9OTFkBDnVzZXJBZGRyZXNzT3B0CQCUCgIFA25pbAkBDndhbGxldEludGVybmFsAQUOdXNlckFkZHJlc3NPcHQAhHadyA==",
    "height": 3463974,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5pUuYSYw9wB9644JowHGSgNhtUFdWUsJKj43DRdCDNKs
Next: none

Diff: 
Old New Differences
233 233                          let statsActions = ((if (isDefined(userNumStakes))
234 234                              then [IntegerEntry(userNumStakesKey, (value(userNumStakes) + 1)), IntegerEntry(userStakedAmountKey, (valueOrElse(getInteger(userStakedAmountKey), 0) + BLESS_PRICE))]
235 235                              else [IntegerEntry(fomoNumUniquePlayersKey, (fomoNumUniquePlayers + 1)), IntegerEntry(userNumStakesKey, 1), IntegerEntry(userStakedAmountKey, BLESS_PRICE)]) ++ [IntegerEntry(fomoTotalNumStakesKey, (valueOrElse(getInteger(fomoTotalNumStakesKey), 0) + 1)), IntegerEntry(fomoTotalStakedAmountKey, (valueOrElse(getInteger(fomoTotalStakedAmountKey), 0) + BLESS_PRICE))])
236 -                         (([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions)
236 +                         ((([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions) ++ statsActions)
237 237                          }
238 238                  }
239 239          }
289 289              then throw("GORC payments only!")
290 290              else {
291 291                  let addr = toString(i.caller)
292 -                 let $t01215212203 = gorcStats(addr)
293 -                 let userAmount = $t01215212203._1
294 -                 let amountLeftTotal = $t01215212203._2
292 +                 let $t01216812219 = gorcStats(addr)
293 +                 let userAmount = $t01216812219._1
294 +                 let amountLeftTotal = $t01216812219._2
295 295                  let userAmountKey = stakedAmountByUserKey(addr)
296 296                  let claimActions = if ((userAmount > 0))
297 297                      then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
315 315                  if ((0 > (oldAmount - amount)))
316 316                      then throw(((("You have only " + fixedPoint(oldAmount, 8)) + " GORC staked, tried to unstake ") + fixedPoint(amount, 8)))
317 317                      else {
318 -                         let $t01316413215 = gorcStats(addr)
319 -                         let userAmount = $t01316413215._1
320 -                         let amountLeftTotal = $t01316413215._2
318 +                         let $t01318013231 = gorcStats(addr)
319 +                         let userAmount = $t01318013231._1
320 +                         let amountLeftTotal = $t01318013231._2
321 321                          let claimActions = if ((userAmount > 0))
322 322                              then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
323 323                              else nil
333 333      then throw("No payments required")
334 334      else {
335 335          let addr = toString(i.caller)
336 -         let $t01377913830 = gorcStats(addr)
337 -         let userAmount = $t01377913830._1
338 -         let amountLeftTotal = $t01377913830._2
336 +         let $t01379513846 = gorcStats(addr)
337 +         let userAmount = $t01379513846._1
338 +         let amountLeftTotal = $t01379513846._2
339 339          let claimActions = if ((userAmount > 0))
340 340              then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
341 341              else nil
421 421  
422 422  @Callable(i)
423 423  func statsREADONLY (userAddrOpt) = {
424 -     let $t01817918237 = gorcStats(userAddrOpt)
425 -     let userAmount = $t01817918237._1
426 -     let amountLeftTotal = $t01817918237._2
424 +     let $t01819518253 = gorcStats(userAddrOpt)
425 +     let userAmount = $t01819518253._1
426 +     let amountLeftTotal = $t01819518253._2
427 427      let currFomoJackpot = valueOrElse(getInteger(currFomoJackpotKey), 0)
428 428      let nextFomoJackpot = valueOrElse(getInteger(nextFomoJackpotKey), 0)
429 429      let lastFomoTime = valueOrElse(getInteger(lastFomoTimeKey), 0)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let M16 = 10000000000000000
5 5  
6 6  let STAKERS_AMOUNT = 3000000000000000
7 7  
8 8  let TEAM_AMOUNT = 1000000000000000
9 9  
10 10  let MARKET_AMOUNT = 6000000000000000
11 11  
12 12  let YEAR_BLOCKS = (365 * 1440)
13 13  
14 14  let STAKE_PERIOD = (5 * YEAR_BLOCKS)
15 15  
16 16  let BLESS_PRICE = 100000000000
17 17  
18 18  let LOTTERY_PRICE = 100000000000
19 19  
20 20  let DEFAULT_FOMO_PERIOD = 60
21 21  
22 22  let MIN_FOMO_PERIOD = 2
23 23  
24 24  let RANDOM_DELAY = 2
25 25  
26 26  let CURRENT_JACKPOT_PERC = 50
27 27  
28 28  let NEXT_JACKPOT_PERC = 20
29 29  
30 30  let TEAM_PERC = 10
31 31  
32 32  let gorcAssetIdKey = "gorcAssetId"
33 33  
34 34  let gorcAssetId = valueOrErrorMessage(getBinary(gorcAssetIdKey), "GORC is not issued yet")
35 35  
36 36  let issueTimeKey = "issueTime"
37 37  
38 38  let stakersAmountTotalKey = "stakersAmountTotal"
39 39  
40 40  let stakersAmountLeftKey = "stakersAmountLeft"
41 41  
42 42  let stakedAmountTotalKey = "stakedTotal"
43 43  
44 44  func stakedAmountByUserKey (addr) = ("stakedAmount_" + addr)
45 45  
46 46  
47 47  func lastClaimTimeByUserKey (addr) = ("lastClaimTime_" + addr)
48 48  
49 49  
50 50  let fomoEpochKey = "fomoEpoch"
51 51  
52 52  let currFomoPeriodKey = "currFomoPeriod"
53 53  
54 54  let lastFomoTimeKey = "lastFomoTime"
55 55  
56 56  let currFomoJackpotKey = "currFomoJackpot"
57 57  
58 58  let nextFomoJackpotKey = "nextFomoJackpot"
59 59  
60 60  let lastFomoPlayerKey = "lastFomoPlayer"
61 61  
62 62  let lastFomoWinnerKey = "lastFomoWinner"
63 63  
64 64  let lastFomoWinnerAmountKey = "lastFomoWinnerAmount"
65 65  
66 66  let lastFomoWinnerTimeKey = "lastFomoWinnerTime"
67 67  
68 68  let teamWalletAddrKey = "teamWalletAddr"
69 69  
70 70  let brokerAddrKey = "brokerAddr"
71 71  
72 72  func keyCommit (address) = ("finishBlockFor_" + address)
73 73  
74 74  
75 75  func keyGuess (address) = ("guessFor_" + address)
76 76  
77 77  
78 78  func keySalt (address) = ("saltFor_" + address)
79 79  
80 80  
81 81  let currLotteryJackpotKey = "currLotteryJackpot"
82 82  
83 83  let nextLotteryJackpotKey = "nextLotteryJackpot"
84 84  
85 85  let lastLotteryWinnerKey = "lastLotteryWinner"
86 86  
87 87  let lastLotteryWinnerAmountKey = "lastLotteryWinnerAmount"
88 88  
89 89  let lastLotteryWinnerTimeKey = "lastLotteryWinnerTime"
90 90  
91 91  let fomoNumUniquePlayersKey = "fomoNumUniquePlayers"
92 92  
93 93  let fomoTotalNumStakesKey = "fomoTotalNumStakes"
94 94  
95 95  let fomoTotalStakedAmountKey = "fomoTotalStakedAmount"
96 96  
97 97  func fomoUserNumStakesKey (address) = ("fomoUserNumStakes_" + address)
98 98  
99 99  
100 100  func fomoUserStakedAmountKey (address) = ("fomoUserStakedAmount_" + address)
101 101  
102 102  
103 103  func fomoUserNumWinsKey (address) = ("fomoUserNumWins_" + address)
104 104  
105 105  
106 106  func fomoUserWonAmountKey (address) = ("fomoUserWonAmount_" + address)
107 107  
108 108  
109 109  let fomoFavoriteByNumGamesKey = "fomoFavoriteByNumGames"
110 110  
111 111  let fomoFavoriteByAmountKey = "fomoFavoriteByAmount"
112 112  
113 113  func gorcStats (userAddrOpt) = {
114 114      let amountLeftTotal = valueOrElse(getInteger(stakersAmountLeftKey), 0)
115 115      let lastUserTime = valueOrElse(getInteger(lastClaimTimeByUserKey(userAddrOpt)), -1)
116 116      if ((0 > lastUserTime))
117 117          then $Tuple2(0, amountLeftTotal)
118 118          else {
119 119              let issueTime = valueOrErrorMessage(getInteger(issueTimeKey), "GORC is not issued yet")
120 120              let nowLimited = min([height, (issueTime + STAKE_PERIOD)])
121 121              let userShares = valueOrElse(getInteger(stakedAmountByUserKey(userAddrOpt)), 0)
122 122              let totalShares = valueOrElse(getInteger(stakedAmountTotalKey), 0)
123 123              let stakersAmountTotal = valueOrElse(getInteger(stakersAmountTotalKey), STAKERS_AMOUNT)
124 124              let userTemporal = fraction(stakersAmountTotal, (nowLimited - lastUserTime), STAKE_PERIOD)
125 125              let userAmount = if ((totalShares != 0))
126 126                  then fraction(userTemporal, userShares, totalShares)
127 127                  else 0
128 128              $Tuple2(userAmount, (amountLeftTotal - userAmount))
129 129              }
130 130      }
131 131  
132 132  
133 133  func fixedPoint (val,decimals) = {
134 134      let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
135 135      let lowPart = toString((val % tenPow))
136 136      let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
137 137      (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
138 138      }
139 139  
140 140  
141 141  func getNewLeaders (oldLeadersStr,newAddr,newAmount) = {
142 142      let newCandidate = ((newAddr + "_") + toString(newAmount))
143 143      if ((oldLeadersStr == ""))
144 144          then [newCandidate]
145 145          else {
146 146              func sortByAmount (acc,el) =             {
147 147                  let addr_amount = split(el, "_")
148 148                  let addr = addr_amount[0]
149 149                  let amount = parseIntValue(addr_amount[1])
150 150                  if (acc._2)
151 151                      then if ((addr == newAddr))
152 152                          then acc
153 153                          else $Tuple2((acc._1 :+ el), true)
154 154                      else if ((addr == newAddr))
155 155                          then $Tuple2((acc._1 :+ newCandidate), true)
156 156                          else if ((amount > newAmount))
157 157                              then $Tuple2((acc._1 :+ el), false)
158 158                              else $Tuple2(((acc._1 :+ newCandidate) :+ el), true)
159 159                  }
160 160  
161 161              let result = {
162 162                  let $l = split(oldLeadersStr, ":")
163 163                  let $s = size($l)
164 164                  let $acc0 = $Tuple2(nil, false)
165 165                  func $f0_1 ($a,$i) =                 if (($i >= $s))
166 166                      then $a
167 167                      else sortByAmount($a, $l[$i])
168 168  
169 169                  func $f0_2 ($a,$i) =                 if (($i >= $s))
170 170                      then $a
171 171                      else throw("List size exceeds 3")
172 172  
173 173                  $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
174 174                  }
175 175              let arr = result._1
176 176              if (result._2)
177 177                  then if ((size(arr) > 3))
178 178                      then [arr[0], arr[1], arr[2]]
179 179                      else arr
180 180                  else if ((size(arr) >= 3))
181 181                      then arr
182 182                      else (arr :+ newCandidate)
183 183              }
184 184      }
185 185  
186 186  
187 187  func fomoInternal (i) = if ((size(i.payments) != 1))
188 188      then throw("exactly 1 payment must be attached")
189 189      else {
190 190          let pmt = i.payments[0]
191 191          let amt = pmt.amount
192 192          if (if (!(isDefined(pmt.assetId)))
193 193              then true
194 194              else (value(pmt.assetId) != gorcAssetId))
195 195              then throw("GORC payments only!")
196 196              else {
197 197                  let change = (amt - BLESS_PRICE)
198 198                  if ((0 > change))
199 199                      then throw(((("You need to sacrifice " + fixedPoint(BLESS_PRICE, 8)) + " GORC, but I see only ") + fixedPoint(amt, 8)))
200 200                      else {
201 201                          let changeActions = if ((change > 0))
202 202                              then [ScriptTransfer(i.caller, change, gorcAssetId)]
203 203                              else nil
204 204                          let lastFomoTime = valueOrElse(getInteger(lastFomoTimeKey), 0)
205 205                          let lastFomoPlayer = valueOrElse(getString(lastFomoPlayerKey), "")
206 206                          let lastFomoNumWinsKey = fomoUserNumWinsKey(lastFomoPlayer)
207 207                          let lastFomoWonAmountKey = fomoUserWonAmountKey(lastFomoPlayer)
208 208                          let lastFomoNumWins = valueOrElse(getInteger(lastFomoNumWinsKey), 0)
209 209                          let lastFomoWonAmount = valueOrElse(getInteger(lastFomoWonAmountKey), 0)
210 210                          let deltaCurrJackpot = fraction(BLESS_PRICE, CURRENT_JACKPOT_PERC, 100)
211 211                          let deltaNextJackpot = fraction(BLESS_PRICE, NEXT_JACKPOT_PERC, 100)
212 212                          let deltaTeamAmount = fraction(BLESS_PRICE, TEAM_PERC, 100)
213 213                          let deltaStakersAmount = (((BLESS_PRICE - deltaCurrJackpot) - deltaNextJackpot) - deltaTeamAmount)
214 214                          let fomoEpoch = valueOrElse(getInteger(fomoEpochKey), 0)
215 215                          let currFomoPeriod = valueOrElse(getInteger(currFomoPeriodKey), DEFAULT_FOMO_PERIOD)
216 216                          let nextFomoPeriod = max([MIN_FOMO_PERIOD, (currFomoPeriod - 1)])
217 217                          let fomoCurrJackpot = valueOrElse(getInteger(currFomoJackpotKey), 0)
218 218                          let fomoNextJackpot = valueOrElse(getInteger(nextFomoJackpotKey), 0)
219 219                          let oldLeadersByNum = valueOrElse(getString(fomoFavoriteByNumGamesKey), "")
220 220                          let oldLeadersByAmount = valueOrElse(getString(fomoFavoriteByAmountKey), "")
221 221                          let fomoActions = if (if (if ((height > (lastFomoTime + currFomoPeriod)))
222 222                              then (fomoCurrJackpot > 0)
223 223                              else false)
224 224                              then (lastFomoPlayer != "")
225 225                              else false)
226 226                              then [ScriptTransfer(addressFromStringValue(lastFomoPlayer), fomoCurrJackpot, gorcAssetId), StringEntry(lastFomoWinnerKey, lastFomoPlayer), IntegerEntry(lastFomoWinnerAmountKey, fomoCurrJackpot), IntegerEntry(lastFomoWinnerTimeKey, lastBlock.timestamp), IntegerEntry(currFomoJackpotKey, (fomoNextJackpot + deltaCurrJackpot)), IntegerEntry(nextFomoJackpotKey, deltaNextJackpot), IntegerEntry(fomoEpochKey, (fomoEpoch + 1)), IntegerEntry(currFomoPeriodKey, DEFAULT_FOMO_PERIOD), StringEntry(fomoFavoriteByNumGamesKey, makeString(getNewLeaders(oldLeadersByNum, lastFomoPlayer, (lastFomoNumWins + 1)), ":")), StringEntry(fomoFavoriteByAmountKey, makeString(getNewLeaders(oldLeadersByAmount, lastFomoPlayer, (lastFomoWonAmount + fomoCurrJackpot)), ":")), IntegerEntry(lastFomoNumWinsKey, (lastFomoNumWins + 1)), IntegerEntry(lastFomoWonAmountKey, (lastFomoWonAmount + fomoCurrJackpot))]
227 227                              else [IntegerEntry(currFomoJackpotKey, (fomoCurrJackpot + deltaCurrJackpot)), IntegerEntry(nextFomoJackpotKey, (fomoNextJackpot + deltaNextJackpot)), IntegerEntry(currFomoPeriodKey, nextFomoPeriod)]
228 228                          let addr = toString(i.caller)
229 229                          let fomoNumUniquePlayers = valueOrElse(getInteger(fomoNumUniquePlayersKey), 0)
230 230                          let userNumStakesKey = fomoUserNumStakesKey(addr)
231 231                          let userStakedAmountKey = fomoUserStakedAmountKey(addr)
232 232                          let userNumStakes = getInteger(userNumStakesKey)
233 233                          let statsActions = ((if (isDefined(userNumStakes))
234 234                              then [IntegerEntry(userNumStakesKey, (value(userNumStakes) + 1)), IntegerEntry(userStakedAmountKey, (valueOrElse(getInteger(userStakedAmountKey), 0) + BLESS_PRICE))]
235 235                              else [IntegerEntry(fomoNumUniquePlayersKey, (fomoNumUniquePlayers + 1)), IntegerEntry(userNumStakesKey, 1), IntegerEntry(userStakedAmountKey, BLESS_PRICE)]) ++ [IntegerEntry(fomoTotalNumStakesKey, (valueOrElse(getInteger(fomoTotalNumStakesKey), 0) + 1)), IntegerEntry(fomoTotalStakedAmountKey, (valueOrElse(getInteger(fomoTotalStakedAmountKey), 0) + BLESS_PRICE))])
236 -                         (([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions)
236 +                         ((([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions) ++ statsActions)
237 237                          }
238 238                  }
239 239          }
240 240  
241 241  
242 242  func getRandomNumber (maxValue,salt,entropy) = if ((0 >= maxValue))
243 243      then throw("maxValue should be > 0")
244 244      else {
245 245          let randomHash = sha256_16Kb((salt + entropy))
246 246          (toInt(randomHash) % maxValue)
247 247          }
248 248  
249 249  
250 250  func walletInternal (userAddressOpt) = {
251 251      let addr = addressFromString(userAddressOpt)
252 252      let balance = if (isDefined(addr))
253 253          then wavesBalance(value(addr))
254 254          else BalanceDetails(0, 0, 0, 0)
255 255      let gorcBalance = if (isDefined(addr))
256 256          then assetBalance(value(addr), gorcAssetId)
257 257          else 0
258 258      let stakedGorc = valueOrElse(getInteger(stakedAmountByUserKey(userAddressOpt)), 0)
259 259  [("%s%d__wavesBalance__" + toString(balance.available)), ("%s%d__gorcBalance__" + toString(gorcBalance)), ("%s%d__stakedGorc__" + toString(stakedGorc))]
260 260      }
261 261  
262 262  
263 263  @Callable(i)
264 264  func testArgs (intVal,strVal,boolVal,binVal,arrInt,arrStr,arrBool,arrBin) = nil
265 265  
266 266  
267 267  
268 268  @Callable(i)
269 269  func constructorV1 (teamWalletAddr,brokerAddr) = if ((i.caller != this))
270 270      then throw("Permission denied")
271 271      else {
272 272          let issuedAmount = M16
273 273          let issue = Issue("GORC", "Meme coin by God of Random Chance. Visit https://gorc.meme, sacrifice to the God of Random and you will receive an answer to any question or a blessing. Lucky one gets a Gift of God", issuedAmount, 8, false, unit, 0)
274 274          let assetId = calculateAssetId(issue)
275 275  [issue, BinaryEntry(gorcAssetIdKey, assetId), IntegerEntry(issueTimeKey, height), IntegerEntry(stakersAmountLeftKey, STAKERS_AMOUNT), IntegerEntry(stakersAmountTotalKey, STAKERS_AMOUNT), StringEntry(teamWalletAddrKey, teamWalletAddr), StringEntry(brokerAddrKey, brokerAddr), ScriptTransfer(addressFromStringValue(teamWalletAddr), TEAM_AMOUNT, assetId), ScriptTransfer(addressFromStringValue(brokerAddr), MARKET_AMOUNT, assetId), IntegerEntry(fomoEpochKey, 0), IntegerEntry(currFomoPeriodKey, DEFAULT_FOMO_PERIOD)]
276 276          }
277 277  
278 278  
279 279  
280 280  @Callable(i)
281 281  func stakeGorc () = if ((size(i.payments) != 1))
282 282      then throw("exactly 1 payment must be attached")
283 283      else {
284 284          let pmt = i.payments[0]
285 285          let amt = pmt.amount
286 286          if (if (!(isDefined(pmt.assetId)))
287 287              then true
288 288              else (value(pmt.assetId) != gorcAssetId))
289 289              then throw("GORC payments only!")
290 290              else {
291 291                  let addr = toString(i.caller)
292 -                 let $t01215212203 = gorcStats(addr)
293 -                 let userAmount = $t01215212203._1
294 -                 let amountLeftTotal = $t01215212203._2
292 +                 let $t01216812219 = gorcStats(addr)
293 +                 let userAmount = $t01216812219._1
294 +                 let amountLeftTotal = $t01216812219._2
295 295                  let userAmountKey = stakedAmountByUserKey(addr)
296 296                  let claimActions = if ((userAmount > 0))
297 297                      then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
298 298                      else nil
299 299                  $Tuple2((claimActions ++ [IntegerEntry(stakedAmountTotalKey, (valueOrElse(getInteger(stakedAmountTotalKey), 0) + amt)), IntegerEntry(userAmountKey, (valueOrElse(getInteger(userAmountKey), 0) + amt)), IntegerEntry(lastClaimTimeByUserKey(addr), height), IntegerEntry(stakersAmountLeftKey, amountLeftTotal)]), userAmount)
300 300                  }
301 301          }
302 302  
303 303  
304 304  
305 305  @Callable(i)
306 306  func unstakeGorc (amount) = if ((0 >= amount))
307 307      then throw("Amount should be positive")
308 308      else {
309 309          let addr = toString(i.caller)
310 310          if ((size(i.payments) != 0))
311 311              then throw("No payments required")
312 312              else {
313 313                  let userAmountKey = stakedAmountByUserKey(addr)
314 314                  let oldAmount = valueOrElse(getInteger(userAmountKey), 0)
315 315                  if ((0 > (oldAmount - amount)))
316 316                      then throw(((("You have only " + fixedPoint(oldAmount, 8)) + " GORC staked, tried to unstake ") + fixedPoint(amount, 8)))
317 317                      else {
318 -                         let $t01316413215 = gorcStats(addr)
319 -                         let userAmount = $t01316413215._1
320 -                         let amountLeftTotal = $t01316413215._2
318 +                         let $t01318013231 = gorcStats(addr)
319 +                         let userAmount = $t01318013231._1
320 +                         let amountLeftTotal = $t01318013231._2
321 321                          let claimActions = if ((userAmount > 0))
322 322                              then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
323 323                              else nil
324 324                          $Tuple2((claimActions ++ [IntegerEntry(stakedAmountTotalKey, (valueOrErrorMessage(getInteger(stakedAmountTotalKey), "No GORC staked") - amount)), IntegerEntry(userAmountKey, (oldAmount - amount)), IntegerEntry(lastClaimTimeByUserKey(addr), height), IntegerEntry(stakersAmountLeftKey, amountLeftTotal)]), 0)
325 325                          }
326 326                  }
327 327          }
328 328  
329 329  
330 330  
331 331  @Callable(i)
332 332  func claimGorc () = if ((size(i.payments) != 0))
333 333      then throw("No payments required")
334 334      else {
335 335          let addr = toString(i.caller)
336 -         let $t01377913830 = gorcStats(addr)
337 -         let userAmount = $t01377913830._1
338 -         let amountLeftTotal = $t01377913830._2
336 +         let $t01379513846 = gorcStats(addr)
337 +         let userAmount = $t01379513846._1
338 +         let amountLeftTotal = $t01379513846._2
339 339          let claimActions = if ((userAmount > 0))
340 340              then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
341 341              else nil
342 342          $Tuple2((claimActions ++ [IntegerEntry(lastClaimTimeByUserKey(addr), height), IntegerEntry(stakersAmountLeftKey, amountLeftTotal)]), userAmount)
343 343          }
344 344  
345 345  
346 346  
347 347  @Callable(i)
348 348  func answerMe () = $Tuple2(fomoInternal(i), toInt(i.transactionId))
349 349  
350 350  
351 351  
352 352  @Callable(i)
353 353  func blessMe () = $Tuple2(fomoInternal(i), 42)
354 354  
355 355  
356 356  
357 357  @Callable(i)
358 358  func commitGuess (guess) = {
359 359      let addr = toString(i.caller)
360 360      let finishKey = keyCommit(addr)
361 361      let guessKey = keyGuess(addr)
362 362      if (isDefined(getInteger(finishKey)))
363 363          then throw("You already made a bet, please use it")
364 364          else if (if ((0 > guess))
365 365              then true
366 366              else (guess > 11))
367 367              then throw("The number should be between 0 and 11")
368 368              else if ((size(i.payments) != 1))
369 369                  then throw("exactly 1 payment must be attached")
370 370                  else {
371 371                      let pmt = i.payments[0]
372 372                      let amt = pmt.amount
373 373                      if (if (!(isDefined(pmt.assetId)))
374 374                          then true
375 375                          else (value(pmt.assetId) != gorcAssetId))
376 376                          then throw("GORC payments only!")
377 377                          else {
378 378                              let change = (amt - LOTTERY_PRICE)
379 379                              if ((0 > change))
380 380                                  then throw(((("You need to sacrifice " + fixedPoint(LOTTERY_PRICE, 8)) + " GORC, but I see only ") + fixedPoint(amt, 8)))
381 381                                  else {
382 382                                      let changeActions = if ((change > 0))
383 383                                          then [ScriptTransfer(i.caller, change, gorcAssetId)]
384 384                                          else nil
385 385                                      let finishBlock = (height + RANDOM_DELAY)
386 386                                      let deltaCurrJackpot = fraction(LOTTERY_PRICE, CURRENT_JACKPOT_PERC, 100)
387 387                                      let deltaNextJackpot = fraction(LOTTERY_PRICE, NEXT_JACKPOT_PERC, 100)
388 388                                      let deltaTeamAmount = fraction(LOTTERY_PRICE, TEAM_PERC, 100)
389 389                                      let deltaStakersAmount = (((LOTTERY_PRICE - deltaCurrJackpot) - deltaNextJackpot) - deltaTeamAmount)
390 390                                      $Tuple2(([IntegerEntry(finishKey, finishBlock), IntegerEntry(guessKey, guess), IntegerEntry(currLotteryJackpotKey, (valueOrElse(getInteger(currLotteryJackpotKey), 0) + deltaCurrJackpot)), IntegerEntry(nextLotteryJackpotKey, (valueOrElse(getInteger(nextLotteryJackpotKey), 0) + deltaNextJackpot)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount)), StringEntry(keySalt(addr), toBase58String(i.transactionId))] ++ changeActions), finishBlock)
391 391                                      }
392 392                              }
393 393                      }
394 394      }
395 395  
396 396  
397 397  
398 398  @Callable(i)
399 399  func guessLottery () = {
400 400      let addr = toString(i.caller)
401 401      let finishKey = keyCommit(addr)
402 402      let guessKey = keyGuess(addr)
403 403      let guess = valueOrErrorMessage(getInteger(guessKey), "You have not made a bet")
404 404      let finishBlock = valueOrErrorMessage(getInteger(finishKey), "You have not made a bet")
405 405      if ((finishBlock > height))
406 406          then throw(("Random number is not ready yet, wait until height = " + toString(finishBlock)))
407 407          else {
408 408              let entropy = value(value(blockInfoByHeight(finishBlock)).vrf)
409 409              let saltKey = keySalt(addr)
410 410              let salt = fromBase58String(valueOrElse(getString(saltKey), "DEFAULT"))
411 411              let rand = getRandomNumber(12, salt, entropy)
412 412              let currJackpot = valueOrElse(getInteger(currLotteryJackpotKey), 0)
413 413              let winActions = if ((rand == guess))
414 414                  then [ScriptTransfer(i.caller, currJackpot, gorcAssetId), StringEntry(lastLotteryWinnerKey, addr), IntegerEntry(lastLotteryWinnerAmountKey, currJackpot), IntegerEntry(lastLotteryWinnerTimeKey, lastBlock.timestamp), IntegerEntry(currLotteryJackpotKey, valueOrElse(getInteger(nextLotteryJackpotKey), 0)), IntegerEntry(nextLotteryJackpotKey, 0)]
415 415                  else nil
416 416              $Tuple2(([DeleteEntry(finishKey), DeleteEntry(guessKey), DeleteEntry(saltKey)] ++ winActions), rand)
417 417              }
418 418      }
419 419  
420 420  
421 421  
422 422  @Callable(i)
423 423  func statsREADONLY (userAddrOpt) = {
424 -     let $t01817918237 = gorcStats(userAddrOpt)
425 -     let userAmount = $t01817918237._1
426 -     let amountLeftTotal = $t01817918237._2
424 +     let $t01819518253 = gorcStats(userAddrOpt)
425 +     let userAmount = $t01819518253._1
426 +     let amountLeftTotal = $t01819518253._2
427 427      let currFomoJackpot = valueOrElse(getInteger(currFomoJackpotKey), 0)
428 428      let nextFomoJackpot = valueOrElse(getInteger(nextFomoJackpotKey), 0)
429 429      let lastFomoTime = valueOrElse(getInteger(lastFomoTimeKey), 0)
430 430      let lastFomoPlayer = valueOrElse(getString(lastFomoPlayerKey), "")
431 431      let fomoEpoch = valueOrElse(getInteger(fomoEpochKey), 0)
432 432      let currFomoPeriod = valueOrElse(getInteger(currFomoPeriodKey), DEFAULT_FOMO_PERIOD)
433 433      let currLotteryJackpot = valueOrElse(getInteger(currLotteryJackpotKey), 0)
434 434      let nextLotteryJackpot = valueOrElse(getInteger(nextLotteryJackpotKey), 0)
435 435      let finishKey = keyCommit(userAddrOpt)
436 436      let guessKey = keyGuess(userAddrOpt)
437 437      let guess = valueOrElse(getInteger(guessKey), -1)
438 438      let finishBlock = valueOrElse(getInteger(finishKey), -1)
439 439      let lastFomoWinner = valueOrElse(getString(lastFomoWinnerKey), "")
440 440      let lastFomoWinnerAmount = valueOrElse(getInteger(lastFomoWinnerAmountKey), 0)
441 441      let lastFomoWinnerTime = valueOrElse(getInteger(lastFomoWinnerTimeKey), 0)
442 442      let lastLotteryWinner = valueOrElse(getString(lastLotteryWinnerKey), "")
443 443      let lastLotteryWinnerAmount = valueOrElse(getInteger(lastLotteryWinnerAmountKey), 0)
444 444      let lastLotteryWinnerTime = valueOrElse(getInteger(lastLotteryWinnerTimeKey), 0)
445 445      let gorcStakedTotal = valueOrElse(getInteger(stakedAmountTotalKey), 0)
446 446      let fomoNumUniquePlayers = valueOrElse(getInteger(fomoNumUniquePlayersKey), 0)
447 447      let fomoTotalNumStakes = valueOrElse(getInteger(fomoTotalNumStakesKey), 0)
448 448      let fomoTotalStakedAmount = valueOrElse(getInteger(fomoTotalStakedAmountKey), 0)
449 449      let fomoUserNumStakes = valueOrElse(getInteger(fomoUserNumStakesKey(userAddrOpt)), 0)
450 450      let fomoUserStakedAmount = valueOrElse(getInteger(fomoUserStakedAmountKey(userAddrOpt)), 0)
451 451      let fomoUserNumWins = valueOrElse(getInteger(fomoUserNumWinsKey(userAddrOpt)), 0)
452 452      let fomoUserWonAmount = valueOrElse(getInteger(fomoUserWonAmountKey(userAddrOpt)), 0)
453 453      let fomoFavoriteByNumGames = valueOrElse(getString(fomoFavoriteByNumGamesKey), "")
454 454      let fomoFavoriteByAmount = valueOrElse(getString(fomoFavoriteByAmountKey), "")
455 455      $Tuple2(nil, [("%s%d__gorcAvailToClaim__" + toString(userAmount)), ("%s%d__fomoEpoch__" + toString(fomoEpoch)), ("%s%d__currFomoPeriod__" + toString(currFomoPeriod)), ("%s%d__currFomoJackpotAmount__" + toString(currFomoJackpot)), ("%s%d__nextFomoJackpotAmount__" + toString(nextFomoJackpot)), ("%s%d__currLotteryJackpotAmount__" + toString(currLotteryJackpot)), ("%s%d__nextLotteryJackpotAmount__" + toString(nextLotteryJackpot)), ("%s%d__lastFomoTime__" + toString(lastFomoTime)), ("%s%s__lastFomoPlayer__" + lastFomoPlayer), ("%s%d__amountLeftTotal__" + toString(amountLeftTotal)), ("%s%d__finishBlock__" + toString(finishBlock)), ("%s%d__guess__" + toString(guess)), ("%s%s__lastFomoWinner__" + lastFomoWinner), ("%s%d__lastFomoWinnerAmount__" + toString(lastFomoWinnerAmount)), ("%s%d__lastFomoWinnerTime__" + toString(lastFomoWinnerTime)), ("%s%s__lastLotteryWinner__" + lastLotteryWinner), ("%s%d__lastLotteryWinnerAmount__" + toString(lastLotteryWinnerAmount)), ("%s%d__lastLotteryWinnerTime__" + toString(lastLotteryWinnerTime)), ("%s%d__gorcIssued__" + toString(M16)), ("%s%d__gorcStakedTotal__" + toString(gorcStakedTotal)), ("%s%d__fomoNumUniquePlayers__" + toString(fomoNumUniquePlayers)), ("%s%d__fomoTotalNumStakes__" + toString(fomoTotalNumStakes)), ("%s%d__fomoTotalStakedAmount__" + toString(fomoTotalStakedAmount)), ("%s%d__fomoUserNumStakes__" + toString(fomoUserNumStakes)), ("%s%d__fomoUserStakedAmount__" + toString(fomoUserStakedAmount)), ("%s%d__fomoUserNumWins__" + toString(fomoUserNumWins)), ("%s%d__fomoUserWonAmount__" + toString(fomoUserWonAmount)), ("%s%s__fomoFavoriteByNumGames__" + fomoFavoriteByNumGames), ("%s%s__fomoFavoriteByAmount__" + fomoFavoriteByAmount)])
456 456      }
457 457  
458 458  
459 459  
460 460  @Callable(i)
461 461  func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
462 462  
463 463

Old	New		Differences
233	233		let statsActions = ((if (isDefined(userNumStakes))
234	234		then [IntegerEntry(userNumStakesKey, (value(userNumStakes) + 1)), IntegerEntry(userStakedAmountKey, (valueOrElse(getInteger(userStakedAmountKey), 0) + BLESS_PRICE))]
235	235		else [IntegerEntry(fomoNumUniquePlayersKey, (fomoNumUniquePlayers + 1)), IntegerEntry(userNumStakesKey, 1), IntegerEntry(userStakedAmountKey, BLESS_PRICE)]) ++ [IntegerEntry(fomoTotalNumStakesKey, (valueOrElse(getInteger(fomoTotalNumStakesKey), 0) + 1)), IntegerEntry(fomoTotalStakedAmountKey, (valueOrElse(getInteger(fomoTotalStakedAmountKey), 0) + BLESS_PRICE))])
236		-	(([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions)
	236	+	((([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions) ++ statsActions)
237	237		}
238	238		}
239	239		}

289	289		then throw("GORC payments only!")
290	290		else {
291	291		let addr = toString(i.caller)
292		-	let $~~t01215212203~~ = gorcStats(addr)
293		-	let userAmount = $~~t01215212203~~._1
294		-	let amountLeftTotal = $~~t01215212203~~._2
	292	+	let $t01216812219 = gorcStats(addr)
	293	+	let userAmount = $t01216812219._1
	294	+	let amountLeftTotal = $t01216812219._2
295	295		let userAmountKey = stakedAmountByUserKey(addr)
296	296		let claimActions = if ((userAmount > 0))
297	297		then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]

315	315		if ((0 > (oldAmount - amount)))
316	316		then throw(((("You have only " + fixedPoint(oldAmount, 8)) + " GORC staked, tried to unstake ") + fixedPoint(amount, 8)))
317	317		else {
318		-	let $~~t01316413215~~ = gorcStats(addr)
319		-	let userAmount = $~~t01316413215~~._1
320		-	let amountLeftTotal = $~~t01316413215~~._2
	318	+	let $t01318013231 = gorcStats(addr)
	319	+	let userAmount = $t01318013231._1
	320	+	let amountLeftTotal = $t01318013231._2
321	321		let claimActions = if ((userAmount > 0))
322	322		then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
323	323		else nil

333	333		then throw("No payments required")
334	334		else {
335	335		let addr = toString(i.caller)
336		-	let $~~t01377913830~~ = gorcStats(addr)
337		-	let userAmount = $~~t01377913830~~._1
338		-	let amountLeftTotal = $~~t01377913830~~._2
	336	+	let $t01379513846 = gorcStats(addr)
	337	+	let userAmount = $t01379513846._1
	338	+	let amountLeftTotal = $t01379513846._2
339	339		let claimActions = if ((userAmount > 0))
340	340		then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
341	341		else nil

421	421
422	422		@Callable(i)
423	423		func statsREADONLY (userAddrOpt) = {
424		-	let $~~t01817918237~~ = gorcStats(userAddrOpt)
425		-	let userAmount = $~~t01817918237~~._1
426		-	let amountLeftTotal = $~~t01817918237~~._2
	424	+	let $t01819518253 = gorcStats(userAddrOpt)
	425	+	let userAmount = $t01819518253._1
	426	+	let amountLeftTotal = $t01819518253._2
427	427		let currFomoJackpot = valueOrElse(getInteger(currFomoJackpotKey), 0)
428	428		let nextFomoJackpot = valueOrElse(getInteger(nextFomoJackpotKey), 0)
429	429		let lastFomoTime = valueOrElse(getInteger(lastFomoTimeKey), 0)

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let M16 = 10000000000000000
5	5
6	6		let STAKERS_AMOUNT = 3000000000000000
7	7
8	8		let TEAM_AMOUNT = 1000000000000000
9	9
10	10		let MARKET_AMOUNT = 6000000000000000
11	11
12	12		let YEAR_BLOCKS = (365 * 1440)
13	13
14	14		let STAKE_PERIOD = (5 * YEAR_BLOCKS)
15	15
16	16		let BLESS_PRICE = 100000000000
17	17
18	18		let LOTTERY_PRICE = 100000000000
19	19
20	20		let DEFAULT_FOMO_PERIOD = 60
21	21
22	22		let MIN_FOMO_PERIOD = 2
23	23
24	24		let RANDOM_DELAY = 2
25	25
26	26		let CURRENT_JACKPOT_PERC = 50
27	27
28	28		let NEXT_JACKPOT_PERC = 20
29	29
30	30		let TEAM_PERC = 10
31	31
32	32		let gorcAssetIdKey = "gorcAssetId"
33	33
34	34		let gorcAssetId = valueOrErrorMessage(getBinary(gorcAssetIdKey), "GORC is not issued yet")
35	35
36	36		let issueTimeKey = "issueTime"
37	37
38	38		let stakersAmountTotalKey = "stakersAmountTotal"
39	39
40	40		let stakersAmountLeftKey = "stakersAmountLeft"
41	41
42	42		let stakedAmountTotalKey = "stakedTotal"
43	43
44	44		func stakedAmountByUserKey (addr) = ("stakedAmount_" + addr)
45	45
46	46
47	47		func lastClaimTimeByUserKey (addr) = ("lastClaimTime_" + addr)
48	48
49	49
50	50		let fomoEpochKey = "fomoEpoch"
51	51
52	52		let currFomoPeriodKey = "currFomoPeriod"
53	53
54	54		let lastFomoTimeKey = "lastFomoTime"
55	55
56	56		let currFomoJackpotKey = "currFomoJackpot"
57	57
58	58		let nextFomoJackpotKey = "nextFomoJackpot"
59	59
60	60		let lastFomoPlayerKey = "lastFomoPlayer"
61	61
62	62		let lastFomoWinnerKey = "lastFomoWinner"
63	63
64	64		let lastFomoWinnerAmountKey = "lastFomoWinnerAmount"
65	65
66	66		let lastFomoWinnerTimeKey = "lastFomoWinnerTime"
67	67
68	68		let teamWalletAddrKey = "teamWalletAddr"
69	69
70	70		let brokerAddrKey = "brokerAddr"
71	71
72	72		func keyCommit (address) = ("finishBlockFor_" + address)
73	73
74	74
75	75		func keyGuess (address) = ("guessFor_" + address)
76	76
77	77
78	78		func keySalt (address) = ("saltFor_" + address)
79	79
80	80
81	81		let currLotteryJackpotKey = "currLotteryJackpot"
82	82
83	83		let nextLotteryJackpotKey = "nextLotteryJackpot"
84	84
85	85		let lastLotteryWinnerKey = "lastLotteryWinner"
86	86
87	87		let lastLotteryWinnerAmountKey = "lastLotteryWinnerAmount"
88	88
89	89		let lastLotteryWinnerTimeKey = "lastLotteryWinnerTime"
90	90
91	91		let fomoNumUniquePlayersKey = "fomoNumUniquePlayers"
92	92
93	93		let fomoTotalNumStakesKey = "fomoTotalNumStakes"
94	94
95	95		let fomoTotalStakedAmountKey = "fomoTotalStakedAmount"
96	96
97	97		func fomoUserNumStakesKey (address) = ("fomoUserNumStakes_" + address)
98	98
99	99
100	100		func fomoUserStakedAmountKey (address) = ("fomoUserStakedAmount_" + address)
101	101
102	102
103	103		func fomoUserNumWinsKey (address) = ("fomoUserNumWins_" + address)
104	104
105	105
106	106		func fomoUserWonAmountKey (address) = ("fomoUserWonAmount_" + address)
107	107
108	108
109	109		let fomoFavoriteByNumGamesKey = "fomoFavoriteByNumGames"
110	110
111	111		let fomoFavoriteByAmountKey = "fomoFavoriteByAmount"
112	112
113	113		func gorcStats (userAddrOpt) = {
114	114		let amountLeftTotal = valueOrElse(getInteger(stakersAmountLeftKey), 0)
115	115		let lastUserTime = valueOrElse(getInteger(lastClaimTimeByUserKey(userAddrOpt)), -1)
116	116		if ((0 > lastUserTime))
117	117		then $Tuple2(0, amountLeftTotal)
118	118		else {
119	119		let issueTime = valueOrErrorMessage(getInteger(issueTimeKey), "GORC is not issued yet")
120	120		let nowLimited = min([height, (issueTime + STAKE_PERIOD)])
121	121		let userShares = valueOrElse(getInteger(stakedAmountByUserKey(userAddrOpt)), 0)
122	122		let totalShares = valueOrElse(getInteger(stakedAmountTotalKey), 0)
123	123		let stakersAmountTotal = valueOrElse(getInteger(stakersAmountTotalKey), STAKERS_AMOUNT)
124	124		let userTemporal = fraction(stakersAmountTotal, (nowLimited - lastUserTime), STAKE_PERIOD)
125	125		let userAmount = if ((totalShares != 0))
126	126		then fraction(userTemporal, userShares, totalShares)
127	127		else 0
128	128		$Tuple2(userAmount, (amountLeftTotal - userAmount))
129	129		}
130	130		}
131	131
132	132
133	133		func fixedPoint (val,decimals) = {
134	134		let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
135	135		let lowPart = toString((val % tenPow))
136	136		let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
137	137		(((toString((val / tenPow)) + ".") + zeroes) + lowPart)
138	138		}
139	139
140	140
141	141		func getNewLeaders (oldLeadersStr,newAddr,newAmount) = {
142	142		let newCandidate = ((newAddr + "_") + toString(newAmount))
143	143		if ((oldLeadersStr == ""))
144	144		then [newCandidate]
145	145		else {
146	146		func sortByAmount (acc,el) = {
147	147		let addr_amount = split(el, "_")
148	148		let addr = addr_amount[0]
149	149		let amount = parseIntValue(addr_amount[1])
150	150		if (acc._2)
151	151		then if ((addr == newAddr))
152	152		then acc
153	153		else $Tuple2((acc._1 :+ el), true)
154	154		else if ((addr == newAddr))
155	155		then $Tuple2((acc._1 :+ newCandidate), true)
156	156		else if ((amount > newAmount))
157	157		then $Tuple2((acc._1 :+ el), false)
158	158		else $Tuple2(((acc._1 :+ newCandidate) :+ el), true)
159	159		}
160	160
161	161		let result = {
162	162		let $l = split(oldLeadersStr, ":")
163	163		let $s = size($l)
164	164		let $acc0 = $Tuple2(nil, false)
165	165		func $f0_1 ($a,$i) = if (($i >= $s))
166	166		then $a
167	167		else sortByAmount($a, $l[$i])
168	168
169	169		func $f0_2 ($a,$i) = if (($i >= $s))
170	170		then $a
171	171		else throw("List size exceeds 3")
172	172
173	173		$f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
174	174		}
175	175		let arr = result._1
176	176		if (result._2)
177	177		then if ((size(arr) > 3))
178	178		then [arr[0], arr[1], arr[2]]
179	179		else arr
180	180		else if ((size(arr) >= 3))
181	181		then arr
182	182		else (arr :+ newCandidate)
183	183		}
184	184		}
185	185
186	186
187	187		func fomoInternal (i) = if ((size(i.payments) != 1))
188	188		then throw("exactly 1 payment must be attached")
189	189		else {
190	190		let pmt = i.payments[0]
191	191		let amt = pmt.amount
192	192		if (if (!(isDefined(pmt.assetId)))
193	193		then true
194	194		else (value(pmt.assetId) != gorcAssetId))
195	195		then throw("GORC payments only!")
196	196		else {
197	197		let change = (amt - BLESS_PRICE)
198	198		if ((0 > change))
199	199		then throw(((("You need to sacrifice " + fixedPoint(BLESS_PRICE, 8)) + " GORC, but I see only ") + fixedPoint(amt, 8)))
200	200		else {
201	201		let changeActions = if ((change > 0))
202	202		then [ScriptTransfer(i.caller, change, gorcAssetId)]
203	203		else nil
204	204		let lastFomoTime = valueOrElse(getInteger(lastFomoTimeKey), 0)
205	205		let lastFomoPlayer = valueOrElse(getString(lastFomoPlayerKey), "")
206	206		let lastFomoNumWinsKey = fomoUserNumWinsKey(lastFomoPlayer)
207	207		let lastFomoWonAmountKey = fomoUserWonAmountKey(lastFomoPlayer)
208	208		let lastFomoNumWins = valueOrElse(getInteger(lastFomoNumWinsKey), 0)
209	209		let lastFomoWonAmount = valueOrElse(getInteger(lastFomoWonAmountKey), 0)
210	210		let deltaCurrJackpot = fraction(BLESS_PRICE, CURRENT_JACKPOT_PERC, 100)
211	211		let deltaNextJackpot = fraction(BLESS_PRICE, NEXT_JACKPOT_PERC, 100)
212	212		let deltaTeamAmount = fraction(BLESS_PRICE, TEAM_PERC, 100)
213	213		let deltaStakersAmount = (((BLESS_PRICE - deltaCurrJackpot) - deltaNextJackpot) - deltaTeamAmount)
214	214		let fomoEpoch = valueOrElse(getInteger(fomoEpochKey), 0)
215	215		let currFomoPeriod = valueOrElse(getInteger(currFomoPeriodKey), DEFAULT_FOMO_PERIOD)
216	216		let nextFomoPeriod = max([MIN_FOMO_PERIOD, (currFomoPeriod - 1)])
217	217		let fomoCurrJackpot = valueOrElse(getInteger(currFomoJackpotKey), 0)
218	218		let fomoNextJackpot = valueOrElse(getInteger(nextFomoJackpotKey), 0)
219	219		let oldLeadersByNum = valueOrElse(getString(fomoFavoriteByNumGamesKey), "")
220	220		let oldLeadersByAmount = valueOrElse(getString(fomoFavoriteByAmountKey), "")
221	221		let fomoActions = if (if (if ((height > (lastFomoTime + currFomoPeriod)))
222	222		then (fomoCurrJackpot > 0)
223	223		else false)
224	224		then (lastFomoPlayer != "")
225	225		else false)
226	226		then [ScriptTransfer(addressFromStringValue(lastFomoPlayer), fomoCurrJackpot, gorcAssetId), StringEntry(lastFomoWinnerKey, lastFomoPlayer), IntegerEntry(lastFomoWinnerAmountKey, fomoCurrJackpot), IntegerEntry(lastFomoWinnerTimeKey, lastBlock.timestamp), IntegerEntry(currFomoJackpotKey, (fomoNextJackpot + deltaCurrJackpot)), IntegerEntry(nextFomoJackpotKey, deltaNextJackpot), IntegerEntry(fomoEpochKey, (fomoEpoch + 1)), IntegerEntry(currFomoPeriodKey, DEFAULT_FOMO_PERIOD), StringEntry(fomoFavoriteByNumGamesKey, makeString(getNewLeaders(oldLeadersByNum, lastFomoPlayer, (lastFomoNumWins + 1)), ":")), StringEntry(fomoFavoriteByAmountKey, makeString(getNewLeaders(oldLeadersByAmount, lastFomoPlayer, (lastFomoWonAmount + fomoCurrJackpot)), ":")), IntegerEntry(lastFomoNumWinsKey, (lastFomoNumWins + 1)), IntegerEntry(lastFomoWonAmountKey, (lastFomoWonAmount + fomoCurrJackpot))]
227	227		else [IntegerEntry(currFomoJackpotKey, (fomoCurrJackpot + deltaCurrJackpot)), IntegerEntry(nextFomoJackpotKey, (fomoNextJackpot + deltaNextJackpot)), IntegerEntry(currFomoPeriodKey, nextFomoPeriod)]
228	228		let addr = toString(i.caller)
229	229		let fomoNumUniquePlayers = valueOrElse(getInteger(fomoNumUniquePlayersKey), 0)
230	230		let userNumStakesKey = fomoUserNumStakesKey(addr)
231	231		let userStakedAmountKey = fomoUserStakedAmountKey(addr)
232	232		let userNumStakes = getInteger(userNumStakesKey)
233	233		let statsActions = ((if (isDefined(userNumStakes))
234	234		then [IntegerEntry(userNumStakesKey, (value(userNumStakes) + 1)), IntegerEntry(userStakedAmountKey, (valueOrElse(getInteger(userStakedAmountKey), 0) + BLESS_PRICE))]
235	235		else [IntegerEntry(fomoNumUniquePlayersKey, (fomoNumUniquePlayers + 1)), IntegerEntry(userNumStakesKey, 1), IntegerEntry(userStakedAmountKey, BLESS_PRICE)]) ++ [IntegerEntry(fomoTotalNumStakesKey, (valueOrElse(getInteger(fomoTotalNumStakesKey), 0) + 1)), IntegerEntry(fomoTotalStakedAmountKey, (valueOrElse(getInteger(fomoTotalStakedAmountKey), 0) + BLESS_PRICE))])
236		-	(([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions)
	236	+	((([IntegerEntry(lastFomoTimeKey, height), StringEntry(lastFomoPlayerKey, toString(i.caller)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount))] ++ changeActions) ++ fomoActions) ++ statsActions)
237	237		}
238	238		}
239	239		}
240	240
241	241
242	242		func getRandomNumber (maxValue,salt,entropy) = if ((0 >= maxValue))
243	243		then throw("maxValue should be > 0")
244	244		else {
245	245		let randomHash = sha256_16Kb((salt + entropy))
246	246		(toInt(randomHash) % maxValue)
247	247		}
248	248
249	249
250	250		func walletInternal (userAddressOpt) = {
251	251		let addr = addressFromString(userAddressOpt)
252	252		let balance = if (isDefined(addr))
253	253		then wavesBalance(value(addr))
254	254		else BalanceDetails(0, 0, 0, 0)
255	255		let gorcBalance = if (isDefined(addr))
256	256		then assetBalance(value(addr), gorcAssetId)
257	257		else 0
258	258		let stakedGorc = valueOrElse(getInteger(stakedAmountByUserKey(userAddressOpt)), 0)
259	259		[("%s%d__wavesBalance__" + toString(balance.available)), ("%s%d__gorcBalance__" + toString(gorcBalance)), ("%s%d__stakedGorc__" + toString(stakedGorc))]
260	260		}
261	261
262	262
263	263		@Callable(i)
264	264		func testArgs (intVal,strVal,boolVal,binVal,arrInt,arrStr,arrBool,arrBin) = nil
265	265
266	266
267	267
268	268		@Callable(i)
269	269		func constructorV1 (teamWalletAddr,brokerAddr) = if ((i.caller != this))
270	270		then throw("Permission denied")
271	271		else {
272	272		let issuedAmount = M16
273	273		let issue = Issue("GORC", "Meme coin by God of Random Chance. Visit https://gorc.meme, sacrifice to the God of Random and you will receive an answer to any question or a blessing. Lucky one gets a Gift of God", issuedAmount, 8, false, unit, 0)
274	274		let assetId = calculateAssetId(issue)
275	275		[issue, BinaryEntry(gorcAssetIdKey, assetId), IntegerEntry(issueTimeKey, height), IntegerEntry(stakersAmountLeftKey, STAKERS_AMOUNT), IntegerEntry(stakersAmountTotalKey, STAKERS_AMOUNT), StringEntry(teamWalletAddrKey, teamWalletAddr), StringEntry(brokerAddrKey, brokerAddr), ScriptTransfer(addressFromStringValue(teamWalletAddr), TEAM_AMOUNT, assetId), ScriptTransfer(addressFromStringValue(brokerAddr), MARKET_AMOUNT, assetId), IntegerEntry(fomoEpochKey, 0), IntegerEntry(currFomoPeriodKey, DEFAULT_FOMO_PERIOD)]
276	276		}
277	277
278	278
279	279
280	280		@Callable(i)
281	281		func stakeGorc () = if ((size(i.payments) != 1))
282	282		then throw("exactly 1 payment must be attached")
283	283		else {
284	284		let pmt = i.payments[0]
285	285		let amt = pmt.amount
286	286		if (if (!(isDefined(pmt.assetId)))
287	287		then true
288	288		else (value(pmt.assetId) != gorcAssetId))
289	289		then throw("GORC payments only!")
290	290		else {
291	291		let addr = toString(i.caller)
292		-	let $~~t01215212203~~ = gorcStats(addr)
293		-	let userAmount = $~~t01215212203~~._1
294		-	let amountLeftTotal = $~~t01215212203~~._2
	292	+	let $t01216812219 = gorcStats(addr)
	293	+	let userAmount = $t01216812219._1
	294	+	let amountLeftTotal = $t01216812219._2
295	295		let userAmountKey = stakedAmountByUserKey(addr)
296	296		let claimActions = if ((userAmount > 0))
297	297		then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
298	298		else nil
299	299		$Tuple2((claimActions ++ [IntegerEntry(stakedAmountTotalKey, (valueOrElse(getInteger(stakedAmountTotalKey), 0) + amt)), IntegerEntry(userAmountKey, (valueOrElse(getInteger(userAmountKey), 0) + amt)), IntegerEntry(lastClaimTimeByUserKey(addr), height), IntegerEntry(stakersAmountLeftKey, amountLeftTotal)]), userAmount)
300	300		}
301	301		}
302	302
303	303
304	304
305	305		@Callable(i)
306	306		func unstakeGorc (amount) = if ((0 >= amount))
307	307		then throw("Amount should be positive")
308	308		else {
309	309		let addr = toString(i.caller)
310	310		if ((size(i.payments) != 0))
311	311		then throw("No payments required")
312	312		else {
313	313		let userAmountKey = stakedAmountByUserKey(addr)
314	314		let oldAmount = valueOrElse(getInteger(userAmountKey), 0)
315	315		if ((0 > (oldAmount - amount)))
316	316		then throw(((("You have only " + fixedPoint(oldAmount, 8)) + " GORC staked, tried to unstake ") + fixedPoint(amount, 8)))
317	317		else {
318		-	let $~~t01316413215~~ = gorcStats(addr)
319		-	let userAmount = $~~t01316413215~~._1
320		-	let amountLeftTotal = $~~t01316413215~~._2
	318	+	let $t01318013231 = gorcStats(addr)
	319	+	let userAmount = $t01318013231._1
	320	+	let amountLeftTotal = $t01318013231._2
321	321		let claimActions = if ((userAmount > 0))
322	322		then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
323	323		else nil
324	324		$Tuple2((claimActions ++ [IntegerEntry(stakedAmountTotalKey, (valueOrErrorMessage(getInteger(stakedAmountTotalKey), "No GORC staked") - amount)), IntegerEntry(userAmountKey, (oldAmount - amount)), IntegerEntry(lastClaimTimeByUserKey(addr), height), IntegerEntry(stakersAmountLeftKey, amountLeftTotal)]), 0)
325	325		}
326	326		}
327	327		}
328	328
329	329
330	330
331	331		@Callable(i)
332	332		func claimGorc () = if ((size(i.payments) != 0))
333	333		then throw("No payments required")
334	334		else {
335	335		let addr = toString(i.caller)
336		-	let $~~t01377913830~~ = gorcStats(addr)
337		-	let userAmount = $~~t01377913830~~._1
338		-	let amountLeftTotal = $~~t01377913830~~._2
	336	+	let $t01379513846 = gorcStats(addr)
	337	+	let userAmount = $t01379513846._1
	338	+	let amountLeftTotal = $t01379513846._2
339	339		let claimActions = if ((userAmount > 0))
340	340		then [ScriptTransfer(i.caller, userAmount, gorcAssetId)]
341	341		else nil
342	342		$Tuple2((claimActions ++ [IntegerEntry(lastClaimTimeByUserKey(addr), height), IntegerEntry(stakersAmountLeftKey, amountLeftTotal)]), userAmount)
343	343		}
344	344
345	345
346	346
347	347		@Callable(i)
348	348		func answerMe () = $Tuple2(fomoInternal(i), toInt(i.transactionId))
349	349
350	350
351	351
352	352		@Callable(i)
353	353		func blessMe () = $Tuple2(fomoInternal(i), 42)
354	354
355	355
356	356
357	357		@Callable(i)
358	358		func commitGuess (guess) = {
359	359		let addr = toString(i.caller)
360	360		let finishKey = keyCommit(addr)
361	361		let guessKey = keyGuess(addr)
362	362		if (isDefined(getInteger(finishKey)))
363	363		then throw("You already made a bet, please use it")
364	364		else if (if ((0 > guess))
365	365		then true
366	366		else (guess > 11))
367	367		then throw("The number should be between 0 and 11")
368	368		else if ((size(i.payments) != 1))
369	369		then throw("exactly 1 payment must be attached")
370	370		else {
371	371		let pmt = i.payments[0]
372	372		let amt = pmt.amount
373	373		if (if (!(isDefined(pmt.assetId)))
374	374		then true
375	375		else (value(pmt.assetId) != gorcAssetId))
376	376		then throw("GORC payments only!")
377	377		else {
378	378		let change = (amt - LOTTERY_PRICE)
379	379		if ((0 > change))
380	380		then throw(((("You need to sacrifice " + fixedPoint(LOTTERY_PRICE, 8)) + " GORC, but I see only ") + fixedPoint(amt, 8)))
381	381		else {
382	382		let changeActions = if ((change > 0))
383	383		then [ScriptTransfer(i.caller, change, gorcAssetId)]
384	384		else nil
385	385		let finishBlock = (height + RANDOM_DELAY)
386	386		let deltaCurrJackpot = fraction(LOTTERY_PRICE, CURRENT_JACKPOT_PERC, 100)
387	387		let deltaNextJackpot = fraction(LOTTERY_PRICE, NEXT_JACKPOT_PERC, 100)
388	388		let deltaTeamAmount = fraction(LOTTERY_PRICE, TEAM_PERC, 100)
389	389		let deltaStakersAmount = (((LOTTERY_PRICE - deltaCurrJackpot) - deltaNextJackpot) - deltaTeamAmount)
390	390		$Tuple2(([IntegerEntry(finishKey, finishBlock), IntegerEntry(guessKey, guess), IntegerEntry(currLotteryJackpotKey, (valueOrElse(getInteger(currLotteryJackpotKey), 0) + deltaCurrJackpot)), IntegerEntry(nextLotteryJackpotKey, (valueOrElse(getInteger(nextLotteryJackpotKey), 0) + deltaNextJackpot)), ScriptTransfer(addressFromStringValue(getStringValue(teamWalletAddrKey)), deltaTeamAmount, gorcAssetId), IntegerEntry(stakersAmountLeftKey, (getIntegerValue(stakersAmountLeftKey) + deltaStakersAmount)), IntegerEntry(stakersAmountTotalKey, (getIntegerValue(stakersAmountTotalKey) + deltaStakersAmount)), StringEntry(keySalt(addr), toBase58String(i.transactionId))] ++ changeActions), finishBlock)
391	391		}
392	392		}
393	393		}
394	394		}
395	395
396	396
397	397
398	398		@Callable(i)
399	399		func guessLottery () = {
400	400		let addr = toString(i.caller)
401	401		let finishKey = keyCommit(addr)
402	402		let guessKey = keyGuess(addr)
403	403		let guess = valueOrErrorMessage(getInteger(guessKey), "You have not made a bet")
404	404		let finishBlock = valueOrErrorMessage(getInteger(finishKey), "You have not made a bet")
405	405		if ((finishBlock > height))
406	406		then throw(("Random number is not ready yet, wait until height = " + toString(finishBlock)))
407	407		else {
408	408		let entropy = value(value(blockInfoByHeight(finishBlock)).vrf)
409	409		let saltKey = keySalt(addr)
410	410		let salt = fromBase58String(valueOrElse(getString(saltKey), "DEFAULT"))
411	411		let rand = getRandomNumber(12, salt, entropy)
412	412		let currJackpot = valueOrElse(getInteger(currLotteryJackpotKey), 0)
413	413		let winActions = if ((rand == guess))
414	414		then [ScriptTransfer(i.caller, currJackpot, gorcAssetId), StringEntry(lastLotteryWinnerKey, addr), IntegerEntry(lastLotteryWinnerAmountKey, currJackpot), IntegerEntry(lastLotteryWinnerTimeKey, lastBlock.timestamp), IntegerEntry(currLotteryJackpotKey, valueOrElse(getInteger(nextLotteryJackpotKey), 0)), IntegerEntry(nextLotteryJackpotKey, 0)]
415	415		else nil
416	416		$Tuple2(([DeleteEntry(finishKey), DeleteEntry(guessKey), DeleteEntry(saltKey)] ++ winActions), rand)
417	417		}
418	418		}
419	419
420	420
421	421
422	422		@Callable(i)
423	423		func statsREADONLY (userAddrOpt) = {
424		-	let $~~t01817918237~~ = gorcStats(userAddrOpt)
425		-	let userAmount = $~~t01817918237~~._1
426		-	let amountLeftTotal = $~~t01817918237~~._2
	424	+	let $t01819518253 = gorcStats(userAddrOpt)
	425	+	let userAmount = $t01819518253._1
	426	+	let amountLeftTotal = $t01819518253._2
427	427		let currFomoJackpot = valueOrElse(getInteger(currFomoJackpotKey), 0)
428	428		let nextFomoJackpot = valueOrElse(getInteger(nextFomoJackpotKey), 0)
429	429		let lastFomoTime = valueOrElse(getInteger(lastFomoTimeKey), 0)
430	430		let lastFomoPlayer = valueOrElse(getString(lastFomoPlayerKey), "")
431	431		let fomoEpoch = valueOrElse(getInteger(fomoEpochKey), 0)
432	432		let currFomoPeriod = valueOrElse(getInteger(currFomoPeriodKey), DEFAULT_FOMO_PERIOD)
433	433		let currLotteryJackpot = valueOrElse(getInteger(currLotteryJackpotKey), 0)
434	434		let nextLotteryJackpot = valueOrElse(getInteger(nextLotteryJackpotKey), 0)
435	435		let finishKey = keyCommit(userAddrOpt)
436	436		let guessKey = keyGuess(userAddrOpt)
437	437		let guess = valueOrElse(getInteger(guessKey), -1)
438	438		let finishBlock = valueOrElse(getInteger(finishKey), -1)
439	439		let lastFomoWinner = valueOrElse(getString(lastFomoWinnerKey), "")
440	440		let lastFomoWinnerAmount = valueOrElse(getInteger(lastFomoWinnerAmountKey), 0)
441	441		let lastFomoWinnerTime = valueOrElse(getInteger(lastFomoWinnerTimeKey), 0)
442	442		let lastLotteryWinner = valueOrElse(getString(lastLotteryWinnerKey), "")
443	443		let lastLotteryWinnerAmount = valueOrElse(getInteger(lastLotteryWinnerAmountKey), 0)
444	444		let lastLotteryWinnerTime = valueOrElse(getInteger(lastLotteryWinnerTimeKey), 0)
445	445		let gorcStakedTotal = valueOrElse(getInteger(stakedAmountTotalKey), 0)
446	446		let fomoNumUniquePlayers = valueOrElse(getInteger(fomoNumUniquePlayersKey), 0)
447	447		let fomoTotalNumStakes = valueOrElse(getInteger(fomoTotalNumStakesKey), 0)
448	448		let fomoTotalStakedAmount = valueOrElse(getInteger(fomoTotalStakedAmountKey), 0)
449	449		let fomoUserNumStakes = valueOrElse(getInteger(fomoUserNumStakesKey(userAddrOpt)), 0)
450	450		let fomoUserStakedAmount = valueOrElse(getInteger(fomoUserStakedAmountKey(userAddrOpt)), 0)
451	451		let fomoUserNumWins = valueOrElse(getInteger(fomoUserNumWinsKey(userAddrOpt)), 0)
452	452		let fomoUserWonAmount = valueOrElse(getInteger(fomoUserWonAmountKey(userAddrOpt)), 0)
453	453		let fomoFavoriteByNumGames = valueOrElse(getString(fomoFavoriteByNumGamesKey), "")
454	454		let fomoFavoriteByAmount = valueOrElse(getString(fomoFavoriteByAmountKey), "")
455	455		$Tuple2(nil, [("%s%d__gorcAvailToClaim__" + toString(userAmount)), ("%s%d__fomoEpoch__" + toString(fomoEpoch)), ("%s%d__currFomoPeriod__" + toString(currFomoPeriod)), ("%s%d__currFomoJackpotAmount__" + toString(currFomoJackpot)), ("%s%d__nextFomoJackpotAmount__" + toString(nextFomoJackpot)), ("%s%d__currLotteryJackpotAmount__" + toString(currLotteryJackpot)), ("%s%d__nextLotteryJackpotAmount__" + toString(nextLotteryJackpot)), ("%s%d__lastFomoTime__" + toString(lastFomoTime)), ("%s%s__lastFomoPlayer__" + lastFomoPlayer), ("%s%d__amountLeftTotal__" + toString(amountLeftTotal)), ("%s%d__finishBlock__" + toString(finishBlock)), ("%s%d__guess__" + toString(guess)), ("%s%s__lastFomoWinner__" + lastFomoWinner), ("%s%d__lastFomoWinnerAmount__" + toString(lastFomoWinnerAmount)), ("%s%d__lastFomoWinnerTime__" + toString(lastFomoWinnerTime)), ("%s%s__lastLotteryWinner__" + lastLotteryWinner), ("%s%d__lastLotteryWinnerAmount__" + toString(lastLotteryWinnerAmount)), ("%s%d__lastLotteryWinnerTime__" + toString(lastLotteryWinnerTime)), ("%s%d__gorcIssued__" + toString(M16)), ("%s%d__gorcStakedTotal__" + toString(gorcStakedTotal)), ("%s%d__fomoNumUniquePlayers__" + toString(fomoNumUniquePlayers)), ("%s%d__fomoTotalNumStakes__" + toString(fomoTotalNumStakes)), ("%s%d__fomoTotalStakedAmount__" + toString(fomoTotalStakedAmount)), ("%s%d__fomoUserNumStakes__" + toString(fomoUserNumStakes)), ("%s%d__fomoUserStakedAmount__" + toString(fomoUserStakedAmount)), ("%s%d__fomoUserNumWins__" + toString(fomoUserNumWins)), ("%s%d__fomoUserWonAmount__" + toString(fomoUserWonAmount)), ("%s%s__fomoFavoriteByNumGames__" + fomoFavoriteByNumGames), ("%s%s__fomoFavoriteByAmount__" + fomoFavoriteByAmount)])
456	456		}
457	457
458	458
459	459
460	460		@Callable(i)
461	461		func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
462	462
463	463

github/deemru/w8io/169f3d6 
71.25 ms ◑