100 SCREEN 3:WINDOW 0,0,511,255:ACTIVE 2:ROTOVER 0
  110 Z=100:X=512/2:Y=256/2
  120 '
  130 ' 63×63 ピクセルの市松模様作成
  140 '
  150 A$=STRW$(2,63)+STRW$(63*63/2,&H5423)
  160 '
  170 ' 画面描画
  180 '
  190 *DRAW_SCRN
  200 FOR I=0 TO 2:CIRCLE (64+RND(384),64+RND(128)),32+RND(32),RND(256),F:NEXT
  210 FOR I=0 TO 10: GCOPY A$ TO (RND(512),RND(256)):NEXT
  220 '
  230 ' 画面のズーム＆スクロール
  240 '
  250 *MAIN
  260 LOCATE 1,1:PRINT USING "(####,####) ####%",X,Y,Z
  270 ROTZOOM Z/100,Z/100: ROTPOS X,Y
  280 FOR P=0 TO 1:P=PAD(0,1):NEXT
  290 IF P AND (@PAD_A OR @PAD_C) THEN Z=Z-1
  300 IF P AND @PAD_B     THEN Z=Z+1
  310 IF P AND @PAD_LEFT  THEN X=X+1
  320 IF P AND @PAD_RIGHT THEN X=X-1
  330 IF P AND @PAD_UP    THEN Y=Y+1
  340 IF P AND @PAD_DOWN  THEN Y=Y-1
  350 IF P AND @PAD_START THEN CLS 2:GOTO *DRAW_SCRN
  360 VSYNC 3:GOTO *MAIN