home *** CD-ROM | disk | FTP | other *** search
- 9000 // pass "s0:mcloader.p"
- 9002 // list "0:mcloader.p"
- 9004 //
- 9006 // diese procedure kann maschinen-
- 9008 // sprache absolut laden.
- 9010 // binden sie es mit 'enter' in
- 9012 // ihre eigenen programme ein!
- 9014 //
- 9016 proc objectload(name$) closed
- 9018 poke 858,169
- 9020 poke 859,0
- 9022 poke 860,76
- 9024 poke 861,213
- 9026 poke 862,255
- 9028 open file 71,name$+",p",read
- 9030 sys 858
- 9032 close file 71
- 9034 endproc objectload
- 9036 //
- 9038 // wenn sie das ',p' durch ein
- 9040 // ',u' ersetzen, koennen sie auch
- 9042 // 'usr'-dateien absolut laden!
- 9044 //
-