OnScreenDisplay Goodness

[ken gray]

Welcome to the 7th grade! Remember how you used to draw single frame cartoons on a bunch of pages in your math book and then flipped through them to create an animation? well, here it is QM style.

I use this sort of thing with my project timer to let me know that i'm charging a client for time.

Code:

Copy      Help

str a b
double z y
a="o"
b="Courier New"
z=0.19
y=0.189
rep 10
,;OnScreenDisplay("/" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("-" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("\" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("|" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("/" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("-" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("\" z 982 53 b 12 0x108def)
,;wait y
,;OnScreenDisplay("|" z 982 53 b 12 0x108def)
,;wait y
,OnScreenDisplay("    O" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("   <O>" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("  <-O->" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay(" <- O ->" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("<-  O  ->" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("-   O   -" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("    O    " z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("->  O  <-" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay(" -> O <-" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("  ->0<-" z 922 53 b 12 0x108def)
,wait y
,OnScreenDisplay("   -0-" z 922 53 b 12 0x108def)
,wait y