Trailing-Edge
-
PDP-10 Archives
-
decus_20tap4_198111
-
decus/20-0125/loader.sav
There are 2 other files named loader.sav in the archive.  Click here to see a list.
h ' |X   e-  ?x - |Px .    s( /+   3(' FILENAME DIALOGUE:')  +   9(1X,A1,'START OF GT40 LOADER LOG FILE (EIGHT BIT)',A1) +   ?(' ? GT40 NOT INITIALIZED OR HANDLER TRANSFER FAILED') +   E(' %ATTEMPT #',I1,' CHECKSUM ERROR FOR BLOCK #',I2)    +   G(' ? LOAD FAILS')   +   L(1X,A1,'LOAD SUCCESSFUL, NO SELF START',A1)  +   Q(1X,A1,'LOAD SUCCESSFUL, PROGRAM STARTED',A1)+   W(' ? INVALID REPLY FROM GT40, LOADER IS HUNG')     "  0b    -\ '4    4  4   4
 4   4
 4   4
 4    4  -\ '4    4  4   4
 4   4
    X@  c "  3b           -\ v-\ l4    3D +   l   X@  i "  9b       -\ *4    4  -\ `:   $    D  -\  4  !4   4  -\ [4  !4   -\ l4    3D +   l  2D +      X@  w "  ?b            :    $  2d  +   p   X@  | "  Eb       -\ *4    4  -\ `  2D +     X@  "  Gb             2D +  	   X@  "  Lb             3D g  O     3F g  O   A  5$    X@  "  Qb       -\ *4    4  -\ `+        +   0GIDUS.BIN xSEQINxIMAGEpLOADER.LOGpSEQOUT    p    
    
P    )    "    $    )`       r(+  !(' %BLOCK #',I2,' NULL BYTE EXPECTED BUT ',O3,' OBTAINED')  +  &(' ? BLOCK #',I2,' COUNT TOO LARGE AT ',I6)  +  +(' ? CHECKSUM ERROR ON DSK FOR BLOCK#', I2)  +  5(1X,A1,'TRANSFERRING BLOCK #',I2,' BYTE COUNT = ',       I5,'(10) LOAD ADDRESS = ',O6,A1) -\ 34   @  $   2D +  5-\ 34   @   4D >   
X@ < " b           +  5 $    D -\ 34   @ -\ 34   @  $  $  $  $  $   .   F 
 $ h2d 
+  M   
X@ I " !b       
    -\ *4    4  
-\ `  
!&