010
19.04.2014, 07:01 Uhr
ralle
|
Ebenso geht auch eine ON ... GOSUB Abfrage recht schnell
0 GOTO 60 1 PRINTAT(2,2);"LINKS":RETURN 2 PRINTAT(2,2);"RECHTS":RETURN 4 PRINTAT(2,2);"RUNTER":RETURN 5 PRINTAT(2,2);"LINKS RUNTER":RETURN 6 PRINTAT(2,2);"RECHTS RUNTER":RETURN 8 PRINTAT(2,2);"HOCH":RETURN 9 PRINTAT(2,2);"LINKS HOCH":RETURN 10 PRINTAT(2,2);"RECHTS HOCH":RETURN 16 PRINTAT(2,2);"FEUER 1":RETURN 17 PRINTAT(2,2);"FEUER 1 LINKS":RETURN 18 PRINTAT(2,2);"FEUER 1 RECHTS":RETURN 20 PRINTAT(2,2);"FEUER 1 RUNTER":RETURN 21 PRINTAT(2,2);"FEUER 1 LINKS RUNTER":RETURN 22 PRINTAT(2,2);"FEUER 1 RECHTS RUNTER":RETURN 24 PRINTAT(2,2);"FEUER 1 HOCH":RETURN 25 PRINTAT(2,2);"FEUER 1 LINKS HOCH":RETURN 26 PRINTAT(2,2);"FEUER 1 RECHTS HOCH":RETURN 60 ON JOYST(1) GOSUB 1,2,,4,5,6,,8,9,10,,,,,,16,17,18,,20,21,22,,24,25,26 65 GOTO60
Die eigentliche Abfrage ist in Zeilen 60 und 65 zu finden, leider ohne Abfrage der 2. Feuertaste. Der maximale Wert währe bei 58, Rechts hoch und beide feuertasten gedrückt. Sollte ohne Änderungen auch am KC87 gehen. Zwegmäßigerweise kann man vor der PRINT-Anweisung noch ein CLS einschieben. Allerdings geht es hier nur um eine Demonstration der Joystickabfrage. Die Zeilen 1 bis 26 (58) sind dafür vorgesehen, hier kann eine Programmverzweigung eingefügt werden. -- Gruß Ralle
Wenn Sie dazu neigen, Bedienungsanleitungen zusammen mit dem Verpackungsmaterial wegzuwerfen, sehen Sie bitte von einem derart drastischen Schritt ab!... ... Nachdem Sie das Gerät eine Weile ausprobiert haben, machen Sie es sich am besten mit dieser Anleitung und ihrem Lieblingsgetränk ein oder zwei Stunden lang in Ihrem Sessel bequem. Dieser Zeitaufwand wird Sie dann später belohnen...
aus KENWOOD-Bedienungsanleitung TM-D700 |