EL FORO DEL SPECTRUM http://www.speccy.org/foro Sat, 26 May 2012 01:14:59 -0400 Subscribe with My Yahoo!Subscribe with FeednessSubscribe with NewsGatorSubscribe with BloglinesSubscribe with NetvibesSubscribe with GoogleSubscribe with PageflakesSubscribe with PlusmoSubscribe with The Free DictionarySubscribe with Bitty BrowserSubscribe with NewsAlloySubscribe with Live.comSubscribe with Excite MIXSubscribe with Attensa for OutlookSubscribe with WebwagSubscribe with Podcast ReadySubscribe with FlurrySubscribe with WikioSubscribe with Daily Rotation radastan Mon, 02 Apr 2012 16:48:12 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2597&p=26501&sid=59c21323c95040a1e72ac4c3847a24f8#p26501 http://www.speccy.org/foro/viewtopic.php?f=15&t=2597&p=26501&sid=59c21323c95040a1e72ac4c3847a24f8#p26501
Estoy buscando un compilador de C cruzado para Windows qu egenero binarios para 68000. La idea es poder programar en Windows cómodamente en C usando rutinas optimizadas de pantalla en ensamblador. Las rutinas en ensamblador ya las tengo, las que junto a Mc Leod pudimos hacer funcionar para manejar sprites.

He probado este:

http://home.kpn.nl/pj.fondse/ide68k/index.html

Tiene muy buena pinta, pero por lo menos en Windows 7 se cuelga en cuanto tratas de compilar algo. Desconozco si es problema de Windows 7 (es 64 bits) o del propio compilador.

Lo primero que he intentado es el clásico:

void main (void)
{
}

Que no debería hacer NADA, pero ya os digo que da error el programa al compilar y no me deja hacer nada más.

¿Alguien conoce un compilador C 68000 gratuito para Windows?]]> oblo Sun, 25 Mar 2012 15:34:53 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2572&p=26255&sid=59c21323c95040a1e72ac4c3847a24f8#p26255 http://www.speccy.org/foro/viewtopic.php?f=15&t=2572&p=26255&sid=59c21323c95040a1e72ac4c3847a24f8#p26255 Hola a todos

He sacado un poco a pasear al QL para empezar a familiarizarme con él pero estoy notando un problema con la pantalla. Tengo conectado el QL a una TV usando el cable RGB al euroconector pero a veces la pantalla se queda en negro y la imagen vuelve al segundo o dos segundos. He probado con un cable RF y no parece que pase.
¿Esto es normal? Si no lo es, ¿qué puede ser/tiene solución?

Gracias y salu2 radastan Wed, 29 Feb 2012 04:08:37 -0500 http://www.speccy.org/foro/viewtopic.php?f=15&t=2535&p=25898&sid=59c21323c95040a1e72ac4c3847a24f8#p25898 http://www.speccy.org/foro/viewtopic.php?f=15&t=2535&p=25898&sid=59c21323c95040a1e72ac4c3847a24f8#p25898
http://www.bytemaniacos.com/ql

Id probando y me comentáis que veis necesario, el germen ya está creado y ahora sólo tengo que engordarlo.

Faltan muchos juegos de QL Wiki, pero no os preocupéis que se irán añadiendo esos y muchos más. Lo bueno es que realmente ya están dentro las capturas y los IMG, falta crear la ficha nada más.]]> radastan Mon, 13 Feb 2012 04:07:52 -0500 http://www.speccy.org/foro/viewtopic.php?f=15&t=2520&p=25761&sid=59c21323c95040a1e72ac4c3847a24f8#p25761 http://www.speccy.org/foro/viewtopic.php?f=15&t=2520&p=25761&sid=59c21323c95040a1e72ac4c3847a24f8#p25761
Destaco especialmente la mejora de compatibilidad con Windows 7 y que ahora podemos redimensionar la pantalla en modo ventana... pero lo mejor de todo es que ahora MANTIENE LA RELACIÓN DE ASPECTO CORRECTA. Se acabó el sufrir una pantalla achatada en el emulador si no tenías el modo de pantalla completa.

Y de regalo podemos poner interpolación para el reescalado de la imagen.

Este emulador mejora a ojos vista.

http://www.terdina.net/ql/winql.html]]> programandala.net Wed, 30 Nov 2011 08:13:01 -0500 http://www.speccy.org/foro/viewtopic.php?f=15&t=2453&p=24992&sid=59c21323c95040a1e72ac4c3847a24f8#p24992 http://www.speccy.org/foro/viewtopic.php?f=15&t=2453&p=24992&sid=59c21323c95040a1e72ac4c3847a24f8#p24992 The Sinclair QL Forum
una reflexión sobre la utilidad de SBASIC y una idea para QPC2:

