Rosetta Code

Keyboard input/Obtain a Y or N response: Difference between revisions

Page Discussion

Keyboard input/Obtain a Y or N response (view source)

Revision as of 07:48, 25 June 2022

36 bytes removed ,  1 year ago
m
→‎{{header|FutureBasic}}
Line 921:
=={{header|FutureBasic}}==
<lang futurebasic>void local fn DoDialog( ev as long )
CFStringRef key
select ( ev )
case _windowKeyDown
cls
key = fn EventCharacters
select ( lcase(key) )
case @"Y", @"y",@"N",@"n"
printf @"You pressed the \"%@\" key",key
DialogEventSetBool(YES)// we handled the event
end select
end select
end fn
 
Bernie
416

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/160305"