| SYSTEM X
PRIDE UTILITIES Amstrad CPC 464/664/6128 (CASSETTE) SYSTEM X SYSTEM X usa comandos externos, los cuales son identificados por el signo |, (ba¤a vertical), que preceder al nombre del comanda Esta signo lo conseguir s pulsando SHIFT y la teda @. El nombre puede estar escrito con may£sculas o con min£sculas. Al listar el programa todo aparecer con may£sculas. La sintaxis es ligeramente diferente e los comandos de Basic, puesto que todos los par metros pasados por el RSX deben ser precedidos por une coma. Loe comandos que devuelvan valores en una variable o string, deber n tener la variable o el string asignado a un valor antes de usar el comando y deber n ser precedidos del car cter @ cuando sean usados como un par metro. Comandos |CAPOFF (sin par metros) Este comando desactivar la teda CAPS LOCK dentro del programa, lodos los caracteres le¡dos desde el teclado aparecer n con letras min£sculas. |CAPON (sin par metros) Este comando activar la teda CAPS LOCK dentro del programa, lodos los caracteres le¡dos desde el teclado, aparecer n en letras may£sculas. |CIRCLE (uno o dos par metros) Dibujar un c¡rculo cuyo centro ser la posici¢n actual del cursor gr fica El comando es seguido por el radio del c¡rculo y es dibujado usando el l piz de gr ficos actual. 10 MOVE 320, 200: |CIRCLE, 100 Esta linea dibujar un circulo de 100 de radio en el centro de la pantalla. También puede utilizarse este comando a¤adiendo un segundo par metro. En este caso, el primer par metro se refiere al radio horizontal y el segundo al radio vertical. 10 MOVE 320, 200: |CIRCLE, 100, 50 Dibujara un circulo ovalado con 100 de radio horizontal y 50 de radio vertical en el centro de la'pantalla. El m ximo valor permitido para cualquier par metro es 255. |CUROFF (sin par metros) Desactiva el cursor. Ver |CURON |CURON (sin par metros) Permite que el cursor vuelva a ser mostrado en la pantalla. 10 K$="__" 20 PRINT "PULSA CUALQUIER TECLA:"; 30 ICURON: |GETKEY, @K$: |CUROFF VER GETKEY 40 PRINT K$ |DEPRO (sin par metro) Los programas en Basic grabados con la opci¢n P, no pueden ser listados. Con este comando, puedes desactivar la protecci¢n desde dentro del programa. Puede ser usado al principio del programe como sigue: 10 CLS: INPUT "INTRODUZCA PASSWORD"; PW$ 20 IF PW$="<password>" THEN |DEPRO:LIST 30 REM Tu programa empieza aqu¡. Cuando esto es grabado usando ta opci¢n R s¢lo podr volver a ser listado por alguien que conozca la palabra de paso, < password >. Ver también |PROTEC. |DPEEK (dos par metros) Esto es una doble direcci¢n. Devolver el resultado de el contenido de dos localizaciones de memoria consecutivas en RAM, en una variable entera ya asignada. El resultado estar se¤alado en formato de 16 bits y siguiendo la conversi¢n normal del Z80, primero el byte bajo. 10 A%=0 20 |DPOKE,&2000,&BB5A VER |DPOKE 30 |DPEEK.&2000, @A%:PRINT HEX$(A%) Tomar BB5A |DPOKE (dos par metros) Es un doble poke. Colocar un n£mero de 16 bit dentro de dos locafcaciones consecutivas de memoria RAM siguiendo la conversi¢n normal del Z80, primero el byte baja loma como ejemplo |DPEEK. |DSCREEN (sin par metros) Usando este comando, toda la pantalla se mover una l¡nea hacia abaja Las l¡neas movidas fuera de la pantalla se perder n. |FILL (un par metro) Reto¤ar el rea de cualquier figura con el color especificada Llenar un rea encime de la linea donde est dttxijando actualmente el l piz o en la linea de dibujo donde el l piz a empezado a utilizar el comando FILL. Este empezar a actuar desde la posici¢n actual del cursor y estar limitado por el tama¤o de la ventana. 10 |GPEN,3 20 MOVE 320, 200: |CIRCLE,100,50 30 |FILL,2 Este programa dinqar un circulo ovalado en el centro de la pantalla usando el l piz de color 3, rojo, y lo rellenar con el pen 2, azul. |FRAME (sin par metros) Cor este comando puedes realizar un desplazamiento informe de los caracteres en pantab. 10 MODE 1:|LOCATE 1,10 20 FOR X%= 1 TO 39:PRINT " "; 30 |FRAME 40 PRINT CHR$(250)CHR$(8);:NEXT:RUN Intenta este ejemplo con y sin la l¡nea n£mero 30 y aprecia la diferencia. |FLUSH (sin par metros) Es utilizado para limpiar las entradas en el buffer y prevenir una excesiva concentraci¢n de caracteres. 10 CLS:PRINT "PULSA MUCHAS TECLAS" 20 FOR X=1 TO 5000:NEXT 30 |FLUSH Ejecuta estas l¡neas con y sin la l¡nea n£mero 30 y observa la diferencia. |GETCHAR (un par metro) Este comando leer desde la pantalla en la posici¢n actual del cursor y colocar el resultado en una cadena. Si el caracter es imposible de leer, el string no ser cambiada. 10 CLS:PRINT "SYSTEM X" 20 FOR X=1 TO 40:L0CATE X,1 30 C$=" ": |GETCHAR, @C$ 40 LOCATE X,13:PRINT C$:NEXT Copiar de la parte superior de la pantalla y la colocar en el centro. |GETKEY (un par metro) Detendr la ejecuci¢n del programa y esperar a que una tecla sea pulsada. El caracter asignado a esta tecla, ser devuelto en un string. Si la tecle tiene una extensi¢n de string asignada, entonces s¢lo ser devuelto el primer caracter. Ver, por ejemplo, |CURON. |GPEN (un par metro) Cambiar el l piz gr fica Ver, por ejemplo, |FILL. |GOVER (un par metro) Activar o desactivar los gr ficos en modo XOR para permitirte borrar lineas, etc. Un par metro de 1 activar el comando y uno de 0 lo desactivar . 10 MOVE 320,200 20 |GOVER,0,1:|CIRCLE,50 30 |GOVER,1:|CIRCLE,50 40 GOTO 20 |HELP (sin par metros) Ser n mostrados en pantalla todos los comandos a los que puedes acceder desde SYSTEM X. |INVIS (sin par metros) Har que la pantalla se vuelva imrisibla El comando |VIS la volver a hacer visible. Esto es usado para dar la impresi¢n de escritura instant nea. 10 |INVIS 20 CLS:PEN 2:|HELP,PEN 1 Ver |HELP 30 |VIS |INVERSE (sin par metros) Con este comando son cambiados los colores del l piz y del papel. 10 CLS 20 |INVERSE:PRINT "SYSTEM X":|INVERSE |LSCREEN (sin per metros) En MODE 1, mover toda la pantalla un car cter hacia la izquierda. En MODE 2, dos caracteres o medio caracter en MODE 0. Los caracteres que se salgan de la pantalla se perder n. |MOTOR (un par metro) Este comando activar o desactivar el control del motor del cassette. Un par metro de 1, lo activar y uno de 0 lo desactivar . Esto es m s frecuentemente usado en el AMSTRAD 664 para permitir adelantar o rebobinar la cinta antes de introducir o sacar datos de ella dependiendo de la posici¢n en la que estén. |PROFF (sin par metros) Desactiva las funciones de impresora. Ver |PRON. |PRON (sin par metros) Hace que todos los caracteres en pantalla salgan por impresora. |PROFF desactiva este comando. |PROTECT (sin par metros) Con este comando es posible proteger un programa en Basic desde dentro del mismo haden-do que se autodestruya al volver al modo de comando directo. |RPEEK (tres par metros) |RPEEK te permite ver cualquier direcci¢n de ROM. El resultado de esta direcci¢n ser devuelto en un variable entera. Los par metros son: direcciones, n£mero ROM, @ variable entera. El n£mero ROM puede ser 0 para la ROM de Basic o 7 para la ROM de la unidadde disco. Para direccionar en la ROM m s baja, el n£mero puede ser cualquiera. 10 A%=0 20 |RPEEK,&C002,0,@A% 30 PRINT "VERSION BASIC"A% |R |RESET (sin par metros) Har Reset an la pantalla con el mode por defecto, tintas, borde, l piz y papel. |R es una versi¢n contra¡da por |RESET, la cual te ser m s f cil de usar al no tener que teclear el comando totalmente. |RSCREEN (sin par metros) Mover toda la pantalla un caracter a la derecha en Mode 1, dos caracteres en Mode 2 o medio caracter en Mode 0. Los caracteres que salgan de la pantalla, se perder n. |SHIFT (tres par metros) Mediante este comanda puedes mover un bloque de memoria. Es, generalmente, utifizado para grabar la pantalla actual en memoria. Los par metros son: Desde direcci¢n, Hasta direcci¢n, Para X n£mero de Bytes. 10 MODE 0:MOVE 320,200 20 |CIRCLE,100 30 |FILL,15 40 |SHIFT,&C000,&4000,&4000: REM GRABA LA PANTALLA EN LA DIRECCION &4000 50 MODE 1:INPUT "PULSE ENTER PARA VOLVER A LA PANTALLA ",A$:MODE 0 60 i SHIFT&4000,&COOO,&4000:REM DEVUELVE LA PANTALLA |USCREEN (sin par metros) Mueve toda la pantalla hacia arriba una linea. Las lineas que se salgan de le pantalla, se perder n. |VIS (sin par metros) Vuelve a hacer visible la pantalla después de haber utilizado |INVIS. Ver |INVIS. |ZIP (un par metro) Es similar a SPEED WRITE excepto que ofrece siete velocidades en lugar de dos. Estas son: IZIP,0 1000 baudios |ZIP,1 1500 baudios |ZIP,2 2000 baudios |ZIP,3 2500 baudios |ZIP,4 3000 baudios |ZIP,5 3500 baudios |ZIP,6 4000 baudios El valor m s alto de baudios es el menos aconsejable para realizar una grabaci¢n. INFORME DE ERRORES El SYSTEM X s¢lo dar un informe de error, PARAMETER ERROR. Este error se producir cuando introduzcas un n£mero equivocado como par metro o un par metro fuera de los l¡mites permitidos. Otros informes de errores que com£nmente te dar en Basic son: SYNTAX ERROR: se produce cuando se omite la coma para el par metro soficitado después del comanda UNKNOWN COMMAND: se produce cuando se ha tecleado mal un comando o cuando se ha usado un punto en lugar de una coma. También puede producirse porque el SYSTEM X sea alterado en alg£n lugar. IMPROPER ARGUMENT: se produce si no tienes inicializada una variable o string sin antes precederlo por un caracter NOTA: con este programa en memoria, no puede ser cargada la rutina RANDOM, para archivos directos. ------------------------------------------------------------------------------ Retyped in 2014 by hERMOL Visit my website at http://CPCRULEZ.fr ------------------------------------------------------------------------------ |