Hi.
Have this simpel test program;
$regfile "M328pdef.dat"
$crystal = 16000000
$baud = 9600
'CONFIG SUBMODE = NEW
Dim X As Byte
Dim Y As Byte
Declare Sub Pos(byval X As Byte , Byval Y As Byte)
Open "comb.3:9600,8,n,1" For Output As #1
Waitms 500
Print #1 , "serial output"
Wait 1
Print #1 , Chr(12);
Waitms 2
pos(1,2)
Waitms 10
Print #1 , "3.25 3.26 3.27 3.18"
Print #1 , "4.25 4.26 25.2";
Wait 5
Pos 3 , 6
Print #1 , "Jauda"
Wait 5
End
Sub Pos(x As Byte , Y As Byte)
Print #1 , Chr(27) ; "O" ; Chr(x) ; Chr(y);
End Sub
When compiling I get;When compiling I get;
error 211 extenal routine not found[-SUBFROMFRAME]
error 61 Label not found[-SUBFROMFRAME0]
Been struggeling With this now for the better part of a day, so anyone, plese help.
regards svein
[b:61b2838a6a][color=red:61b2838a6a](BASCOM-AVR version : 2.0.7.6 )[/b:61b2838a6a][/color:61b2838a6a]
↧
