// Forked from "dance_to_the_rhythm.mod" by srtuss
// https://dittytoy.net/ditty/e910e130a3

let moddata=b64dec("YzY0LXN0eWxlAAAAAAAAAAAAAABoaWhhdAAAAAAAAAAAAAAAAAAAAAAAAoAAHgAAAABvcGVuAAAAAAAAAAAAAAAAAAAAAAAACAAAQAAAAABiZAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAKgAAAABzbgAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAMgAAAABzcWFyZS1sbwAAAAAAAAAAAAAAAAAAAD8ANAAHADhiZWVwMQAAAAAAAAAAAAAAAAAAAAAAABgAQAAKAA5iZWVwMgAAAAAAAAAAAAAAAAAAAAAAABgAPQAJAA5iZWVwMwAAAAAAAAAAAAAAAAAAAAAAABgAOgAIAA5iZWVwNAAAAAAAAAAAAAAAAAAAAAAAABgANwAHAA5iZWVwNQAAAAAAAAAAAAAAAAAAAAAAABgANAAGAA5iZWVwNgAAAAAAAAAAAAAAAAAAAAAAABgAMQAEAA5zcXVhcmUtaGkAAAAAAAAAAAAAAAAAAD8ALgAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAASAAABAgMEBQQFBgcICQQFBAUGBwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAATS5LLgF9VIEBfcA3AAAMAAAADwgAAAQAAAAANwAAAAAAAAAAAAAGAQAAADcAAAAAAAAAAAAABAAAAAA3AAAAAAAAAAAAAAYBAAAANwAAAAAAAAAAAAAEAAAAADcAAAAAAAAAAAAABgEAAAA3AAAAAAAAAAAAAAQAAAAANwAAAAAAAAAAAAAGAQAAADcBQGSBAAAAAAAABAAAAAA3AAAEAAAAAAAAAAYBAAAANwF9YAAAAAAAAAAEAAAAADcAAAQAAAAAAAAABgEAAAA3AAAEAAAAAAAAAAQAAAAANwAABAAAAAAAAAAGAQAAADcAAAQAAAAAAAAABAAAAAA3AAAEAAAAAAABfVQAAAAANwAABgIAAAAAAAAGAQAAADcAAAYCAAAAAAAABAAAAAA3AAAGAgAAAAAAAAYBAAAANwAABgIAAAAAAAAEAAAAADcAAAYCAAAAAAAABgEAAAA3AAAEAAAAAAAAAAQAAAAANwF9YAAAAAAAAAAGAQAAADcAAAQAAAAAAAF9VAAAAAA3AP5gAAAAAAAAAAYBAAAANwAABAAAAAAAAAAEAAAAADcBHWAAAAAAAAAABgEAAAA3AAAEAAAAAAABrFQAAazARwFAYAAAAAAAAAAGAQAAAEcAAAQAAAAAAAAABAAAAABHAR1gAAAAAAAAAAYBAAAARwAABAAAAAAAAeBUAAHgwEcBQGAAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwAABAAAAAAAAAAGAQAAAEcAAAQAAAAAAAAABAAAAABHAAAEAAAAAAAAAAYBAAAARwAABAAAAAAAAAAEAAAAAEcBfWAAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwF9YAAAAAAAAAAGAQAAAEcAAAQAAAAAAAAABAAAAABHAAAEAAAAAAAAAAYBAAAARwAABAAAAAAAAAAEAAAAAEcAAAQAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwAABAAAAAAAAAAGAQAAAEcAAAQAAAAAAAHgVAAAAABHAAAGAgAAAAAAAAYBAAAARwAABgIAAAAAAAAEAAAAAEcAAAYCAAAAAAAABgEAAABHAAAGAgAAAAAAAAQAAAAARwAABgIAAAAAAAAGAQAAAEcAAAYCAAAAAAAABAAAAABHAAAGAgAAAAAAAAYBAAAARwAAAAAAAAAAAeBUAAHgwEcBfWAAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwAAAQMAAAAAAAAGAQAAAEcAAAEDAAAAAAGsVAABrMBHAAAEAAAAAAAAAAYBAAAARwAABAAAAAAAAAAEAAAAAEcAAAQAAAAAAAAABgEAAABHAAAGCAAAAAABfVSBAX3ANwAADAAAAAAAAAAEAAAAADcAAAAAAAAAAAAABgEAAAA3AAAAAAAAAAAAAAQAAAAANwAAAAAAAAAAAAAGAQAAADcAAAAAAAAAAAAABAAAAAA3AAAAAAAAAAAAAAYBAAAANwAAAAAAAAAAAAAEAAAAADcAAAAAAAAAAAAABgEAAAA3AUBgAAAAAAAAAAQAAAAANwAABIEAAAAAAAAGAQAAADcBfWAAAAAAAAAABAAAAAA3AAAEAAAAAAAAAAYBAAAANwAABAAAAAAAAAAEAAAAADcAAAQAAAAAAAAABgEAAAA3AAAEAAAAAAAAAAQAAAAANwAABAAAAAAAAX1UAAAAADcAAAYCAAAAAAAABgEAAAA3AAAGAgAAAAAAAAQAAAAANwAABgIAAAAAAAAGAQAAADcAAAYCAAAAAAAABAAAAAA3AAAGAgAAAAAAAAYBAAAANwAABAAAAAAAAAAEAAAAADcBfWAAAAAAAAAABgEAAAA3AAAEAAAAAAABfVQAAX3ANwD+YAAAAAAAAAAGAQAAADcAAAQAAAAAAAAABAAAAAA3AR1gAAAAAAAAAAYBAAAANwAABAAAAAAAAVNUAAGswEcBQGAAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwEdYAAAAAAAAAAGAQAAAEcAAAQAAAAAAAFAVAABQMBHAP5gAAAAAAAAAAYBAAAARwAABAAAAAAAAAAEAAAAAEcAAAQAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwAABAAAAAAAAAAGAQAAAEcAAAQAAAAAAAAABAAAAABHANZgAAAAAAAAAAYBAAAARwAABAAAAAAAAAAEAAAAAEcA/mAAAAAAAAAABgEAAABHAAAEAAAAAAAAAAQAAAAARwAABAAAAAAAAAAGAQAAAEcAAAQAAAAAAAAABAAAAABHAAAEAAAAAAAAAAYBAAAARwAABgEAAAAAAAAEAAAAAEcAAAYBAAAAAAAABgEAAABHAAAGAQAAAAABQFQAAAAARwCgQAAAAAAAAAAGAQAAAEcAoEAAAAAAAAAABAAAAABHAAAAAAAAAAAAAAYBAAAARwCgQAAAAAAAAAAEAAAAAEcAvkAAAAAAAAAABgEAAABHAL5AAAAAAAAAAAQAAAAARwAAAAAAAAAAAAAGAQAAAEcAvkAAAAAAAAFAVAAAAABHANZAAAAAAAAAAAYBAAAARwDWQAAAAAAAAAAEAAAAAEcAAAAAAAAAAAAABgEAAABHANZAAAAAAAABrFQAAazARwDiQAAAAAAAAAAGAQAAAEcA4kAAAAAAAAAABAAAAABHAAAAAAAAAAAAAAYBAAAARwDiQAAAAAAAAX1UgQF9wDcBQIAAAawwAAAABgIAAAA3AAAEgQB/EAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAC+VgIAAAA3AAAEAAC+QAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcBU4AAAH8QAAC+VgIAAAA3AAAEAAB/EAABfVYCAAAANwF9gAABrDAAAAAGAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAL5WAgAAADcAAAQAAL5AAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwGsgAAAfxAAAL5WAgAAADcAAAQAAH8QAAF9VgIAAAA3AX2AAAGsMAAAAAYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAEAAB/EAAAvlYCAAAANwAABAAAvkAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AX2AAAB/EAAAvlYCAAAANwAABAAAfxAAAX1WAgF9wDcBQIAAAawwAAAABgIAAAA3AAAEAAB/EAAAAAYCAAAANwFTgAAAfxAAAAAGAgAAADcAAAQAAH8QAAGsVgIBrMBHAUCAAAC+QAAAAAYCAAAARwAABAAAfxAAAAAGAgAAAEcBU4AAAH8QAAAABgIAAABHAAAEAAB/EAAB4FYCAeDARwFAgwIBrDAAAAAGAgAAAEcAAAMCAH8QAAHgVgIAAABHAAAEAAB/EAAB4FYCAAAARwAABAAAfxAAAPBWAgAAAEcAAAQAAL5AAAHgVgIAAABHAAAEAAB/EAAB4FYCAAAARwEdgAAAfxAAAPBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAX2AAAGsMAAAAAYCAAAARwAABAAAfxAAAeBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAA8FYCAAAARwAABAAAvkAAAeBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAA8FYCAAAARwAABAAAfxAAAeBWAgAAAEcAAAYBAawwAAAABgIAAABHAAAGAQB/EAAB4FYCAAAARwAABgEAfxAAAeBWAgAAAEcAAAYBAH8QAADwVgIAAABHAAAGAQC+QAAB4FYCAAAARwAABgEAfxAAAeBWAgAAAEcAAAYBAH8QAADwVgIAAABHAAAGAQB/EAAB4FYCAeDARwF9gAABrDAAAAAGAgAAAEcAAAQAAH8QAAAABgIAAABHAVODAwB/EAAAAAYCAAAARwAAAwMAfxAAAaxWAgGswEcAAAQAAL5AAAAABgIAAABHAAAEAAB/EAAAAAYCAAAARwAABAAAvkAAAAAGAgAAAEcAAAQAAL5AAAF9VIEBfcA3AUCAAAGsMAAAAAYCAAAANwAABIEAfxAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAEAAB/EAAAvlYCAAAANwAABAAAvkAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AVMAAAB/EAAAvlYCAAAANwAABAAAfxAAAX1WAgAAADcBQAAAAawwAAAABgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAC+VgIAAAA3AAAEAAC+QAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcBHQAAAH8QAAC+VgIAAAA3AAAEAAB/EAABfVYCAAAANwD+AAABrDAAAAAGAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAL5WAgAAADcAAAQAAL5AAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwD+gAAAfxAAAL5WAgAAADcAAAQAAH8QAAF9VgIAAAA3ANYAAAGsMAAAAAYCAAAANwAABAAAfxAAAAAGAgAAADcA/gAAAH8QAAAABgIAAAA3AAAEAAB/EAABU1YCAazARwDWAAAAvkAAAAAGAgAAAEcAAAQAAH8QAAAABgIAAABHAP4AAAB/EAAAAAYCAAAARwAABAAAfxAAAUBWAgFAwEcA1gAAAawwAAAABgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAUBWAgAAAEcAAAQAAH8QAACgVgIAAABHAAAEAAC+QAABQFYCAAAARwAABAAAfxAAAUBWAgAAAEcAvgMFAH8QAACgVgIAAABHAAAEAAB/EAABQFYCAAAARwD+AAABrDAAAAAGAgAAAEcAAAQAAH8QAAFAVgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAKBWAgAAAEcAAAQAAL5AAAFAVgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAKBWAgAAAEcAAAQAAH8QAAFAVgIAAABHAAAGAQGsMAAAAAYCAAAARwAABgEAfxAAAUBWAgAAAEcAAAYBAH8QAAFAVgIAAABHAAAGAQB/EAAAoFYCAAAARwAABgEAvkAAAUBWAgAAAEcAAAYBAH8QAAFAVgIAAABHAAAGAQB/EAAAoFYCAAAARwAABgEAfxAAAUBWAgFAwEcAvoAAAawwAAAABgIAAABHAAAGAwB/EAAAAAYCAAAARwC+gAAAfxAAAAAGAgAAAEcAAAQAAH8QAAFTVgIBrMBHANYAAAC+QAAAAAYCAAAARwAABAAAfxAAAAAGAgAAAEcA1gAAAL5AAAAABgIAAABHAAAEAAC+QAABfVSBAX3ANwC+YAABrDAAAAAGAgAAADcAAASBAH8QAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAL5WAgAAADcAAAQAAL5AAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwDWAAAAfxAAAL5WAgAAADcAAAQAAH8QAAF9VgIAAAA3AL4AAAGsMAAAAAYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAEAAB/EAAAvlYCAAAANwAABAAAvkAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AKAAAAB/EAAAvlYCAAAANwAABAAAfxAAAX1WAgAAADcAjwAAAawwAAAABgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAC+VgIAAAA3AAAEAAC+QAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcAoAAAAH8QAAC+VgIAAAA3AAAEAAB/EAABfVYCAX3ANwCPAAABrDAAAAAGAgAAADcAAAQAAH8QAAAABgIAAAA3AKAAAAB/EAAAAAYCAAAANwAABAAAfxAAAaxWAgGswEcAjwAAAL5AAAAABgIAAABHAAAEAAB/EAAAAAYCAAAARwB/AAAAfxAAAAAGAgAAAEcAAAQAAH8QAAHgVgIB4MBHAHgAAAGsMAAAAAYCAAAARwAABAAAfxAAAeBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAA8FYCAAAARwAABAAAvkAAAeBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAH8AAAB/EAAA8FYCAAAARwAABAAAfxAAAeBWAgAAAEcAeAAAAawwAAAABgIAAABHAAAEAAB/EAAB4FYCAAAARwAABAAAfxAAAeBWAgAAAEcAAAQAAH8QAADwVgIAAABHAAAEAAC+QAAB4FYCAAAARwAABAAAfxAAAeBWAgAAAEcAawAAAH8QAADwVgIAAABHAAAEAAB/EAAB4FYCAAAARwCgAAABrDAAAAAGAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAB4FYCAAAARwAABAAAfxAAAPBWAgAAAEcAAAQAAL5AAAHgVgIAAABHAAAEAAB/EAAB4FYCAAAARwAABAAAfxAAAPBWAgAAAEcAAAQAAH8QAAHgVgIB4MBHAAAGAQGsMAAAAAYCAAAARwAABgEAfxAAAAAGAgAAAEcAAAYBAH8QAAAABgIAAABHAAAGAQB/EAABrFYCAazARwAABgEAvkAAAAAGAgAAAEcAAAYBAH8QAAAABgIAAABHAAAGAQC+QAAAAAYCAAAARwAABgEAvkAAAX1UgQF9wDcAvoAAAawwAAAABgIAAAA3AAAEgQB/EAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAC+VgIAAAA3AAAEAAC+QAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcA1gAAAH8QAAC+VgIAAAA3AAAEAAB/EAABfVYCAAAANwD+AAABrDAAAAAGAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAL5WAgAAADcAAAQAAL5AAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwFAAAAAfxAAAL5WAgAAADcAAAQAAH8QAAF9VgIAAAA3AR0AAAGsMAAAAAYCAAAANwAABAAAfxAAAX1WAgAAADcBQAAAAH8QAAF9VgIAAAA3AAAEAAB/EAAAvlYCAAAANwEdAAAAvkAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AUAAAAB/EAAAvlYCAAAANwAABAAAfxAAAX1WAgAAADcA/gAAAawwAAAABgIAAAA3AAAEAAB/EAAAAAYCAAAANwEdAAAAfxAAAAAGAgAAADcBQAAAAH8QAAFTVgIBrMBHAVMAAAC+QAAAAAYCAAAARwAABAAAfxAAAAAGAgAAAEcBQAAAAH8QAAAABgIAAABHAAAEAAB/EAABQFYCAUDARwGsAAABrDAAAAAGAgAAAEcAAAQAAH8QAAFAVgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAKBWAgAAAEcAAAQAAL5AAAFAVgIAAABHAAAEAAB/EAABQFYCAAAARwFTgAAAfxAAAKBWAgAAAEcBQAAAAH8QAAFAVgIAAABHAawAAAGsMAAAAAYCAAAARwAABAAAfxAAAUBWAgAAAEcAAAQAAH8QAAFAVgIAAABHAAAEAAB/EAAAoFYCAAAARwAABAAAvkAAAUBWAgAAAEcAAAQAAH8QAAFAVgIAAABHAVOAAAB/EAAAoFYCAAAARwFAAAAAfxAAAUBWAgAAAEcBrAAAAawwAAAABgIAAABHAAAEAAB/EAABQFYCAAAARwFTAAAAfxAAAUBWAgAAAEcBQAAAAH8QAACgVgIAAABHAawAAAC+QAABQFYCAAAARwAABAAAfxAAAUBWAgAAAEcBUwAAAH8QAACgVgIAAABHAUADCAB/EAABQFYCAUDARwGsAAABrDAAAAAGAgAAAEcAAAQAAH8QAAAABgIAAABHAAAEAAB/EAAAAAYCAAAARwAABAAAfxAAAVNWAgGswEcAAAYBAL5AAAAABgIAAABHAAAGAQB/EAAAAAYCAAAARwAABgEAvkAAAAAGAgAAAEcAAAYBAL5AAAF9VIEBfcA3AL6aAgGsMAAAAAYCAAAANwAACgIAfxAAAX1WAgAAADcA1poCAH8QAAF9VgIAAAA3AAAKAgB/EAAAvlYCAAAANwC+mgIAvkAAAX1WAgAAADcAAAoCAH8QAAF9VgIAAAA3AKCaAgB/EAAAvlYCAAAANwCPmgIAfxAAAX1WAgAAADcAf5oCAawwAAAABgIAAAA3AAAKAgB/EAABfVYCAAAANwC+mgIAfxAAAX1WAgAAADcAAAoCAH8QAAC+VgIAAAA3AAAKAgC+QAABfVYCAAAANwAACgIAfxAAAX1WAgAAADcAAAoCAH8QAAC+VgIAAAA3AAAKAgB/EAABfVYCAAAANwB/mgIBrDAAAAAGAgAAADcAf5oCAH8QAAF9VgIAAAA3AAAKAgB/EAABfVYCAAAANwCPmgIAfxAAAL5WAgAAADcAj5oCAL5AAAF9VgIAAAA3AAAKAgB/EAABfVYCAAAANwCgmgIAfxAAAL5WAgAAADcAoJoCAH8QAAF9VgIBfcA3AAAKAgGsMAAAAAYCAAAANwAACgIAfxAAAAAGAgAAADcAf5oCAH8QAAAABgIAAAA3AAAKAgB/EAABrFYCAazARwCPmgIAvkAAAAAGAgAAAEcAoJoCAH8QAAAABgIAAABHANaaAgB/EAAAAAYCAAAARwAACgIAfxAAAeBWAgHgwEcAvpoCAawwAAAABgIAAABHAAAKAQB/EAAB4FYCAAAARwAACgEAfxAAAeBWAgAAAEcAAAoBAH8QAADwVgIAAABHAAAKAQC+QAAB4FYCAAAARwAACgEAfxAAAeBWAgAAAEcA1poCAH8QAADwVgIAAABHAAAKAgB/EAAB4FYCAAAARwCgmgIBrDAAAAAGAgAAAEcAAAoBAH8QAAHgVgIAAABHAAAKAQB/EAAB4FYCAAAARwAACgEAfxAAAPBWAgAAAEcAAAoBAL5AAAHgVgIAAABHAAAKAQB/EAAB4FYCAAAARwCPmgIAfxAAAPBWAgAAAEcAAAoCAH8QAAHgVgIAAABHAL6aAgGsMAAAAAYCAAAARwAACgEAfxAAAeBWAgAAAEcAAAoBAH8QAAHgVgIAAABHAAAKAQB/EAAA8FYCAAAARwAACgEAvkAAAeBWAgAAAEcAAAoBAH8QAAHgVgIAAABHAAAKAQB/EAAA8FYCAAAARwAACgEAfxAAAeBWAgHgwEcAvpoCAawwAAAABgIAAABHAAAKAgB/EAAAAAYCAAAARwAACgIAfxAAAAAGAgAAAEcAAAoCAH8QAAGsVgIBrMBHAKqaAgC+QAAAAAYCAAAARwAACgIAfxAAAAAGAgAAAEcAAAoCAL5AAAAABgIAAABHAAAKAgC+QAABfVSBAX3ANwC+mgIBrDAAAAAGAgAAADcAAAoCAH8QAAF9VgIAAAA3ANaaAgB/EAABfVYCAAAANwAACgIAfxAAAL5WAgAAADcAvpoCAL5AAAF9VgIAAAA3AAAKAgB/EAABfVYCAAAANwCgmgIAfxAAAL5WAgAAADcAj5oCAH8QAAF9VgIAAAA3AH+aAgGsMAAAAAYCAAAANwAACgIAfxAAAX1WAgAAADcAvpoCAH8QAAF9VgIAAAA3AAAKAgB/EAAAvlYCAAAANwAACgIAvkAAAX1WAgAAADcAAAoCAH8QAAF9VgIAAAA3AAAKAgB/EAAAvlYCAAAANwAACgIAfxAAAX1WAgAAADcAf5oCAawwAAAABgIAAAA3AH+aAgB/EAABfVYCAAAANwAACgIAfxAAAX1WAgAAADcAj5oCAH8QAAC+VgIAAAA3AI+aAgC+QAABfVYCAAAANwAACgIAfxAAAX1WAgAAADcAoJoCAH8QAAC+VgIAAAA3AKCaAgB/EAABfVYCAAAANwAACgIBrDAAAAAGAgAAADcAAAoCAH8QAAAABgIAAAA3AH+aAgB/EAAAAAYCAAAANwAACgIAfxAAAVNWAgGswEcAj5oCAL5AAAAABgIAAABHAKCaAgB/EAAAAAYCAAAARwDWmgIAfxAAAAAGAgAAAEcAAAoCAH8QAAFAVgIBQMBHAKBqAgGsMAAAAAYCAAAARwAACgIAfxAAAUBWAgAAAEcAAAoCAH8QAAFAVgIAAABHAAAKAgB/EAAAoFYCAAAARwAACgIAvkAAAUBWAgAAAEcAAAoCAH8QAAFAVgIAAABHANZqAgB/EAAAoFYCAAAARwCqagIAfxAAAUBWAgAAAEcAoGoCAawwAAAABgIAAABHAAAKAgB/EAABQFYCAAAARwAACgIAfxAAAUBWAgAAAEcAAAoCAH8QAACgVgIAAABHAAAKAgC+QAABQFYCAAAARwAAAAAAfxAAAUBWAgAAAEcAf6oCAH8QAACgVgIAAABHAI+qAgB/EAABQFYCAAAARwCgqgIBrDAAAAAGAgAAAEcAAAoCAH8QAAFAVgIAAABHAL6qAgB/EAABQFYCAAAARwAACgIAfxAAAKBWAgAAAEcAvqoCAL5AAAFAVgIAAABHAAAKAgB/EAABQFYCAAAARwDWqgIAfxAAAKBWAgAAAEcAAAoCAH8QAAFAVgIBQMBHAL6qAgGsMAAAAAYCAAAARwAACgIAfxAAAAAGAgAAAEcAj6oCAH8QAAAABgIAAABHAAAKAgB/EAABU1YCAazARwCqqgIAvkAAAAAGAgAAAEcAAAoCAH8QAAAABgIAAABHANaqAgC+QAAAAAYCAAAARwAACgIAvkAAAX1UgQF9wDcAAAwAAawwAAAABgIAAAA3AAAAAAB/EAABfVYCAAAANwAAAAAAfxAAAX1WAgAAADcAAAAAAH8QAAC+VgIAAAA3AAAAAAC+QAABfVYCAAAANwAAAAAAfxAAAX1WAgAAADcAAAAAAH8QAAC+VgIAAAA3AAAAAAB/EAABfVYCAAAANwFAYAABrDAAAAAGAgAAADcAAASCAH8QAAF9VgIAAAA3AX1gAAB/EAABfVYCAAAANwAABAAAfxAAAL5WAgAAADcAAAQAAL5AAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwAABAAAfxAAAL5WAgAAADcAAAQAAH8QAAF9VgIAAAA3AAAGAgGsMAAAAAYCAAAANwAABgIAfxAAAX1WAgAAADcAAAYCAH8QAAF9VgIAAAA3AAAGAgB/EAAAvlYCAAAANwAABgIAvkAAAX1WAgAAADcAAAQAAH8QAAF9VgIAAAA3AX1gAAB/EAAAvlYCAAAANwAABAAAfxAAAX1WAgF9wDcA/mMWAawwAAAABgIAAAA3AAAEAAB/EAAAAAYCAAAANwEdYAAAfxAAAAAGAgAAADcAAAQAAH8QAAGsVgIBrMBHAUBgAAC+QAAAAAYCAAAARwAABAAAfxAAAAAGAgAAAEcBHWAAAH8QAAAABgIAAABHAAAEAAB/EAAB4FYCAeDARwFAYAABrDAAAAAGAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAB4FYCAAAARwAABAAAfxAAAPBWAgAAAEcAAAQAAL5AAAHgVgIAAABHAAAEAAB/EAAB4FYCAAAARwF9YAAAfxAAAPBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAX1gAAGsMAAAAAYCAAAARwAABAAAfxAAAeBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAA8FYCAAAARwAABAAAvkAAAeBWAgAAAEcAAAQAAH8QAAHgVgIAAABHAAAEAAB/EAAA8FYCAAAARwAABAAAfxAAAeBWAgAAAEcAAAYBAawwAAAABgIAAABHAAAGAQB/EAAB4FYCAAAARwAABgEAfxAAAeBWAgAAAEcAAAYBAH8QAADwVgIAAABHAAAGAQC+QAAB4FYCAAAARwAABgEAfxAAAeBWAgAAAEcAAAYBAH8QAADwVgIAAABHAAAGAQB/EAAB4FYCAeDARwF9YAABrDAAAAAGAgAAAEcAAAQAAH8QAAAABgIAAABHAAABAwB/EAAAAAYCAAAARwAAAQMAfxAAAaxWAgGswEcAAAQAAL5AAAAABgIAAABHAAAEAAB/EAAAAAYCAAAARwAABAAAvkAAAAAGAgAAAEcAAAoIAL5AAAF9VIEBfcA3AAAMAAGsMAAAAAYCAAAANwAAAAAAfxAAAX1WAgAAADcAAAAAAH8QAAF9VgIAAAA3AAAAAAB/EAAAvlYCAAAANwAAAAAAvkAAAX1WAgAAADcAAAAAAH8QAAF9VgIAAAA3AAAAAAB/EAAAvlYCAAAANwAAAAAAfxAAAX1WAgAAADcBQGAAAawwAAAABgIAAAA3AAAEggB/EAABfVYCAAAANwF9YAAAfxAAAX1WAgAAADcAAAQAAH8QAAC+VgIAAAA3AAAEAAC+QAABfVYCAAAANwAABAAAfxAAAX1WAgAAADcAAAQAAH8QAAC+VgIAAAA3AAAEAAB/EAABfVYCAAAANwAABgIBrDAAAAAGAgAAADcAAAYCAH8QAAF9VgIAAAA3AAAGAgB/EAABfVYCAAAANwAABgIAfxAAAL5WAgAAADcAAAYCAL5AAAF9VgIAAAA3AAAEAAB/EAABfVYCAAAANwF9YAAAfxAAAL5WAgAAADcAAAQAAH8QAAF9VgIAAAA3AP5gAAGsMAAAAAYCAAAANwAABAAAfxAAAAAGAgAAADcBHWAAAH8QAAAABgIAAAA3AAAEAAB/EAABU1YCAazARwFAYAAAvkAAAAAGAgAAAEcAAAQAAH8QAAAABgIAAABHAR1gAAB/EAAAAAYCAAAARwAABAAAfxAAAUBWAgFAwEcA/mAAAawwAAAABgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAUBWAgAAAEcAAAQAAH8QAACgVgIAAABHAAAEAAC+QAABQFYCAAAARwAABAAAfxAAAUBWAgAAAEcA1mMPAH8QAACgVgIAAABHAAAEAAB/EAABQFYCAAAARwD+YAABrDAAAAAGAgAAAEcAAAQAAH8QAAFAVgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAKBWAgAAAEcAAAQAAL5AAAFAVgIAAABHAAAEAAB/EAABQFYCAAAARwAABAAAfxAAAKBWAgAAAEcAAAQAAH8QAAFAVgIAAABHAAAEAAGsMAAAAAYCAAAARwAABAAAfxAAAUBWAgAAAEcAAAYBAH8QAAFAVgIAAABHAAAGAQB/EAAAoFYCAAAARwAABgEAvkAAAUBWAgAAAEcAAAYBAH8QAAFAVgIAAABHAAAGAQB/EAAAoFYCAAAARwAABgEAfxAAAUBWAgFAwEcAvmMSAawwAAAABgIAAABHAAAEAAB/EAAAAAYCAAAARwC+YAAAfxAAAAAGAgAAAEcAAAQAAH8QAAFTVgIBrMBHANZgAAC+QAAAAAYCAAAARwAABAAAfxAAAAAGAgAAAEcA1mAAAL5AAAAABgIAAABHAAAEAAC+QAAAAAAAgEe/BB+o/wHY3xz0vwC/0B+HALfgGIBXgD/PBQDvABbQ/wDkBPTw/QDs70C/QJ9AvwD/GP8o2P8gvzjvQNAU1z/APwAX7wzv/wDQL+Ag1N8q4PwB9w3fGO9A4/8Q/9sA9wDfIO8AH9gn2BjAJ9Df/wDvAO3XKPAvAD8AFARA9yAI/yDfADLQQOAQ7xCfM68b4P8ftx/3yx/S9yD38jDAFgXgP9DvAOUPAO/sKMAfAO9Q7xcg3+tPn0/CPwC3P6A/wFCg/9DfPMQI4w/LH7//ExPwFxIQBvcs5v0vwD/g/wTg//AU7zC7GgjfEBLo7yC/IM8/4C7/yD/i//8Q0f/g7/j3zxi/MM8g7yzAINMAMMhEm0/DGyAfwD8A7yDfKADPAP/Q//jZIIkQANAQ5wDrEM8ADckP//Dv8BvgHwAG50jAHgTvBQDfCNsXEP8AEOZA9wALAO/w/+cA/wTvLOAY/yDfBxD/8P8A5f8I/wDrAP8A7+QLDOD/AN/A/+j/AO0Q3xjdHwjd+yDg7xDoFNAwwPcY5ArwEOcQ5O8Y0PXnFOMP7SzgJvAEJ+o07yjVIOj3CP/w7/AC6AD/AN//7+Dv8t8Y8vD/AAPwBwAA6xEA9xD5AOsA6/sA/fD64O823xAf4i8AARcE/f8g7wzgGwD0+QD3/ecE9+D/9N/w7/DrAtci4O8A7wbrGNoX4P/iH+r1DOUA/wzlFwD/AP/w/QEAEO8P8f/zCvcE9wD/5w/r/wHw7APg///07xXgBwD/5P/y/+z/9fEH+t8Q5QTgBusN6A8ADwDrFwD+/xDiF+gP9wD3AQrq//gLAOcQ3wfrDfD79O/++O/yAPDw/wDp//n9//L49wf0/QD3APcK7QX8/PEA/ff8//IO9PcA+/r/+v8A/QjvD/r/AP8A7wT9AesY7PcE3xHvEPcA9wDjDeb1BOj99/nvBvAH8P/57wj47/gD5Qf89AX89vUB/O8ABPD+APT+AP73C/D/HugPAAT8/wj+9A0A8wPv+QHw9+8G8PUA/+D3AO7/9PX6+fX68wD79gfw/wT/+AsA+gr0//gE9P0J7A0ADPAL9f/9AP79AAL9BPv5A/T/+/n/8P/48/z39vj98Pr6+wD3COj/9Pv4B/H6Ae8D8wL7//8A9Ab2/wT1/Av7/QX3A/r/+P/4//n7+Pn+9vj5+Pn6+fkA+PsB8f/6/QLyAvT99f779Pj3APP6+/j9/Pf7APf7A/f9APz++v8A/f/8+wD5/P3/9v/69/n/8v78+AL/+vMC9/z7+/z3APf/8wb1/vD98P71+/z5+Pf9+Pr8+fv99/37+vn4+/34Bfr/Afv/AAL5BgD8AgD++wT5/Pv8+fv7/Pb79vX78fr4+fj0/fb79vn6+vf7+/n7/vv7+/75/Pj/+P/4//j9+/z8+wD8APz9AvwB/AP3Af38+/36+fz2+fj59vn1+Pb49vn1//j9+fr9+/73//n7/vv3/fz6+//7/Pv8+AD4//n//Pv/+v/7/vgB9/75APX9+/n7+vr5/Pn7+P72+v359/z6+/r6+/z6+v74/fn9+/j+/P37+/39+/76+/z4/fv3+/r4+fj5+vr3/fn++fv8+/r/+P/5APv+/P/9/vn9+f33/vn7+/f79/n4/fj6+Pz5+vz4/vj5//b9+fv7+fn8+/j9/Pr8+/z/+v3+/fv+/vv/+//8//v//Pz7/gAAAAAAH0D3IL8A38Ag3xgA9//gvwAftye/AN//wL8AAI9fAJ9whw9AoB8Av3iAUOzAX8Cff6ivd4AADAfQUP8L4D8I/w88nwAfnwAgzyAg3+80jyTAL6D/6NtF0AD/QPcAYL9gzQb34AAPCCD/L8Df4xDw/wBvxXjf30CP8T+ATwC3IOfgKYAwpz9A/99/0v8g3w0+hzcPgCD/6ADPH+C/IP+HcodIwBjAcIMw8D8gFz8A/3CfSePg9wAgz//Av0iAIL8AOKggUN9o/9/AQI9A6C8USL9Q+yA/4Lc/1+a/AP+nL7+QHxCAfPC/fMD/ABeXDN8qvyrgJ8BAr2D28PRvh070D8BAsB/Q/8c/IJcXCN8g7xD3AMN/nxDvH8AAGwAXJ/A//7sf3z8Ar1+H/yCr/wsA6M0A/wBgnEAa1wD/AB8AML8gG98PAPD/QP8e8D+f4yiBIOPAL4D/rxDPFRDfAGjw33C/MD+vwP+DL78v2O8AjyTP8u8I7wjv/yDbUOoAPwBPAP/YIADfYN8NDO/w/8hvx9/g76BAxwAgP+DnH68A/xcAPwBg8CANDwD/AB/gOP8AL48L8N/Q8LdAnyDPV+A/AA/AHwDcWNM54P+BX58vxEzP+P8A5v+3FwjAFN9fhz//0QA34GD39yj/xw/sENjHFr/3CLcnv/z/3Qjf/UDvH+M/vwC/INgY80DXADDPAP/4GP+/LN/iH78gzzsIGBUQ8QAo988P/6D/0N/o/++3AI/gIC7AeP9A9xAfAC/AJgng/wjvywDfwADPIO/g9PPw+P8DH78X/wD/7z/QNOAfAM8eH+jrvyDk/uAQL+AUByDnIBf/8P8H5vn0//r/vyboHKA08N8Q/8g/vyro/wjwH+AbABDlIPMI0j+4X+vfDb/Q39cA36Ad9N8g6/8V0P/oKMEvANc+0P8FAOcA3xjX9x/q/xDHIPD/GwDf1wArwED/ACDQ/wIXrx+/BADnIL8I9ybQHAMP6v/39Afg/9D/9wv/GL841gjLIKMAAP/wFt8Y9vfo3wrw/9AgryAY3iDzAProMNcIEO8g9+8e2wjvQP/oOP8A/88WAO3oIAXvFwAI8SAHBOP2JcDvIOz3sP/f4N/zBBDA/xjPBP8A/+cf/wD9/wAgtyAfAAj/BwDv7x/w0P/g/78gvwjf+8AC+wAwF+AfG8s/ry8Q5wAS1BjBH+D/AP8ALMBA8uAf7wsA78Af0P8YD/gb4PcR9RnwEN/2//DP8DDvAB/eOP/8+wv2/yDvKNMACgDlDxDnACDl4P8f5P/g1yDf0A8A/9H/3/DvGPMgxDAAAN8I/+AbxwfvBQD/AN8A+P/g5//o9wjk/zDXMMAPAP8AH98g/98f3+8E+PfkH88w7r//+OnfAP8QDuTHKs8NHxDvF+AvySTTG/j39wj77xvf7t/70BDK4B0A8P8ADQYg5BryHxD/AtMlwwDbKwD/AA/A7+oE39Dv4BDbF+s/rzcEzwD/BhDi/+QvAP/88OcQ9eA40P/gCNUfAP/w/wDXEPn79wbsBwDv5B/DG9/gEMcY4A/fGg/P/+8FC9T/AC/wXOUYHwALEPjQMMgQ3wDXAOP8xCjr4C/g9wDn/wD/D+s/3w8XCRUQF+1Q7wAX7/ro3+DtDdAe4AjvCN8AvyDn5Q7fK88M/8dArxL7NP8Y/9Ev7d8A+8AgxwD3E78/3xzQQPcQCgD7EO/7KK8X3xTf8/IawBTs7PT/6f/f7QXfAN8o30DvECbkDxcQ30DnEPT79CbQHOD/wArvAN/w21bQEOT/BO8MD/Av4B//BQD/CNAW4O8A9+zv9u8ICtoA//MT4P8ADwDf6RfXDN/gAOcAz/vk/wD47wivQLcn8AroPwD35Bf7AO/gDwTfGP+4PwDs8+rzKNbhBQcQ5wDvAA8EEPEX7S/v9P8g9/T/7wzaC9Tw+9sc9dcm3+8UAPMQ6yAkwCjqFPzw/xTfLMgoAP8a4d/w/8L5+wDn+Ov//+8r1y7dOPQAHwAP4A8K7RfwONUI//cE/ffo3/kA3wi/CO/o/+gvAA8A7wEA2zDPFwL03yD/CPsI4wzT/+8TAPDfEP//7fcH4ADhAOsQ9+jfBP/7H+MU7BjkINcUKOAc4P8Q30jA/8APBtDvCPsIwBDyCAf1IMsg/x/Y/w8A794X9wzvJejzCxDw7wTn/QC/P9gcwB/A6+cAFPHoFwUY9P8K8+8Q3wD3DP320PcG7/L/AOkAzwfsDegPAwDvIPAMHOIo6wcU/wD/8P/45P8Q5OjfCusC3wH/rx/fL98Y/xDX/+D/AN8d0P/j/zDi7xrw9MAf4Ob3ABDADf8Az+APEOUY/zDnAAfQGOAQAO/XFd8a7zj/AP/8/wDr8wrhAP8A+x8AFPcQ/wTPIL8I/uAM4/EU5f8DAP8IAA/kBwnfAOz3ENcL/wAK5x/wDwD4//T/7x7v7f8C4wrnF+oLEO8CBOsg7vf7DO/p/+kX4B8AFeAN+BjAH+D/8Av08f//B+vzFwD9APMAFeQQ9/wG9v7gBNkf6PcF6vkI6hjiDAToBP//A//0/wD/AP/oD+AMwQ/o//Pw688XvxTf6gD90BPwAAsA/+D/8wj7Au3/APYA9wDfBP8A/wD/EOfk/wD/APMY2iD78P/wBwDo7B/hP9cM//DvIO8A/w/4+wD1APcP9/b/EA8A6xDnAPfg9w7oGNsI/QD/AO8PAPof4B/3/P/r8P/w9wz/8A0A/QAJ6vcM8vcA9/AAzwDfBO8N7t8a5wHw6yDn8P/zFdf/EO8ABwDo/xD/9uT/BOrgCwDgD/AIB+AfAP/39ybw/wAW8O8AC+MK7h/aD/8E7+z/Bfj/8A//7P/r/vcNABbgDwAP1f//6ADu9SDmEPsQ5wAa6AD/AAT/7wIL7OILAPD/8RzgAO3/BPv7D+cM6BXk/wnqGOjvFwD+/wf09/L/+PzXH+/+6w3gBNcA9wDvHu/4//8A5wz3FP/oEwDvAO8S8P3wAvrvBu//6Pfr/fH++AcA+/Yc6O8L/QIB5x/0+PcU0fr/AOX/6wvs9/Eg6QDnEPjtEO0E9eAd4AAK/wD79wj37OoI9PDvD/n77xT/APcYBP/fH/H/7wz/APsL7O/7AAvQ9+8C3/b96vkC6A/U//sA9/MH6xDXAvoI4B7wCgLvEPP48wj/AP8A6A/rIO8A6gL2AO4PEO8A9x3fJ+8c8/gPAPMP5wDn/wD3AusL3/b1AP0Q5xDq/wjvEOcA9wD/AP8A/wDlC+vw//D79vv/Ae8D+/r1AOcQ8gfyC/f/+gLwCOgL4/8A7QDz8O8AA+zzEPj58AsA/wQJ8PcACPD4/wj6/wT///r/CP/4/wAMzBjz7wjvBvL3Cvn5CfwPAPP//wbv/wMEF98P/+j/+fAD5/AM4P/o/+/w+wD19wIQ6v4PAO8A+Afw7wjr8gDjAOPxEPMA8A8A7/8A9wjwEP3qEA0A//D/9f797wjz+Pv2//fy//j2AvcJ+wD/4Q/d/wfoBeMH5//2/fD3+PsC7wj/8PcA/wDv/wD7APsACOkIBfTy/wDz+N/0BuLy+/bv//8C9+wPAPcACwDzD/cM//YXAPkA/P8A6xD26Pv6AOP/8/jx8Q0A/wQH8gv8/xXr+P/nD+cL7xD/5BfoDwD3+O3+APkA4/8U5fD/ABDpC+cA7wL/+OvvAPPb//MK6P/w+/D/EOgT6BoA8g8AEO8g+wj7+BHw6P8AGuDwDfDr9O8I2w/vC+jPMO8U+gYL+P8Q/P/wFwDn+v8A7wThBej0/+D74O/96P8A7wD/9/8U/QgLAPcQ6xfy+Af38O/w+/j7AAfy9/cA/+j/+v/g//DvGPb9DvAPBAH5//MI7vv3Af/4/wD/9xTrFPT/AP/u/f749e3/8PcQ/usQ8BHg+wj2+PcH9P3x/xXg/xEA//ADC/DzA//Y/wTs6/jn/ez/8P3/8AUAAOsLEOgL4P8U5AsA//kDA/D78ADr6PH3ENf79fHnCwD49wUV3x7vGAPzBgD2/Aj/8Af4AP/vFO/v//fg9O8A4vYE9PQDDvjy/wLxCOgPAP8A/u8G9Azg+wAA8/sI9wAO8P30AA747P8I6Av3/wj0BOAP5//nDt8A6wfoAfX7BfjvDfj1CvMP+PcFAuoA8RDz+xDnCucH9+T/7PcA6AjZB+ME5/QM+QDzCvcf5xr3+P3/7P/w/wTv//j/DPr28v8A5Avg//jvCwDt/wD35f/y+/T7APTzBPoA8gD/Au8JCO8HFO8Q7wD/8vP/8P/oD+D/8vsE8vz2/gT1+P8ABwDvBAf0//kN7/8I/fjqF/Ty9wjv/PUI8fr7AADnAO8A8/3xDvD3Aff5B/MT5wYH3xHr//b/8gDyCOcP8P/o/xDy9f7++e3wDeD2/wfnC+cTAOcE8wrtDwDt/wDy/9cb6/8A///9B/j79AjkCOQA7/D3B+sJ9Qf4APcQ9v8Q6wDrFO//8g8A1/8A/vMC/wDl/wHy5wDrBecG/wj39w/1AgL+//rvAPv2AOME7/D/7gLz//sA7/71/+jnC+oI6P7++/v/9f33D/j2BwAH6AsI6wv1FvAI9gf88/vw+vznCvjr+Pf39O8E/f389w/pF/EN/fn7CPL6//0A8AD/AOsH9A7g/wD77Pvz+PfsEOUH8RXw//gW6ATwCe3/6w8A9vcG+/3+7yDYCugB8/LzD+j9APUA7wP8+/IC9AnVD+UL6/8A/fT9C98U7xTsAPcE6P/5C+cQ9P7/9w34CPUA/wDnCOsD8/r3DOT/8P/67gz2BPP46xXfD/jxA/YD9QzyEOQI5wD78Pz/APnyCOoD8f8A+QD7AP8A9wD3BPD/9PcG+wjwAAn47wz3+fX/APz99v///PcQ9vv7+ALk/wAA7/D/9O/2//fw//rw/wD3Ce//APny/wD3AP/4/v8A9QD/8A7kEPD3/PL98AXy+PsC8f/4E/QE6P/w/9sP9P/rBfry/fcH7wD1Buj/BPQE8wj/AAP4/wDu/wAI5ALzCOcLAPcA7f/+7f8G7/3gD+D/6f/49/YK8P38BgLvDP0Q5wD/EOv9/wbs+wD18vz59ADhDen/+vr3AvsI9wT5+xDy9gcI9/j7+f7+9gT3APMA8fcQ8wD7AP0F+gf6APn6/wD19wP4+/r3BQDrBv/6//j/9PcA/f/47wj18P7sEO/7BPD88AL38fMCAOn+Avb4/wD5+vcDAOv//P/1/P/8+/z/9Pj/BADt9w0A7wD1APfp//n69frzAu/7B+7/+P3/7v8A9/r7APjyAv//9P/x//X//fr/APX4+QIA+gD7AP70APsA7/zx+/j1+vr0+/b/9v8A//gE9QT/9P/+COz5BwDu/wAH8PT/COcI7frv9QPw+/kB9vn3DPr69v/59fME8wLz/wDvCO8Q7f4H8Af4BADy8wTz/vj7AP/z/vv/7QD3APcA9wD47wXtCP3vC/j7AP4DAPMI+/TvCPcA9fUAAAAAIv/f6Dm/yAvFAB8aGRIhGyYiMAxTADJJ8Aj469vQybmlrqeqqbK7xMjU5O/0+hg/Kj8+S2BmaW1ramhjW1tLRD8wJhwQA/bs3dXCwLaor4irgJ2NjpGUmJ+mrbPBx83f6PH7BxMeLzlHUVhpa3R7eX92f3BxamRdWUs/QDIvHxoKBf/t4tzUycXAsaqjmqCUnpOTmY+cnaOprrG4v8bM2d7l7/j/CgsXHSgvMD09Q0FISElLTU1RSEdKR0hHQ0Q9Pzw3NDIvLCglHR0WEQ4LBP75+O/u6OPh2tXQzcjAwL+6tbSzrrCsrausrK2wsrW5vcLGzdLX3+Xp8/f9AwsRFxwlKzE4PkNKT1JWWVxeX19fXVxYVVBMSEI9NzErJiAZEw0IAfz38Ovn4dzX087Lx8XCv7++vby8vb+/wsPGyMzP0tbZ3eHl6e3w9fj8/wIFCAsNDxIUFhgZGhwcHB0dHh4dHRwcGxsZGBcWFRQTEREPDg0MCwoJCAYFBAQDAgH//////v38/Pv6+fj4+Pf29vb29fX09PT19PT08/T09fX19fX19vb39/f4+Pj5+fn5+vv7/Pz8/f3+/v7/////////AQICAgICAwMDBAMDBAQEBAQEBAQEBAQEBAQEAwQDAwMDAgMDAgICAQIBAQH/Af///////////////wAAAAAr1X9/gICAgYOBg+mHgMiEgON/f3+nf39/f39/f39/f39/NsvTmr8mDQx/hxB/f39/f39/f2fBgoCAgYGBgoKBgYmBgIGBgYGBgYGBgYGBgYGBgYGBhstMcX9/f39/f39/f39/f39/f39/f39/f3X5pJaBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYKSrpeAKWQaZOZ/YX9/f39/f39/f399+3/gfx4hXDzy1/k2miG3/v/AyqeDnoOAgoGBgYGBgYGBgYGBgYGBgYGMu9OkRBbxqn9/QX9pf39/f39/f39/f39/f39/IE+XG7WAgICBgYKBgYGBgYGBgYGBgYGBgYGBgYGQl7mKfLl/AX8qfz9/f39/e39/f39/f39dfxh/Lk4LelLMf9Gr9xSGgICBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgafUhaheGVZ/IH9/f39/f39/f39/f39/TH9/5DTo046JnoOAgoGBgYGBgoGBgYGBgYGBgYGBgYGBgYiCrZUB0dh/EDh8e39/ZH9/f39nf3Z/QmBHfSx/T5t/EeawGhbNsYOehbGEo7SBgIOBgYGBgYGBgYGBh4qBgMaG9cby0lvEfwhbf39vb39/f0d/f2Z/fn9/fVJ/KwT6abUEqcmHmo6AhoeCgZmDnoKAvYadjIich4Cd1oHJyI7dsgT7Hv1fHEBqf/1lcj9/fzAvf3hEXSd/fzIxf8RzMW81Lw0kEifYsybCiNuZgIGCoISLg4iCgYGCgYOCjai+qfWkDvHrX9FVQiB5GH8rdX8xf39/cn9/bXpQf0xWa2grtyokI5EBpwGhnYT7j6TBgPCWj8+IjeGHgMOGma2nh7+68LQT7U7cI2j5f1p/Sn9Tf09/a1p/fydzfwt/eSNKLDdDK+r9Grzt3AaJ4K2AqYWbnYCAgbCEhYKYjIWeqKOj5x2t5M1k1lQff/NBf1tKf3V/LX9/E1dff1NkNn89SU0IQhHz+Pm4ArzippGdwY+Aj5mqhb+Hm56Mnci0j7Hx367y+P/dLhEfPw5oBFxPPGhXM393KlJ/ZzlnKnNXWTdsF2stDkXZRA+r/9uf9q+B1L6NgqCZo5bThYCpwICd26ausQK4/+76Pw4UNCtUQX8TfWphfkF/Wl4xdTJuVxc/QfclFxUmEOnv894H0cTgt7nakvekxqem4bOKiMe43KHpq/uYJO3w4Q4V+0fbIywlLRMlMTlDM1AoUHEybSJHWkRfAVtlRxQ4GBIr7+3/4PDIzbmq8I7wkLqrmI7Or6zOmLXhquP06PkP0zb8EywJKlYFHlUjUSxALV0vMzlPElQcQSZBFyA9Aikq+BIYAgbk1vXot+LJCaXO1LPbuLmf8o/K0ASX9LAN6tgB3//8EekEHwIWG/ti9kkSOB1KXSccXD9IKExAPTREJEcLIiPo+SD11uv10N3Rz92027Cyub7LsLLIt8LM3Lvb8P3DGBjp5gUvHAkPJQ01AkkQUQ9TDV8RRyc1ODo2KEYcIzwqCw8R/xAE7/bp2cjf79jK1OfO3s62wcfPs/vN1fK65fnz3eEG/Pfu9wsNGQoYNhQ4QRkmT0MtOEc9OhxCQSI1O0AGQf8g/BoI0ADq0dfOxtLWuNmurdSzyqjevNLHudjp1+zv9BvdAg//GB/8LCAaITUsHEEyNTE1LzUvLS8YMiE0CDERIQMbDgLoAvnu49jYAAAAAI2KhoOCgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgZNvf39/f39/f39/f39/f39/f39/f39/fXp2c29saWViXltYVFBMSEVBPTk1MS0pJSEdGhYTDwwIBAH9+fbz8O3qAAAAAEQwJBkTCcnB6pqvjaDHvtDc4+fs8fb8BAkPKn80R39wUTwUDxQ5UEcuFwcdAAAAAEQwJBkTCcnB6pqvjaDHvtDc4+fs8fb8BAkPKn80R39wUTwUDxQ5UEcuF77QAAAAAEQwJBkTCcnB6pqvjaDHvtDc4+fs8fb8BAkPKn80R39wUTwUDxQ5UEegx77QAAAAAEQwJBkTCcnB6pqvjaDHvtDc4+fs8fb8BAkPKn80R39wUTwUDxQ5r42gx74dAAAAAEQwJBkTCcnB6pqvjaDHvtDc4+fs8fb8BAkPKn80R39wUTwUD+qar42gFwcdAAAAAEQwJBkTCcnB6pqvjaDHvtDc4+fs8fb8BAkPKn80R39wEwnJweo5UEcuFwcdAAAAAI2KhoOCgYGBgYGBgYGBgYGBgYGBgYGBgQAAAACNgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgYGBgZNvf39/f39/f39/f39/f39/f39/f39/fXp2c29saWViXltYVFBMSEVBPTk1MS0pJSEdGhYTDwwIBAH9+fbz8O3q");

