ok i'm back (so soon). It uses qbasic, qbasic programs require DOS. there is no avoiding it. unless you get some DOS emulator or something. You waste an awful lot of time with pointless loops, i've done you the favor of making it a bit smaller:'$include: 'qb.bi'dim regs as regtyperegs.ax=1call interrupt(&h33,regs,regs)screen 13,0,1docls"Starting...";a=timerdo:loop while timer-a<2print "Done."print "Wait a few moments while we pretend to do stuff, then we'll do it again"pcopy 1,0a=timerdo:loop while timer-a<1loopi hate it, never again will i download something i have doubts on.
He posted the code in this thread. I saw that after I e-mailed him. First post.And it's VB so don't count on it running in Linux or WINE. I'm sorta curious as to how he's making VB apps.BTW: Calum, check your PM[ October 27, 2002: Message edited by: The_Muffin_Man/B0b ]
I agree fully. I could easily inprove the code if I wanted to.Although I do believe that he was trying to show the downsides of .NETX11, check your PM.