Здесь показаны различия между двумя версиями данной страницы.
msx:basic_programming_guide:05 [2020-05-31 13:50] |
msx:basic_programming_guide:05 [2020-06-05 19:03] |
||
---|---|---|---|
Строка 3043: | Строка 3043: | ||
NEW | NEW | ||
Ok | Ok | ||
- | 10 SCREEN 4,3 'Область пересечения спрайтов окрашена цве- | + | 10 SCREEN 4,3 'Область пересечения спрайтов окрашена цве- |
20 SPRITE$(0)=STRING$(32,255)'том с номером 11, так как 9 OR 10 = 11 | 20 SPRITE$(0)=STRING$(32,255)'том с номером 11, так как 9 OR 10 = 11 | ||
30 PUT SPRITE 0,(100,100),,0 'В спрайте 1 6-й бит установлен в единицу, | 30 PUT SPRITE 0,(100,100),,0 'В спрайте 1 6-й бит установлен в единицу, | ||
Строка 3204: | Строка 3204: | ||
10 COLOR 15,4:SCREEN 4:SPRITE$(0)=STRING$(8,255) | 10 COLOR 15,4:SCREEN 4:SPRITE$(0)=STRING$(8,255) | ||
30 PUT SPRITE 0,(200,100),15,0 | 30 PUT SPRITE 0,(200,100),15,0 | ||
- | 40 ON SPRITE GOSUB 100:SPRITEON' Включен режим прерываний по столкнове- | + | 40 ON SPRITE GOSUB 100:SPRITEON ' Включен режим прерываний по |
- | 55 COLOR SPRITE(0)=&B00100001' нию спрайтов! | + | 55 COLOR SPRITE(0)=&B00100001 ' столкновению спрайтов! |
60 FOR X=0 TO 240:PUT SPRITE 1,(X,100),15,0:NEXT ▲ | 60 FOR X=0 TO 240:PUT SPRITE 1,(X,100),15,0:NEXT ▲ | ||
90 GOTO 60 '──▶ │ | 90 GOTO 60 '──▶ │ |