Hallo,
ich hab ein bisschen an meiner RN-Control rumgeprogt und plötzlich faselt der sich da was von Label not found und external routine not found zusammen. Was soll datn jetz heißen? Hier mein Code:
Code:
 
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000
$baud = 9600

'Sound Portd.7 , Hertz, Millisekunden

Config Pinc.0 = Output
Leda Alias Portc.0
Config Pinc.1 = Output
Ledb Alias Portc.1
Config Pinc.2 = Output
Ledc Alias Portc.2
Config Pinc.3 = Output
Ledd Alias Portc.3
Config Pinc.4 = Output
Lede Alias Portc.4
Config Pinc.5 = Output
Ledf Alias Portc.5
Config Pinc.6 = Output
Ledg Alias Portc.6
Config Pinc.7 = Output
Ledh Alias Portc.7

Dim I As Integer

Dim Name As String * 20
Dim Vnummer As Double

Echo On

Waitms 1000

Sound Portd.7 , 400 , 400
Sound Portd.7 , 400 , 250
Sound Portd.7 , 400 , 450


Leda = 1
Sound Portd.7 , 100 , 100
Waitms 1000
Ledb = 1
Sound Portd.7 , 200 , 100
Waitms 1000
Ledc = 1
Sound Portd.7 , 300 , 100
Waitms 1000
Ledd = 1
Sound Portd.7 , 400 , 100
Waitms 1000
Lede = 1
Sound Portd.7 , 500 , 100
Waitms 1000
Ledf = 1
Sound Portd.7 , 600 , 100
Waitms 1000
Ledg = 1
Sound Portd.7 , 700 , 100
Waitms 1000
Ledh = 1
Sound Portd.7 , 800 , 100



Print "Hallo, ich heisse RN-Control. Meine Versionsnummer ist 1.4."
Input "Und wie heisst du? " , Name
Print "Hallo " ; Name
Input "Und wie lautet deine Versionsnummer? " , Vnummer
Print "Aha! Deine Versionsnummer lautet also " ; Vnummer ; "!"

If Vnummer > 1.4 Then
Print "Deine Versionsnummer ist hoeher als meine :-("
Else
Print "Meine Versionsnummer ist hoeher als deine :-)"
End If



Do

   Waitms 500
   Leda = 1
   Waitms 50
   Ledb = 1
   Waitms 50
   Ledc = 1
   Waitms 50
   Ledd = 1
   Waitms 50
   Lede = 1
   Waitms 50
   Ledf = 1
   Waitms 50
   Ledg = 1
   Waitms 50
   Ledh = 1

   Waitms 500
   Ledh = 0
   Waitms 50
   Ledg = 0
   Waitms 50
   Ledf = 0
   Waitms 50
   Lede = 0
   Waitms 50
   Ledd = 0
   Waitms 50
   Ledc = 0
   Waitms 50
   Ledb = 0
   Waitms 50
   Leda = 0

Loop
Außerdem ist bei dem kleinen Kaffeeklatsch auch noch ein anderer Fehler. Dann fragt er nach der Versionsnummer, ich sag 42 und im Terminal kommt dann: 42îß, dann macht er anscheinend Reset (aber das Lauflicht bleibt dabei aus)