Bascom Datentyp char an Unterfunktion

[Luke17]

Hallo,
ich bin Anfänger in der Bsacom Programmierung.

Gibt es eine Möglichkeit in Bascom den Datentyp Char an eine Funktion zu übergeben.
Ich finde nur Nummerische Datentypen.

Will aber an eine Funktion auch Buchstaben übergeben können.

- Luke -

[DanielSan]

Hi,

guck mal hier: http://avrhelp.mcselec.com/index.htm...e_function.htm

Da steht eigentlich alles. Nimm entweder ein String oder ein Byte und wende

Dim K as Byte

Print Chr(K)

an. Hier noch der Link dazu http://avrhelp.mcselec.com/chr.htm

Gruß Daniel

[Luke17]

Ja das hab ich auch schon gefunden, aber hilft mir leider nicht weiter ich bräuchte so was in der Art:

Sub Seg_Ausgabe(byval Ziffer As Byte , Byval Zahl As Char)

Dann könnte ich an diese Funktion auch Zeichen übergeben und könnt dann auch Buchstaben auf der 7 Segmentanzeige ausgeben

mfg Luke

[for_ro]

Es gibt in Bascom keinen Typ 'char'. Allerdings gibt es den Typ 'string' in variabler Länge.
Wenn es dir nur um einen einzelnen Character geht, den du übergeben willst, kannst du natürlich Daniels Vorschlag beherzigen und den ASCII Wert des Zeichens übergeben.
Zwischen einem 'byte' und einem 'char' gibt es eh keinen Unterschied, zumindestens nicht in dieser Umgebung.
Bascom wendet allerdings unterschiedliche Ausgabefunktionen an, je nachdem, welchen Typ die auszugebene Variable hat.

Dim Zahl as Byte
Dim Zeichen as String*1 'Zeichenkette der Länge 1 == Char
Zahl = 65
Zeichen = "A"
Print Zahl '-> Ausgabe 65
Print Zeichen '-> Ausgabe A
Print Chr(Zahl) '-> Ausgabe A
Print Asc(Zeichen) '-> Ausgabe 65

Dann könnte ich an diese Funktion auch Zeichen übergeben und könnt dann auch Buchstaben auf der 7 Segmentanzeige ausgeben

Wenn du das Zeichen auf der 7-Segment Anzeige ausgeben willst, nutzt dir der String doch eh nicht viel. Interessanter wäre doch sowieso der ASCII Wert, um ihn als Index in eine Tabelle der zugehörigen 7-Segment Darstellung zu verwenden.

[Luke17]

ok danke für die beiden Antworten.
Hab jetzt eine Lösung ist zwar etwas unschön aber es funktioniert.

MfG Luke

[DanielSan]

Dann schreib doch wie du es gelöst hast, evtl. hilft es ja noch jemandem. Selbst wenn man dann nur sieht wie man es lieber nicht macht

Gruß Daniel