TAVERNIER 6809
Modérateurs : Papy.G, fneck, Carl
Re: TAVERNIER 6809
Superbe !
Il faut nous dire comment tu fais cela !
Frederic
Il faut nous dire comment tu fais cela !
Frederic
Cordialement
Frédéric
Forget the C:\ prompt! Real computing starts with +++
Frédéric
Forget the C:\ prompt! Real computing starts with +++
Re: TAVERNIER 6809
Bonjour,
Alors, il s'agit "simplement" de récupérer le contenu d'un fichier photo et d'allumer ou non les bons pixels sur le Tavernier...
J'ai d'abord recadré la photo : largeur 120, hauteur 125.
Puis conversion en binaire. Personnellement je l'ai fait avec une ancienne version de XnView (méthode Floyd Steinberg).
Enregistrement en BMP.
Puis je me suis (re)mis au PASCAL.
Sauf erreur de ma part, la version 1.5 du TSC PASCAL ne gère que des fichiers textes, or BMP est un fichier binaire...
J'ai du tricher un peu et ai édité le BMP avec Notepad++ muni du plugin HEX-EDITOR
- remplacement de tous les 00 par 01 car les 00 ne sont pas lus.
- remplacement de tous les 09 par 19, car il l’interprète comme des "spaces" multiples.
Puis renommer le fichier PICTURE1.BMP (ne sera plus compatible avec paint, etc)
Nota:
Write (chr(27),'P',chr(x),chr(y)); ne fonctionne pas si x ou y est égal à 13. (CR)
De même si x ou y est supérieur à 127, il y a erreur. Pas possible donc d'utiliser les 256 points horizontaux de l'IVG09.
J'ai un peu galéré avec toutes ces restrictions.
Puis compilation, assemblage et pour lancer :
0.GRAPHIX:1.PRUN 1.PICIVG09
(graphix.cmd étant sur mon lecteur 0, Pascal sur le 1).
S'il y a des points à détailler, n'hésitez pas !
Michel, à toi d'afficher en couleur avec ta carte !
Bonne soirée,
Bernard.
Alors, il s'agit "simplement" de récupérer le contenu d'un fichier photo et d'allumer ou non les bons pixels sur le Tavernier...
J'ai d'abord recadré la photo : largeur 120, hauteur 125.
Puis conversion en binaire. Personnellement je l'ai fait avec une ancienne version de XnView (méthode Floyd Steinberg).
Enregistrement en BMP.
Puis je me suis (re)mis au PASCAL.
Sauf erreur de ma part, la version 1.5 du TSC PASCAL ne gère que des fichiers textes, or BMP est un fichier binaire...
J'ai du tricher un peu et ai édité le BMP avec Notepad++ muni du plugin HEX-EDITOR
- remplacement de tous les 00 par 01 car les 00 ne sont pas lus.
- remplacement de tous les 09 par 19, car il l’interprète comme des "spaces" multiples.
Puis renommer le fichier PICTURE1.BMP (ne sera plus compatible avec paint, etc)
Nota:
Write (chr(27),'P',chr(x),chr(y)); ne fonctionne pas si x ou y est égal à 13. (CR)
De même si x ou y est supérieur à 127, il y a erreur. Pas possible donc d'utiliser les 256 points horizontaux de l'IVG09.
J'ai un peu galéré avec toutes ces restrictions.
Puis compilation, assemblage et pour lancer :
0.GRAPHIX:1.PRUN 1.PICIVG09
(graphix.cmd étant sur mon lecteur 0, Pascal sur le 1).
S'il y a des points à détailler, n'hésitez pas !
Michel, à toi d'afficher en couleur avec ta carte !
Bonne soirée,
Bernard.
- Pièces jointes
-
- PICIVG09.txt
- (1.05 Kio) Téléchargé 83 fois
Bernard
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour Frédéric,
J'ai un peu déserté le terrain du TAVERNIER pour mettre en marche une carte MicroBoxII....
La maîtrise du processeur graphique NEC7220 m'a donné du fil à retordre...une vraie usine à gaz
Mais bon la carte MicroBoxII présente des choses intéressantes comme le RAM Disk....
On reste dans le monde du FLEX et du 6809
J'ai aussi eu l'occasion d'utiliser un Gotek qui semble d'un emploi plus aisé que le module HxC
Maintenant, je vais voir s'il y a moyen de faire discuter ces deux machines
A plus
Michel
J'ai un peu déserté le terrain du TAVERNIER pour mettre en marche une carte MicroBoxII....
La maîtrise du processeur graphique NEC7220 m'a donné du fil à retordre...une vraie usine à gaz
Mais bon la carte MicroBoxII présente des choses intéressantes comme le RAM Disk....
On reste dans le monde du FLEX et du 6809
J'ai aussi eu l'occasion d'utiliser un Gotek qui semble d'un emploi plus aisé que le module HxC
Maintenant, je vais voir s'il y a moyen de faire discuter ces deux machines
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous,
Je suis parvenu à établir une communication basique entre mon TAVERNIER et la carte MicroboxII
Mon TAVERNIER est équipé de la carte CPU09 avec une carte fille qui rajoute une entrée RS232
Cette entrée supplémentaire permet d'établir une liaison RS232 entre le TAVERNIER et la carte MicroboxII
Ainsi configuré, les codes saisis sur le clavier du PC transitent par le TAVERNIER pour effectuer les commandes moniteur de la carte MicroboxII
Bon, ce n'est pas très spectaculaire, mais cela marche !
A plus
Michel
Je suis parvenu à établir une communication basique entre mon TAVERNIER et la carte MicroboxII
Mon TAVERNIER est équipé de la carte CPU09 avec une carte fille qui rajoute une entrée RS232
Cette entrée supplémentaire permet d'établir une liaison RS232 entre le TAVERNIER et la carte MicroboxII
Ainsi configuré, les codes saisis sur le clavier du PC transitent par le TAVERNIER pour effectuer les commandes moniteur de la carte MicroboxII
Bon, ce n'est pas très spectaculaire, mais cela marche !
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Un essai avec un GOTEK FlashFloppy connecté à mon TAVERNIER....
SPIRALE5.BAS
10 R0=2
20 X0=240
30 Y0=120
40 PRINT CHR$(12)
50 PRINT CHR$(18)
100 FOR J=0 TO 560 STEP 1
110 T=(PI/2)*J/10
120 R=R0*(1+J/10)
130 K=J-INT(J/16)*16
140 PRINT "C"+STR$(K)+CHR$(13)
150 X=INT(X0+R*COS(T))
160 Y=INT(Y0-R*SIN(T))
170 PRINT "M"+STR$(X)+","+STR$(Y)+CHR$(13)+"I"+CHR$(13)
180 PRINT "Y256,2,0"+CHR$(13)
190 NEXT J
200 PRINT "A"
210 STOP
A plus
Michel
Un essai avec un GOTEK FlashFloppy connecté à mon TAVERNIER....
SPIRALE5.BAS
10 R0=2
20 X0=240
30 Y0=120
40 PRINT CHR$(12)
50 PRINT CHR$(18)
100 FOR J=0 TO 560 STEP 1
110 T=(PI/2)*J/10
120 R=R0*(1+J/10)
130 K=J-INT(J/16)*16
140 PRINT "C"+STR$(K)+CHR$(13)
150 X=INT(X0+R*COS(T))
160 Y=INT(Y0-R*SIN(T))
170 PRINT "M"+STR$(X)+","+STR$(Y)+CHR$(13)+"I"+CHR$(13)
180 PRINT "Y256,2,0"+CHR$(13)
190 NEXT J
200 PRINT "A"
210 STOP
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Compte tenu de l'expérience positive acquise avec le module GOTEK, j'en ai installé un sur mon TAVERNIER.
J'ai 'aussi tenu compte de la canicule....
A plus
Michel
(V2)
Compte tenu de l'expérience positive acquise avec le module GOTEK, j'en ai installé un sur mon TAVERNIER.
J'ai 'aussi tenu compte de la canicule....
A plus
Michel
(V2)
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Une photo de mon bloc lecteur HxC-TEAC-GOTEK
Equipé de deux switches, il me permet sur mon TAVERNIER de disposer simultanément de 3 lecteurs dans deux configurations
1°) DS0 et DS1 avec le module HxC - DS2 avec le lecteur TEAC ou module GOTEK
2°) DS0 avec une voie du module HxC - DS1 avec lecteur TEAC - DS2 avec module GOTEK
A plus
Michel
Une photo de mon bloc lecteur HxC-TEAC-GOTEK
Equipé de deux switches, il me permet sur mon TAVERNIER de disposer simultanément de 3 lecteurs dans deux configurations
1°) DS0 et DS1 avec le module HxC - DS2 avec le lecteur TEAC ou module GOTEK
2°) DS0 avec une voie du module HxC - DS1 avec lecteur TEAC - DS2 avec module GOTEK
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
J'ai ressorti des cartons une carte d'essai mettant en oeuvre le coprocesseur arithmétique AM9511....
Juste après sa mise au point (Cf mon post du 17-05-2018) mon TAVERNIER est tombé en panne et une fois réparé je suis passé à autre chose...
J'ai réussi ces jours-ci à la remettre en route et j'envisage de créer un PCB pour mettre ce travail au propre...
Cela me permettra aussi de ne pas perdre la main avec KiCad
Ci-dessous l'état de cette carte d'essai et une trace d'un petit test de fonctionnement.
A plus
Michel
J'ai ressorti des cartons une carte d'essai mettant en oeuvre le coprocesseur arithmétique AM9511....
Juste après sa mise au point (Cf mon post du 17-05-2018) mon TAVERNIER est tombé en panne et une fois réparé je suis passé à autre chose...
J'ai réussi ces jours-ci à la remettre en route et j'envisage de créer un PCB pour mettre ce travail au propre...
Cela me permettra aussi de ne pas perdre la main avec KiCad
Ci-dessous l'état de cette carte d'essai et une trace d'un petit test de fonctionnement.
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Et voici un premier tracé obtenu avec une routine mettant en oeuvre le coprocesseur arithmétique AM9511
A plus
Michel
Et voici un premier tracé obtenu avec une routine mettant en oeuvre le coprocesseur arithmétique AM9511
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Voici le listing de mon programme CERCLE03 et quelques infos supplémentaires. Il intègre
- Le driver présent dans la doc HARWELL Using the Am9511 Arithmetic Processing Unit with the Motorola M6800 Microprocessor
- Le code permettant d'initialiser ma carte graphique ELEKTOR
- Le code permettant de tracer un simple cercle sur la base des équations suivantes
X = R * COS (T )
Y = R * SIN ( T )
T variant de 360° à 1°
Le driver est assez simple d'emploi, les séquences d'appel se font sous la forme:
JSR XXX
FDB ADD1
FDB ADD2
FDB ADDR
XXX est le nom de la fonction, ADD1, ADD2 sont les dresses des opérandes (0, 1 ou 2) et ADDR l'adresse du résultat
Finalement, la seule difficulté réside dans la manipulation des valeurs des variables (Format Flottant sur 32 bits et/ou Fix sur 16 bits).
A plus
Michel
Voici le listing de mon programme CERCLE03 et quelques infos supplémentaires. Il intègre
- Le driver présent dans la doc HARWELL Using the Am9511 Arithmetic Processing Unit with the Motorola M6800 Microprocessor
- Le code permettant d'initialiser ma carte graphique ELEKTOR
- Le code permettant de tracer un simple cercle sur la base des équations suivantes
X = R * COS (T )
Y = R * SIN ( T )
T variant de 360° à 1°
Le driver est assez simple d'emploi, les séquences d'appel se font sous la forme:
JSR XXX
FDB ADD1
FDB ADD2
FDB ADDR
XXX est le nom de la fonction, ADD1, ADD2 sont les dresses des opérandes (0, 1 ou 2) et ADDR l'adresse du résultat
Finalement, la seule difficulté réside dans la manipulation des valeurs des variables (Format Flottant sur 32 bits et/ou Fix sur 16 bits).
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Les choses se précisent, j'ai saisi ma carte Coprocesseur sous KiCad, il me reste quelques vérifications à faire avant d'expédier mon fichier chez JLCPCB...
A plus
Michel
Les choses se précisent, j'ai saisi ma carte Coprocesseur sous KiCad, il me reste quelques vérifications à faire avant d'expédier mon fichier chez JLCPCB...
A plus
Michel
Re: TAVERNIER 6809
SUPERBE comme toujours!
Bonne journée
Jean-François
Bonne journée
Jean-François
Il n'y a que 11 sortes de gens, ceux qui comprennent ceux qui ne comprennent pas et ceux qui me font répéter!
Jean-François
Jean-François
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour,
Je profite de ma cde chez JLCPCB pour mettre au propre mes adaptateurs BUS TAVERNIER - BUS Carte ELKTOR format EUROPE.
A plus
Michel
Je profite de ma cde chez JLCPCB pour mettre au propre mes adaptateurs BUS TAVERNIER - BUS Carte ELKTOR format EUROPE.
A plus
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
En attendant les PCB.....une nouvelle image
Michel
En attendant les PCB.....une nouvelle image
Michel
- michel guyot
- Messages : 616
- Inscription : 20 mars 2016 16:01
- Localisation : Pyrénées orientales
Re: TAVERNIER 6809
Bonjour à tous
Ci-joint un exemple de code qui illustre la mise en oeuvre du coprocesseur AM9511 pour générer les 4 images
A plus
Michel
Ci-joint un exemple de code qui illustre la mise en oeuvre du coprocesseur AM9511 pour générer les 4 images
A plus
Michel