Se trata de una versión de QPC2 que funcionaría como si fuera un intérprete de SBASIC, no como un emulador de un sistema operativo. En la práctica su funcionamiento sería el mismo, salvo que podría arrancar programas en SBASIC directamente, por ejemplo:

Code: Seleccionar todo

QPC2.EXE \ruta\mi_programa.bas
QPC2.EXE \ruta\mi_programa_bas
QPC2.EXE \ruta\mi_programa.win


QPC2 se encargaría de montar las unidades WIN_ o DOS_ en cada caso y de arrancar el fichero boot del fichero win.

El objetivo es que SBASIC, que tiene potencia para escribir programas modernos, pueda servir para algo en la práctica... La limitación de la versión demo de QPC2 es un grave inconveniente para ciertos programas. Y en cualquier caso QPC2 (como cualquier emulador) es difícil de usar y configurar para quien no haya oído nunca hablar de QL. Esta versión «intérprete» estaría limitada para impedir su uso como herramienta de desarrollo.

En el enlace lo cuento con más detalles, pero la idea básica es esa.]]> sonica Mon, 05 Sep 2011 03:37:56 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2382&p=24417&sid=59c21323c95040a1e72ac4c3847a24f8#p24417 http://www.speccy.org/foro/viewtopic.php?f=15&t=2382&p=24417&sid=59c21323c95040a1e72ac4c3847a24f8#p24417 buenas estoy como loco buscando el programa graphiql desde hace años y no lo encuentro,aver si alguien tiene una backup o la rom para emulador.gracias de antemano. programandala.net Mon, 13 Jun 2011 14:28:44 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2335&p=23976&sid=59c21323c95040a1e72ac4c3847a24f8#p23976 http://www.speccy.org/foro/viewtopic.php?f=15&t=2335&p=23976&sid=59c21323c95040a1e72ac4c3847a24f8#p23976 Rich Mellor anunciada en la lista de correo QL-Users, el autor de SuperForth y Digital C, Gerry Jackson, ha cedido ambos programas al dominio público.

SuperForth ya está disponible en la página de descargas de Dylwin Jones. Las fuentes originales no están disponibles pero espero que también se hagan públicas.

Rich y otros están preparando una versión en forma de documento de texto del manual de SuperForth 2.0 mediante un reconocedor de caracteres y los escaneos del manual original en papel.]]> programandala.net Tue, 31 May 2011 18:47:30 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2326&p=23900&sid=59c21323c95040a1e72ac4c3847a24f8#p23900 http://www.speccy.org/foro/viewtopic.php?f=15&t=2326&p=23900&sid=59c21323c95040a1e72ac4c3847a24f8#p23900 cómo arrancar un programa de QL, para facilitar la tarea a quienes quieran probar un programa de QL y no conozcan la plataforma. Como complemento he descrito los dos mejores emuladores para QL (y de propina la QXL), para que sirva de orientación a la hora de elegir uno u otro.

Aún quedan algunas cosas por añadir. Cualquier crítica o aportación o sugerencia (o error o errata) será bienvenido.]]> programandala.net Sun, 29 May 2011 18:13:47 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2320&p=23863&sid=59c21323c95040a1e72ac4c3847a24f8#p23863 http://www.speccy.org/foro/viewtopic.php?f=15&t=2320&p=23863&sid=59c21323c95040a1e72ac4c3847a24f8#p23863
Asalto y castigo para QL.

Ocurre un problema muy extraño que impide que funcione en Q-emuLator a la velocidad original de QL y con la ROM MGE: la extensión Display toolkit no se instala bien en esas condiciones y por tanto el uso de la función DMODE provoca un error de expresión errónea. Con la ROM JS y con Minerva 1.89 arranca bien a cualquier velocidad. Me gustaría que alguien me confirmara esto.

Cualquier crítica, sugerencia, opinión o informe de errores o erratas será bienvenido.]]> programandala.net Tue, 24 May 2011 14:18:48 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2316&p=23831&sid=59c21323c95040a1e72ac4c3847a24f8#p23831 http://www.speccy.org/foro/viewtopic.php?f=15&t=2316&p=23831&sid=59c21323c95040a1e72ac4c3847a24f8#p23831 Q-emuLator y QPC2 no tuvieran limitaciones, salvo las que impidieran programar. El objetivo sería que sirvieran como máquinas virtuales para ejecutar cualquier programa de QL, y así contribuir al desarrollo de programas nuevos y a la difusión de la plataforma.

Dicho de otra forma: un programa nuevo escrito en S*BASIC tiene una audiencia potencial de un centenar de usuarios. Nadie de fuera del mundillo QL se va a molestar en probarlo, y aunque le interesara hacerlo jamás compraría un emulador para la ocasión. Sin embargo, cierto tipo de juegos sí podrían tener alguna difusión fuera del mundillo si fuera sencillo usarlos sin restricciones. Sería una situación análoga a la que se da con el lenguaje Python y otros entornos (como los intérpretes de aventuras conversacionales): para ejecutar un programa necesitas tener instalado en tu sistema un intérprete del lenguaje o una máquina virtual. El esfuerzo de instalar un emulador de QL sería el mismo. Pero para ello no tendrían que tener restricciones de ejecución. Ahora las restricciones de Q-emuLator son muchas; y la única que tiene QPC2 (no deja grabar) lo hace inviable para cierto tipo de juegos (no se puede guardar la posición, algo importante en juegos de aventura o estrategia).

