Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 249697 (11133)
  Suchen
 Zurück zur Übersicht
 AutorThema: basic to profan
ulrich
Datum: 24.05.01 10:57 Antwortenals Email verschicken (ul.boett@t-online.de) 


hallo

ein verzweifelter anfänger scheitert im prinzip an drei basiczeilen,die ich nicht in profan zum laufen bekomme.

eine basicsoftware(größtenteils schon nach profan umgeschrieben)
fragt über ein interface ein meldemodul einer modellbahn ab.sie erhält antwortbytes zurück die dann auf dem monitor eine
gleisbesetztmeldung ergibt hier der basicteil:

open "com2:2400,N,8,2" as #1
print#1,chr$(193)
A$=INPUT$(2,#1)
B=ASC(LEFT$(A$,1))
gosub x
.....
x:subroutine zur ausgabe der kontaktzustände
for n=0 to 7
if(B and(2^n)=0 then print "0";else print "1"
next n
return

die monitorausgaben habe ich der übersicht wegen hier nich angegeben.

die schnittstellenöffnung fkt.bereits an anderer stelle,ABER DANN...

wer hilft mir bitte

vielen dank


 Zurück zur Übersicht