function b64dec(base64) {
    var s = atob(base64);
    var bytes = new Uint8Array(s.length);
    for(var i = 0; i < s.length; i++)
        bytes[i] = s.charCodeAt(i);
    return bytes;
}

class Modplay {
    load(data) {
        let p = 1080;
        function rstr(n) {
            let r = '';
            for(let i = 0; i < n && data[p+i]; ++i)
                r += String.fromCharCode(data[p+i]);
            p += n;
            return r;
        }
        function rw() {
            return data[p++] * 256 + data[p++];
        }
        function rb() {
            return data[p++];
        }
        if(rstr(4) != "M.K.")
            throw "not protracker";
        p = 0;
        this.title = rstr(20);
        this.smps = [];
        for(let i = 0; i < 31; ++i) {
            p = 20 + i * 30;
            let smp = {
                name: rstr(22),
                len: rw()*2
            };
            let v = rb();
            smp.tune = (v & 15) - ((v & 8) << 1); // 1/8th of a semitone
            smp.tune2 = 2 ** (smp.tune / 96)
            smp.vol = rb();
            smp.loop_start = rw()*2;
            smp.loop_len = rw()*2;
            //if(smp.len <= 2)
            //    smp.len = 0;
            this.smps.push(smp);
        }
        this.playlist_len = rb(); p++;
        this.playlist = [];
        for(let i = 0; i < 128; ++i)
            this.playlist.push(rb());
        let num_pat = Math.max(...this.playlist) + 1;
        p += 4;
        this.patterns = [];
        this.nc = 4;
        for(let i = 0; i < num_pat; ++i) {
            let pattern = [];
            for(let i = 0; i < this.nc; ++i)
                pattern.push([]);
            for(let k = 0; k < 64; ++k) {
                for(let j = 0; j < this.nc; ++j) {
                    let x = rw(), y = rw();
                    pattern[j].push({
                        period: x & 0xFFF,
                        effect: ((y >> 8) & 0xF).toString(16),
                        param: (y & 0xFF),
                        sample: (x >> 8) & 0xF0 | y >> 12});
                }
            }
            this.patterns.push(pattern);
        }
        for(let i = 0; i < this.smps.length; ++i) {
            let smp = this.smps[i];
            if(smp.len) {
                smp.data = new Int8Array(smp.len);
                for(let j = 0; j < smp.len; ++j)
                    smp.data[j] = data[p+j];
            }
            p += smp.len;
        }
        return this;
    }
}

