Found a snippet of some of my "odd-ball" code...:)
 
This is a neat way to use "ArgV" and "ArgC" (Check out your 
\PB32\EXAMPLE\DOSUNIT.BAS (.PBU) file...
 
------ORION'S.BAS----------
 
$INCLUDE "C:\PB32\EXAMPLE\PB32.INC"
$LINK "C:\PB32\EXAMPLE\DOSUNIT.PBU"
 
CLS
 
Z1$ = "Deliver the galaxy on Orion's belt"
Z2$ = "You have One Hour!"
 
X% = ArgC(Z1$)
Col% = 7
 FOR Y% = 1 TO X%
  A$ = ArgV$(Y%, Z1$)
  Wrd% = LEN(A$)
   LOCATE 12, Col%: COLOR 12, 0: PRINT A$
   Col% = Col% + Wrd% + 1
   SLEEP 1
 NEXT Y%
 
X% = ArgC(Z2$)
Col% = 7
 FOR Y% = 1 TO X%
  A$ = ArgV$(Y%, Z2$)
  Wrd% = LEN(A$)
   LOCATE 13, Col%: COLOR 12, 0: PRINT A$
   Col% = Col% + Wrd% + 1
   SLEEP 1
 NEXT Y%
 
END
 
-----------cut-------------
 
Have fun with this one...:)
 
PS.. I uncovered a few more odd-balls & will post them as time 
progresses. Also note, the Z1$ and Z2$ are from the movie "M.I.B."
 
-Ron
 
***
 þ RM 1.3 03129 þ Save your BBS! Join INTBBS_WK now!
--- TriToss (tm) Professional 11.0 - #229
---------------