Hey,
geht wohl doch - aber mit nur col!
Wenn ich das unten bei den rows mache kommt:Code:$regfile = "m32def.dat" $framesize = 32 $swstack = 32 $hwstack = 32 $crystal = 1600000 $baud = 9600 Config Portc = Output Config Portb = Output Portc = 0 Portb = 0 Dim Col As Integer Dim Row As Integer Dim Time As Integer Time = 1000 Do For Col = 0 To 8 Config Porta = Input Portc = 0 Portb = 0 Portc.col = 1 Waitms Time Portc.col = 1 Waitms Time For Row = 0 To 3 Config Porta = Input Config Porta.row = Output Waitms Time Elseif Row = 1 Then Config Porta.1 = Output Waitms Time Elseif Row = 2 Then Config Porta.2 = Output Waitms Time End If Next Next Loop
UNOWN Config PARAMETER [PORTA.ROW]







Zitieren

Lesezeichen