Se me ha ocurrido que sería útil una versión gratuita diferente, apta para ejecutar cualquier programa pero «castrada» para su uso como herramienta de programación, por ejemplo haciendo inviable la entrada de comandos, anulando el editor integrado y alguna otra cosa parecida. Es decir, que solo sirva para arrancar a partir de una imagen de disquete, o de disco duro u otro formato. No estoy seguro de cómo sería mejor hacerlo (ni siquiera si es viable sin usar una ROM modificada en el caso de Q-emuLator, lo que no tendría sentido).

Estoy pensando proponer esto a los dos autores, y en la lista de correos, pero antes quería tener alguna opinión.]]> programandala.net Mon, 02 May 2011 05:03:38 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2302&p=23653&sid=59c21323c95040a1e72ac4c3847a24f8#p23653 http://www.speccy.org/foro/viewtopic.php?f=15&t=2302&p=23653&sid=59c21323c95040a1e72ac4c3847a24f8#p23653 Q-emuLator no da detalles sobre el formato QLPAK, ni en el manual ni en la página.

Un fichero QLPAK es un fichero ZIP que contiene un fichero de configuración QCF del emulador y todo lo necesario para ejecutar un programa automáticamente.

Necesitaba meter la ROM MGE en el QLPAK y me costó dar con la sintaxis adecuada, pues normalmente la ruta indicada con MainRom en el QCF es relativa al directorio de instalación del emulador. Probé varias sintaxis sin éxito. Por suerte entre los QLPAKs de ejemplo encontré uno que llevaba su propia ROM. La manera de indicar en el QCF que una ROM está en la misma ranura en que hemos insertado el propio QLPAK es la siguiente (para la ranura 1):

Code: Seleccionar todo

MainRom=Slot1:mge.rom
Slot1=PAK:


]]> programandala.net Sat, 30 Apr 2011 06:57:00 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2301&p=23645&sid=59c21323c95040a1e72ac4c3847a24f8#p23645 http://www.speccy.org/foro/viewtopic.php?f=15&t=2301&p=23645&sid=59c21323c95040a1e72ac4c3847a24f8#p23645 Marcel Kilgus me ha confirmado que tiene en marcha una nueva versión de QPC2, aunque últimamente ha tenido poco tiempo para dedicarle.

La nueva versión incluirá soporte para imágenes de disquete (pero aún no comprimidas; le sugerí en su día que sería buena idea poder montar imágenes comprimidas con ZIP o GZIP, como hacen algunos emuladores).

También ha estado pensando un nuevo sistema de configuración más estándar y flexible, en ficheros de texto; pero no es fácil porque la configuración en QPC2 es doble: sirve tanto para el emulador como para el sistema operativo.

Poder montar imágenes de disquete con QPC2 es una buena noticia, yo lo echaba en falta. La configuración con ficheros de texto sería muy deseable, pero parece que va para largo.]]> programandala.net Thu, 28 Apr 2011 08:32:45 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2299&p=23630&sid=59c21323c95040a1e72ac4c3847a24f8#p23630 http://www.speccy.org/foro/viewtopic.php?f=15&t=2299&p=23630&sid=59c21323c95040a1e72ac4c3847a24f8#p23630
Uso DMODE en un boot para preparar la pantalla antes de cargar el programa principal. Pues cuando DMODE no ha sido enlazado correctamente, lógicamente es interpretado como una variable no declarada y nada funciona.

Algunas veces sí funciona con solo quitar alguna línea del programa o poner algún REMark aquí y allá... sin ninguna lógica, porque son líneas que no se ejecutan en las pruebas ni tienen nada que ver.

Sospeché que el tamaño del fichero tenía algo que ver, pero no era así. Sospeché que el problema estaba en la opción de Q-emuLator para pulsar F1 o F2 automáticamente en el arranque, pero tampoco era así. Ya no imagino más posibles causas.

He hecho muchas pruebas y no averiguo nada. No sé si el problema está en la extensión o en el emulador o en las ROMs o en alguna combinación entre ellos.

Cuando DMODE, FLIM_W o FLIM_H no son enlazados se aprecia fácilmente porque se quedan en minúsculas en el listado, pero como he dicho no siempre pasa con las tres a la vez.

Añado unos ejemplos de boot con los que he hecho pruebas:

Esto debería imprimir el modo de pantalla actual (0 u 8) y parar, pero con la ROM MGE imprime "*" porque DMODE no ha sido enlazado:

