[futurebasic] X-FB Happy Holidays

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : December 1997 : Group Archive : Group : All Groups

From: Victor Osimitz <perseus1@...>
Date: Mon, 27 Aug 56 21:40:46 -0000
'hi all,
'
'here's a little holiday
'message. took fifteen
'minutes. I don't understand
'GWorlds and all that stuff;
'I just made a simple animation.
'You'll understand when you see
'the code.
'Play around with this if you want;
'I don't care

'See ya,
'Victor Osimitz
'perseus1@...

WINDOW 1,"Happy Holidays",(0,0)-(300,300),_dialogFrame
h=WINDOW(_height)
w=WINDOW(_width)
x=0
y=0
xs=1
ys=1
DO
  COLOR _zRed
  BOX FILL 0,0 TO w,h
  COLOR _zGreen
  TEXT _geneva, 18, _BoldBit%
  PRINT %(70+x,50+y)"Season's Greetings"
  COLOR _zBlue
  TEXT _times, 12, 0
  PRINT%(150+x,80+y)"from"
  COLOR _zGreen
  TEXT _geneva, 18, _ItalicBit%+_BoldBit%
  str3$="Season's Greetings"
  PRINT%(70+x,100+y)"Victor Osimitz"
  DELAY 20
  x=x+xs
  y=y+ys
  IF x =-70 THEN xs=1
  IF y =0 THEN ys=1
  IF x+189+70>299 THEN xs=-1
  IF y=175 THEN ys=-1
  COLOR _zRed
  BOX FILL 0,0 TO w,h
UNTIL FN BUTTON



Victor Osimitz
Osimitz Solutions

- perseus1@...
- victor85@...

- http://www.geocities.com/Eureka/6153/

- DownloadTimer II: Calculate download times the easy way!! Send email to 
perseus1@... with a subject of "info-downloadtimer" for more 
information. Version 2.1 is now available!

- Web Design; contact me for more information