let mp = new Modplay().load(moddata);
const CLOCK_PAL = 7093789.2 / 2;
ditty.mspeed = 60;

input.show = 0; // min=0, max=1, step=1 (tracker, comments)

// this merely updates the text in the debug box
function put_text(pat, pos) {
    if(input.show) {
        debug.log('0', mp.title);
        for(let i = 0; i < 4; ++i) {
            let x = Math.abs(Math.sin((pos+i)/16*Math.PI)) * 6;
            debug.log(i+1, ' '.repeat(x) + mp.smps[(i + (pos>>4)) % 10].name);
        }
    }
    else {
        let note_names = ['C', 'C#', 'D', 'D#', 'E', 'F', 'F#', 'G', 'G#', 'A', 'A#', 'B']
        for(let k = 0; k < 5; ++k) {
            let c = [];
            let t = pos + k;
            if(t < 64) {
                c.push(t.toString().padStart(2, '0') + '');
                for(let i = 0; i < 4; ++i) {
                    let col = pat[i][t];
                    let note = Math.round(Math.log2(13696 / col.period) * 12);
                    let s = [
                        col.period ? note_names[note % 12].padEnd(2, '-') + Math.floor(note/12) : '---',
                        col.sample ? col.sample.toString().padStart(2, '0') : '--',
                        col.effect != '0' ? (col.effect + col.param.toString(16).padStart(2, '0')).toUpperCase() : '---'
                    ];
                    c.push(s.join(' '));
                }
                c.push('');
            }
            debug.log(k, c.join(' | '));
        }
    }
}

