TIP: Click on subject to list as thread! ANSI
echo: power_bas
to: DAVID ROPER
from: ZACK JONES
date: 1995-11-01 12:12:00
subject: FDSTAT.BAS SOURCE

 >I must be missing part of this post. :-)
Yup, here's the full source so you can see the speed difference between a 
case statement and ON x gosub.  BTW, credit for this source goes to (I can't 
remeber his new name) the former Quinn Jackson.
DEFINT A-Z
CLS
MTIMER
FOR x = 1 TO 1000
    FOR i = 1 TO 4
        SELECT CASE i
            CASE 1
            CASE 2
            CASE 3
            CASE 4
        END SELECT
    NEXT
NEXT i
PRINT MTIMER
MTIMER
FOR x = 1 TO 1000
    FOR i = 1 TO 4
        ON i GOSUB 1, 2, 3, 4
    NEXT
NEXT i
PRINT MTIMER
END
1:
RETURN
2:
RETURN
3:
RETURN
4:
RETURN
Take Care, Zack Jones
zack@hom.net
---
---------------
* Origin: Zack's Gotta Point (1:3611/18.10)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.