🚀 go-pugleaf

jdm wrote in message ...
>John Rickard <saskan@worldnet.att.net.DONTSPAMME> wrote in article
><63qonl$r0p@bgtnsc03.worldnet.att.net>...
>> i am coverting a pascal source i did a while back to vb4 so i can use
>> it in my program.
>> i have totally coverted everything except 1 thing.
>> below is the pascal part i am having trouble comvertin to vb4.
>>
>>  inc(l, Ord(s[i]) + (i * i))
>
>Visual Basic has neither an Inc() function or an Ord() function.  Ergo,
>you will have to write your own.
>
>jdm

Not. The Ord function looks a lot like the VB   ASC function. Return a
integer for the character value (i.e. Ord('A') = 65; == Asc("A") = 65). You
may have to handle a special case when the value of s[i] is a non-character,
but I assume since you are ORD'ing the array that it is a character. As far
as the INC, I'm assuming that you are Incrementing the value of I based on
'some number' + (some number * some number). In VB, maybe something like

 I = I + ( ASC( s(i) ) + (i * i) )      'gee with all of those parenthesis,
kinda looks like Lisp..no I won't translate it to Lisp on principle alone

But, I could be wrong...didn't test it. Of course you might make a function
Inc that takes a variable in and returns   inc = inc + vaLin....

Best of luck.
~the Rat