Magazine Pom's : la collection

46
Fondu enchaîné
Th. Charlier de Chily
Particulièrement porté sur les applications
graphiques de ]' Apple, je me
suis penché avec délectation sur le
programme de Fondu Enchaîné proposé
par Denis Sureau dans le
Porn's 7. Je dois toutefois lui faire un
petit reproche sur le plan du vocabulaire,
en ce sens que les opérations
qu'il effectue ne me semblent pas répondre
à la définition exacte du
"fondu enchainé" qui consiste, selon
le Petit Larousse, en l'apparition en
fondu d'une image avec disparition
de la précédente.
Programme Fondu Enchaîné
1 ORS '300
2 DPBYTE mu JO
3 RRBYTE EQIJ "
4 COMPTEUR mu "a
S •
6 'INITHï..ISATION DES POINTSl:RS
7 .
a LDA .. 0
, STA DPBY!E
10 STA RRBYTE
11 JSR INIT
12 'ffHHH.HH.
13 'Sl.PERPOSITJ
" . 1 + 2-) 1 •
15 ....... f.t.f4"
Hi BCLSUP LDA (OPBYTE) , Y
17 aRA (RRBYTEI , Y
la STA (RRBYTEI . Y
" LDA ISO
20 STA CIJltPTEUR
21 LDA 110
22 lOOPl Ir«: COMPTEUR
23 DI' COI'IPTEUR
2' llNE lOOPI
2S INY
26 llNE BCLSLI'
27 Ir«: ARBYTE+'!
28 Ir«: DPBYTE+,!
29 CP! RRBYTH'1
30 llNE BCLSLO
31 JSR INIT
32 fHM"'fH ....
33 • TRANSFERT •
3" 2-}1 •
3S H4++ttt.H++H
36 BCLTAA LOO ŒP8YTEl , Y
37 STA (R!tBYTEJ , Y
En fait, le programme en question
réalise surtout un transfert rapide
d'une page graphique à l'autre.
Partant de cette constatation, je vous
présente ci-après une petite routine
en assembleur qui respecte un peu
plus le sens des mots.
Si vous avez chargé un graphique
dans la page 1 et un autre dans la
page 2, il suffit de faire CALL 768
pour en lancer ]' exécution.
38 LDA "0
" sm COMPTEUR
'" LOO 110
41 LOOP2 Ir«: CQIIIPTEUR
'2 DI' COMPTEUr(
43 ... LOOP2
44 INY
" ... SelTRA
.. Ir«: ARBYTE+l!
" Ir«: D9BYTP" ;
'"' CP! ARBY"!'"E+l:
" ... BCLTRA
sa RTS
51 INIT LOO "'"
52 STA ARBYTE+'1
53 LOO ""
" STA DPBYTE+Sl
55 LDY "0
56 LOI .. "
57 RTS
58 FIN
Récapitulation
4300. 351
0300- A9 00 85 Ob 85 08 20 4S
0308- 03 BI 06 11 08 91 08 A9
0310- 00 85 18 A9 00 E6 8 C5
0318- 18 DO FA ca DO EB [fi 09
0320- E6 07 E4 09 DO E3 20 45
0328- 03 BI 06 91 08 A'3 00 8·
0330- 18 A9 00 E6 18 C5 18 00
0338- FA C8 DO ED E6 09 Et 07
0340- E4 09 00 ES GO A'3 20 as
0348- 09 R9 40 85 07 AO 00 Al
0350- 40 60
La première partie de ce programme
peut ètre utilisée afin de superposer
deux images graphiques et, si le
transfert se fait dans cette version de
base de la page 2 vers la page 1, il
est à noter que les modifications suivantes
permettraient de faire !'inverse
:
Ligne 51 INIT lDA #$40
Ligne 53 lDA #$20
ligne 56 lDX #$60
Modification de la
touche SHIFT
De nombreux programmes offrent la
possibilité d'utiliser la "modification
de la touche SHIFT" pour obtenir
par soft les minuscules au clavier :
c'est le cas en particulier d'Applewriter
Il et du moniteur étendu de
Thierry Le Tallec {Pom's 8). Pour
réaliser cette modification , il suffit
tout simplement de relier à raide
d'un fil la patte du bouton 2 de la
broche des manettes de jeu à une
petite barre verticale située derrière le
clavier (la deuxième à partir de la
droite).
N<
."
" .
•• J
••
. ,
••
ri<
Connecteur
Manette
de Jeu
Clavier
1 1 1 1 1 1 1 1 1
Bien entendu, pour pouvoir voir les
minuscules, il faut disposer d'une
ROM génératrice de caractères en
minuscule, ou utiliser un programme
comme Applewriter Il qui affiche les
majuscules en inverse.
La barre est reliée dans le davier à la
touche SHIFT, qui est ainsi connectée
au bouton 2. Il suffit pour un
programme de lire l'adresse correspondante
pour voir si la touche
SHIFT est enfoncée, et agir en
conséquence.
Pom's n° 9