#!/bin/sh # the next line restarts using wish \ exec wish8.3 "$0" "$@" # Sony-compatible TV Remote (extended) # Copyright 2002 by Eric P. Scott. All rights reserved. # # Redistribution and use in source and binary forms, with or without # modification, are permitted provided that the following conditions # are met: # 1. Redistributions of source code must retain the above copyright # notice, this list of conditions and the following disclaimer. # 2. Redistributions in binary form must reproduce the above copyright # notice, this list of conditions and the following disclaimer in the # documentation and/or other materials provided with the distribution. # # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE # ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # SUCH DAMAGE. # # @(#)sonytv+.tcl 1.0 (EPS) 6/22/03 package require Tk 8.3 # edit as appropriate set device {/dev/cuaa2} # work around bug in /usr/local/lib/tk8.3/tk.tcl # if {[info exists tcl_platform(os)]} { # if {$tcl_platform(os) == "FreeBSD"} { # event add <> # } # } array set sircs { 0 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 54} 1 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 2 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 3 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 4 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 5 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 6 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 7 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 8 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 9 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 10 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 11 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 12 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 13 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 14 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 15 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 16 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 17 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 18 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 19 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 20 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 21 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 22 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 23 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 24 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 25 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 26 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 27 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 28 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 29 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 30 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 31 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 32 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 33 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 34 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 35 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 36 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 37 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 38 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 39 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 40 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 41 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 42 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 43 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 44 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 45 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 46 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 47 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 48 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 49 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 50 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 51 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 52 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 53 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 54 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 55 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 56 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 57 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 58 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 59 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 60 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 61 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 62 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 63 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 64 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 46} 65 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 66 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 67 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 68 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 69 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 70 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 71 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 72 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 73 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 74 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 75 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 76 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 77 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 78 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 79 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 80 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 81 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 82 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 83 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 84 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 85 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 86 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 87 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 88 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 89 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 90 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 91 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 92 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 93 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 94 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 95 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 96 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 38} 97 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 98 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 99 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 100 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 101 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 102 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 103 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 104 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 105 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 106 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 107 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 108 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 109 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 110 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 111 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 112 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 31} 113 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 114 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 115 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 116 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 117 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 118 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 119 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 120 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 23} 121 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 122 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 123 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 124 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 15 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 15} 125 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 126 {\{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 15 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8} 127 {\{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 15 \{ 1 \177 7 \[ 8 \177 7 _ 1 \[ 7 \177 8 \[ 7 \{ 1 \177 7 \[ 8} } proc beam {cmd} { global sircs sir foreach {s c} [concat \[ 30 $sircs($cmd) \\177 300 \ \[ 30 $sircs($cmd) \\177 300 \[ 30 $sircs($cmd) \\177 300] { puts -nonewline $sir [string repeat $s $c] } flush $sir } if {[catch {set sir [open $device {WRONLY NOCTTY}]} why]} { # POSIX ENOENT => wrong platform or os? (e.g. Linux /dev/ttyS2) # POSIX EACCES => chmod or fbtab # POSIX ENXIO => check kernel configuration tk_messageBox -icon error -message "$why" \ -title "Couldn't open IR port" -type ok exit 1 } fconfigure $sir -buffering full -translation binary if {$tcl_platform(platform) == "unix"} { switch $tcl_platform(os) { "FreeBSD" { exec "/bin/stty" -f $device -crtscts clocal -hupcl cs7 115200 } "Linux" { exec "/bin/stty" -F $device -crtscts clocal -hupcl cs7 115200 } default { exec "/bin/stty" -crtscts clocal -hupcl cs7 115200 < $device } } } else { fconfigure $sir -mode 115200,n,7,1 } set gb { -background "#33cc33" \ -activebackground "#66ff66" \ -highlightcolor "#ff3333" \ -highlightbackground black } set rb [concat {-foreground gray80 -activeforeground white} $gb] set sb [concat $rb {-font {Helvetica -8 bold}}] set cb [concat $rb {-font {Helvetica -18 bold italic}}] set ub [concat {-activeforeground gray20} $gb \ {-font {Courier -18 bold}}] . configure -background gray20 eval button .muting -text MUTING -underline 0 $sb -command \{beam 20\} eval button .ant -text ANT -underline 0 $sb -command \{beam 42\} eval button .power -text POWER -underline 0 $rb -command \{beam 21\} eval button .sleep -text SLEEP $sb -command \{beam 54\} eval button .display -text DISPLAY -underline 0 $sb -command \{beam 58\} eval button .tvvideo -text "TV/VIDEO" -underline 3 $sb -command \{beam 37\} frame .sep0 -height 2 -background [. cget -background] -borderwidth 1 eval button .1 -text 1 $cb -command \{beam 0\} eval button .2 -text 2 $cb -command \{beam 1\} eval button .3 -text 3 $cb -command \{beam 2\} eval button .4 -text 4 $cb -command \{beam 3\} eval button .5 -text 5 $cb -command \{beam 4\} eval button .6 -text 6 $cb -command \{beam 5\} eval button .7 -text 7 $cb -command \{beam 6\} eval button .8 -text 8 $cb -command \{beam 7\} eval button .9 -text 9 $cb -command \{beam 8\} eval button .jump -text JUMP -underline 0 $sb -command \{beam 59\} eval button .0 -text 0 $cb -command \{beam 9\} eval button .enter -text ENTER $sb -command \{beam 11\} frame .sep1 -height 2 -background [. cget -background] -borderwidth 1 eval button .surround -text SURROUND -underline 1 $sb -command \{beam 41\} eval button .up -text "^" $rb -command \{beam 116\} eval button .mts -text MTS -underline 2 $sb -command \{beam 23\} eval button .left -text "<" $rb -command \{beam 52\} eval button .select -text "+" $rb -font \{Helvetica -14 bold\} \ -command \{beam 101\} eval button .right -text ">" $rb -command \{beam 51\} eval button .reset -text RESET -underline 0 $sb -command \{beam 22\} eval button .down -text v $rb -command \{beam 117\} eval button .menu -text MENU $sb -command \{beam 96\} frame .sep2 -height 2 -background [. cget -background] -borderwidth 1 label .vol -text VOL -state disabled -disabledforeground gray80 \ -background [. cget -background] eval button .vol+ -text + $ub -command \{beam 18\} eval button .vol- -text - $ub -command \{beam 19\} label .ch -text CH -state disabled -disabledforeground gray80 \ -background [. cget -background] eval button .ch+ -text + $ub -command \{beam 16\} eval button .ch- -text - $ub -command \{beam 17\} image create bitmap IR -data { #define IR_width 13 #define IR_height 15 static unsigned char IR_bits[] = { 0x00, 0x00, 0xf4, 0x01, 0x14, 0x02, 0x14, 0x04, 0x14, 0x04, 0x14, 0x02, 0xf4, 0x01, 0x04, 0x00, 0xf4, 0x01, 0x14, 0x02, 0x14, 0x04, 0x14, 0x04, 0x14, 0x04, 0x1c, 0x04, 0x00, 0x00 };} label .badge -image IR -borderwidth 0 -foreground black -background gray80 frame .sep3 -height 2 -relief ridge -borderwidth 1 eval button .erase -text ERASE $sb -command \{beam 121\} eval button .add -text ADD $sb -command \{beam 120\} eval button .autopgm -text "AUTO\\ PGM" $sb -command \{beam 107\} eval button .time -text TIME -underline 0 $sb -command \{beam 48\} eval button .cable -text CABLE -underline 0 $sb -command \{beam 78\} eval button .notch -text NOTCH -underline 0 $sb -command \{beam 79\} eval button .video -text VIDEO -underline 3 $sb -command \{beam 97\} eval button .audio -text AUDIO -underline 3 $sb -command \{beam 98\} eval button .exit -text EXIT -underline 1 $sb -command \{beam 99\} eval button .pic- -text PICTURE- -underline 7 $sb -command \{beam 25\} eval button .pic+ -text PICTURE+ -underline 7 $sb -command \{beam 24\} eval button .test -text TEST $sb -command \{beam 127\} frame .sep4 -height 2 -relief ridge -borderwidth 1 label .logo -text PHONY -font { Times -14 bold } -state disabled \ -disabledforeground gray80 -background [. cget -background] grid columnconfigure . 0 -minsize 74 grid columnconfigure . 2 -minsize 74 grid .muting .ant .power grid .sleep .display .tvvideo grid .sep0 -columnspan 3 -sticky ew -pady 5 grid .1 .2 .3 grid .4 .5 .6 grid .7 .8 .9 grid .jump .0 .enter grid .sep1 -columnspan 3 -sticky ew -pady 5 grid .surround .up .mts grid .left .select .right grid .reset .down .menu grid .sep2 -columnspan 3 -sticky ew -pady 5 grid .vol x .ch grid .vol+ x .ch+ grid .vol- .badge .ch- grid .sep3 -columnspan 3 -sticky ew -pady 5 grid .erase .add .autopgm grid .time .cable .notch grid .video .audio .exit grid .pic- .pic+ .test grid .sep4 -columnspan 3 -sticky ew -pady 2 grid .logo -columnspan 3 grid .1 .4 .7 .left .vol .vol+ .vol- -sticky e grid .3 .6 .9 .right .ch .ch+ .ch- -sticky w wm title . {TV Remote} set g [concat [grid size .]] grid columnconfigure . [lindex $g 0] -weight 1 grid rowconfigure . [lindex $g 1] -weight 1 update idletasks foreach {k b} { M .muting m .muting A .ant a .ant P .power p .power Z .sleep z .sleep D .display d .display V .tvvideo v .tvvideo 1 .1 2 .2 3 .3 4 .4 5 .5 6 .6 7 .7 8 .8 9 .9 J .jump j .jump 0 .0 .enter U .surround u .surround .up S .mts s .mts .left .select .right R .reset r .reset .down G .menu g .menu .vol+ .vol- .ch+ .ch- T .time t .time C .cable c .cable N .notch n .notch E .video e .video I .audio i .audio .pic- .pic- .pic+ .pic+ X .exit x .exit } { bind . $k [list tkButtonInvoke $b] } bind . Q {close $sir;destroy .} bind . q {close $sir;destroy .} bind . {close $sir;destroy .} bind . {close $sir;destroy .} bind . {close $sir;destroy .} bind . {close $sir;destroy .} bind . {close $sir;destroy .} if {$tcl_platform(platform) == "unix"} { # until I think up something clever wm iconbitmap . @/usr/X11R6/include/X11/bitmaps/xlogo32 } # More SIRCS codes: # 26 Color Up # 27 Color Down # 30 Brightness Up # 31 Brightness Down # 32 Hue Down # 33 Hue Up # 34 Sharpness Up # 35 Sharpness Down # 36 TV # 38 Balance Right # 39 Balance Left # 46 System On # 47 System Off # 64 Video 1 # 65 Video 2 # 80 Speaker # 88 (PIP CH+) # 89 (PIP CH-) # 90 (PIP TV/VIDEO) # 91 (PIP ON) # 92 Freeze # 94 (PIP POSITION) # 95 (PIP SWAP) # 100 Picture Mode # 112 Treble Up # 113 Treble Down # 114 Bass Up # 115 Bass Down # 125 Trinitone # Local Variables: # mode: tcl # End: