File BUFF.LS (listing file)

Directory of image this file is from
This file as a plain text file


PAL8-V9B NO/DA/TE PAGE 1 /TELETYPE HANDLER - NOT VERY INTELLEGENT. 0000 *0 /THIS IS THE HEADER BLOCK /THERE IS 1 DEVICE IN THE FILE 00000 7777 NOD,-1 /DESCRIPTOR BLOCK FOR THE DEVICE 00001 0225 DEVICE BUFF 00002 0606 00003 1120 DEVICE IPB /THIS IS THE NAME OS 8 WILL USE 00004 0200 00005 0700 IPBDCB, 0700 /THIS IS FOR OS8 00006 0201 ENTRY0, TTY /THIS IS THE OS8 ENTRY POINT 00007 0000 0 /USED BY OS8 00010 0000 0 /USED BY OS8 /************************************************************/ / ADD SYMBOLS FOR IPB...OS 8 DOES NOT HAVE THEM / /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / 6501 DBRF=6501 6502 DBRD=6502 6503 DBTF=6503 6504 DBTD=6504 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / / THAT SHOULD TAKE CARE OF THAT................ / /************************************************************/ 0200 *200 /THE REST IS MOSTLY FROM PS 8...ONLY A FEW CHANGES WERE REALLY /NECESSARY. THE MONITOR INTERFACE IS THE SAME. THE ONLY CHANGES /WERE THOSE NECESSARY FOR THE IBP TO WORK PROPERLY.....JJM...... / / / / / / /I THINK THE FOLLOWING TWO LINES ARE NOW NEGATED.....JJM /ONLY RECOGNIZES ^Z AND ^C ON INPUT /AND ^C AND ^O ON OUTPUT /OH WELL, WHAT CAN YOU EXPECT IN ONE PAGE. / THE LOGIC IS VERY SIMILIAR TO THE PTR AND PTP HANDLERS. 00200 0360 TTY360, 360 /MUST BE FIRST LOC ON PAGE! 00201 0000 TTY, 0 00202 7600 TT7600, 7600 00203 6214 RDF 00204 1304 TAD TTYCIF 00205 3261 DCA TTYXIT /SAVE RETURN FIELD 00206 1601 TAD I TTY 00207 0251 AND TT70
PAL8-V9B NO/DA/TE PAGE 1-1 00210 1316 TAD TTCDF 00211 3274 DCA TTYCDF /DATA FIELD OF BUFFER 00212 1601 TAD I TTY 00213 0345 AND TT7700 00214 7104 CLL RAL /READ/WRITE IN LINK, PAGE COUNT IN AC 0-4 00215 7440 SZA /PROTECT LINK 00216 7041 CIA /WHILE COMPLEMENTING AC 00217 3315 DCA TTYWC 00220 2201 ISZ TTY 00221 1601 TAD I TTY 00222 3314 DCA TTYCA /SAVE BUFFER ADDRESS 00223 2201 ISZ TTY 00224 2201 ISZ TTY 00225 7620 TTYLP, SNL CLA 00226 5317 JMP TTYGLP /ZER LINK MEANS READ 00227 4273 JMS TTYTST /TEST FOR ^C /THE PS 8 TTY DRIVER CHECKED FOR ^O HERE..IT IS NO LONGER /NECESSARY...JJM 00230 7200 CLA 00231 1714 TAD I TTYCA /CHARACTER 1 IS LOW ORDER 8 BITS OF WORD 1 00232 4264 JMS TTYPCH 00233 0236 AND TT7400 00234 3343 DCA TTYGCH 00235 2314 ISZ TTYCA 00236 7400 TT7400, 7400 00237 1714 TAD I TTYCA /CHARACTER 2 IS LOW ORDER 8 BITS OF WORD 2 00240 4264 JMS TTYPCH 00241 0236 AND TT7400 00242 7112 CLL RTR 00243 7012 RTR 00244 1343 TAD TTYGCH 00245 7012 RTR 00246 7012 RTR /CHARACTER 3 IS HIGH ORDER 4 BITS OF WORDS 1 AND 2 00247 4264 JMS TTYPCH /WILL SET LINK ON! /AC IS NON-ZERO HERE BUT WE DON'T CARE 00250 2314 TTLOOP, ISZ TTYCA 00251 0070 TT70, 70 00252 2315 ISZ TTYWC 00253 2315 ISZ TTYWC 00254 5225 JMP TTYLP 00255 1274 TTYRTN, TAD TTYCDF 00256 7141 CLL CIA 00257 7620 SNL CLA 00260 2201 ISZ TTY /SKIP PAST ERROR RETURN 00261 7402 TTYXIT, HLT /RESTORE CALLING FIELDS 00262 7004 RAL 00263 5601 JMP I TTY 00264 0000 TTYPCH, 0 00265 1375 TAD TTM232 00266 7450 SNA 00267 5255 JMP TTYRTN 00270 1367 TAD TTY232 00271 4306 JMS TTPRNT 00272 5664 JMP I TTYPCH 00273 0000 TTYTST, 0
PAL8-V9B NO/DA/TE PAGE 1-2 00274 0000 TTYCDF, 0 00275 1334 TAD TTY200 00276 6034 KRS /TEST FOR ^C WITH FLAG UP /WE STILL WANT THE KEYBOARD TO BE ABLE TO STOP THIS 00277 1372 TAD TTM203 00300 6031 KSF 00301 7201 CLA IAC 00302 7440 SZA /YES..BACK TO MONITOR 00303 5673 JMP I TTYTST 00304 6203 TTYCIF, CDF CIF 0 00305 5602 JMP I TT7600 00306 0000 TTPRNT, 0 00307 6504 DBTD /BUFFER FOR "TLS" --PUT IT OUT THERE 00310 6503 DBTF /BUFFER FOR "TSF" --WAIT FOR IT TO BE ACCEPTED 00311 5310 JMP .-1 00312 6507 6507 /THIS CLEARS THE DONE FLAG AFTER SENDING DATA /TO THE "SLAVE MACHINE". WITHOUT THIS THE /DONE FLAG STAYS UP AND ONLY 1 WORD IS SENT /THIS IS CALLED DBCD....................JJM 00313 5706 JMP I TTPRNT 00314 0000 TTYCA, 0 00315 0000 TTYWC, 0 00316 6201 TTCDF, CDF 0 /FOLLOWING CODE READS TTY AND PACKS IN BUFFER. 00317 4343 TTYGLP, JMS TTYGCH 00320 3714 DCA I TTYCA 00321 4343 JMS TTYGCH 00322 3264 DCA TTYPCH 00323 4343 JMS TTYGCH 00324 7006 RTL 00325 7006 RTL 00326 3343 DCA TTYGCH 00327 1343 TAD TTYGCH 00330 0236 AND TT7400 00331 1714 TAD I TTYCA 00332 3714 DCA I TTYCA 00333 1343 TAD TTYGCH 00334 0200 TTY200, AND TTY360 00335 7106 CLL RTL 00336 7006 RTL 00337 1264 TAD TTYPCH 00340 2314 ISZ TTYCA 00341 3714 DCA I TTYCA 00342 5250 JMP TTLOOP 00343 0000 TTYGCH, 0 00344 1274 TAD TTYCDF 00345 7700 TT7700, SMA CLA 00346 5743 JMP I TTYGCH 00347 2273 ISZ TTYTST 00350 5353 JMP TTYKSF 00351 1370 TAD TTY212 00352 5366 JMP TTECHO 00353 6501 TTYKSF, DBRF /IPB FOR "KSF" 00354 5353 JMP .-1
PAL8-V9B NO/DA/TE PAGE 1-3 00355 6502 DBRD /GET THAT DATA!!!! 00356 3376 DCA INP00 /STORE IT 00357 1376 TAD INP00 /GET IT BACK***** 00360 1375 TAD TTM232 /WAS THAT A ^Z???? 00361 7450 SNA /IS IT A ^Z? 00362 3274 DCA TTYCDF /YES - SET END-OF-FILE FLAG 00363 1371 TAD TTY14 00364 3273 DCA TTYTST /TTYTST=-1 IF CARRIAGE RETURN 00365 1376 TAD INP00 /GET THE CHR... /THERE USED TO BE AN ECHO HERE 00366 5743 TTECHO, JMP I TTYGCH 00367 0232 TTY232, 232 /THIS CAN BE OPTOMIZED OUT! 00370 0212 TTY212, 212 00371 0014 TTY14, 14 00372 7575 TTM203, -203 00373 7751 TTM27, -27 00374 7764 TTYM14, -14 00375 7546 TTM232, -232 00376 0000 INP00, 0000
$ PAL8-V9B NO/DA/TE PAGE 2 $
$ PAL8-V9B NO/DA/TE PAGE 3 DBRD 6502 DBRF 6501 DBTD 6504 DBTF 6503 ENTRY0 0006 INP00 0376 IPBDCB 0005 NOD 0000 TTCDF 0316 TTECHO 0366 TTLOOP 0250 TTM203 0372 TTM232 0375 TTM27 0373 TTPRNT 0306 TTY 0201 TTYCA 0314 TTYCDF 0274 TTYCIF 0304 TTYGCH 0343 TTYGLP 0317 TTYKSF 0353 TTYLP 0225 TTYM14 0374 TTYPCH 0264 TTYRTN 0255 TTYTST 0273 TTYWC 0315 TTYXIT 0261 TTY14 0371 TTY200 0334 TTY212 0370 TTY232 0367 TTY360 0200 TT70 0251 TT7400 0236 TT7600 0202 TT7700 0345
ERRORS DETECTED: 0 LINKS GENERATED: 0



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search