FutureBASIC

Las funciones definidas por el usuario (también conocidas como funciones LOCAL FN en FutureBasic) son muy parecidas a las funciones de C o Pascal .

• También pueden estar totalmente aislados del programa principal (instrucción LOCAL MODE);
• permiten la recursión ;
• Se pueden llamar dinámicamente en tiempo de ejecución (sentencia DEF FN USING);
• llamado automáticamente por los vectores de eventos integrados de FutureBasic (instrucción ON EVENT FN);
• Se utilizan como funciones multihilo cooperativas (instrucción THREADBEGIN).

Se utilizan estructuras específicas (ENTERPROC/EXITPROC) para los procedimientos de devolución de llamada cuando se llama a Macintosh Toolbox .

El lenguaje proporciona al programador un conjunto completo de vectores para aplicaciones basadas en eventos, como ON MENU, ON MOUSE, ON DIALOG, ON APPLEEVENT, ON EDIT, ON TIMER, etc.

Otras palabras clave estructuradas incluyen bloques condicionales como:

• SI LARGO .... SINO ... FIN SI
• HACER .... HASTA
• MIENTRAS... TERMINAMOS
• SELECCIONAR ... CASO ... CASO SI NO ... FIN SELECCIONAR
• PARA ... SIGUIENTE

Los comandos del lenguaje BASIC clásico, como GOTO y GOSUB /RETURN con números de línea y etiquetas, aunque no se recomiendan, se admiten con fines educativos.

A continuación se muestra un ejemplo de un programa sencillo para introducir un número y mostrar "Hola Mundo".

//Ejemplo de programa FutureBasic dim i,num,a$ //Estas son nuestras variables ventana 1 //abrir ventana estándar Entrada "Número de bucles"; a$ //Entrada BÁSICA del usuario num=val(a$) //convierte texto a número largo si num>0 //IF estructurado para i = 1 hasta num //bucle BÁSICO imprimir "hola mundo" //texto de salida siguiente i //fin del bucle xelse //De lo contrario Imprimir "Hoy no" //No se ha introducido ningún número fin si //Esperar hasta que Apple-Q Manejar eventos hasta ( gFBQuit ) //para que podamos ver los resultados 

FutureBasic admite tipos de datos complejos, incluyendo números de coma flotante de precisión simple y doble , enteros de doble longitud, matrices, cadenas y registros (similares a las estructuras en C). Cabe destacar las estructuras de matriz DINÁMICAS (el tamaño de la huella de memoria aumenta solo cuando se utilizan), incluyendo matrices de cadenas DINÁMICAS llamadas INDEX$ y variables "contenedor" que pueden realizar operaciones similares a las de las cadenas en flujos de datos de hasta 2 GB.

Es fundamental poder comentar el código, ya que permite el uso de instrucciones REMark y /* remark */sentencias al estilo C. Se pueden marcar secciones del código para consultarlas fácilmente.

Otra sintaxis alternativa tomada de C permite el uso de operadores como .++ -- == != += -= || &&

Los caracteres en las cadenas de Pascal son accesibles de forma muy similar a los elementos de una matriz: a$[0](longitud en bytes); a$[1](primer carácter en la cadena a$).

Aunque el lenguaje FutureBasic todavía admite la tipificación de variables de estilo antiguo con identificadores de sufijo, proporciona una alternativa moderna con la cláusula as: ; , ; etc.dimbasbytedimsasshortdimlaslong

• Los scripts de AppleScript se pueden ensamblar con instrucciones FutureBasic y luego ejecutarse sobre la marcha por una aplicación en ejecución. Ejemplo:

ruta _toAppleScript imprimir "devuélveme la ruta como cadena" ruta _toScreenlargo si usr ApplescriptRun ( mensaje $ ) = _noErr imprimir mensaje $ fin si

• FutureBasic permite la activación de comandos UNIX. Ejemplo:

// Imprimir un calendario para 2009 abierto "UNIX", 1, "cal 2009" culo oscuro hacer Entrada de línea n.° 1, a$ imprimir a$ hasta eof(1) cerrar 1 

• FB permite código C en línea. Ejemplo:

BeginCFunction // Función simple en C para sumar dos enteros long simple_add ( long a , long b ) { long sum ; sum = a + b ; return ( sum ); } endC// Definir la función C para que FB pueda verla toolbox fn simple_add ( long a , long b ) = long// Crea un pequeño programa para sumar 2 + 2 con la función Cventana 1imprimir fn simple_add ( 2 , 2 )hacer HandleEvents hasta ( gFBQuit )