dettagli - Amiga Magazine

;Numero di stelle
NUMSTARS EQU 5
;Offset dei singoli elementi
;all'interno della tavola
STAR-X EQU O
STAR-Y EQU 2
STAR-Z EQU 4
STCSIZEOF EQU 6
Projection:
;Prende le due tavole e azzera il contatore
moveq #O,D6
lea Tab3D,AO
lea Tab2D,Al
Loopl :
m0ve.w STAR-X(AO,D6),DO
muls #zof f ,DO ;Xp=Xp*zoff
m0ve.w STAR_Y(AO,D6),Dl
muls #zof f , D1 ;Yp=Yp*zoff
m0ve.w STcZ(AO,D6),D2
add.w #zoff,D2 ;Zp=Zp+zoff
beq SkipDivision
divs D2,DO ; Xp=Xp/Zp
divs D2,Dl ;Yp=Yp/Zp
SkipDivision:
add.w #xoff,DO ;Xs=Xs+xoff
add.w #yoff ,D1 ;Ys=Ys+yoff
;~emorizza Xs e Ys nella tavola
m0ve.w DO,(Al)+
m0ve.w Dl,(Al)+
;Incrementa il contatore
addq #STAR_SIZEOF,d6
;Controlla il raggiungimento della fine
;della tavola
cmp.w #STAR_SIZEOF*NUMSTARS,d6
blt Loopl
rts
;X Y Z
Tab3D:
dc.w 2, 1,7
dc.w 1, 1,15
dc.w -2, 2,27
dc.w 1, 2,34
dc.w 1,-1,55
; X Y
Tab2D:
1 dc.w 0,O
dc.w 0,O
1 dc.w 0,O
dc.w 0,O
dc.w 0,O
Listato 1.
modo da semplificare al massimo la routine di tracciamen-
to dei pixel. In seguito sarà possibile potenziare la nostra
procedura, per sfruttare più colori (e quindi bitplane), in
modo da poter variare l'intensità dei pixel.
I1 modo per costruire uno schermo tramite il Copper, è sta-
to già ampiamente discusso su queste stesse pagine, e per-
tanto daremo per scontato di avere uno schermo 320x256
pixel a due colori, già visualizzato e allocato a partire dalla
locazione di memoria contenuta nel puntatore ScreenBuJ:
Per esempio, se il nostro schermo viene allocato a partire
dalla locazione $60000 (suggeriamo comunque di ricorrere
alla funzione AllocMem di Exec) avremo 10.240 byte (10
kb di Chip RAM) a disposizione a partire da questo indiriz-
zo, il quale sarà memorizzato in ScreenBuJ
Una semplicissima routine di stampa di pixel, su uno
schermo a due colori è la seguente. Essa prima stabilisce il
byte dello schermo nel quale andrà stampato il punto e poi
si awale di una tabella per la selezione del bit da accende-
re all'interno del byte. Come la stessa routine di proiezione,
anche questa procedura è altamente ottimizzabile tramite
l'eliminazione delle istruzioni MUL e DN. In questa sede,
per motivi di chiarezza, abbiamo preferito non utilizzare
codice particolarmente ottimizzato (il quale, come noto,
pregiudica la leggibilità).
Prima di chiamare questa funzione (con un semplice JSR),
bisogna immettere nei registri DO e D1 rispettivamente la
coordinata X e Y, del pixel che intendiamo stampare,
mentre in A0 va posto l'indirizzo del nostro schermo (per
esempio $60000). Infine SCRW dovrà essere definito come
la larghezza dello schermo su cui stampiamo (normalmente
320 pixel).
SCRW EQU 320
SetPixel :
m0ve.w DO,D2
and.w #7,D2
1sr.w #3,DO
mulu #SCRW/8, D1
add.w D1,DO
lea SP-Tab,Al
m0ve.b (Al,DZ.W),Dl
0r.b Dl,(AO,DO.W)
rts
SP-Tab: dc.b 128,64,32,16,8,4,2,1
In questo modo, scandendo tutte le coppie di word della
tavola dei punti già proiettati (Tab2D) e chiamando ogni
volta la funzione SetPixel, impostando correttamente X e Y
(DO e DI), sarà possibile tracciare nella posizione corrente
tutte le stelle del nostro campo.
Altrettanto importante è la possibilità di pulire i pixel trac-
ciati ogni quadro video, prima di procedere alla stampa dei
nuovi (nel caso in cui i punti cambino posizione di volta in
volta). Visto che è del tutto controproducente azzerare ogni
volta l'intera area di schermo (ben 10 kb!), prima di proce-
dere al nuovo ciclo di proiezioni e di stampa, ma dopo l'at-
tesa del tempo minimo di refresh (normalmente un quadro
video), conviene eseguire un nuovo ciclo di scansione del-
la tavola 2D (le coordinate proiettate) chiamando però la
funzione ClearPixel, che in base alle coppie di coordinate
X e Y fornite (esattamente le stesse che avevamo passato
alla procedura SetPixel) provvederà a ripulire tutti i singoli
punti stampati. È importante ricordare che in AO, deve
sempre essere immesso l'indirizzo dello schermo, e che
SCRWequivale alla larghezza dello stesso.