[futurebasic] Check Please Waiter

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : March 1998 : Group Archive : Group : All Groups

From: Pete <furry@...>
Date: Tue, 17 Mar 98 00:13:23 +1100
I posted this a couple of days ago, but haven't seen any responses yet...


can someone check that these FNs are ok?

I got the FNs from the script.p header files, but they didn't mention the 
scriptCode, so I added the scriptCode stuff, after checking out some code 
that Rick posted (ages ago?)

Is the ScriptCode "Addition" ok ?
From what I understand of IM, there's supposed to be a scriptCode.


LOCAL MODE
DIM textPtr&, theLen%, scriptCode%
LOCAL FN UppercaseText(textPtr&, theLen%, scriptCode%)
 `     move.l  ^textPtr&,-(sp)                ;Ptr
 `     move.w  ^theLen%,-(sp)                 ;INTEGER
 `     move.w  ^scriptCode%,-(sp)
 `     dc.w    $301F,$205F,$A456
END FN

LOCAL MODE
DIM textPtr&, theLen%, scriptCode%
LOCAL FN UppercaseStripDiacritics(textPtr&, theLen%, scriptCode%)
 `     move.l  ^textPtr&,-(sp)                ;Ptr
 `     move.w  ^theLen%,-(sp)                 ;INTEGER
 `     move.w  ^scriptCode%,-(sp)
 `     dc.w    $301F,$205F,$A656
END FN

tia

Pete...


Voice/Answering Machine: 61 2 48621428
                    Fax: 61 2 48621580
                  
                  email: furry@...
                  
              snailMail: P.O.Box 781
                         Bowral NSW 2576
                         Australia

Check out: http://www.hinet.net.au/~furry

In the words of a 'famous' Vulcan:
     "Long Live And Prosper"