So schnell geht das....

ich weiß nicht warum aber jetzt funktioniert der Loader so wie ich wollte!
Irgend eine Configuration am Anfang hatte Probleme gemacht:
Code:
$crystal = 14745600
$baud = 57600                                                                   'this loader uses serial com

 '$sim
$regfile = "m644pdef.dat"
$loader = $7c00                                                                 ' 1024 words
Const Maxwordbit = 7
Open "COM2:" For Binary As #2                                                   'Z7 is maximum bit                                   '
Config Com2 = 57600 , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
Config Com1 = 57600 , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
....
Bretries = 5                                                                    'we try 5 times
Testfor123:
#if Cdebug
    Print #2 , "Try " ; Bretries
    Print #2 , "Wait"
     Print "Try " ; Bretries
     Print "Wait"
#endif
Bstatus = Waitkey(#2)                                                           'wait for the loader to send a byte
#if Cdebug
   Print #2 , "Got "
    Print "Got "
#endif

Print #2 , Chr(bstatus);
...
mit den Einstellungeen funsts...
MAT