MODE 2
FRAMEBUFFER create
FRAMEBUFFER write f
T$="Merry Christmas & Happy New Year!"
x=700:h=160
Do
CLS
If x<-350 Then x=700
Text x,5*Sin(x)+10,T$,C,5
C=Rnd*&HFFFFFF:x=x-1
Text x,5*Sin(x)+10,T$,C,5,,C
C=RGB(BROWN)
Box 140,220,40,20,1,C,C
C=RGB(GREEN)
For i=10 To 110 Step 5
 Triangle h,i,h-i,i+i,h+i,i+i,C,C
Next i
For i=4 To 43 Step .1
 p=i+Timer\100
 If Cos(p)<0 Then
   C=Rnd*&HFFFFFF
   Circle h+2.5*i*Sin(p),i*5,2,,,C,C
 EndIf
Next i
For i=0 To h
 Pixel i+i,Rnd*240
Next i
FRAMEBUFFER copy F,N,B
Loop