Code: Seleccionar todo

� 100 tk2_ext
� 110 lrespr "flp1_display_code"
� 120 print dmode
� 130 stop
� 330 defproc init_ql_colours
� 400 enddef
� 410 deffn rgb(red,green,blue)
� 430 enddef
� 440 defproc init_the_window
� 450� �let csize_w=3-(scr_w=512)
� 460� �let csize_h=scr_w>512
� 470� �let tw=fopen("con_")
� 480� �csize #tw,csize_w,csize_h
� 490� �let tw_w=minimum(800,scr_w)
� 500� �let tw_h=minimum(600,scr_h)
� 510� �let tw_x=(scr_w-tw_w)/2
� 520� �let tw_y=(scr_h-tw_h)/2
� 530� �window #tw,tw_w,tw_h,tw_x,tw_y
� 540� �paper #tw,black
� 550� �ink #tw,light_grey
� 560� �wipe_the_window
� 570� �init_the_font
� 580 enddef
� 590 defproc wipe_the_window
� 600� �border #tw,0
� 610� �cls #tw
� 620� �border #tw,8
� 630 enddef
� 640 defproc splash_screen
� 650� �if flim_w(#0)=512 and flim_h(#0)=256
� 660� � �lbytes dev$&img_ayc8_scr,address(#0)
� 670� �endif
� 680 enddef


Pero si quito las líneas640-680, el programa funciona bien con la ROM MGE!

Si quito todo lo que sobra, sigue funcionando (pero no con la ROM JM):

Code: Seleccionar todo

� 100 tk2_ext
� 110 lrespr "flp1_display_code"
� 120 print dmode
� 130 stop


Si reinicio el emulador con la ROM JM y no arranco desde el fichero, sino que le doy los comandos a mano, entonces DMODE sí funciona...!

Otra prueba que no funciona:

Code: Seleccionar todo

� 100 tk2_ext
� 110 lrespr "flp1_display_code"
� 120 print dmode
� 130 stop
� 330 defproc init_ql_colours
� 400 enddef
� 410 deffn rgb(red,green,blue)
� 430 enddef
� 440 defproc init_the_window
� 450� �let csize_w=3-(scr_w=512)
� 460� �let csize_h=scr_w>512
� 470� �let tw=fopen("con_")
� 480� �csize #tw,csize_w,csize_h
� 490� �let tw_w=minimum(800,scr_w)
� 500� �let tw_h=minimum(600,scr_h)
� 510� �let tw_x=(scr_w-tw_w)/2
� 520� �let tw_y=(scr_h-tw_h)/2
� 580 enddef
� 590 defproc wipe_the_window
� 630 enddef
� 640 defproc splash_screen
� 680 enddef
�1700 deffn prog_device$
�1850 enddef
�1860 deffn prog_found_in(device$)
�1910 enddef


Si le quito la línea 520, DMODE funciona con la ROM MGE!

Lo he intentado con y sin TK2_EXT, con LRESPR y con LBYTES+CALL. Nada cambia.

Otra prueba que no funciona... a menos que quite la línea 510!:

Code: Seleccionar todo

� 100 rem tk2_ext
� 110 rem lrespr "flp1_display_code"
� 110 let a=alchp(1094):lbytes "flp1_display_code",a:call a
� 120 print dmode
� 130 stop
� 330 defproc init_ql_colours
� 400 enddef
� 410 deffn rgb(red,green,blue)
� 430 enddef
� 440 defproc init_the_window
� 450� �let csize_w=3-(scr_w=512)
� 460� �let csize_h=scr_w>512
� 470� �let tw=fopen("con_")
� 480� �csize #tw,csize_w,csize_h
� 490� �let tw_w=minimum(800,scr_w)
� 500� �let tw_h=minimum(600,scr_h)
� 510� �let tw_x=(scr_w-tw_w)/2
� 580 enddef
� 590 defproc wipe_the_window
� 630 enddef
� 640 defproc splash_screen
� 680 enddef
�1700 deffn prog_device$
�1850 enddef
�1860 deffn prog_found_in(device$)
�1910 enddef


El manual de Display Toolkit cita posibles problemas con la ROM JM, pero solo para la palabra BYTES, nada que ver con esto.

No veo la lógica por parte alguna. ¿A alguien se le ocurre algo?

¿Alguien querría ver si le pasa lo mismo, copiando los ejemplos?]]> programandala.net Tue, 26 Apr 2011 13:07:05 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2294&p=23586&sid=59c21323c95040a1e72ac4c3847a24f8#p23586 http://www.speccy.org/foro/viewtopic.php?f=15&t=2294&p=23586&sid=59c21323c95040a1e72ac4c3847a24f8#p23586 Para que un boot cargue las extensiones necesarias independientemente de desde dónde haya sido cargado, necesito saber de qué dispositivo ha sido leído el propio boot.

