HispaMSX

Re: [hispamsx] scroles 3, el retorno!!

2001-12-18 15:56:51
El Vie 14 Dic 2001 12:32, escribiste:

pediría un ejemplo al Ramoni de su uso junto con el scroll horizontal.

Elo aquí.


0 ' Scroll por hardware usando los registros del vdp
20 ' Ramoni 2001 - Para la Hispa
30 SCREEN 5
40 ' borramos la "basura"
50 COPY(0,0)-(255,44)TO(0,211)
60 _TURBOON
70 X=7:V=2 ' Velocidad del movimiento
80 ' sin el C- el BASIC impide pintar en las lineas ocultas
90 '#C-
100 LINE (0,0)-(255,255),15,B
110 A=STICK(0)
120 IF A=3 THEN X=X-V
130 IF A=7 THEN X=X+V
140 IF A=1 THEN Y=Y+V
150 IF A=5 THEN Y=Y-V
160 X=XAND255:Y=YAND255
165 ' esto "sincroniza" el movimiento para que sea suave
170 IF TIME=0 THEN 170 ELSE TIME=0
180 VDP(24)=Y
190 VDP(28)=7-(XMOD 8)
200 VDP(27)=X\8
210 IF STRIG(0)=0 THEN GOTO 110


Lo del vdp(26)... pos eso es. Si el bit 0 está a 0 (por defecto) hace el 
scroll sobre la misma página. Si no usa dos.


Ramón


<Anterior en la conversación] Conversación actual [Siguiente en la conversación>