I am leaving for the airport. I will have to find it. It is in the Kernel Systems Manager documentation or the new Kernel programmer documentation.
----- Original Message ----- From: "Greg Woodhouse" <[EMAIL PROTECTED]> To: <[email protected]> Sent: Wednesday, March 09, 2005 10:13 AM Subject: Re: [Hardhats-members] How do I do a silent read? > What API do you have in mind? The XGF utilities? > > Incidentally, here's some code I wrote to allow a user to enter "^" to > interrupt a running process that's busy writing dots to the keyboard. > It's not exactly what you want, but it shows how to read input one > character at a time in a SAC compliant way and also turn echo on/off. > (The lock statements are a kludge and shouldn't be needed.) > > > WSTUP ; setup > ;K DTOUT ;in case it is defined > S CSLTMP=$NA(^XTMP("CSLVEN"_MID)) > D INITKB^XGF("*") > X ^%ZOSF("EOFF") > S TIMER=0,DELTA=1,DONE=0 > S:+$G(TTW)'>0 TTW=DTIME > WLOOP ; > S YCHR=$$READ^XGF(1,1) > ;R YCHR#1:1 > ;S:$G(YCHR)["^" DONE=1 > I '$D(DTOUT) S:$G(YCHR)="^" DONE=1 > L [EMAIL PROTECTED]@(0):0 > L [EMAIL PROTECTED]@(0) > G:'$D(@CSLTMP@(0)) WLOOP2 > L [EMAIL PROTECTED]@(0):0 > S X=$P(@CSLTMP@(0),"^",3) > S:+X>0 DONE=1 > S:+X>0 @CSLTMP@("TIMEFOUND")=$$NOW^XLFDT > L [EMAIL PROTECTED]@(0) > G:DONE WCLN > WLOOP2 ; > D:IO=IO(0) > .W ". " ;a 1 sec. wait is built into the # read > .;W:TIMER#2=0 ". " > S:$D(DTOUT) YCHR="" > S:YCHR["^" X=0 > G:YCHR["^" WCLN > H DELTA > S TIMER=TIMER+DELTA > S:TIMER'<TTW X=0 ;timeout > G:TIMER'<TTW WCLN > G WLOOP > Q > WCLN ; > D RESETKB^XGF > X ^%ZOSF("EON") > Q $G(X) > > --- steven mcphelan <[EMAIL PROTECTED]> wrote: > > > Why not just use the Kernel API for this purpose? > > > > ----- Original Message ----- > > From: "Kevin Toppenberg" <[EMAIL PROTECTED]> > > To: "Hardhats Sourceforge" <[email protected]> > > Sent: Tuesday, March 08, 2005 11:13 PM > > Subject: [Hardhats-members] How do I do a silent read? > > > > > > > Hey all, > > > > > > I want to ask for a password, and echo *'s > > > > > > How do I do this? > > > > > > I.e. > > > for i=1:1:8 read *S write "*" > > > > > > gives: > > > a*b*c*d*e*f*g*h* > > > > > > How do I hide the letters? > > > > > > Thanks > > > Kevin > > > > > > P.S., what I really want to do is to compare the > > > user's input to the electronic signiture code stored > > > in the ELECTRONIC SIGNITURE CODE in file 200. Is > > > there a Fileman way of doing this? I just want to > > > ensure that the user knows the password. > > > > > > Thanks > > > Kevin > > > > > > > > > > > > > > > > > > __________________________________ > > > Celebrate Yahoo!'s 10th Birthday! > > > Yahoo! Netrospective: 100 Moments of the Web > > > http://birthday.yahoo.com/netrospective/ > > > > > > > > > ------------------------------------------------------- > > > SF email is sponsored by - The IT Product Guide > > > Read honest & candid reviews on hundreds of IT Products from real > > users. > > > Discover which products truly live up to the hype. Start reading > > now. > > > http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click > > > _______________________________________________ > > > Hardhats-members mailing list > > > [email protected] > > > https://lists.sourceforge.net/lists/listinfo/hardhats-members > > > > > > ------------------------------------------------------- > > SF email is sponsored by - The IT Product Guide > > Read honest & candid reviews on hundreds of IT Products from real > > users. > > Discover which products truly live up to the hype. Start reading now. > > http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click > > _______________________________________________ > > Hardhats-members mailing list > > [email protected] > > https://lists.sourceforge.net/lists/listinfo/hardhats-members > > > > > ===== > A practical man is a man who practices the errors of his forefathers. --Benjamin Disraeli > ==== > Greg Woodhouse > [EMAIL PROTECTED] > [EMAIL PROTECTED] > > > > > > ------------------------------------------------------- > SF email is sponsored by - The IT Product Guide > Read honest & candid reviews on hundreds of IT Products from real users. > Discover which products truly live up to the hype. Start reading now. > http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click > _______________________________________________ > Hardhats-members mailing list > [email protected] > https://lists.sourceforge.net/lists/listinfo/hardhats-members ------------------------------------------------------- SF email is sponsored by - The IT Product Guide Read honest & candid reviews on hundreds of IT Products from real users. Discover which products truly live up to the hype. Start reading now. http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click _______________________________________________ Hardhats-members mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/hardhats-members
