+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Calculators (and very old HP Computers) (/forum-3.html)
+--- Forum: HP Prime (/forum-5.html)
+--- Thread: Green background with GetKey Problem!? (/thread-7966.html)
Green background with GetKey Problem!? - Onieh - 03-17-2017 03:46 PM
RE: How make a green Background by a Choose Funktion
okay, what is with this Solution.
But i don't why the Program leave the Repeat-Until Funktion when i press 1, repeat1.. or 2, repeat 2.. or 3 and repeat 3..?
EXPORT NewInput()
BEGIN
RECT_P(0,0,320,220,RGB(0,255,0));
TEXTOUT_P("F L U G N A V I G A T I O N",31,20,7,RGB(255,255,255));
TEXTOUT_P("Press 1 für: ICAO",70,70);
TEXTOUT_P("Press 2 für: POSITION",70,100);
TEXTOUT_P("Press 3 für: FLUGSTRECKE",70,130);
TEXTOUT_P("Press Del für Abbruch",70,160);
REPEAT
K:=GETKEY;
IF K==42 THEN PRINT("ICAO"); END; //KEY Test
IF K==43 THEN PRINT("POSITION"); END; //KEY TEST
IF K==44 THEN PRINT("FLUGSTRECKE"); END; //KEY TEST
UNTIL K==19;
STARTVIEW(-1);
END;
RE: Green background with GetKey Problem!? - eried - 03-17-2017 04:22 PM
Rethink UNTIL K==19; line
RE: Green background with GetKey Problem!? - Onieh - 03-17-2017 04:31 PM
What do you mean?
RE: Green background with GetKey Problem!? - Onieh - 03-17-2017 04:48 PM
Do you mean
UNTIL K==19 or K==42 or K==43 or K== 44;
RE: Green background with GetKey Problem!? - eried - 03-17-2017 06:52 PM
(03-17-2017 04:48 PM)Onieh Wrote: Do you mean
UNTIL K==19 or K==42 or K==43 or K== 44;
That is an option
RE: Green background with GetKey Problem!? - Onieh - 03-17-2017 09:46 PM
And the other one?