input.clock = 1; // min=0.1, max=4, step=.01
input.start = 0; // min=0, max=16, step=1

class Channel {
    constructor(opt) {
        this.active = 0;
        this.smp = mp.smps[1];
        this.vol = 64;
        this.period = 1;
        this.sp = 0;
        this.pl_pos = input.start;
        this.pat_pos = 0;
        this.pat_jump = 0;
        this.tick_pos = 0;
        this.row_ticks = 6;
        this.clock = 0;
        this.channel_no = opt.channel_no;
        this.speed = 125;
        this.filt = 0;
        this.arp_fluct = 1;
        this.vib_amp = 0;
        this.vib_speed = 0;
    }
    tick() {
        if(this.tick_pos == 0) {
            this.arp_fluct = 1;
            if(this.channel_no == 0)
                put_text(mp.patterns[mp.playlist[this.pl_pos]], this.pat_pos);
            this.col = mp.patterns[mp.playlist[this.pl_pos]][this.channel_no][this.pat_pos];
            
            for(let i = 0; i < mp.nc; ++i) {
                let col = mp.patterns[mp.playlist[this.pl_pos]][i][this.pat_pos];
                if(col.effect == 'f') {
                    if(col.param <= 32) {
                        this.row_ticks = col.param;
                    }
                    else {
                        this.speed = col.param;
                    }
                }
                else if(col.effect == 'd') {
                    this.pat_pos = 63;
                    this.pat_jump = (col.param >> 4) * 10 + (col.param & 0xF);
                }
            }
            
            if(this.col.period) {
                this.active = 1;
                this.sp = 0;
                this.period = this.col.period;
            }
            if(this.col.sample) {
                if(this.col.sample < mp.smps.length)
                    this.smp = mp.smps[this.col.sample - 1];
                this.vol = this.smp.vol;
            }
            if(++this.pat_pos >= 64) {
                this.pat_pos = this.pat_jump < 64 ? this.pat_jump : 0;
                this.pat_jump = 0;
                if(++this.pl_pos >= mp.playlist_len)
                    this.pl_pos = 0;
            }
            let upper = this.col.param >> 4;
            let lower = this.col.param & 15;
            switch(this.col.effect) {
                case '0': break; // arpeggio, handled below
                case '1': break; // slide-up, handled above
                case '2': break; // slide-down, handled above
                case '4': // vibrato
                    if(lower)
                        this.vib_amp = lower;
                    if(upper)
                        this.vib_speed = upper;
                    break;
                case '6': break; // volume slide + vibrato
                case '9': // set sample position
                    this.sp = this.col.param * 256;
                    break;
                case 'a': break; // volume slide, handled below
                case 'c': // set volume
                    this.vol = this.col.param;
                    break;
                case 'd': break; // pattern break
                case 'e':
                    switch(upper) {
                        case 1: // fineslide up
                            this.period = Math.max(this.period - lower, 113);
                            break;
                        case 2: // fineslide down
                            this.period = Math.min(this.period + lower, 856);
                            break;
                        default:
                            console.log(`unknown effect E${upper}`)
                            break;
                    }
                break;
                case 'f': break; // handled above
                default:
                    console.log(`unknown effect ${this.col.effect}`)
                    break;
            }
        }
        else { // the rest of the ticks
            let upper = (this.col.param >> 4) & 0xF, lower = this.col.param & 0xF;
            switch(this.col.effect) {
                case '0':
                    let arp = [0, upper, lower];
                    this.arp_fluct = 2 ** (arp[this.tick_pos % 3] / 12);
                    break;
                case '1':
                    this.period = Math.max(this.period - this.col.param, 113);
                    break;
                case '2':
                    this.period = Math.min(this.period + this.col.param, 856);
                    break;
                case '6':
                case 'a':
                    let up = (this.col.param >> 4) & 0xF, down = this.col.param & 0xF;
                    if(up)
                        this.vol = Math.min(64, this.vol + up);
                    else if(down)
                        this.vol = Math.max(0, this.vol - down);
                    break;
            }
            if(this.col.effect == '4' || this.col.effect == '6') {
                let pha = this.pat_pos * this.row_ticks + this.tick_pos;
                this.arp_fluct = 2 ** (this.vib_amp * Math.sin(pha * this.vib_speed / 64 * Math.PI * 2) / 192);
            }
        }
        if(++this.tick_pos >= this.row_ticks) {
            this.tick_pos = 0;
        }
    }
    process(n,e,t,o) {
        if(this.clock >= 1) {
            this.clock -= 1;
            this.tick();
        }
        this.clock += input.clock * ditty.dt * this.speed * 24 / 60;
        let v = 0;
        if(this.active && this.smp.data) {
            if(this.sp < this.smp.data.length)
                v = this.smp.data[~~this.sp] * this.vol / 8192;
            this.sp += input.clock * ditty.dt * CLOCK_PAL * this.smp.tune2 * this.arp_fluct / this.period;
            if(this.smp.loop_len > 2) {
                if(this.sp >= this.smp.loop_len + this.smp.loop_start) {
                    this.sp -= this.smp.loop_len;
                }
            }
            else if(this.sp >= this.smp.len) {
                this.active = 0;
            }
        }
        this.filt += (v - this.filt) * .001;
        return v - this.filt;
    }
}

let sy = synth.def(Channel);
for(let i = 0; i < 4; ++i) {
    loop(lc => {
        sy.play(c4, {duration:1e10, channel_no:i});
        sleep(1e10);
    }, {name: 'channel ' + (i+1), pan: i & 1 ? -.3 : .3});
}