(PCRd((*** Initialisierung von Port A ***n96-BG6-BG9Adressen von Port A und CRAxC@2%@%@CCA2=High, Data-Direction Register1AU1Alle Leitungen Port A = AusgangK'@2%@%@%@KCA2=High, Input / Output Register##*** Hauptprogramm ***77 .Welchen Wert soll ich an den Drucker ausgeben* 6-P:,* )!AUA ( 6-F:,(Controlgegister abfragen:, A(A@,Ist Bit 7 gesetzt?) )Dann lege den Wert auf Port A?@2%@%@?Loese einen STROBE-Impuls ausF'@2%@%@%@F(erst Low, dann wieder High)"- A-Frage nach dem naechsten Wert, D:BEISPL3.BAS