home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / comm / qmscr41.zip / DNLOAD.PCB (.png) < prev    next >
PC-Board  |  1989-04-01  |  5KB  |  640x4400
Labels: text | screenshot | black and white
OCR: 21:45 IF '$1' = '' go_back COLOR 3 SEND ' ^M' WAITFOR 'Command?' SEND 'd $1 $prtcol^M' WHEN 'none?' NEXT2 WAITFOR 'Ctrl-X' PAUSE 1500 WINDOW 1 1 80 24 ATWRITE 11 3 138 'File # 1 >' DOWNLD $pcb-prtcol $dirpath\$1 ATWRITE 11 3 13 'File # 1 >' COLOR 12 BOX 1,14,80, $last_row CLRSCR NEXT2 : WHEN SEND ' ^M' IF '$2' = '' COLOR 3 go_back WAITFOR 'Command?' SEND 'd $2 $prtcol^M' WHEN 'none?' NEXT3 WAITFOR 'Ctrl-X' PAUSE 1500 WINDOW 1 1 80 24 ATWRITE 45 3 138 'File # 2 >' DOWNLD $pcb-prtcol $dirpath\$2 ATWRITE 45 3 13 'File # 2 >' COLOR 12 BOX 1,14,80, $last_row CLRSCR NEXT3 : WHEN SEND ^M IF '$3' E COLOR 3 go_back WAITFOR 'Command?' SEND 'd $3 $prtcol^M' WHEN 'none?' NEXT4 WAITFOR 'Ctrl-X' PAUSE 1500 WINDOW 1 1 80 24 ATWRITE 11 4 138 'File # 3 >' DOWNLD $pcb-prtcol $dirpath\$3 ATWRITE 11 4 13 'Fil ...