Lo que busco es una función que devolviera el dispositivo actual, para usarlo con DATA_USE, como en en este ejemplo:

Code: Seleccionar todo

REMark boot file
TK2_EXT
DATA_USE CURRENT_DRIVE$
LRESPR ext_a
LRESPR ext_b
LRESPR ext_c
LRUN main_program_bas


El objetivo es que el programa arranque desde cualquier dispositivo (flpX_,winX_,dosX_,mdvX_...) en el que esté el soporte (un disquete real, una imagen de disquete, un fichero WIN...) , sin que el usuario tenga que hacer nada para redirigir o renombrar el dispositivo, y mucho menos que se vea obligado a usar un número de dispositivo concreto.

No encuentro ninguna función que devuelva el dispositivo desde el que ha sido leído el programa actual. Tampoco en MegaToolkit, Toolkit 3, Turbo Toolkit... Tampoco se me ocurre ningún truco para saberlo, pero sin duda esa información tiene que quedar en alguna parte, probablemente en las variables del sistema. programandala.net Tue, 26 Apr 2011 06:52:21 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2293&p=23575&sid=59c21323c95040a1e72ac4c3847a24f8#p23575 http://www.speccy.org/foro/viewtopic.php?f=15&t=2293&p=23575&sid=59c21323c95040a1e72ac4c3847a24f8#p23575 boot especial que estoy probando.

Todos los ficheros del programa están en Debian, que es donde trabajo (ejecutando los emuladores con Wine). Y esa es la pega con QPC2:

MIentras que arrancar el programa con Q-emuLator no tiene dificultad (basta crear un fichero de configuración en que mdv1_ esté asociado al directorio del programa) QPC2 no permite arrancar desde dispositivos DOS, solo WIN. Esto obliga a tener un fichero WIN y actualizarlo cada vez con la última versión del programa, solo para poder arrancarlo y ver si funciona el arranque! O bien, arrancar desde un WIN cuyo boot cambie DATA_USE y cargue el boot del programa en el dispositivo DOS.

Le he sugerido a Marcel Kilgus que añada el arranque desde dispositivos DOS en una futura versión.

¿Alguien más ha echado en falta esta funcionalidad?]]> mcleod_ideafix Fri, 22 Apr 2011 00:35:33 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2290&p=23510&sid=59c21323c95040a1e72ac4c3847a24f8#p23510 http://www.speccy.org/foro/viewtopic.php?f=15&t=2290&p=23510&sid=59c21323c95040a1e72ac4c3847a24f8#p23510
Total, que por una parte quiero la rapidez de ejecución del C/M pero por otro lado, la "seguridad" que da un lenguaje como BASIC, que se conoce y eso. Así que he decidido intentar hacer el software, al menos el de prueba, en C.

Después de probar nosecuántos compiladores de C para 68000 (la mayoría de pago, y por tanto en modo "demo") he conseguido uno que satisface mis espectativas:
- Funciona en Windows
- Tiene IDE integrado
- Produce código relocalizable
- Es gratuito
- Produce archivos binarios (bueno, son S19)
- Permite usar ASM y C en el mismo proyecto.
- Genera archivos ASM editables y listados con código máquina para su inspección

Se llama IDE68K.
http://home.kpn.nl/pj.fondse/ide68k/index.html

¿Conocéis algún otro?

Mi primera prueba con éxito ha sido este programa:

Code: Seleccionar todo

int main (void)
{
� � _A1 = "Hola, mundo!\n";
� � _D2 = 13; /* longitud de la cadena */
� � _D3 = -1; /* timeout */
� � _A0 = 0x10001; /* canal */
� � _D0 = 7;
� � _trap(3);
� � return 0;
}

Como veis, se puede acceder a algunos recursos de bajo nivel, como los traps, desde C. Este main() necesita de un pequeño código de startup que debe inicializar el registro A5 apuntando a la sección de datos del programa. Dentro de todas las funciones, cualquier referencia a variables globales se hace tomando A5 como base. Entre esto y que el código (los saltos) se compilan de forma relocalizable, lo tenemos todo solucionado (o eso espero).

El código de startup que he añadido al proyecto es sumamente sencillo:

Code: Seleccionar todo

start:� � �lea data(PC),A5
� � � � � �bra _main

� � � � � �section data
� � � � � �align
data� � � �equ *

El resultado de todo esto es que ahora puedo dedicarme a programar en C para el QL, sin necesitar al lado el libro de ensamblador del 68000 para cualquier cosa que haga. Esto no quita que una vez que pruebe todas las rutinas de bajo nivel de QLSD, las optimice a ensamblador "puro".

Una vez conseguido esto, ya tengo un printf rudimentario que puedo usar desde el QL para ayudar en la depuración.

Code: Seleccionar todo

int main (void)
{
� � printf ("Hola, mundo! Esto es una prueba un poco mas larga a ver como sale.\n");
� � return 0;
}

