Notas sobre el loader de basic.
-------------------------------

El comando "openout" es necesario en el loader de cinta o habr residuo de cdigo en las direcciones de memoria de &3000 a &4000, que deben estar vacias para guardar/leer datos que genera el programa. No es un error muy grave y no sucede nada aparentemente pero el programa leer datos incoherentes al jugar las primeras partidas. El contador de REGS del men debe iniciarse en 0.

La llamada al programa "load+call &4000" tambin es necesaria porque con "run" se borra la pantalla de carga y el programa copia una pantalla en blanco.

Por una cuestin esttica los nombres del loader basic del DSK tienen extensin y los del CDT no.

Y siento no haber podido poner un loader ms rpido pero no me ha sido posible.

BASIC LOADER CDT #1: FOOSBALL
----------------------------------
10 openout"b":memory &3fff	
20 mode 0:border 10
30 FOR c=0 to 15:read a:ink c,a:next c
40 locate 1,25:print"Loading..."
50 load"!foosball.scr"
60 load"!foosball.bin":call &4000
70 data 10,26,0,0,16,0,26,11,11,24,24,2,9,3,6,26

BASIC LOADER CDT #2: FUTBOLIN
----------------------------------
10 openout"b":memory &3fff
20 mode 0:border 10
30 FOR c=0 to 15:read a:ink c,a:next c
40 locate 1,25:print"Cargando..."
50 load"!futbolin.scr"
60 load"!futbolin.bin":call &4000
70 data 10,26,0,0,16,0,26,11,11,24,24,2,9,3,6,26

BASIC LOADER DSK #1: FOOSBALL.BAS
----------------------------------
10 memory &3fff
20 mode 0:border 10
30 FOR c=0 to 15:read a:ink c,a:next c
40 locate 1,25:print"Loading..."
50 load"!foosball.scr"
60 load"!foosball.bin":call &4000
70 data 10,26,0,0,16,0,26,11,11,24,24,2,9,3,6,26

BASIC LOADER DSK #2: FUTBOLIN.BAS
----------------------------------
10 memory &3fff
20 mode 0:border 10
30 FOR c=0 to 15:read a:ink c,a:next c
40 locate 1,25:print"Cargando..."
50 load"!futbolin.scr"
60 load"!futbolin.bin":call &4000
70 data 10,26,0,0,16,0,26,11,11,24,24,2,9,3,6,26