SS> $COMPILE UNIT "JUST-TRY.PBU"
SS> SUB Center(Text$, Row%)
SS> IF Text$ = "" THEN EXIT SUB
SS> IF Row% 25 THEN EXIT SUB
SS> LOCATE Row%, 40 - LEN(Text$) / 2: PRINT Text$
SS> END SUB
SS> '---
Add "PUBLIC" to your SUB line above, as the sub defaults to private if
not stated otherwise.
You may also with to write "JUST-TRY.INC" and put your:
SS> DECLARE SUB Center(Text$, Row%)
....statement there.... users get used to seeing these things being accessed
via "$include" statements, and it also gives you a chance to add in
more comments to explain your subs and functions and not clutter up
someone else's code.
It's certainly not necessary, just better organization, really.
Take care,
-James (SysOp/AD Message System)
--- QuickBBS 2.80 (Zeta-1.9A)
---------------
* Origin: [Team QuickBBS] [Team OmegaSoft] [PB Fanatic!] (1:109/611@FIDONET)
|