void printf (char *fmt)
{
� � int i=0;
� � char *fmt2=fmt;

� � while (*fmt2++)
� � � � i++;

� � _A1 = fmt;
� � _D2 = i;
� � _D3 = -1;
� � _A0 = 0x10001;
� � _D0 = 7;
� � _trap(3);
}


]]> programandala.net Wed, 20 Apr 2011 08:31:12 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2286&p=23497&sid=59c21323c95040a1e72ac4c3847a24f8#p23497 http://www.speccy.org/foro/viewtopic.php?f=15&t=2286&p=23497&sid=59c21323c95040a1e72ac4c3847a24f8#p23497 ¿Hay algún truco para cargar y arrancar un programa en S*BASIC sin que se borre la pantalla?

El problema es que tengo un programa de 1800 líneas que en Q-emuLator con la velocidad original de la QL tarda un ratito en cargar. La idea es que el boot previo que carga las extensiones necesarias cargue también una pantalla de presentación, como se solía hacer en las cintas de ZX Spectrum. Pero LRUN borra las ventanas abiertas y toda la pantalla.

He probado a cerrar todas las ventanas tras imprimir en ellas, pero da igual: LRUN hace NEW y borra también la pantalla, la deja negra, y después borra las ventanas abiertas. Lo mismo ocurre con QLRUN, la versión que usa programas ya tokenizados, grabados con QSAVE.

Quizá haya una extensión que cargue programas sin hacer un NEW antes, o al menos respetando la pantalla. Echaré un vistazo, pero no me suena. Zerover Tue, 19 Apr 2011 14:07:39 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2284&p=23485&sid=59c21323c95040a1e72ac4c3847a24f8#p23485 http://www.speccy.org/foro/viewtopic.php?f=15&t=2284&p=23485&sid=59c21323c95040a1e72ac4c3847a24f8#p23485 encuesta en QL-Users de que algo estaba planeando para usar una tarjeta SD en el QL.

Ahora tenemos incluso unas fotos del dispositivo. Esto promete.





]]> programandala.net Tue, 19 Apr 2011 07:53:26 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2283&p=23472&sid=59c21323c95040a1e72ac4c3847a24f8#p23472 http://www.speccy.org/foro/viewtopic.php?f=15&t=2283&p=23472&sid=59c21323c95040a1e72ac4c3847a24f8#p23472
El nuevo formato QLPAK de Q-emuLator es lo más práctico, porque permite incluir la ROM que se necesita y el fichero de configuración de Q-emuLator. Así el usuario no tiene que hacer nada. Pero la versión demo de Q-emuLator está muy limitada: sólo permite trescientos y pico KiB de RAM y no pasa de la velocidad de la máquina original. En ese aspecto la versión demo de QPC2 es más versátil para distribuir nuevos programas, especialmente juegos: su única limitación es que no permite modificar ficheros. De hecho uno de los proyectos está escrito en SBASIC para un modo de pantalla moderno y tiene muchos ficheros gráficos, de modo que la mejor opción es distribuirlo en un fichero WIN para QPC2.

Creo que esta cuestión es importante. Si queremos facilitar la popularización de la plataforma, hay que facilitar el uso de sus programas a quienes no estén familiarizados con ella. No podemos esperar que alguien compre Q-emuLator o QPC2 solo para probar, por ejemplo, algún juego.

Pienso cuánto más fácil es hacer esto para otras máquinas, que tienen emuladores libres sin ninguna limitación y para diversas plataformas. ZX Spectrum tiene muchísimos, entre los que destaca Fuse; SAM Coupé tiene solo SImCoupe, pero es excelente. Basta instalarlos, «meter» la imagen de disquete o la cinta y ya está.]]> mcleod_ideafix Sun, 17 Apr 2011 16:58:59 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2281&p=23447&sid=59c21323c95040a1e72ac4c3847a24f8#p23447 http://www.speccy.org/foro/viewtopic.php?f=15&t=2281&p=23447&sid=59c21323c95040a1e72ac4c3847a24f8#p23447 )
Al final no he esperado al lunes, y hoy me he acercado al laboratorio a fresar la placa. Aquí está, con el baño de flux recién puesto (por eso se ve como brillante).



Si parece un poco grande es sencillamente porque los prototipos los hago así, un poco más grandes de lo que realmente es necesario, ya que es la única forma de poder hacer las pistas un poco más anchas, y esto último es conveniente porque las vías que unen pistas en ambas caras de la placa las tengo que mecanizar a mano, y si el pad y la pista son pequeñitos pues... es jodío hacerlo

