FORTH sur PC-1500

[phe78]

Hello,

la v1.0 du Forth est dispo ! Elle reprend les mots du Camel Forth pour des raisons de compatibilite, la version actuelle occcupe 7113 bytes, basee en 00C5 (donc necessite un PC1500A avec CE161), point d'entree en 00C5.




Vous pouvez recuperer les sources, le listing et le WAV a l'adresse https://dl.dropboxusercontent.com/u/858 ... ORTH10.zip

un grand merci a cgh pour son aide et son superbe assembleur lhasm

c'est une 1.0... donc je vais devoir apporter plusieurs ameliorations pour en faire un systeme reellement utilisable :
- integrer un editeur de ligne (pour l'instant, pas de possilbite de corriger ce qui est tape au clavier)
- primitives de support imprimante et cassette
- amelioration des performances, la recherche dans le dictionnaire au moment de la compilation et le scrolling d'ecran rament un peu

dites-moi ce que vous en pensez !

[Rom1500]

Bravo !
Je vais regarder ça.

[bernouilli92]

Cool, il faut que je teste cela.

[cgh]

Ah ah ! Je vais regarder ca avec beaucoup d'interet Je cherche un langage de programmation natif pour MMPS. Le FORTH est en pole-position !

@phe78 : Merci pour ton boulot

[Xerxes]

Forth is also available for the PC-E500 (apparently inclomplete) and PB-1000 (PB-Forth):

http://www.aldweb.com/articles.php?lng=fr&pg=9362

http://www.pisi.com.pl/piotr433/index.htm#pb1000

PB-Forth is even faster than the HP-82490A Forth version of the HP-71B.

[phe78]

je viens d'uploader une mise a jour (1.01) corrigeant un bug sur +LOOP et ameliorant la vitesse d'affichage. il restait aussi quelques traces de code de debug que j'ai vire.

le fichier est dispo sur https://dl.dropboxusercontent.com/u/858 ... ORTH10.zip

[cgh]

Superbe ! C'est vrai que le SCROLL est un peu lent. Il y a une routine qui reecrit l'ecran avec le texte pointe par DE. A noter que le texte a afficher doit etre en &7BB0..&7BFF. C'est le buffer d'entree.
C'est la routine en &E8CA. Il faut charger &80 en &7880. Elle est decrite en page 134/135 du TRM.

Tu peux regarder l'exemple qui est dans MONMON.

Si tu mets &40 en &7880, la routine gere elle-meme le curseur souligne si le caractere pointe est < &20, et le pave clignotant autrement.

[cgh]

Question bete : comment retourne-t-on au BASIC ?

Ok. Trouve. Il faut utiliser BYE !

[phe78]

Je viens d'uploader la version 1.02 qui apporte le support de l'imprimante (ROM CE150 version 1 uniquement, il faut que PEEK(&A800) renvoie 190, je ferai un test ROM0/ROM1 la prochaine fois)
J'ai aussi implemente des primitives de debug, mais elles sont encore tres... primitives donc a ameliorer.
Il faudra aussi que j'integre un editeur de ligne, sur la base des conseils de cgh.

package disponible a https://dl.dropboxusercontent.com/u/858 ... RTH102.zip

ci-dessous un test avec la suite de Fibonacci et la liste des mots disponibles

[icho]

vous êtes des fondus mais des fondus géniaux

[badaze]

vous êtes des fondus mais des fondus géniaux

Ces temps ci ça empire je trouve.

[Rom1500]

Il manque A dans le nom du langage pour Aspirine

[Tipoucet]

vous êtes des fondus mais des fondus géniaux

Oui + 1

[remy]

Salut Philippe,
Je suis en train de m'essayé au dev d'un nouveau firmware pour le PC-1500 et j'essaye d'intégrer ton FORTH.
J'ai un erreur avec lhasm :

Code : Tout sélectionner

FORTH10A.asm line 48: --WARNING-- Argument 2; Trailing garbage not processed!
FORTH10A.asm line 52: !!!FATAL!!! Assembler confused: Symbol 'DOCREATE' differs between passes

J'utilise le source de la 1.02.
Une idée ?

[phe78]

Salut Rémy,
il faut que tu assembles le fichier main FORTH10M qui contient les includes des autres fichiers. J'assemble avec la ligne de commande lhasm -L FORTH10M.l FORTH10M.asm, j'ai vérifié que c'est OK avec les fichiers 1.02 que j'ai uploadés.
tiens , je vais le tester sous Pockemul, ça me permettrait de continuer à développer et debugger quand je suis en voyage