Kevin,
k contains the ASCII value, you don't need to $A it again.
>for i=1:1:5 read *k w "=",k,!
a=97
b=98
c=99
d=100
e=101
Writing $A(k) where k=97 will return ASCII value of first character, ie
$A(9)=57
On a Cache system a "r *k" with entry of <Esc> results in 27:
>r *k w !,k
<== <Esc> pressed
27
Thom H.
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Kevin
Toppenberg
Sent: Saturday, June 25, 2005 4:22 PM
To: Hardhats Sourceforge
Subject: [Hardhats-members] Mumps Read question
Can someone explain what is going on this code?
GTM>for i=1:1:5 read *k w "=",$ascii(k),!
a=57
b=57
c=57
d=49
e=49
GTM>for i=1:1:5 read k#1 w "=",$ascii(k),!
a=97
b=98
c=99
d=100
e=101
Why doesn't *k seem to read in the code properly?
Also, how would you read in the key [ESC]? When I
enter it at a read prompt, it cancels the read, rather
than returning a value of 27. I want to read in an
escape sequence from a user (i.e. Esc[A for 'up')
Thanks
Kevin
____________________________________________________
Yahoo! Sports
Rekindle the Rivalries. Sign up for Fantasy Football
http://football.fantasysports.yahoo.com
-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_idt77&alloc_id492&op=click
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