Tambien se ve grande (mejor dicho, "larga") porque el zócalo que estoy usando para la SD es de longitud completa, en lugar de ser de estos "partidos" que además son más baratos. Pero para una prueba, pues me vale ]]> radastan Fri, 15 Apr 2011 01:41:20 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2276&p=23407&sid=59c21323c95040a1e72ac4c3847a24f8#p23407 http://www.speccy.org/foro/viewtopic.php?f=15&t=2276&p=23407&sid=59c21323c95040a1e72ac4c3847a24f8#p23407 Pues eso, ¿es posible encontrar la rom del QBIDE por algún lado?

¿Algún voluntario que le deje a McLeod el suyo en caso contrario para poder extraer los datos de la ROM?

Realmente no hace falta tocar el chisme, basta sacar los datos de la memoria (que yo sepa se monta la ROM del QBIDE en el mapa de memoria). programandala.net Wed, 06 Apr 2011 09:25:46 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2263&p=23336&sid=59c21323c95040a1e72ac4c3847a24f8#p23336 http://www.speccy.org/foro/viewtopic.php?f=15&t=2263&p=23336&sid=59c21323c95040a1e72ac4c3847a24f8#p23336
Estoy intentando escribir KEYIN en S*BASIC para usarlo en un programa, pero no encuentro cómo.

Primer intento, con DO.

No funciona, porque DO detiene la ejecución del programa.

Code: Seleccionar todo

defproc keyin(sbasic_code$):rem first try
� rem Evaluate a string that contains S*BASIC code
� rem It doesn't work, because DO stops the program.
� loc file$,channel
� let file$="ram1_keyin_tmp"
� let channel=fop_over(file$)
� rem if channel<0:fatal_error "keyin: "&channel
� print #channel,sbasic_code$
� close #channel
� do file$
� delete file$
enddef


Segundo intento, con MERGE.

No funciona porque no se puede usar MERGE desde dentro de un procedimiento (o rutina), o mientras haya algún procedimiento o rutina que no esté cerrado (lo he descubierto en la práctica, porque el manual no dice nada de esto).

Code: Seleccionar todo

defproc keyin(sbasic_code$):rem second try
� rem Evaluate a string that contains S*BASIC code
� rem It doesn't work, because MERGE cannot be used inside a procedure or while any procedure is active.
� loc file$,merge_line,channel
� let file$="ram1_keyin_tmp"
� let merge_line=32767
� let channel=fop_over(file$)
� rem if channel<0:fatal_error "keyin: "&channel
� print #channel,merge_line&"defproc do_keyin:"&sbasic_code$&":enddef"
� close #channel
� merge file$
� do_keyin
� dline merge_line
� delete file$
enddef


Me estoy quedando sin ideas. He mirado en las extensiones que conozco pero no he encontrado ningún comando nuevo que haga esto.]]> radastan Wed, 06 Apr 2011 02:02:27 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2262&p=23333&sid=59c21323c95040a1e72ac4c3847a24f8#p23333 http://www.speccy.org/foro/viewtopic.php?f=15&t=2262&p=23333&sid=59c21323c95040a1e72ac4c3847a24f8#p23333

Code: Seleccionar todo

*-----------------------------------------------------------
* Programa� �:
* Autor� �� �:
* Fecha� �� �:
* Descripcion� �: Rutina de sprites
*-----------------------------------------------------------
* X es la posición donde queremos poner el Sprite (0 izquierda) (múltiplo de 4)
* Y es la posición donde queremos poner el sprite (0 arriba)
* XX es el tamaño horizontal del Sprite (múltiplo de 4)
* YY es el tamaño vertical del Sprite
* SPRITE es la dirección de memoria del Sprite
*
* ENTRADA: X (D1), Y (D2), XX (D3), YY (D4), SPRITE (D5)
COMIENZO:
� �LSR.W� �#2,D1� �� �; Dividimos la posición X entre cuatro
� �LSR.W� �#2,D3� �� �; Dividimos el tamaño XX entre cuatro
� �MOVEA.L� �#$20000,A0� �; Ponemos en A0 el valor de la primera posición de la VRAM
� �MOVE.L� �D5,A1� �� �; ;Ponemos en A1 la posición del sprite
� �ADDA.W� �D1, A0� �� �; Añadimos a A0 el valor de la posición X
� �LSL.W� �#7, D2� �� �; Multiplicamos la posición Y por 128
� �ADDA.W� �D2,A0� �� �; Añadimos a A0 el valor de la posición Y
� �SUBQ� �#1,D3� �� �� �; Drecrementamos el tamaño XX del sprite en 1
� �SUBQ� �#1,D4� �� �� �; Drecrementamos el tamaño YY del sprite en 1
� �MOVE.B� �D3, D6� �� �; Copiamos D3 a D6
ESCRIBEY:
� �MOVE.L� �A0,A2� �� �; Copiamos A0 en A2
ESCRIBEX:
� �MOVE.W� �(A1),(A0)� �� �; Copiamos 4 pixels del sprite a la pantalla
� �ADDQ� �#2, A0� �� �; Incrementamos el puntero de pantalla
� �ADDQ� �#2, A1� �� �; Incrementamos el puntero de sprite
� �DBF� �D3,ESCRIBEX� �� �; Seguimos copiando en horizontal hasta completar el tamaño X del sprite
� �MOVE.B� �D6,D3� �� �; Restauramos el valor de D3 para la siguiente línea de exploración
� �MOVE.L� �A2,A0� �� �; Restauramos el valor de A0 para la siguiente línea de exploración
� �ADDA� �#128, A0� �� �; Incrementamos el valor Y de la pantalla en 128 (siguiente línea)
� �DBF� �D4, ESCRIBEY� �� �; Seguimos copiando en vertical hasta completar el tamaño Y del sprite
� �MOVEQ� �#0,D0� �� �; Dejamos todo preparado para el BASIC
� �RTS� �� �� �� �� �; Salimos
� �END� �COMIENZO� �� �� �; Fin del programa


