Anonymous user
Keyboard input/Obtain a Y or N response: Difference between revisions
Keyboard input/Obtain a Y or N response (view source)
Revision as of 23:06, 24 November 2021
, 2 years agono edit summary
Puppydrum64 (talk | contribs) |
No edit summary |
||
Line 178:
</lang>
=={{header|Action!}}==
<lang Action!>PROC MAIN()
Byte Key=764
Printe("Press Y or N to continue")
key=255
Do
Until Key=43 or Key=35
Od
Print("You pressed ")
If Key=43 then Printe("Yes") Fi
If Key=35 then Printe("No ") Fi
RETURN</lang>
=={{header|Ada}}==
| |||