Graphisme en assembleur sur G850

[charognard]

je vous livre brut de fonderie avec traduction approximative
les routines suivantes trouvées sur un site jap
http://orange.kakiko.com/cosmopatrol/more/motto7.html
(changer le codage de la page)

ça va me servir pour mon bench de casse brique en BASIC/C et assembleur sous cette plate forme avec un article à la clef sur l'adaptation d'un programme sous ces trois languages.

La détermination du modèle peut etre viré à partir du moment que vous connaissez le résultat de la condition

par exemple dans POINT le CALL 9300H sera directement remplacé par un CALL 93CBH

j'ai testé POINT ça MARCHE

pensez au USER 200 sous MON avant la compil sinon ça marche pas

POINT

Registre d'entrée
E: X coordonnées 0~ 143 (~ 00H 8FH)
D: Y 0 coordonnées 0~ 47 (00H ~ 2FH)

registre de sortie
A: 1=point allumé, 0=point éteint

Commentaire
Coordonnée X registre E, D coordonnées dans le registre Y 』POI [lorsque l'Appel,
Si les feux de point de coordonnées [1 dans le registre d'entrée dans le A,
Non point lumineux champ si vous avez plus ou coordonner les
Un registre contient

ＰＯＩ：ＬＤ　　　Ａ，（９３ＣＤＨ）　　；┓
　　　　ＣＰ　　　０Ｅ５Ｈ　　　　　　　；┃
　　　　ＪＲ　　　ＮＺ，Ｓ１　　　　　　；┃DETERMINATION DU
　　　　ＬＤ　　　Ａ，０ＣＤＨ　　　　　；┃MODELE DE G850
　　　　ＪＲ　　　Ｓ２　　　　　　　　　；┃
Ｓ１：　ＬＤ　　　Ａ，０ＣＢＨ　　　　　；┃
Ｓ２：　ＬＤ　　　（Ｎ１＋１），Ａ　　　；┛
　　　　ＬＤ　　　Ｈ，０
　　　　ＬＤ　　　Ｌ，Ｅ
　　　　ＬＤ　　　Ｅ，Ｄ
　　　　ＬＤ　　　Ｄ，０
　　　　ＣＡＬＬ　Ｎ１
　　　　ＡＮＤ　　Ｃ
　　　　ＲＥＴ　　Ｚ
　　　　ＬＤ　　　Ａ，１
　　　　ＲＥＴ
Ｎ１：　ＣＡＬＬ　９３００Ｈ
　　　　ＤＢ　　　０ＥＨ
　　　　ＤＷ　　　０ＣＡ０８Ｈ
　　　　ＲＥＴ


PSET / PRESET

Registre d'entrée
E: Coordonné X 0~ 143 (~ 00H 8FH)
D: Coordonné Y 0~ 47 (00H ~ 2FH)
A: Effacement du point= 0, Affichage du point = 1 ; Inversion du point = 2

Commentaire
E coordonner les registres X, Y D registre de mettre les coordonnées [SET 』Puis appelez
Et le point est allumé, et peuvent être effacées.

Un registre des points [0 』off vous
[1 dans le registre un solide point de la
Un certain nombre de deux registres seront mis en évidence à la dot.


ＳＥＴ：ＰＵＳＨ　ＡＦ
　　　　ＬＤ　　　Ａ，（９３ＣＤＨ）　　；┓
　　　　ＣＰ　　　０Ｅ５Ｈ　　　　　　　；┃
　　　　ＪＲ　　　ＮＺ，Ｓ３　　　　　　；┃DETERMINATION DU
　　　　ＬＤ　　　Ａ，０ＣＤＨ　　　　　；┃MODELE DE G850
　　　　ＪＲ　　　Ｓ４　　　　　　　　　；┃
Ｓ３：　ＬＤ　　　Ａ，０ＣＢＨ　　　　　；┃
Ｓ４：　ＬＤ　　　（Ｎ２＋１），Ａ　　　；┛
　　　　ＰＯＰ　　ＡＦ
　　　　ＬＤ　　　Ｈ，０
　　　　ＬＤ　　　Ｌ，Ｅ
　　　　ＬＤ　　　Ｅ，Ｄ
　　　　ＬＤ　　　Ｄ，０
　　　　ＬＤ　　　（７９６７Ｈ），ＨＬ
　　　　ＬＤ　　　（７９６９Ｈ），ＤＥ
　　　　ＬＤ　　　ＩＸ，０ＦＦＦＦＨ
　　　　ＬＤ　　　（７７７ＤＨ），ＩＸ
　　　　ＬＤ　　　（７７７ＦＨ），Ａ
　　　　ＣＡＬＬ　Ｎ２
　　　　ＲＥＴ
Ｎ２：　ＣＡＬＬ　９３００Ｈ
　　　　ＤＢ　　　０ＤＨ
　　　　ＤＷ　　　０Ｃ５９５Ｈ
　　　　ＲＥＴ


LINE

Registre d'entrée
HL: Coordonnée X de l’origine de la ligne -32768 X ~ 32767 (8000H ~ 7FFFH)
DE: Coordonnée Y de l’origine de la ligne -32768 ~ 32767 (8000H ~ 7FFFH)
IX: Coordonnée X de la fin de la ligne -32768 32767 (8000H ~ 7FFFH)
IY: Coordonnée Y de la fin de la ligne 32767 (8000H ~ 7FFFH)
A: Effacement du point= 0, Affichage du point = 1 ; Inversion du point = 2
B: Ligne = 0, Rectangle=1, Rectangle= 2

Commentaire
Entrez le numéro de registre et les coordonnées de chaque individu LIN [』puis un appel
Et tracer la ligne entre la source et de destination, vous pouvez décrire un rectangle avec des lignes diagonales début et la fin.

B 』registre tracer une ligne entre 0 [points de début et de fin et à
[B 1 dans le registre de décrire un rectangle en diagonale vers le début et la fin.
registres B en deux, deux et remplir le rectangle avec diagonale représentant le début et la fin.

Un registre des points [0 』off vous
[1 dans le registre un solide point de la
Un registre de numéro deux est mis en évidence lorsque le point.

Notes
BASIC LINE de l'instruction, mais peut être omis de tirer quelques lignes,
Dans ce sous-programme, s'il vous plaît mettez toutes les données de registre d'entrée à chaque fois.

ＬＩＮ：ＰＵＳＨ　ＡＦ
　　　　ＬＤ　　　Ａ，（９３ＣＤＨ）　　；┓
　　　　ＣＰ　　　０Ｅ５Ｈ　　　　　　　；┃
　　　　ＪＲ　　　ＮＺ，Ｓ５　　　　　　；┃
　　　　ＬＤ　　　Ａ，０ＣＤＨ　　　　　；┃DETERMINATION DU
　　　　ＪＲ　　　Ｓ６　　　　　　　　　；┃MODELE DE G850
Ｓ５：　ＬＤ　　　Ａ，０ＣＢＨ　　　　　；┃
Ｓ６：　ＬＤ　　　（Ｎ３＋１），Ａ　　　；┃
　　　　ＬＤ　　　（Ｎ４＋１），Ａ　　　；┃
　　　　ＬＤ　　　（Ｎ５＋１），Ａ　　　；┛
　　　　ＰＯＰ　　ＡＦ
　　　　ＬＤ　　　（７９６７Ｈ），ＩＸ
　　　　ＬＤ　　　（７９６９Ｈ），ＩＹ
　　　　ＬＤ　　　ＩＸ，０ＦＦＦＦＨ
　　　　ＬＤ　　　（７７７ＤＨ），ＩＸ
　　　　ＬＤ　　　（７７７ＦＨ），Ａ
　　　　ＬＤ　　　Ａ，Ｂ
　　　　ＣＰ　　　１
　　　　ＪＲ　　　Ｃ，Ｐ０
　　　　ＪＲ　　　Ｚ，Ｐ１
　　　　ＣＡＬＬ　Ｎ５
　　　　ＲＥＴ
Ｐ０：　ＣＡＬＬ　Ｎ３
　　　　ＲＥＴ
Ｐ１：　ＣＡＬＬ　Ｎ４
　　　　ＲＥＴ
Ｎ３：　ＣＡＬＬ　９３００Ｈ
　　　　ＤＢ　　　０ＤＨ
　　　　ＤＷ　　　０Ｃ５９５Ｈ
Ｎ４：　ＣＡＬＬ　９３００Ｈ
　　　　ＤＢ　　　０ＤＨ
　　　　ＤＷ　　　０Ｃ４４２Ｈ
Ｎ５：　ＣＡＬＬ　９３００Ｈ
　　　　ＤＢ　　　０ＤＨ
　　　　ＤＷ　　　０Ｃ４ＣＢＨ
　　　　ＲＥＴ



Exemple de programme
ＬＤ　　　ＨＬ，１００　　　　；┓
　　　　ＬＤ　　　ＤＥ，４　　　　　　；┃（１）
　　　　ＬＤ　　　ＩＸ，１２０　　　　；┃Tracer une ligne
　　　　ＬＤ　　　ＩＹ，３１　　　　　；┃　Entre (100,4）et（120,31）
　　　　ＬＤ　　　Ａ，１　　　　　　　；┃
　　　　ＬＤ　　　Ｂ，０　　　　　　　；┃
　　　　ＣＡＬＬ　ＬＩＮ　　　　　　　；┛
　　　　ＬＤ　　　ＨＬ，－３　　　　　；┓
　　　　ＬＤ　　　ＤＥ，－６　　　　　；┃（２）
　　　　ＬＤ　　　ＩＸ，５５　　　　　；┃（-3,-6）と（55,18）を対角線とする　
　　　　ＬＤ　　　ＩＹ，１８　　　　　；┃　四角形を書く
　　　　ＬＤ　　　Ａ，１　　　　　　　；┃
　　　　ＬＤ　　　Ｂ，１　　　　　　　；┃
　　　　ＣＡＬＬ　ＬＩＮ　　　　　　　；┛
　　　　ＬＤ　　　ＨＬ，４０　　　　　；┓
　　　　ＬＤ　　　ＤＥ，１０　　　　　；┃（３）
　　　　ＬＤ　　　ＩＸ，７２　　　　　；┃（40,10）と（72,24）を対角線とする
　　　　ＬＤ　　　ＩＹ，２４　　　　　；┃　四角形を書き、中を塗りつぶす
　　　　ＬＤ　　　Ａ，１　　　　　　　；┃
　　　　ＬＤ　　　Ｂ，２　　　　　　　；┃
　　　　ＣＡＬＬ　ＬＩＮ　　　　　　　；┛
　　　　ＬＤ　　　ＨＬ，７５　　　　　；┓
　　　　ＬＤ　　　ＤＥ，０　　　　　　；┃（４）
　　　　ＬＤ　　　ＩＸ，４５　　　　　；┃（75,0）と（45,50）を結ぶ
　　　　ＬＤ　　　ＩＹ，５０　　　　　；┃　直線を引く
　　　　ＬＤ　　　Ａ，２　　　　　　　；┃　ただし直線は画面に対して反転する
　　　　ＬＤ　　　Ｂ，０　　　　　　　；┃
　　　　ＣＡＬＬ　ＬＩＮ　　　　　　　；┛
　　　　ＲＥＴ
GCURSOR / GPRINT

Registre d'entrée
IX: GCURSOR la coordonnée X de -32768 ~ 32767 (8000H ~ 7FFFH)
IY: GCURSOR coordonnée Y de -32768 ~ 32767 (8000H ~ 7FFFH)
HL: Lieu de départ des données graphiques
B: points horizontaux Gurafukkudeta 1 ~ 144 (~ 01H 90H)

Commentaire
Mettez l'adresse HL début du registre que vous souhaitez afficher des données graphiques,
Les instructions de la même manière GCURSOR BASIC IX, IY s'inscrire et d'entrer les coordonnées
GPR [CALL 』pour voir les graphiques alors.

Notes
Les coordonnées des GCURSOR, affichage graphique de base ainsi que l'instruction sera [』inférieure gauche.
Le modèle de données graphiques en format peu
BASIC GPRINT qu'ils respectent l'ordre, montrent que joue dans [CALL 0BFD0H
S'il vous plaît noter le motif de bits, les formats de données différents.
Pour plus d'informations, des instructions écrites sur le G850, GPRINT S'il vous plaît lisez la description de l'instruction.
ＧＰＲ：ＬＤ　　　Ａ，（９３ＣＤＨ）　　；┓
　　　　ＣＰ　　　０Ｅ５Ｈ　　　　　　　；┃
　　　　ＪＲ　　　ＮＺ，Ｓ７　　　　　　；┃DETERMINATION DU
　　　　ＬＤ　　　Ａ，０ＣＤＨ　　　　　；┃MODELE DE G850
　　　　ＪＲ　　　Ｓ８　　　　　　　　　；┃
Ｓ７：　ＬＤ　　　Ａ，０ＣＢＨ　　　　　；┃
Ｓ８：　ＬＤ　　　（Ｎ６＋１），Ａ　　　；┛
　　　　ＬＤ　　　（７９ＤＢＨ），ＩＸ
　　　　ＬＤ　　　（７９ＤＤＨ），ＩＹ
Ｌ１：　ＸＯＲ　　Ａ
　　　　ＬＤ　　　（７７７ＦＨ），Ａ
　　　　ＬＤ　　　Ａ，（ＨＬ）
　　　　ＰＵＳＨ　ＢＣ
　　　　ＰＵＳＨ　ＨＬ
　　　　ＣＡＬＬ　Ｎ６
　　　　ＰＯＰ　　ＨＬ
　　　　ＩＮＣ　　ＨＬ
　　　　ＰＯＰ　　ＢＣ
　　　　ＤＪＮＺ　Ｌ１
　　　　ＲＥＴ
Ｎ６：　ＣＡＬＬ　９３００Ｈ
　　　　ＤＢ　　　０ＥＨ
　　　　ＤＷ　　　０Ｃ９２ＥＨ
　　　　ＲＥＴ

Exemple de programme

ＬＤ　　　ＩＸ，２０　　　；X座標は20
　　　　ＬＤ　　　ＩＹ，１７　　　；Y座標は17
　　　　ＬＤ　　　Ｂ，１２　　　　；グラフィックの横の長さは12ドット
　　　　ＬＤ　　　ＨＬ，ＢＯＸ　　；グラフィックデータの開始アドレスを読み込む　
　　　　ＣＡＬＬ　ＧＰＲ　　　　　；『GPRINT』IOCSをCALL
　　　　ＲＥＴ　　　　　　　　　　；
ＢＯＸ：ＤＢ　　　１ＥＨ　　　　　；┓
　　　　ＤＢ　　　９ＣＨ　　　　　；┃
　　　　ＤＢ　　　５ＣＨ　　　　　；┃
　　　　ＤＢ　　　３ＣＨ　　　　　；┃
　　　　ＤＢ　　　５ＣＨ　　　　　；┃
　　　　ＤＢ　　　９ＣＨ　　　　　；┃グラフィックのデータ
　　　　ＤＢ　　　１ＣＨ　　　　　；┃CALL 0BFD0H用とは異なるので注意！
　　　　ＤＢ　　　８８Ｈ　　　　　；┃
　　　　ＤＢ　　　０ＥＢＨ　　　　；┃
　　　　ＤＢ　　　３ＦＨ　　　　　；┃
　　　　ＤＢ　　　０ＢＣＨ　　　　；┃
　　　　ＤＢ　　　０Ｆ０Ｈ　　　　；┛

[charognard]

ça interresse quelqu'un au moins ??
ou il n'y a plus que moi en france (voire dans le monde)

[Paul Tergeist]

ouaou. Oui ça m'interesse mais à la place des listings j'ai des petits carrés. Il doit manquer une police de caractères à mon firefox,
mais laquelle ?

[charognard]

Les listings que j'ai mis dans mon premier post, les vois tu ?

pour le site donné en référence, as-tu changé la page de codage ?
genre japonais par exemple

[zpalm]

J'ai pas de G850 ... par contre je vois bien les listings. Un copier-coller de Firefox dans Word me dit que la police des listing est: MS Mincho.

[charognard]

il t'en faut un ... c'est un OP très plaisant

[pir2]

Y'a nu VS sur Rinkya en ce moment, mais à un prix ...

[charognard]

il y en a 5 sur ebay aussi mais c'est qu'un V en noir

je ne déserperd cependant pas de la sortie d'un véritable successeur

[Chris]

Moi, ça m'intéresse bien sûr.

Bon, je n'ai pas trop le temps de m'en servir actuellement, mais tout ce que tu pourras mettre à disposition de la communauté nous sera utile !

Bonne continuation,
Chris

[gege]

Au fait Chris, en seras-tu pour les "Pocketicaires" ?
Ok c'est un week-end, mais une fois dans l'année, et une année dans la décennie...
Un chtit neffort ? (Atchaaaa !)
A+ j'espère
G.E.

[Alainza]

ça interresse quelqu'un au moins ??
ou il n'y a plus que moi en france (voire dans le monde)

euh, non seulement c'est intéressant... mais c'est en plus carrément dangereux tes posts : je sens que je vais finir par craquer sur ebay pour une de ces bestioles....

A+
Alainza

[charognard]

ça interresse quelqu'un au moins ??
ou il n'y a plus que moi en france (voire dans le monde)

euh, non seulement c'est intéressant... mais c'est en plus carrément dangereux tes posts : je sens que je vais finir par craquer sur ebay pour une de ces bestioles....

A+
Alainza

merci

n'hésite pas à craquer

[destroyedlolo]

De mon cote, je me laisserai bien tente par le cote C.
Je n'ai plus le temps (ni l'envi) d'aprendre un nouvel assembleur ... meme sur les PIC je ne fais que du C.

[Chris]

Au fait Chris, en seras-tu pour les "Pocketicaires" ?
Ok c'est un week-end, mais une fois dans l'année, et une année dans la décennie...
Un chtit neffort ? (Atchaaaa !)
A+ j'espère
G.E.

Salut Gege,

Il faut que je vérifie ma disponibilité (j'ai vu passer le post en question), je ne voulais pas annoncer ma venue et ne pas tenir ma parole

En même temps, c'est au bout de ma rue

[Pocket]

Salut,

Bon, j'ai craqué, j'ai acheté un VS sur la baie.
Un truc marrant, c'est qu'il y a une entrée pour une alimentation sur secteur via un transfo (non fourni).

A+