Skip to content

Commit

Permalink
Merge remote-tracking branch 'origin/master' into newboot
Browse files Browse the repository at this point in the history
  • Loading branch information
fvdhoef committed Feb 3, 2024
2 parents 0748fc0 + 184e3f0 commit 65f0e71
Show file tree
Hide file tree
Showing 3 changed files with 19 additions and 19 deletions.
38 changes: 19 additions & 19 deletions EndUser/sdcard/demos/PlusBasic/sprite.bas
Original file line number Diff line number Diff line change
@@ -1,23 +1,23 @@
100 REM Sprite Demo
110 SET SPRITE * CLEAR:SCREEN ,,1:CLS 6,0
120 T0$=$"000FF000"
121 T1$=$"00F44F00"
122 T2$=$"00F44F00"
123 T3$=$"00F44F00"
124 T4$=$"0F4444F0"
125 T5$=$"0F4444F0"
126 T6$=$"F044440F"
127 T7$=$"F444444F"
128 SET TILE 0 TO T0$+T1$+T2$+T3$+T4$+T5$+T6$+T7$
130 T0$=$"000F4884"
131 T1$=$"00F48888"
132 T2$=$"0F488888"
133 T3$=$"F4444444"
134 T4$=$"F4444444"
135 T5$=$"F44FFFF4"
136 T6$=$"FFF0110F"
137 T7$=$"00011110"
138 SET TILE 1 TO T0$+T1$+T2$+T3$+T4$+T5$+T6$+T7$
120 T0$="...FF..."
121 T1$="..F44F.."
122 T2$="..F44F.."
123 T3$="..F44F.."
124 T4$=".F4444F."
125 T5$=".F4444F."
126 T6$="F.4444.F"
127 T7$="F444444F"
128 SET TILE 0 TO ASC$(T0$+T1$+T2$+T3$+T4$+T5$+T6$+T7$)
130 T0$="...F4884"
131 T1$="..F48888"
132 T2$=".F488888"
133 T3$="F4444444"
134 T4$="F4444444"
135 T5$="F44FFFF4"
136 T6$="FFF.11.F"
137 T7$="...1111."
138 SET TILE 1 TO ASC$(T0$+T1$+T2$+T3$+T4$+T5$+T6$+T7$)
140 DEF SPRITE S$ = 0,4,0 ; 1,0,8 ; 2,8,8
150 DEF TILELIST T$ = 0,1,1
160 DEF ATTRLIST A$ = 0,0,2
Expand All @@ -28,4 +28,4 @@
220 SET SPRITE S$ POS 152,I
230 FOR D=1 TO 10:NEXT
240 NEXT
250 K=GETKEY
250 PAUSE
Binary file added System/case/aqp_mini_base.stl
Binary file not shown.
Binary file added System/case/aqp_mini_top.stl
Binary file not shown.

0 comments on commit 65f0e71

Please sign in to comment.