----- Original Message -----
From: "Ramón" <ramoni(_en_)mallorcaweb(_punto_)net>
To: <hispamsx(_en_)yahoogroups(_punto_)com>
Sent: Tuesday, December 18, 2001 3:58 PM
Subject: Re: [hispamsx] scroles 3, el retorno!!
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
Hola Ramón!
Oh!, gracias maestro por sus enseñanzas Basikianas,a este humilde aprendiz
de scroles ,X-DDDDD
Que grande es el VDP y pensar que el set scroll era una gran instrucción,
que equivocación!Ahora entiendo esa antigua sección de la Mexes, VDPblaster!
Fuera coñas, si no entiendo mal si añado VDP(26)=VDP(26) or 1, me hará un
scroll entre la page 0 y 1,no?
Supongo que el programa anterior se acaba con un bonito _Turbo OFF.
Gracias de nuevo y nos vemos!
