BASIC 1.0 [1] [2] [3] [4] es el lenguaje BASIC estándar para los ordenadores Thomson ( MO5 , TO7 , etc.), que es la referencia para toda la gama. [5] [6] [7] Se trata de una implementación de Microsoft BASIC (BASIC-69). [3] Se utilizó para introducir a los niños de Francia a la programación en los años 1980 (véase Computing for All , un plan del gobierno francés de 1985 para introducir los ordenadores a los 11 millones de alumnos del país). [8] [9] Se enseñaban principalmente tres idiomas: LSE , BASIC y LOGO . Los programas de los libros de texto escolares se daban en BASIC 1.0 para Thomson y, a veces, en ExelBasic para el Exelvision EXL 100 .
La primera versión vino con el ordenador TO7, lanzado en 1982. [10] [2] [3] [9] [11] [12] [13] [14] En el MO5 (lanzado en 1984 pero con una ROM más pequeña), el conjunto de instrucciones se reduce y no se implementa la doble precisión, de modo que el intérprete cabe solo en 12 KB de ROM, en lugar de 16 KB en el TO7. [6] [1] [4] [9] [15]
Se produjo una versión mejorada con el nombre de BASIC 128 , para los TO7-70 , TO9 , MO5NR y MO6 . [16] [17] [18] Incluía comandos para operaciones de disco y otras instrucciones nuevas.
En el TO8/8D y TO9+ se proporcionó una versión aún más mejorada con el nombre de BASIC 512. [19] [20]
El intérprete de BASIC 1.0 reconoce los comandos habituales como FOR.. NEXT, GOSUB.. RETURN, IF.. THEN.. ELSEy declaraciones DATA/ READ/ . [7] También eran posibles instrucciones avanzadas como .. y .. [7]RESTOREONGOTOONGOSUB
? - Alias aPRINT' - Alias aREMATTRB- Atributos del personajeBOX (x1,y1)-(x2,y2)- Dibuja un rectángulo (el píxel superior izquierdo es (0,0)BOXF (x1,y1)-(x2,y2),color- Rellena un rectángulo con el color indicado (opcional, si no se indica, se utiliza el color actual del lápiz). Los colores negativos hacen que se rellene con el color solicitado como color de fondo.CLS- Pantalla claraCOLOR foreground, background- Cambiar los colores de los lápices (los parámetros son opcionales)CONSOLEDELETEEND- Finaliza la ejecución del programaFOR v=s TO e STEP n- Bucle FOR, que incrementa v en n cada vez hasta llegar a e. El valor STEP es opcional (el valor predeterminado es 1) y puede ser negativo.GOTO line- Saltar a la línea del programaIF a THENDeclaración ELSE Declaración - Condiciones (la declaración puede ser solo un número de línea)INPUT “message”;variable1,variable2 - Establezca variables con valores ingresados por el usuario (separados por comas). Se imprime un signo ? después del mensaje y antes de leer los valores del usuario.LINE (x1,y1)-(x2,y2)- Dibuja una línea (el primer punto es opcional, se utiliza la posición actual del cursor: LÍNEA -(x2,y2))LIST line- Lista el programa en la memoria (el parámetro es opcional, si falta se lista todo el programa)LOCATE x,y- Mueve el cursorNEW- Nuevo programa, eliminar el actual de la memoriaNEXT v- Cierra el bucle FOR.PLAY s$- Reproduce música. La cadena está formada por las notas DO, RE, MI, FA, SO, LA, SI (con modificadores # y b), cambios de octava (O1-O5), cambios de duración de nota (L1-L96), silencios (P), cambios de tempo (T1-T256), ajustes de ataque (A0-A255). Los espacios se ignoran y se pueden utilizar para facilitar la lectura.PRINT value- Imprime un valor (si el valor tiene como sufijo un ; inserta una tabulación después de él; de lo contrario, pasa a la siguiente línea)PRINT USINGPSET(x,y)- Establecer un píxelREM- Comentarios (REMark). Todo lo que siga a esto en la línea se ignora.RUN- ejecutar el programaSCREEN foreground,background,border- Cambiar colores para toda la pantallaCOS(v)INT(v)INSTRLEFT$(s$,n)- Obtener una subcadena de los N primeros caracteres de SLEN(s$)MID$RIGHT$(s$,n)- Obtener una subcadena de los N últimos caracteres de SRND- Valor aleatorio entre 0 y 1SIN(v)STR$VAL+- Adición, concatenación de cadenas-*/MOD@- División de enteros=- Cesión, igualdad^