w@f  @<8/89/0988:16%Comp 4.01 CONFIG,D-,R-,, `n`NNo#mYes#"Then returning to system level for# correction.#2Pascal/M Configure Program# Version : #1.01# This program will configure your#$Pascal/M runtime program - PRUN.com##for the terminal that you are using#$so that the terminal cursor controls#will work correctly.#$They are not necessary for Pascal/M,#'but the Conact functions will not work.#(See manual section 16.9)#%Help is available on any menu by "?".# Press return # ...continuing#(----------------------------------------#(This is to be run after the installation#%of your Pascal/M onto a working disk.#THIS PROGRAM MUST NOT BE RUN#ON YOUR MASTER PASCAL DISK!##The PRUN.com to configure should be#(on the A: drive along with this program.#$Do you need to change disks (y/n) ? #l(----------------------------------------#+The default CRT type is TVI-920 or similar.#&Have you tested the current PRUN.com ?#(To do this, compile and run CONTEST.pas.##Do you wish to do this now (y/n) ? #N6P$ tINFIL!Now reading data from PRUN.com...#PRUN.com PRUN.com does not exist on#!the default drive. (A: preferred)#Exiting to system level for# correction.#2!!/BAD PRUN.com FILE -- ABORT#3$$#ʁ###$$$)#&&"ʂ#""&#$ʁ ˂ʁ ˂ʁ ˂ʁ ˂ʁ ˂ʁ˂ʁ˂ʂʁа$$<#&&'"ʂ#"ʁE#""&#$/$$#ʂL#ʁ##$/$$#ʂ4#ʁ؃##$/$$#ʂd#ʁ##$.YncN*Choose an item, then enter new values as a#*series of Hex numbers followed by carriage#*returns. The first byte MUST be the number#of bytes to follow.#*The numbers must be valid hex bytes 00-FF.#$The numbers should correspond to the#*functions that they represent. (i.e. these#.strings of bytes will be output to the console#to engage this function.)#(----------------------------------------#`"Select a terminal from the list or#$if yours is not listed enter "X" for#"editing the current configuration.#%More Terminals are available by using#option 1 or 2.#%Help is available on any menu by "?".#(You may change an item on your terminal,#by using the "S" or "T" option.#'The "O" option is for other information##like printer paper dimensions, etc.#+Patch Prun.com when modifications are made.#%Help is available on any menu by "?".# b Press return # ...returning#DS .4 #These are some terminals available:# A. TeleVideo Terminals.# B. Lear Siegler Terminals.# C. Hazeltine Terminals.# D. Soroc Terminals.# E. Zenith WH-19.# F. Visual 200.# G. TRS-80 Computers.# H. Cromemco 3102.#2. Terminal Menu #2.# X. Edit existing configuration.# #These are more terminals available:# I. Apple II (Videx).# J. Vector Graphics Computers.# K. DEC Terminals (and ABM).# L. Perkin Elmer Terminals.# M. TEC Terminals.# N. HP Terminals.# O. Osborne One.# P. Infoton 100.#1. Terminal Menu #1.#X. None of the above.# (modify existing data)# (----------------------------------------#` This is what you may now do:## B. Return to Terminal Selection.#" P. Patch data to Prun and exit.# O. Edit other data.##(console, printer dimensions, etc.)# S. Edit primary functions.#%(cursor controls, clear screen, etc.)# T. Edit secondary functions.#&(home cursor, set inverse video, etc.)# X. Exit without patching.#   Enter choice or "?" : #n$3 aP˂}The current value for ## is : #`"Enter 0 to unconfigure function or#Type return to leave alone or# Enter the no. of bytes to follow#(max #$ bytes) : #`The current value for ## screen is : #`Is this OK (y/n) ? #@,,Y]T  This is the current data in Hex.#1. Clear Screen : #2. Clr. to EOL : #3. Move Cursor Up : #4. Move Cursor Down : #5. Move Cursor Left : #6. Move Cursor Right : #7. Delete Character : #8. Insert Character : #9. Exit to Menu.##Enter no. of item to edit or "?" : #BHome and Clear Screen Clear to End of Line Move Cursor Up Move Cursor Down Move Cursor Left sMove Cursor Right [Delete Character DInsert Character -+%1?t_I4)B9" 1  aP˂}The current value for ## is : #`"Enter 0 to unconfigure function or#Type return to leave alone or# Enter the no. of bytes to follow#(max #$ bytes) : #`The current value for ## screen is : #`Is this OK (y/n) ? #@,,YaT This is the current data in Hex.#1. Home Cursor : #2. Set Inv. Video : # 3. Clear Inv. Video : # 4. Lock KeyBoard : # 5. UnLock KeyBoard : # 6. Insert Line : # 7. Delete Line : #8. Exit to Menu.##Enter no. of item to edit or "?" : #B Home CursorSet Inv. VideoClr. Inv. Video{ Lock KeyBoardgUnLock KeyBoardQ Insert Line? Delete Line-+%1?wcQ=-)B8\ 0 h ``p2`pa`pbnValue out of possible range.# Range is #b$ to #a$˂}The current CPU frequency is #ɂ$$Enter new value (in 1000s of cycles)#or enter 0 for no change: #'`2`'``˂˂}"The current no. of video lines is #ɂ$*Enter new value or enter 0 for no change: # P`2`P` `˂˂}$The current no. of video columns is #ɂ$Enter new value or enter 0#for no change: #`2```˂˂}$The current no. of printer lines is #ɂ$Enter new value or enter 0#for no change: # `2`Ȍ` `˂˂}&The current no. of printer columns is #ɂ$Enter new value or enter 0#for no change: # `2`` `˂˂}The current Amd Port is #ʂ%$Enter new Port number or enter 99999#for no change: #2rValue out of possible range.# Range is #$ to #%ʂ`l˂} The current character to echo on#unknown input is #ɂ Enter new character or#enter space for no change: #`2`}`!Value out of possible range.#Range is the ascii characters "#! " thru "#} " `}`!`˂ ˂}&The current end of file character is ^#ɂ@ !Enter control character to use or#enter space for no change: #`2``Value out of possible ranges.# Range is "^#@ " to "^#@ " ```˂j xThis is the data to edit.##1. CPU Frequency (in 1000s Hz.) - #ɂ$#2. No. of video lines (down) - #ɂ$#3. No. of video columns (across) - #ɂ$#4. No. of printer lines - #ɂ$#5. No. of printer columns - #ɂ$#6. Amd 9511 port - #ʂ %#7. Unknown character entry - #ɂ $8. End of file character - ^#ɂ@ 9. Exit to menu.#Enter no. of item to edit: #`"73/+'#19)'%#!`9r &This terminal is not yet supported, it#will be at a later date.#Press return to continue.#2yǁuDATAFILGetting data from datafile.#y CONFIG.daty CONFIG.dat does not exist on#!the default drive. (A: preferred)#"Must be present for Config to run.#Exiting to system level for# correction.#2y` yyuʂ-ʂ40ʂLHʂd`y='You have selected a Televideo terminal.#Is this correct (y/n) ? #@`N2Terminals supported :# 1. TVI - 912# 2. TVI - 920# 3. TVI - 950#Enter terminal type : #`Gʂ TVI - 912P<ʂ TVI - 920P$ʂ TVI - 950P 13N8"*You have selected a Lear-Siegler terminal.#Is this correct (y/n) ? #@BN2Terminals supported :# 1. Adm - 3A# 2. Adm - 31# 3. IT Terminal.# 4. Adm - 42#Enter terminal type : #BZʂADM - 3APRʂADM - 31P<ʂADM - ITP&ʂADM - 42P14aL8$a'You have selected a Hazeltine terminal.#Is this correct (y/n) ? #@BN2Terminals supported :# 1. Series 1500# 2. Series 1400#Enter terminal type : #B:ʂHazeltine 1500P(ʂHazeltine 1400P  12A&z#You have selected a Soroc terminal.#Is this correct (y/n) ? #@BN2Terminals supported :# 1. IQ - 120# 2. IQ - 140#Enter terminal type : #B.ʂIQ - 120P "ʂIQ - 140P  125 d%You have selected the Zenith WH - 19.#Is this correct (y/n) ? #@BN 2ʂWH - 19P   #You have selected the Visual - 200.#Is this correct (y/n) ? #@BN!2ʂ Visual 200P !&You have selected a TRS - 80 terminal.#Is this correct (y/n) ? #@BN"2Terminals supported :# 1. Model I## 2. Model II (Pickles & Trout CPM)#! 3. Model II (other version CPM)#Enter terminal type : #Bjʂ TRS - Model IP\ʂTRS - Model II (P&T CPM)P5ʂTRS - Model II (other CPM)P 13qX3"&You have selected a Cromemco terminal.##The only one supported is the 3102.#Is this correct (y/n) ? #@BN#2ʂ Cromemco 3102P#You have selected the Apple II#using the Videx board only.#Is this correct (y/n) ? #@BN$2ʂ Apple (Videx)P$"You have selected Vector Graphics.#Is this correct (y/n) ? #@BN%2ʂVector GraphicsP%!You have selected a DEC terminal.#Is this correct (y/n) ? #@BN&2Terminals supported :# 1. VT-100# 2. VT-52 (ABM 80)#Enter terminal type : #B<ʂ DEC VT - 100P-ʂDEC VT - 52 (ABM 80)P 12C+t& You have selected a Perkin Elmer# terminal.#Is this correct (y/n) ? #@BN'2Terminals supported :# 1. 550 Bantom# 2. 1100 Fox#Enter terminal type : #B/ʂ 550 BantomP"ʂ1100 FoxP 126 '#You have selected TEC 571 terminal.#Is this correct (y/n) ? #@BN(2ʂTEC 571P(!You have selected a H-P terminal.##The only one supported is the 2621.#Is this correct (y/n) ? #@BN)2ʂ HP - 2621P)!You have selected the Osborne One#Computer System.#Is this correct (y/n) ? #@BN*2ʂ Osborne OneP*'You have selected the Infoton terminal.#(The only one supported is the model 100.#Is this correct (y/n) ? #@BN+2ʂ Infoton 100P#+`b[ !"#$%&'(~)z*v+rjb`W1XP" , ~|zxvtrpnljhfdBDFHJLN`a `SOK G CA;?X4 *  ?=&(?=.02A`,dad d  A6( >ʂ`ba Unconfigured.#!0 a$, #baOb ʂ`b #ba , #^a e`2e j[fgg~g7 (gg0 g  `2hi f `hheeTe ʂ`?e: Maximum of #$ bytes.#2ʂ`dedegEnter data byte in Hex : #ee8Error - reenter : #ʂ`dedf_ 8ʁʁʁʁ@ʁʁ|ʁʁʁ ʁ 2ʁ ʁ ʁ }ʁʁʁʁ2ʁʁʁzʁʁʁʁ2ʁʁʁʁʁʁ@ʁʁ |ʁ!ʁ"ʁ#ʁ$2ʁ%ʁ&ʁ'{ʁ(ʁ)ʁ*ʁ+2ʁ,.ʁ-ʁ.}ʁ/ʁ0ʁ1ʁ22ʁ3ʁ4ʁ5!ʁ6ʁ7ʁ8ʁ9ʁ:ʁ;ʁ<ʁ=ʁ>ʁ? ʁ@ʁAʁBʁCʁDʁEʁFʁGʁH ʁIOʁJxʁKʁLʁMʁNʁOʁPʁQʁRʁSʁTʁUʁV/./ -INFILNow patching PRUN.com...#˂~PRUN.COM PRUN.com does not exist on#!the default drive. (A: preferred)#Exiting to system level for# correction.#2ʁ ɂʁ ɂʁ ɂʁ ɂʁ ɂʁɂʁɂʁʂݰ$$<#&&'"ʁE#"ʂ#""&#$/$$#ʁ#ʂL##$/$$#ʁ؃#ʂ4##$D-*/$$#ʁ#ʂd##$$$##ʁ##$!!/BAD PRUN.com FILE -- ABORT#3uK@N(----------------------------------------#You have selected : #ʂ7"Default data in Prun.com (TVI-920)#9 #ʂ# terminal.#You #ɂ}have # have not #edited terminal data.#ɂ~;&You have patched this data to PRUN.com#<)You have not patched the data to PRUN.com#Are you through (y/n) ? #`Y`y˂|Yes#˂|No#@0Ȃ}Ȃ~Ȃ|ǂP,c0Ƃ|-\ 6<vLjN*V~T:.lR !#R'(p*+,|-H.//h$2074; >f9 R P`0/