reg-ios.spin & input
- PIC18F2550
- Beiträge: 2832
- Registriert: Fr 30. Sep 2011, 13:08
reg-ios.spin & input
Fragt mann zweimal hintereinander die Routine auf, und gibt man beim zweitenmal nur Enter ein so bekommt man das erste zeichen von der vorhergehenden abfrage.
Zuletzt geändert von PIC18F2550 am Mi 23. Mär 2016, 08:42, insgesamt 1-mal geändert.
Gruß
PIC18F2550
drone265/278
Barbarus hic ergo sum, quia non intellegor ulli.
Ein Barbar bin ich hier, da ich von keinem verstanden werde.
ʎɐqǝ ıǝq ɹnʇɐʇsɐʇ ǝuıǝ ɹǝpǝıʍ ǝıu ǝɟnɐʞ ɥɔı ´uuɐɯ ɥo
PIC18F2550
drone265/278
Barbarus hic ergo sum, quia non intellegor ulli.
Ein Barbar bin ich hier, da ich von keinem verstanden werde.
ʎɐqǝ ıǝq ɹnʇɐʇsɐʇ ǝuıǝ ɹǝpǝıʍ ǝıu ǝɟnɐʞ ɥɔı ´uuɐɯ ɥo
Re: reg-ios.spin & inpu
steckt das letzte Zeichen noch im INPUT-Puffer,
Lösung:Puffer nach Abfrage löschen
Lösung:Puffer nach Abfrage löschen
Computer lösen die Probleme, die man ohne sie gar nicht hätte!
- PIC18F2550
- Beiträge: 2832
- Registriert: Fr 30. Sep 2011, 13:08
Re: reg-ios.spin & input
Der Puffer muss vorher gelöscht werden.
Am besten gleich in der Input Funktion.
Bitte in neuer Revision einarbeiten.
Am besten gleich in der Input Funktion.
Bitte in neuer Revision einarbeiten.
Code: Alles auswählen
PUB input(stradr,anz) | curpos,i,n 'key: stringeingabe
{{input(stradr,anz) - key: stringeingabe}}
curpos := curgetx 'cursorposition merken
i := 0
byte[stradr][i] := 0 '<<< REV.>>>
repeat
n := keywait 'auf taste warten
if n == $0d
quit
if (n == CHAR_BS)&(i>0) 'backspace
printbs
i--
byte[stradr][i] := 0
elseif i < anz 'normales zeichen
printchar(n)
byte[stradr][i] := n
i++
byte[stradr][i] := 0
Gruß
PIC18F2550
drone265/278
Barbarus hic ergo sum, quia non intellegor ulli.
Ein Barbar bin ich hier, da ich von keinem verstanden werde.
ʎɐqǝ ıǝq ɹnʇɐʇsɐʇ ǝuıǝ ɹǝpǝıʍ ǝıu ǝɟnɐʞ ɥɔı ´uuɐɯ ɥo
PIC18F2550
drone265/278
Barbarus hic ergo sum, quia non intellegor ulli.
Ein Barbar bin ich hier, da ich von keinem verstanden werde.
ʎɐqǝ ıǝq ɹnʇɐʇsɐʇ ǝuıǝ ɹǝpǝıʍ ǝıu ǝɟnɐʞ ɥɔı ´uuɐɯ ɥo
- drohne235
- Administrator
- Beiträge: 2284
- Registriert: So 24. Mai 2009, 10:35
- Wohnort: Lutherstadt Wittenberg
- Kontaktdaten:
Re: reg-ios.spin & input
Notiert! ![Daumen hoch :DAUMENHOCH](./images/smilies/smilie_girl_020.gif)
![Daumen hoch :DAUMENHOCH](./images/smilies/smilie_girl_020.gif)
"Ob Sie denken, dass Sie es können, oder ob Sie denken, dass Sie es nicht können - in beiden Fällen haben Sie recht." Henry Ford
- drohne235
- Administrator
- Beiträge: 2284
- Registriert: So 24. Mai 2009, 10:35
- Wohnort: Lutherstadt Wittenberg
- Kontaktdaten:
Re: reg-ios.spin & input
Fehler ist für R58 korrigiert.
"Ob Sie denken, dass Sie es können, oder ob Sie denken, dass Sie es nicht können - in beiden Fällen haben Sie recht." Henry Ford
- PIC18F2550
- Beiträge: 2832
- Registriert: Fr 30. Sep 2011, 13:08
Re: reg-ios.spin & input
OK ![Lächeln :)](./images/smilies/icon_e_smile.gif)
![Lächeln :)](./images/smilies/icon_e_smile.gif)
Gruß
PIC18F2550
drone265/278
Barbarus hic ergo sum, quia non intellegor ulli.
Ein Barbar bin ich hier, da ich von keinem verstanden werde.
ʎɐqǝ ıǝq ɹnʇɐʇsɐʇ ǝuıǝ ɹǝpǝıʍ ǝıu ǝɟnɐʞ ɥɔı ´uuɐɯ ɥo
PIC18F2550
drone265/278
Barbarus hic ergo sum, quia non intellegor ulli.
Ein Barbar bin ich hier, da ich von keinem verstanden werde.
ʎɐqǝ ıǝq ɹnʇɐʇsɐʇ ǝuıǝ ɹǝpǝıʍ ǝıu ǝɟnɐʞ ɥɔı ´uuɐɯ ɥo