Estoy usando un programa lanzador desde Super Basic tal que así:

Code: Seleccionar todo

10 CLS
20 prog = RESPR(52)
30 LBYTES flp1_sprite1, prog
40 sprite = RESPR(64)
50 FOR a=sprite TO sprite+63: POKE a,255: NEXT a
60 CALL prog,4,4,16,16,sprite


La idea es la siguiente desde BASIC:

- Reservo memoria para la rutina
- La cargo
- Reservo memoria para el sprite (64 bytes)
- Me hago un sprite a base de 255 (todos los bits a 1)
- Llamo a la rutina de sprites en ensamblador

Supuestamente la rutina recoge los parámetros:

- Posición X en registro D1
- Posición Y en registro D2
- Tamaño horizontal del sprite en D3
- Tamaño vertical del sprite en D4
- Lugar de la memoria donde está el sprite en D5

Una ayudita de los genios del 68000, que no lo mio es el Z80 y se me están atragantando los 16 bits.]]> afx Fri, 25 Mar 2011 19:35:04 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2250&p=23282&sid=59c21323c95040a1e72ac4c3847a24f8#p23282 http://www.speccy.org/foro/viewtopic.php?f=15&t=2250&p=23282&sid=59c21323c95040a1e72ac4c3847a24f8#p23282
El grupo "Retrowiki Computer Team" va a montar un amplio stand donde habrá un lugar especial para el Sinclair QL. Yo me voy a unir a ellos para intentar aportar mi "granito de arena" en lo que pueda en relación al QL.

La idea, en lo que al Sinclair QL se refiere, es darle un trato especial y que tenga una presencia significativa. Habrán varios QL's ampliados que intentaremos conectar en una pequeña red local. Habrán TrumpCard, GoldCard, RomDisQ, revistas de la época, revistas actuales, etc. Llevaremos también software variado más allá de los simples juegos. Veremos en acción el entorno de ventanas PE, SMSQ/E, compiladores, manejo de imágenes, etc.

Habrá por otro lado, un mercadillo para compra-venta-intercambio de material retro-informático variado y un "quirófano" para hacer pequeñas reparaciones.

Expongo todo esto aquí, en este foro, porque he visto en los últimos tiempos un retorno al mundo QL de personas que estuvieron muy activas en el pasado, y que son grandes conocedores de esta plataforma. Me refiero a gente como Salvador Merino, Marcos Cruz, Miguel Angel Hernández y por supuestos los incombustibles Badaman, Zerover y Radastan. También, últimamente hay otras personas con mucho talento que están realizado fantásticas aportaciones con proyectos hardware, menciono en este apartado a Mcleod_ideafix.

Esto es una gran alegría para todos los que disfrutamos de esta afición y sería un orgullo tenerlos presentes en este evento.

Quisiera con este mensaje animarlos a ellos y a cualquier entusiasta del QL a asistir a este encuentro (por supuesto, si tienen la oportunidad y el deseo). No sé cómo saldrá la jornada ni cómo se va a organizar el día, probablemente habrá mucho lío y los eventos serán de tipo informal, pero sería una oportunidad estupenda para conocernos en persona y pasar un rato divertido. Seguro que será fantástico.

¡QL forever! …

Saludos,
afx.]]> programandala.net Tue, 22 Mar 2011 13:47:51 -0400 http://www.speccy.org/foro/viewtopic.php?f=15&t=2246&p=23261&sid=59c21323c95040a1e72ac4c3847a24f8#p23261 http://www.speccy.org/foro/viewtopic.php?f=15&t=2246&p=23261&sid=59c21323c95040a1e72ac4c3847a24f8#p23261 extraño comportamiento de EXTRAS en SMSQ/E, del que no se dice ni palabra en toda la documentación de QPC2 y que sin embargo está explicado en el SBASIC/SuperBASIC Reference Manual, me he preguntado si merecería la pena adquirir un ejemplar de este manual.

¿Alguien lo tiene y me puede decir su opinión?]]>