100 PROGRAM "Videolap.bas"
  110 SET VIDEOMODE0
  120 SET VIDEOCOLOUR0
  130 SET VIDEOX42
  140 SET VIDEOY8
  150 OPEN #1:"video:"
  160 SET VIDEOMODE1
  170 SET VIDEOCOLOUR3
  180 OPEN #2:"video:"
  190 SET VIDEOCOLOUR1
  200 OPEN #3:"video:"
  210 DISPLAY #1:AT9FROM1TO8
  220 DISPLAY #2:AT1FROM1TO8
  230 DISPLAY #3:AT17FROM1TO8
  240 PRINT #1:"Ez soveg."
  250 PLOT #2:600,150,ELLIPSE350,100
  260 PLOT #3:600,100,ELLIPSE300,50
  270 END