Turbo Joystick
1. Instrucción
Si es un joystick con teclado Coleco de Colecovision es compatible con ATARI para las series XL/XE, La empresa Turbo Software le dio un nuevo uso a este equipo que a continuación se describe en su manual oficial.
2. Manual
El Turbo Joystick fue creado con todas las ventajas de un joystick moderno, más el hecho de tener un teclado numérico de aplicaciones múltiples incorporado.
Dicha ventajas consisten en ser igualmente cómodo para zurdos como para diestros, tener una palanca de alto impacto, poseer doble botón de disparo, cable espiral, conector reforzado y diseño anatómico.
El path numérico incorporado es de fácil programación para adaptarlo a las necesidades de cada usuario. Puede ser utilizado como calculadora, como medio para ingresar datos a un juego o utilitario para que se efectúen determinados comandos en un lenguaje cualquiera, etc.
Para saber cual de los botones ha sido presionado basta con leer la posición de memoria 54016. En BASIC a través de la instrucción PEEK. Por Ejemplo escribe este sencillo programa y ejecútalo con la instrucción RUN.
10 ? PEEK(54016) 20 GOTO 10 RUN
Al ir oprimiendo cada tecla del joystick irpas viendo un número que identificará la tecla apretada.
El Turbo Joystick posee una ranura en su parte derecha para poder ingresarle una tarjeta para recortar el valor de cada tecla, según la aplicación con la que se utilice.
Como ejemplos de aplicación del teclado numérico te entregamos dos programas en BASIC, un para utilizarlo como calculadora y otro para redefinir el teclado para programar. Tipéalos y guárdelos en cassette con la instrucción CSAVE o en diskette con la instrucción SAVE"D:CALCULA.BAS". Para ejecutarlos ingresa la instrucción RUN.
2.1. Ejemplo 1 Calculadora
Para usarla, fabrique una tarjeta con el siguiente formato y ponla en la ranura anteriormente mencionada.
1 + | 2 - | 3 x |
4 / | 5 ^ | 6 SQR |
7 LOG | 8 SIN | 9 COS |
SHT | 0 | = CLR |
Como vemos, cada tecla tiene dos posibles funciones, un número o un signo matemático. Al oprimir cualquier tecla funcionará la parte numérica, pero si se oprime antes la tecla SHT o SHIFT, tendrá valor el signo matemático. El programa es el siguiente :
5 DIM AUX$(20) 10 GR. 0:POKE 710,1:POKE 752,1:TRAP 800:I=1:DEG 20 ? "+------------------------------+" 30 ? "|+-----------+ |" 40 ? "|| 0 | TURBO JOYSTICK |" 50 ? "|+-----------+ |" 55 ? "| |" 60 ? "| [1] [2] [3] [ + ] [ - ] [AC] |" 65 ? "| |" 70 ? "| [4] [5] [6] [ * ] [ / ] [C ] |" 75 ? "| |" 80 ? "| [7] [8] [9] [SQR] [POT] |" 85 ? "| |" 90 ? "| [0] [.] [=] [SEN] [COS] [NUM]|" 95 ? "| |" 100 ? "+------------------------------+" 105 SEN=0:TOTAL=0:LINEA=0:SEN2=0 110 T=PEEK(54016)-200 115 IF T=55 THEN T2=55:GOTO 110 116 IF T=T2 THEN 110 117 T2=T:IF T=45 THEN 170 118 IF T=50 AND SEN=0 THEN GOSUB LINEA:GOTO 105 120 T2=T:T=(T=47)+2*(T=51)+3*(T=46)+4*(T=48)+5*(T=49)+6*(T=54)+7*(T=43)+8*(T=41)+9*(T=53):T=T+10*(T2=50) 130 IF SEN=0 THEN 150 131 IF T<>0 THEN 135 132 IF SEN2=1 THEN 110 133 AUX$(I,I)=".":I=I+1:SEN2=1:POS. 3+I,2:? " ":IF I>14 THEN I=14 134 GOTO 180 135 SEN2=0:IF LINEA=0 THEN 400 137 IF T=10 THEN GOSUB 460 140 GOSUB 600:LINA=200+T*10:GOSUB LINEA:GOTO 160 150 IF I=1 THEN GOSUB 600 155 AUX$(I,I)=STR$(T):I=I+1:POS. 3+I,2:? T:IF I>14 THEN I=14 160 GOTO 110 170 IF SEN=0 THEN POS. 34,11:? "OPE":SEN=1:GOTO 110 180 POS. 34,11:? "NUM":SEN=0:GOTO 110 210 TOTAL=TOTAL+VAL(AUX$):GOTO 500 220 TOTAL=TOTAL-VAL(AUX$):GOTO 500 230 TOTAL=TOTAL*VAL(AUX$):GOTO 500 240 TOTAL=TOTAL/VAL(AUX$):GOTO 500 250 TOTAL=TOTAL^VAL(AUX$):GOTO 500 400 IF T>5 THEN GOSUB 410+(T-5)*10:TOTAL=0:LINEA=0:GOTO 180 405 LINEA=200+T*10:GOSUB 210:GOTO 180 420 TOTAL=SRQ(VAL(AUX$)):GOTO 500 430 TOTAL=LOG(VAL(AUX$)):GOTO 500 440 TOTAL=SIN(VAL(AUX$)):GOTO 500 450 TOTAL=COS(VAL(AUX$)):GOTO 500 460 GOSUB 500:GOTO 180 500 GOSUB 600:POS. 5,2:? TOTAL:I=1:AUX$="0":RETURN 600 POS. 5,2:? " ":RETURN 800 TRAP 800:GOTO 105
2.2. Ejemplo 2 Redefinición del Teclado
Este programa te permite con sólo oprimir una tecla ingresar instrucciones completas de BASIC. Por ejemplo, en lugar de tipear la instrucción PRINT, bastará con oprimir la tecla del joystick correspondiente.
Para utilizarlo fabricarte la siguiente tarjeta :
SAVE 1 LOAD | RUN 2 NEW | CSAVE 3 CLOAD |
GOTO 4 GOSUB | RETURN 5 END | FOR 6 NEXT |
OPEN 7 CLOSE | INPUT 8 CLOSE | POKE 9 PEEK |
SHIFT | LIST 0 BYTE | RETURN |
En este caso, cada tecla tiene tres valores posibles, uno numérico y dos de instrucciones. Con el botón del joystick puedes cambiar de número a instrucción y viceversa y con la tecla SHIFT del comando de arriba al de abajo.
El programa una vez ejecutado se borra a si mismo por lo que deberías tener la precaución de guardarlo antes de ejecutarlo.
El programa una vez corrido queda resistente en memoria. Puedes usar el computador normalmente con BASIC, salvo que al oprimir las teclas del joystick estas funcionarán.
80 POKE 106,124 90 GR.0:POKE 710,0 91 POS. 10,10:POKE 752,1 92 ? "DEFINIENDO EL TECLADO" 93 SUM=0 100 I=0 110 TRAP 400 120 READ VAL 121 SUM=SUM+VAL 130 POKE 32768+I,VAL 140 I=I+1 150 GOTO 120 400 IF SUM=51884 THEN 500 410 ? 450 ? "ERROR EN DATA, REVISE EL LISTADO" 460 END 500 X=USR(32768) 501 POS. 10,10 502 ? " TECLADO DEFINIDO " 503 POKE 752,0 504 NEW 510 END 20010 DATA 104,169,7,162,128,160,28,32,92,228,169,0,141,205,128,141,206,128,141 20020 DATA 209,128,141,204,128,141,211,128,96,173,211,128,208,120,173,16,208,240,7,169,255,141,206,128,208 20030 DATA 18,173,206,128,240,13,169,0,141,206,128,173,204,128,73,255,141,204,128,173,0,211,141,207,128 20040 DATA 201,255,208,8,169,255,141,205,128,76,98,228,173,205,128,240,248,169,0,141,205,128,173,207,128 20050 DATA 201,245,208,12,173,209,128,73,255,141,209,128,169,0,240,224,201,250,208,7,169,12,141,252,2 20060 DATA 208,213,169,255,141,211,128,162,0,173,207,128,221,53,130,240,7,232,224,12,208,243,240,191,189 20070 DATA 41,130,141,212,128,169,0,240,181,174,212,128,173,204,128,208,6,189,177,129,24,144,14,173,209 20080 DATA 128,208,6,189,213,128,24,144,3,189,67,129,201,255,240,9,141,252,2,238,212,128,24,144,140 20090 DATA 169,0,141,211,128,141,209,128,240,130,255,255,255,255,0,0,0,0,105,62,63,16,42,94,58 20100 DATA 255,8,9,0,40,11,35,12,255,6,7,8,9,0,18,62,63,16,42,12,255,8,9,0,61 20110 DATA 8,45,8,33,255,7,8,9,0,40,42,45,11,40,35,255,8,9,0,56,8,40,33,255,6 20120 DATA 7,8,9,0,8,10,42,35,33,90,255,8,9,0,13,35,10,11,45,33,255,8,9,0,10 20130 DATA 8,5,42,33,255,7,8,9,0,0,13,62,45,12,255,7,8,9,0,0,13,62,45,12,255 20140 DATA 7,8,9,0,0,8,63,58,94,58,255,7,8,9,35,42,46,12,255,6,7,8,9,0,18 20150 DATA 0,8,63,58,12,255,8,9,0,61,8,62,11,21,33,255,8,9,0,42,35,58,255,5,6 20160 DATA 7,8,9,0,35,42,22,45,33,255,7,8,9,0,18,0,8,62,42,33,90,255,9,0,10 20170 DATA 40,13,35,45,33,255,8,9,0,10,42,42,5,33,112,255,8,9,0,21,43,42,12,255,6 20180 DATA 7,8,9,0,21,43,42,12,255,6,7,8,9,0,31,255,32,32,32,32,32,32,32,32,30 20190 DATA 255,32,32,32,32,32,32,32,32,26,255,32,32,32,32,32,32,32,32,24,255,32,32,32,32 20200 DATA 32,32,32,32,29,255,32,32,32,32,32,32,32,32,27,255,32,32,32,32,32,32,32,32,51 20210 DATA 255,32,32,32,32,32,32,32,32,53,255,32,32,32,32,32,32,32,32,48,255,32,32,32,32 20220 DATA 32,32,32,32,55,255,32,32,32,32,32,32,32,32,50,255,32,32,32,32,32,32,32,32,55 20230 DATA 255,32,32,32,32,32,32,32,32,0,10,20,30,40,50,60,70,80,90,100,110,247,251,246,248 20240 DATA 249,254,243,241,253,245,252,250,0
Sin duda hay muchas aplicaciones más que esperemos te entretengas en descubrir. Con estos ejemplos tienes las armas suficientes para intentarlo.
2.3. Condiciones de la garantía
El joystick está garantizado durante un período de 12 meses a contar desde la fecha de compra cubriendo todo desperfecto de fabricación en sus componentes electrónicos. Tubo Software garantía la sustitución gratuita de las piezas electrónicas examinadas en nuestro taller que fuesen halladas defectuosas.
La empresa no se responsabiliza por los daños producidos a los equipos utilizados por este producto.
Para los efectos de cubrir la garantía, el producto deberá ser remitido a nuestras oficinas con todos los gastos de envió pagados, junto al comprobante de compra (Factura o Boleta).
Quedan excluidos de esta ganancia los daños ocasionados por el mal uso del joystick tanto en su cable como en el bastón y en el teclado.
3. Imágenes de la caja
A continuación las imágenes frontal, de un lado y del otro.
![]() | ![]() | ![]() |
4. Descarga
Descarga un ATR con ambos programas ya tipeados.
5. Agradecimientos
Marcelo Savio : Por facilitar las imágenes de la caja y manual.