get the resource handle using GET1RESOURCE, GETRESOURCE or use the built in
function STR then do a
myCount% = {gMySTRHandle}(peek word) since the count will never be more than
32767.
W.
-----Original Message-----
From: Jim Henson [mailto:vegasswede@...]
Sent: Tuesday, September 26, 2000 5:56 PM
To: FB List
Subject: [FB] STR# Count
Afternoon All,
I want to use the number of lines in STR# resource 200 as count factor
gMyCount to use in the below FOR/TO/NEXT Loop
I haven't a clue to how to get it .. All my attempts to even get a count
have failed ..
Some advice would be much appreciated
CLEAR LOCAL
LOCAL FN BIndexArray
DIM rect.8,rectPtr&,id%,col1%,col2%
DIM IndexRectPtr&
rectPtr& = @rect
id% = 1
CALL SETRECT ( rect,15,105,35,125)
FOR col% = 1 TO gMyCount
IndexRectPtr& = @gIndexRect (id%)
BLOCKMOVE rectPtr&, IndexRectPtr&, 8
' --
CALL RGBFORECOLOR (gMyColor(0))
CALL PAINToval( rect )
' --
CALL RGBFORECOLOR (gMyColor(4))
CALL PENSIZE( 6, 6 )
CALL FRAMEOVAL( rect )
' --
CALL RGBFORECOLOR (gMyColor(1))
CALL PENSIZE( 3, 3 )
CALL FRAMEOVAL( rect )
' --
CALL OFFSETRECT ( rect, 0, 25)
INC( id% )
NEXT col%
END FN
Jim Henson,The Vegas Swede, (^_^) s aplenty
Las Vegas is the Number One Fun Capital Of The World
An Oasis Dedicated To Around The Clock Entertainment
Come Often, Enjoy Its Many Pleasures, Stay A Spell
And Bring Lots Of Money, Help Keep Nevada Green
--
To unsubscribe, send ANY message to <futurebasic-unsubscribe@...>