IMD 1.17: 11/11/2014 12:54:26 82VKXBVERDOS B* VERSADOS/RMS68K OBJECT 4.3 SN=39358 7 OF 11  BT0782VKXBVERDOS 0420¿~->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*.*ˆFOLLOWINGHASBEENADDEDFORTHEVM01SYSTEM**XTVMPPƒEQU‡$21XTVMSPƒEQU‡$20O*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<O**********************************************************************************ˆIOC--DEFINEDCB'SANDCDB'S*'*ˆThemacrosusedaredefinedinIODVM.*O******************************************************************************* *@*‚ThissectionbecomesIOCOMS,whichisusedbyFMS,IOS,&FHS.*#IOCOM„IDNT†12,12‡I/OCOMMONSEGMENT SECTION 0 OPT MEX XDEF IOCOMS,IOCOML,CCSEG *1*‚Definethephysicaladdressesofdevicedrivers*‚usingtheSYSGENparameters.*IPC†EQU‡\IPCDRVRCHI†EQU‡\CHIDRVREPCI…EQU‡\EPCIDRVR PAGE*6*‚Hereareparametersdescribingthetablesandlists.*IOCOMS  DC.L 0 I/O sysgen options. ( DC.L DCQSTR Start address of DCQ space.&DC.LDCQENDEndƒaddressofDCQspace.DC.L0†Addressof1stDCQ. ( DC.L LUTSTR Start address of LUT space.&DC.LLUTENDEndƒaddressofLUTspace.DC.L0†Addressof1stLUT. ( DC.L DCBTBL Start address of DCB space.&DC.LDCBENDEndƒaddressofDCBspace. DC.L DCBTBL Address of 1st DCB.  DC.L 0 SEMAPHORE FLAG&DC.B'\SYSNAME'„OPERATINGSYSTEMI.D.DC.B'\REVISION'ƒANDƒREVISION( DC.L 0,0,0 TASK ID FOR UNCLAIMED BREAKS PAGEO********************************************************************************C*ˆStorageforDCQ'sandLUT's.‚Initiallythesetwolistsareempty.*O******************************************************************************* * *‚DCQspace.* DCQSTR EQU * DS.B 256*\DCQPGEDCQEND EQU *-1 * *‚LUTspace.* LUTSTR EQU * DS.B LUTBEG*\NOTASKS X(70/8=@HHPPWXQ`Nhipyxr€wˆe  DS.B LUTSEG*\NOTASKS*(\MAXLU+1)LUTEND EQU *-1‰PAGEO**********************************************************************************ˆDefineDCB'sbasedonSYSGENparameters.*O******************************************************************************* *DCBTBLEQU*‡ThisisthetopofDCBspace. &**************************************$*‚SETUPDCB'SFORLOCALTERMINALS‚*&************************************** IFNE \NOLTERMITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*A*ˆBelowreflectstheNEWDCBformatwithmodificatinstomeettheB*ˆthePRINTERTASK‚needs.Someofthesefieldsreflectvaluesthat@*ˆarenotusedwhileothersreflectduplicationbutatdifferentA*ˆoffsetsthatmeetthePRINTERTASKneeds.WhenthePRINTERTASKB*ˆismodifiedtobecomeatruePRINTERDRIVERthefollowingcanbe7*ˆdeletedantheMACROdefinitionusedasitshouldbe.H*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 1‰DC.L†*+PDCBLN‡AddressofnextDCBinlinkedlist-‰DC.L†PRTDVŠASCIIidentificationforthisDCB‰DC.L†0ŽAddressofDCQentry+‰DC.L†PRTIDŠNameoftaskmakingtherequest+‰DC.L†IOSESS‰Sessionoftaskmakingrequest‰DC.L†0ŽAddressofLUT8‰DC.L†$632‹AttributesofdeviceassociatedwiththisDCB ‰DC.W†0ŽWrite/Readprotectcodes‰DC.W†0Ž'Deviceinuse'flag‰DC.L†0ŽWrite/Readcounts"‰DC.B†95Deviceflag(devicecode)#‰DC.B†1ŽDeviceflag(devicestatus)#‰DC.L†'CPRT'‰Channelidentification2‰DC.B†0ŽDevicenumberassociatedwiththischannel‰DC.B†0ŽTaskpriority‰DC.L†0ŽCurrentrecordnumber6‰DS.B†IOSBLN‰StorageareafortheIOCBbeingprocessed1‰DC.L†0ŽLogicaladdrofIOCBinuser'saddrspace5‰DC.B†0ŽConfig.coordinationflag(0-->atdefaults)‰DC.B†0ŽBreakcount$‰DC.L†0ŽAddressofbreakserviceLUT2‰DC.L†0ŽBreakserviceaddress‚--------------------6‰DC.L†0,0,0,0ˆDeviceindependent/dependentbufferzone%‰DC.B†0,0,0,0ˆSpaceforstatusfields‰DC.W†$0007ŠAttributesmask‰DC.W†$0033ŠParametersmask‰DC.W†PCP$ATWˆAttributesword#‰DC.W†\PCP$REC‡#ofcharacters/line‰DC.L†\PCP$RSZ‡#oflines/page‰DC.L†\PCP$WTO‡Writetimeout‰DC.L†0ŽRead‚timeout"‰DC.W†\PCP$LRL‡LogicallinelengthO*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>A*ˆNormallythefollowingwouldbewhatfollowsforthebalanceof>*ˆtheDCBbutsincethecurrentdrivertaskVMPRThasnotbeen<*ˆmodifiedatthistime10/13/82toaprocessaredefinitionE*ˆofthebalanceoftheDCBwasrequiredtofitthetaskrequirements*‰DC.B†$0AŒEnd-of-linecharacter%‰DCB.B…15,0‹Resrevedspace(15bytes)O*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+‰DC.L†$00000D00†Programminginfo-Software+‰DC.L†$00000084†Programminginfo-Hardware )‰DC.L†$0I/Otimeoutvalue-time(msecs) ‰DC.L†$0I/Otimeoutvalue-day IFNEPRTDV-'PR‚'PRTDV SET PRTDV+$100 ENDC(IFEQPRTDV-'PR‚'SETUPNEXTPRINTERIDPRTDV SET 'PR1 ' ENDC********** IFNE \NOLPRT-1.PCP$ATW‚SET…\PCP$TLRL<<2+\PCP$AFF<<1+\PCP$LNFDO*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*A*ˆBelowreflectstheNEWDCBformatwithmodificatinstomeettheB*ˆthePRINTERTASK‚needs.Someofthesefieldsreflectvaluesthat@*ˆarenotusedwhileothersreflectduplicationbutatdifferentA*ˆoffsetsthatmeetthePRINTERTASKneeds.WhenthePRINTERTASKB*ˆismodifiedtobecomeatruePRINTERDRIVERthefollowingcanbe7*ˆdeletedantheMACROdefinitionusedasitshouldbe.H*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 1‰DC.L†*+PDCBLN‡AddressofnextDCBinlinkedlist-‰DC.L†PRTDVŠASCIIidentificationforthisDCB‰DC.L†0ŽAddressofDCQentry+‰DC.L†PRTIDŠNameoftaskmakingtherequest+‰DC.L†IOSESS‰Sessionoftaskmakingrequest‰DC.L†0ŽAddressofLUT8‰DC.L†$632‹AttributesofdeviceassociatedwiththisDCB ‰DC.W†0ŽWrite/Readprotectcodes‰DC.W†0Ž'Deviceinuse'flag‰DC.L†0ŽWrite/Readcounts"‰DC.B†95Deviceflag(devicecode)#‰DC.B†1ŽDeviceflag(devicestatus)#‰DC.L†'CPR1'‰Channelidentification2‰DC.B†0ŽDevicenumberassociatedwiththischannel‰DC.B†0ŽTaskpriority‰DC.L†0ŽCurrentrecordnumber6‰DS.B†IOSBLN‰StorageareafortheIOCBbeingprocessed1‰DC.L†0ŽLogicaladdrofIOCBinuser'saddrspace5‰DC.B†0ŽConfig.coordinationflag(0-->atdefaults)‰DC.B†0ŽBreakcount$‰DC.L†0ŽAddressofbreakserviceLUT2‰DC.L†0ŽBreakserviceaddress‚--------------------6‰DC.L†0,0,0,0ˆDeviceindependent/dependentbufferzone%‰DC.B†0,0,0,0ˆSpaceforstatusfields‰DC.W†$0007ŠAttributesmask‰DC.W†$0033ŠParametersmask‰DC.W†PCP$ATWˆAttributesword#‰DC.W†\PCP$REC‡#ofcharacters/line‰DC.L†\PCP$RSZ‡#oflines/page‰DC.L†\PCP$WTO‡Writetimeout‰DC.L†0ŽRead‚timeout"‰DC.W†\PCP$LRL‡LogicallinelengthO*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>A*ˆNormallythefollowingwouldbewhatfollowsforthebalanceof>*ˆtheDCBbutsincethecurrentdrivertaskVMPRThasnotbeen<*ˆmodifiedatthistime10/13/82toaprocessaredefinitionE*ˆofthebalanceoftheDCBwasrequiredtofitthetaskrequirements*‰DC.B†$0AŒEnd-of-linecharacter%‰DCB.B…15,0‹Resrevedspace(15bytes)O*<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+‰DC.L†$00000D00†Programminginfo-Software+‰DC.L†$00000084†Programminginfo-Hardware)‰DC.L†$0I/Otimeoutvalue-time(msecs) ‰DC.L†$0I/Otimeoutvalue-dayIFNEPRTDV-'PR‚'PRTDV SET PRTDV+$100 ENDC(IFEQPRTDV-'PR‚'SETUPNEXTPRINTERIDPRTDV SET 'PR1 ' ENDC ENDC ENDC‰PAGE*****************************<*‚SETUPDCB'SFORMCCM'S‚*…Note:‚maxof1printerperMCCM.***************************** ****** 1st MCCM IFNE \NOPRT0.PCP$ATW‚SET…\PCP$TLRL<<2+\PCP$AFF<<1+\PCP$LNFDK PRTDCB PRTDV,IOSID,IOSESS,$632,91,1,'COM1',4,$0001,$0023,PCP$ATW,\PCP$REC,%&ˆ\PCP$RSZ,\PCP$WTO,\PCP$LRL,\PCP$ELCIFNEPRTDV-'PR‚'PRTDV SET PRTDV+$100 ENDC(IFEQPRTDV-'PR‚'SETUPNEXTPRINTERIDPRTDV SET 'PR1 ' ENDC ENDC********** IFNE \NOTERM0ITCP$ATW‚SETƒ\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SETƒTCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8‰DC.L†0,0,0,0ƒBUFFERZONEBETWEENDEVICEINDEPENDENT/DEPENDENT)‰DC.B†IOSTLN„SPACEFORCONFIGURATIONINFO‰DCB.B…DCBLEN-(*-LLUN),0 (DCBENDEQU*-1…EndaddressofDCBspace.HIOCOML EQU (*-IOCOMS+255)/256*256 Get length of common segment (force to*§nextpageboundary). PAGE SECTION 1‰PAGEO*********************************************************************************‰CHANNELDATABLOCKS*O******************************************************************************* CCSEG EQU * ******‚LOCALPRINTERS IFGT \NOLPRTF CDB 0,'CPRT',XTVMPP,254,CHI,0,\LPDA$00,$10,$1E,6,$10,2,5,$80,$80,1,0,&„4,$80,$80,0,0 ENDC********** IFGT \NOLPRT-1F CDB 0,'CPR1',XTVMPP,254,CHI,0,\LPDA$01,$0E,$1E,6,$10,2,5,$80,$80,1,0, &ˆ0,0,0,0,0 ENDC**********‰PAGE******‚LOCALTERMINALS ‚IFGT\NOLTERME CDB $0000,'EPC1',XTEPCI,254,EPCI,0,\LTDA$00,6,$1D,5,$30,0,0,0,0,0,0, & 0,0,0,0,0 ENDC   IFGT \NOLTERM-1E CDB $0000,'EPC2',XTEPCI,254,EPCI,0,\LTDA$01,6,$1D,5,$30,0,0,0,0,0,0, & 0,0,0,0,0 ENDC **********‰PAGE******‚MCCMCHANNELS  IFNE \NOTERM0+\NOPRT0O CDB 0,'COM1',XTMIPC,254,IPC,0,$FF1000,$1FF,$F7,4,$10,0,$181,$FF,$FF,$F,0,$183,&‚$FF,$FF,$F,0 ENDC********** IFNE \NOTERM1+\NOPRT1O CDB 0,'COM2',XTMIPC,254,IPC,0,$FF1200,$1FF,$F6,4,$10,0,$181,$FF,$FF,$F,0,$183,&‚$FF,$FF,$F,0 ENDC********** IFNE \NOTERM2+\NOPRT2O CDB 0,'COM3',XTMIPC,254,IPC,0,$FF1400,$1FF,$F5,4,$10,0,$181,$FF,$FF,$F,0,$183,&ƒ$FF,$FF,$F,0 ENDC********** IFNE \NOTERM3+\NOPRT3O CDB 0,'COM4',XTMIPC,254,IPC,0,$FF1600,$1FF,$F4,4,$10,0,$181,$FF,$FF,$F,0,$183,&ƒ$FF,$FF,$F,0 ENDC**********‰PAGE$******‚HARDANDFLOPPYDISKCHANNELS %DEVADD SET $FEFE00 INIT. DEVICE ADDR. VECTNO SET $100 INIT. VECTOR NO. IFNE \HDUDC0+\FDUDC0DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CRD1',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC********** IFNE \NOFD0DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CFD1',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,4,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC********** IFNE \HDUDC1+\FDUDC1DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CRD2',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC********** IFNE \NOFD1DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CFD2',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,4,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC**********) DC.L 0 Link of 0 marks end of CDB chain.  ENDé  PAGE*#*VALPAR VALIDATES SYSGEN PARAMETERSG*…FAILERRORISGENERATEDFOREACHPARAMETERTHATISNOTINVALIDRANGE:*ANY ERROR SHOULD MAKE OPERATOR ABORT SYSGEN SINCE FURTHER/*…SYSGENPROCESSINGASSUMESPARAMETERSAREGOOD*0*MAKE SURE NO. OF IPC'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOFD0 CNT SET CNT+1 ENDC IFNE \NOFD1 CNT SET CNT+1 ENDC IFNE \HDUDC0+\FDUDC0 CNT SET CNT+1 ENDC IFNE \HDUDC1+\FDUDC1 CNT SET CNT+1 ENDC IFNE CNT-\NOIPCS FAIL 100 ENDC1*MAKE SURE NO. OF MCCM'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOTERM0+\NOPRT0 CNT SET CNT+1 ENDC IFNE \NOTERM1+\NOPRT1 CNT SET CNT+1 ENDC IFNE \NOTERM2+\NOPRT2 CNT SET CNT+1 ENDC IFNE \NOTERM3+\NOPRT3 CNT SET CNT+1 ENDC IFNE CNT-\NOMCCMS FAIL 100 ENDC=*CAN'T HAVE MORE THAN 2 LOCAL PRINTER OR MORE THAN 1 PER MCCM IFGT \NOLPRT-2 FAIL 100 ENDC IFGT \NOPRT0-1 FAIL 100 ENDC IFGT \NOPRT1-1 FAIL 100 ENDC IFGT \NOPRT2-1 FAIL 100 ENDC IFGT \NOPRT3-1 FAIL 100 ENDC9*CAN'T HAVE MORE THAN 2 LOCAL TERM. IF ANY MCCM TERMINALS IFNE \NOTERM0+\NOTERM1+\NOTERM2 IFGT \NOLTERM-2 FAIL 100 ENDC ENDC8*CAN'T HAVE MORE THAN 4 LOCAL TERMS IF NO MCCM TERMINALS IFEQ \NOTERM0+\NOTERM1+\NOTERM2 IFGT \NOLTERM-4 FAIL 100 ENDC ENDC**CAN'T HAVE MORE THAN 4 TERMINALS PER MCCM IFGT \NOTERM0-4 FAIL 100 ENDC IFGT \NOTERM1-4 FAIL 100 ENDC IFGT \NOTERM2-4 FAIL 100 ENDC IFGT \NOTERM3-4 FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER IPC IFGT \NOFD0-4 FAIL 100 ENDC IFGT \NOFD1-4 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 HARD DRIVES PER UDC IFGT \HDUDC0-4 FAIL 100 ENDC IFGT \HDUDC1-4 FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER UDC IFGT \FDUDC0-4 FAIL 100 ENDC IFGT \FDUDC1-4 FAIL 100 ENDC9*CAN'T HAVE 0 OR MORE THAN 75 TASKS IN SYSTEM AT ONE TIME IFEQ \NOTASKS FAIL 100 ENDC IFGT \NOTASKS-75 FAIL 100 ENDC˜n¡\1*MAXIMUM LU CANNOT BE LESS THAN 8 OR MORE THAN 31 IFLT \MAXLU-8 FAIL 100 ENDC IFGT \MAXLU-31 FAIL 100 ENDC2*MAXIMUM LU CANNOT BE LESS THAN NO. OF DISK DRIVES IFLT \MAXLU-\TOTDSK FAIL 100 ENDCC*MAXIMUM NO. OF PAGES FOR DCQ,UST,GST,IOV, AND TRACE CANNOT BE 0 OR*…MORETHAN10 IFEQ \DCQPGE FAIL 100 ENDC IFGT \DCQPGE-10 FAIL 100 ENDC IFEQ \GST FAIL 100 ENDC IFGT \GST-10 FAIL 100 ENDC IFEQ \UST FAIL 100 ENDC IFGT \UST-10 FAIL 100 ENDC IFNE \TRCFLAG IFEQ \TRACE FAIL 100 ENDC ENDC IFNE \TRCFLAG IFGT \TRACE-10 FAIL 100 ENDC ENDC IFEQ \IOV FAIL 100 ENDC IFGT \IOV-10 FAIL 100 ENDCG*MAXIMUM NO. OF DIFFERENT FILES MUST BE .LE. MAXIMUM NO. OF TOTAL FILES IFGT \NODIFFIL-\NOFILES FAIL 100 ENDC2*MAXIMUM NO. OF FILES CANNOT BE 0 OR MORE THAN 200 IFEQ \NODIFFIL FAIL 100 ENDC IFGT \NODIFFIL-200 FAIL 100 ENDC IFEQ \NOFILES FAIL 100 ENDC IFGT \NOFILES-200 FAIL 100 ENDCG*MAXIMUM NO. OF DEFAULT VOLUMES CANNOT BE 0 OR MORE THAN NO. OF TASKS+3 IFEQ \NODEFVOL FAIL 100 ENDC IFGT \NODEFVOL-(\NOTASKS+3) FAIL 100 ENDCE*NUMBER OF DEFAULT VOLUMES MUST BE GREATER THAN OR EQUAL TO NUMBER OF*ƒLOGONTERMINALS IFGT \NOLOGONS-\NODEFVOL FAIL 100 ENDC**DEFAULT FAB SIZE CANNOT BE 0 MORE THAN 20 IFEQ \DEFFAB FAIL 100 ENDC IFGT \DEFFAB-20 FAIL 100 ENDC7*DEFAULT DB SIZE CANNOT BE LESS THAN 4 OR MORE THAN 255 IFGT \DEFDAT-255 FAIL 100 ENDC IFLT \DEFDAT-4 FAIL 100 ENDC END  é PAGE)ASR IDNT 11,11 ASR ADDRS. FOR I/O MODULES*8*ASR-FILE OF ASR ADDRESSES OF I/O MODULES-NEEDED FOR IOI* XDEF SPLASR! XDEF FMSASR,FHSASR,IOSASR,PRTASRFMSASR EQU \FMSASRFHSASR EQU \FHSASRIOSASR EQU \IOSASRPRTASR EQU \PRTASR SPLASR EQU 0 ENDéééééé© **ˆEXTERNALDEFINITIONS*‰XDEF†OSMTBL,OSMEND‰XDEF†PRTASQ,FMSASQ,FMSDLEN**ˆEXTERNALREFERENCED*!‰XREF†FHSASR,IOSASR,PRTASR,FMSASR*-*ˆTABLEOFOPERATINGSYSTEMMODULETASKNAMES*‰NOLIST‰INCLUDEƒ9995.&.IOE.EQ‰INCLUDEƒ9995.&.TR1.EQ‰INCLUDEƒ9995.&.EXE.EQ‰INCLUDEƒ9995.&.NIO.EQ‰INCLUDEƒ9995.&.LV5.EQ‰INCLUDEƒ9995.&.FME.EQ‰INCLUDEƒ9995.&.FMI.EQ‰LIST ‰SECTION1*OSMTBLƒDC.L…FHSIDŽFHSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+FHSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+FHSNLN‡QUEUELENGTH‰DC.L„FHSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…IOSIDŽIOSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+IOSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+IOSNLN‡QUEUELENGTH‰DC.L„IOSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED**$‰DC.L…PRTIDŽPRINTERDRIVERTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS ‰DC.B„EVTLNGŽMAX.MESSAGELENGTHPRTASQƒDC.L„0“QUEUELENGTH‰DC.L„PRTASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…FMSIDŽFMSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRD‚ASQSTATUS'‰DC.B„EVTLEN+FHSNLN‡MAX.MESSAGELENGTHFMSASQƒDC.L„0QUEUELENGTH‰DC.L„FMSASRŽADDR.OFASR‰DC.W„0**‰DC.W„SGOPPAŽOPTIONS-LOG.ADDR=PHYS.ADDR.‰DC.W„SGATRW+SGATSS‡ATTRIBUTES‰DC.L„FMSDSEG.NAME‰DC.L„0LOGICALADDRESSFMSDLEN‚DC.L„0SEGMENTLEN GTH*OSMENDƒEQU…*“ENDOFTABLE‰ENDé²J=LINK ,IOI,\LINKLS;HAMIXSSEGMENT IOSG:0 \IOCSTRSEGMENT .IOI:1INPUT VM01.IOC.ROINPUT VM01.IOI.ROINPUT VM01.OSLIST.RO INPUT IXRINPUT VM01.ASR.ROEND=ENDééééééé» ‚******************‚*VM01.SYSCMD.CD*M‚****************************************************************************‚*SYSGENCOMMANDFILE-´*?‚*ƒUSEINCONJUNCTIONWITHSYSGEN.CFOREXECUTEDIRECTLYWITH*‚*†THEFOLLOWINGARGUMENTS:¬*‚*Ê*@‚*†ARG1-LISTINGFILEORDEVICEFORASSEMBLIESANDLINKEDITS‰*‚*Ê*-‚*†ARG2-SWITCH--0=ARG1ISAFILENAMEœ*‚*—1=ARG1ISADEVICENAMEš*‚*Ê*8‚*†ARG3-CONFIGURATIONSWITCH--1=SINGLE-USERHARD‘*‚*Ê*@‚*†ARG4-WORKINGFILEFORUSEWITHCOPY;ATOPRODUCELISTING‰*‚*Ê*M‚**************************************************************************** ‚MSG‰SYSGENCOMMANDFILE +‚MSG‰SETSYSGENPARAMETERSFROMPASSEDARGS *‚ASMLSW„=\2‹*ASSEMBLYLISTINGFILESWITCH‚*”0=ASMLSISAFILE‚*”1=ASMLSISADEVICE'‚LINKLSWƒ=\2‹*LINKLISTINGFILESWITCH‚*”0=LINKLSISAFILE‚*”1=LINKLSISADEVICE  ‚IFEQˆ\ASMLSW$…ASMLS…="\4"‰*ASMLISTINGWORKFILE‚ENDC ‚IFNEˆ\ASMLSW!…ASMLS…="\1"‰*ASMLISTINGDEVIC E‚ENDC ‚IFEQˆ\LINKLSW&…LINKLS„="\4"‰*LINKLISTINGWORKFILE‚ENDC‚IFNEˆ\LINKLSW#…LINKLS„="\1"‰*LINKLISTINGDEVICE‚ENDC +‚WORKLS„="\1"‰*OVERALLLISTINGFILE/DEVICE C‚MSG‰**************************************************************C‚MSG‰**************************************************************?‚MSG‰**„Systemgeneration(SYSGEN)commandfileforusersof‚**<‚MSG‰**„VERSAdosontheVM01computer.‚Prepared10/11/82.„**C‚MSG‰**************************************************************C‚MSG‰**************************************************************‚MSG‰C‚MSG‰**************************************************************(‚MSG‰**ˆParametersdescribingdevices•**C‚MSG‰**************************************************************(‚*˜Total#ofterminals(localandMCCM)7‚TOTTERMƒ=\NOLTERM+\NOTERM0+\NOTERM1+\NOTERM2+\NOTERM3(‚*˜Total#ofprinters(localandMCCM).1‚TOTPRT„=\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2+\NOPRT3‚*˜Totalnumberofdisks-Ä=Í7Õ2Ý2å;í2õ*ý2- SWY%!+‚*˜floppydrivesandharddiskdrives.‚Each(‚*˜volumedefinedrequiresapproximately‚*˜2-1/4Kbytesofmemory.7‚TOTDSK„=\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1&‚NOIPCS„=1Œ#ofdiskIPC'sandUDC's.‚NOMCCMSƒ=0Œ#ofMCCM's.‚*"‚NOLTERMƒ=2Œ#oflocalterminals. ‚NOLPRT„=1Œ#oflocalprinters.‚*-‚HDUDC0„=0Œ#ofhardƒdiskdriveson1stUDC.-‚HDUDC1„=0Œ#ofhardƒdiskdriveson2ndUDC./‚FDUDC0„=0Œ#offloppydiskdriveson1stUDC./‚FDUDC1„=0Œ#offloppydiskdriveson2ndUDC.‚*:‚NOFD0…=2Œ#offloppydiskdriveson1stfloppydiskIPC.:‚NOFD1…=0Œ#offloppydiskdriveson2ndfloppydiskIPC.‚*(‚NOTERM0ƒ=0Œ#ofterminalson1stMCCM.&‚NOPRT0„=0Œ#ofprinters‚on1stMCCM.(‚NOTERM1ƒ=0Œ#ofterminalson2ndMCCM.&‚NOPRT1„=0Œ#ofprinters‚on2ndMCCM.(‚NOTERM2ƒ=0Œ#ofterminalson3rdMCCM.&‚NOPRT2„=0Œ#ofprinters‚on3rdMCCM.(‚NOTERM3ƒ=0Œ#ofterminalson4thMCCM.&‚NOPRT3„=0Œ#ofprinters‚on4thMCCM.‚*‚*‚MSG‰C‚MSG‰**************************************************************-‚MSG‰**ˆParametersabouttablesizes,etc.**C‚MSG‰**************************************************************2‚PAGESIZE‚=256ŠSizeinbytesofapageofmemory.*‚ASN‡=0Œ#ofaddressspaces--notused‚but'‚*œneededtosatisfyM68XXX.INITDAT.AG.‚*4‚DCQPGE„=2ŒNumberofpagesofmemoryforthedevice-‚*˜connectionqueue(DCQ).‚Minimumof1page,*‚*˜maximumof10pages.‚TheDCQisusedto/‚*˜saveconcurrentrequeststothesamefileor.‚*˜device.‚EachpageoftheDCQcanaccomodate‚*˜approximately9entries.‚*1‚GST‡=1ŒNumberofpagesinglobalsegmenttable.-‚*˜Minumumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately14entries.‚*5‚UST‡=2ŒNumberofpagesintheusersemaphoretable.-‚*˜Minimumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately11entries.‚*6‚TRACE…=0Œ*No.ofpagesintracetable.‚TRACEmustbe/‚*˜nonzeroifTRCFLAGisnonzero.‚Eachpagecan'‚*˜accomodateapproximately10entries.‚*2‚UDR‡=1ŒNumberofpagesinuser-defineddirective0‚*˜table,minimumof0,maximumof10.‚Eachpage'‚*˜accomodateapproximately25entries.‚*6‚IOV‡=1Œ#ofpagesinI/Ovectortable.‚Eachpagecan'‚*˜accomodateapproximately12entries.‚*@‚PAT‡=(\NOLOGONS*32*2+16+(\PAGESIZE-1))/\PAGESIZE#ofpagesin0‚*˜periodicactivationtable.‚Eachpagecanhold.‚*˜approximately8entries.‚PATsizeis\PAT.‚*<‚NOTASKSƒ=10‹Maximumnumberoftasksinsystematonetime.-‚*˜VERSAdoscontainsamaximumof11resident)‚*˜tasks.‚Allowingforthatplusfourfor/‚*˜eachterminalwillaccomodatemostrequests.‚*<‚MAXLU…=12‹Maximumlogicalunitnumberthatcanbeassigned/‚*˜foreachtaskinthesystem.‚Limitis31and.‚*˜minumumis8.‚MAXLUmust begreaterthanor2‚*˜equaltoTOTDSK.‚MAXLUandNOTASKdeterminethe1‚*˜amountofmemoryrequiredforthelogicalunit1‚*˜table(LUT).‚Thealgorithmfordeterminingthe!‚*˜sizeoftheLUTisasfollows:'‚*˜LUT=16*NOTASKS+8*NOTASKS*(MAXLU+1),‚*˜Theremustbea1LUforeachdiskvolume,‚*˜(FMSassignsadifferentlogicalunitfor,‚*˜eachdisk.)‚ThismeansthatMAXLUmustbe#‚*˜greaterthanorequaltoTOTDSK.‚*‚IFGTˆ\TOTDSK-\MAXLU!…MSG‰SYSGENparametersizeerror.3…MSG‰MAXLUmustbegreaterthanorequaltoTOTDSK.:…MSG‰Inthissysgen,MAXLU=\MAXLUandTOTDSK=\TOTDSK.5…MSG‰Pleaseadjustparametersandstartsysgenagain.…ABORT‡‚ENDC;‚NOFILESƒ=12‹Maximumnumberoffilesthatcanbeopenedin(‚*˜thesystematonetime.‚Limitof200.‚*9‚NODIFFIL‚=12‹MaximumnumberDIFFERENTfilesthatcanbe-‚*˜openedatonetime.‚Cannotbegreaterthan,‚*˜NOFILES.‚Foreverythreedifferentfiles,,‚*˜approximately1Kofmemoryisrequired.‚A&‚*˜rationof5filesforeachterminal‚*˜accomodatesmostrequests.‚*;‚NODEFVOL‚=8ŒMaximumnumberofdefaultvolumesthatcanbe-‚*˜defined.‚CannotbegreaterthanNOTASKS+3.‚*9‚DEFFAB„=1ŒDefaultFileAllocationBlock(FAB)lengthin/‚*˜sectors(256bytespersector).‚Usedbyfile-‚*˜handlerwhennoFABsizeisgiven.‚Minimum!‚*˜sizeis1,maximumsizeis20.‚*;‚DEFDAT„=4ŒDefaultdatablocklengthinsectors(256bytes1‚*˜persector).‚Usedbyfilehandlerwhennodata/‚*˜blocksizeisgivenatfileallocationtime.*‚*˜Minumumsizeis4,maximumsizeis255.‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**ˆEETEQUvalues¥**C‚MSG‰**************************************************************>‚DEFAULTƒ="SYS:0.&"„*Systemdefaultvolume:usernumber.catalog<‚TERMOCNT‚=2Œ*No.ofterminaloutputtimeoutsbeforelogoff7‚SECURITY‚=1ŒSwitchtoindicateifsecuritypackageis-‚*˜supported.‚Valueofzeroexcludespackage,-‚*˜nonzeroincludesit.‚Thispackagerequires‚*˜approximately1Kofmemory.‚*<‚SPCCMD„=1ŒSwitchtoindicateifthefollowingusersession0‚*˜managementcommandsaresupported:‚HELP,CLOSE0‚*˜ASSIGN,NEWS.‚Valueofzeroexcludescommands./‚*˜Thispackagerequiresapproximately1/2Kof ‚*˜memory.‚*>‚CHAINBAT‚=1ŒSwitchtoindicateifchainandbatchprocessing2‚*˜aresupported.‚Valueofzeroexcludesbatchand.‚*˜chain;non-zeroincludesthem.‚Thispackage+‚*˜requiresapproximately3-1/2Kofmemory.‚*9‚CONBATCH‚=1ŒNumberofconcurrentbatchjobsthatcanbe(‚*˜running.‚CannotbemorethanNOTASKS.‚*<‚BATCHPGE‚=2ŒNo.ofpagesforbatchjobqueueing.‚Eachpage0‚*˜accomodates32entries.‚Inaddition,thereis+‚*˜spacefor31entriesminusthenumberof‚*˜terminalsinthesystem.‚*=‚BATDLY„=16000ˆ*delayinmsinbatchbetweenreloadattempts‚*=‚NOLOGONƒ=3ŒMaxmimumnumberofinvalidlogonattemptsbefore‚*˜beingrejected.B‚NOLOGONS‚=\TOTTERM…#ofterminalsallowedtologoninthesystem,‚LOGMSG1ƒ="VERSAdosV"Logonmessagepart1)‚LOGMSG2ƒ="ERSION"„Logonmessagepart2(‚REVNUMBR‚="4.3"†Logonmessagepart3‚*2‚*˜REVNUMBRisuseddynamicallyinCMDLISTaspart*‚*¡ofthelogonmessage.Ifthisvalueis'‚*¡changedthen'REVISION'inthisfile)‚*¡shouldbechangedtomatchthedynamic(‚*¡value.Theformatis'xx.xx'asshown‚*=‚EETHEREƒ=1Œ0=Donotincludemodule‚EET1=Includemodule=‚FHSHEREƒ=1Œ0=Donotincludemodule‚FHS1=Includemodule=‚FMSHEREƒ=1Œ0=Donotincludemodule‚FMS1=Includemodule=‚IOSHEREƒ=1Œ0=Donotincludemodule‚IOS1=Includemodule=‚LDRHEREƒ=1Œ0=Donotincludemodule‚LDR1=Includemodule‚*‚*‚*B‚AUTOTERM‚='CN00'‡TerminalIDofdeviceautologonistooccuron‚AUTOLOGN‚=1ŒBit0:‚*›0-->Autobreakinactive‚*›1-->Autobreakactive ‚*˜Bit1:‚*›0-->Autologoninactive‚*›1-->Autologonactive‚*‚*‚MSG‰C‚MSG‰************************************************************** ‚MSG‰**‰Vectornumbers£**C‚MSG‰**************************************************************2‚SERPTS„=140ŠSerialport(2661)interruptvector.7‚KILVECTƒ=142ŠVectornumberwhichforcessystemcrash.‚*‚MSG‰C‚MSG‰**************************************************************#‚MSG‰**ˆAddressesoftimer,etc.š**C‚MSG‰***************************************************************‚MMU‡=$0‹AddressofMMU(noneonaVM02)."‚TIMER…=$F70000†Addressoftimer.6‚CLOCKFRQ‚=0800‰Numberofclocktickspermillisecond#‚PANEL…=$0‹Addressoffrontpanel.@‚BUGTRACƒ=$F000BC†Addressoffirmwaredebugger'straceroutine.6‚TRCFLAGƒ=0ŒTraceflag.‚Zeroimpliesdon'ttrace.‚The0‚*˜settingofbitsintheTRCFLAGparameterwill2‚*˜controlwhicheventscauseanentrytobebuilt‚*˜inthetracetable.‚*˜Bit#inTRCFLAG†Event ‚*›15‘TRAP#1‚*›14‘I/Ointerruptnotclaimed‚*°byusertask.‚*›13‘Timerinterrupt.‚*›12‘Usertrap(2-15)‚*›11‘Exception‚*›10‘Dispatch‚*œ9‘I/Ointerruptclaimedby ‚*°usertask‚*œ8‘ReturnfromLOADMMU‚*œ7‘Simulatedinterrupt‚*œ6‘SYSFAILinterrupt.‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**1‚MSG‰**ƒLOCALTERMINAL/PRINTERDEVICEADDRESES‚** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰%‚LTDA$00ƒ=$F70011†VM01SERIALportA%‚LTDA$01ƒ=$F70019†VM01SERIALportB'‚LPDA$00ƒ=$F70020†VM01PARALLELPORT1'‚LPDA$01ƒ=$F70022†VM01PARALLELPORT2‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒSYSGENPARAMETERSFORTERMINALŠ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(TCP=TERMINALCONFIG.PARAMETERS)…** ‚MSG‰**«**0‚MSG‰**ƒ(tomodifyparametersseeNOTEbelow)ƒ** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*2‚TCP$RECƒ=80‹Widthofterminal(characters/line).-‚TCP$RSZƒ=24‹Depthofterminal(lines/page).C‚TCP$WTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.C‚TCP$RTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outaread.>‚TCP$XOFƒ=$17ŠXOFFchar;whenreceived,suspendstransmission ‚*˜(0=none).?‚TCP$XONƒ=0ŒXONchar;whenreceived,cancelsapriorXOFFchar‚*˜(0=anychar).@‚TCP$BRCƒ=$03ŠChartobeinterpretedlikeabreakwhenreceived ‚*˜(0=none).<‚TCP$DOPƒ=$0FŠCharwhichcausesoutputtobediscardedwhen‚*˜received(0=none).:‚TCP$RLNƒ=$13ŠCharwhichcauseslinetobereprintedwhen‚*˜received(0=none).A‚TCP$CLCƒ=$18ŠCharwhichcauseslinetobedeletedwhenreceived ‚*˜(0=none)./‚TCP$RTVƒ=$0DDE0000„Readterminators(CR,$DE).0‚TCP$EOLƒ=$0D0A0000„Endoflinestring(CR,LF).<‚TCP$BRTƒ=$0EŠBaudratecode($0E=9600baud).‚Thefollowing1‚*˜codesmaybeusedtoindicatethedesiredbaud‚*˜rate:*‚*˜Code‚RateƒCodeRateƒCodeRateƒCodeRate#‚*˜$00ƒ50…$05‚300„$09‚2000ƒ$0E‚9600$‚*˜$01ƒ75…$06‚600„$0A‚2400ƒ$0F‚19200$‚*˜$02ƒ110„$07‚1200ƒ$0C‚4800ƒ$10-$FF'‚*˜$03ƒ134.5‚$08‚1800ƒ$0D‚7200ƒReserved?‚TCP$NLSƒ=0Œ#ofASCIINULchar'stosendaftereachCRorLF.+‚TCP$TRCƒ=$00ŠTerminatorclass($0X=none)..‚TCP$TTPƒ=$00ŠTerminaltype(0=EXORterm155).J‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.>‚TCP$HCPY‚=0Œ1meanstheterminalisahardcopydevice,nota‚*˜CRT.8‚TCP$XCTL‚=0Œ1meansuseXON/XOFFtocontrolterminal's‚*˜transmission,notCTS.@‚TCP$BITS‚=0Œ1meanstransmit&receive7bits/charratherthan‚*˜8.<‚TCP$STPB‚=0Œ1meansfolloweachcharsentwith2stopbits‚*˜ratherthan1.=‚TCP$USEP‚=0Œ1meansparityshouldbecheckedandgenerated.<‚TCP$PRTY‚=0Œ1meansparity(ifused)shouldbeevenrather ‚*˜thanodd.<‚TCP$ECHO‚=0Œ1meansthedrivershouldnotechocharacters.@‚TCP$TAHD‚=0Œ1meansthetype-aheadfeatureshouldnotbeused.6‚*˜ThisfeaturenotsupportedonEXORmacstermdrivers9‚TCP$TFUL‚=1Œ1meansfillingthebufferonareadshould‚*˜terminatetheread.>‚TCP$PNUL‚=0Œ1meansNULchar'sshouldbe considereddatafor‚*˜imagereads.7‚TCP$MODM‚=0Œ1meanstheportisconnectedtoamodem.9‚TCP$OFFH‚=0Œ1meanstheport,ifconnectedtomodem,is ‚*˜offhook.‚*L‚***************************************************************************'‚*†NOTEonhowtomodifyasingleport:‚*<‚*†Firstduplicatealltheparametersthataretochangefor<‚*†thisparticularport(e.g.TCP$BRT).‚Modifytheduplicate=‚*†labelssothattheybecomeunique.‚Onetechniqueistoput9‚*†theportnumberattheendofthelabel(e.g.forCN12;‚*†TCP$BRTbecomesTCP$BRT2andTCP$BITSbecomesTCP$BIT2).8‚*†Rememberthatthelabelmustnotexceed8characters!;‚*†Changetheparametertothedesiredvalue(e.g.toseta5‚*†300baudrateforanon-EXORtermterminalonCN12,$‚*†TCP$BRT2=$05andTCP$TTP2=1).‚*4‚*†Nowsubstitutethesenewparametersintothefile:‚*†EXORMACS.IOC.AGfortheCRTDCBmacrodefiningtheport.+‚*†Tocontinuethebaudrateexampleabove:?‚*ˆTCP$ATWSET\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3=‚*ˆTCP$ATWSETTCP$ATW+\TCP$USEP<<4+\TCP$PRTY<<5+\TCP$ECHO<<6=‚*ˆTCP$ATWSETTCP$ATW+\TCP$TAHD<<7+\TCP$TFUL<<8+\TCP$PNUL<<9$‚*ˆTCP$ATWSETTCP$ATW+\TCP$MODM<<10=‚*‰CRTDCB'CN12',IOSID,IOSESS,$133,31,1,'COM1',2,$047C,$5803,‚*©~~:‚*ˆ&ƒTCP$ATW,\TCP$REC,\TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,;‚*ˆ&ƒ\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,\TCP$CLC,\TCP$RTV,2‚*ˆ&„TCP$EQL,TCP$BRT2,\TCP$NLS,\TCP$TRC,TCP$TTP2‚*•~~~~~~~~~“~~~~~~~~~4‚*†where~~~~~~underlinestheCRTDCBmodifications.‚*>‚*†Thissametechniquemaybeusedwiththeprinterparameters<‚*†bymodifyingthePCP$xxxlabelsandsubstitutingintothe=‚*†PRTDCBmacro.‚Itmayalsobeusedwiththediskparameters=‚*†bymodifyingtheDCP$xxxxlabelsandsubstitutingintothe‚*†DSKDCBmacro.‚*L‚***************************************************************************‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**(‚MSG‰**ƒSYSGENPARAMETERSFORPRINTER‹**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**-‚MSG‰**ƒ(PCP=PRINTER‚CONFIG.PARAMETERS)…** ‚MSG‰**«**0‚MSG‰**ƒ(tomodifyparametersseeNOTEabove)ƒ** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*A‚PCP$RECƒ=132ŠWidthofprinter‚(characters/physicalprintline).,‚PCP$RSZƒ=66‹Depthofprinter‚(lines/page).B‚PCP$WTOƒ=120000‡(2minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.6‚PCP$LRLƒ=132ŠLogicallinelength<=widthofprinter<‚PCP$EOLƒ=$0A0D0000„Endoflinestring(LF,CR).(MCCMonly)'‚PCP$ELCƒ=$0DŠEndoflinecharacterCRJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.9‚PCP$LNFD‚=0Œ1meanstheprintersupportsautolinefeed5‚PCP$AFFƒ=0Œ1meanssupressauto-formfeedonassign>‚PCP$TLRL‚=0Œ0meanswrap-aroundprintiflogicallinelength3‚*˜exceeded.‚1meanstruncateprintatlogicalline ‚*˜length.0‚*š1meanstruncateprintatlogicallinelength‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**%‚MSG‰**ƒSYSGENPARAMETERSFORDISKŽ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…***‚MSG‰**ƒ(DCP=DISKCONFIG.PARAMETERS)‰** ‚MSG‰**«**0‚MSG‰**ƒ(tomodifyparametersseeNOTEabove)ƒ** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*‚DCP$WTOƒ=0ŒWriteTimeout‚DCP$RTOƒ=0ŒRead‚Timeout8‚DCP$HBPS‚=256ŠNumberofbytespersectorforhardƒdisk:‚DCP$FBPS‚=256ŠNumberofbytespersectorforfloppydisk:‚DCP$HSPT‚=064ŠNumberofsector'spertrackforhardƒdisk<‚DCP$FSPT‚=013ŠNumberofsector'spertrackforfloppydisk,‚DCP$HTNS‚=0ŒHardƒ-totalnumberofsectors.‚DCP$FTNS‚=0ŒFloppy-totalnumberofsectors$‚DCP$HNOH‚=0ŒHardƒ-numberofheads&‚DCP$FNOH‚=0ŒFloppy-numberofheads%‚DCP$HNOT‚=0ŒHardƒ-numberoftracks'‚DCP$FNOT‚=0ŒFloppy-numberoftracks&‚DCP$HILF‚=0ŒHardƒ-interleavefactor(‚DCP$FILF‚=0ŒFloppy-interleavefactor"‚DCP$HSPL‚=0ŒHardƒ-spiraloffset$‚DCP$FSPL‚=0ŒFloppy -spiraloffsetJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.?‚DCP$NONE‚=0ŒAsofthiswritingnodeviceattributeshavebeen ‚*˜defined.‚*‚MSG‰A‚MSG‰************************************************************7‚MSG‰**…Descriptiveinfoaboutthisoperatingsystem‡**A‚MSG‰************************************************************5‚SYSNAMEƒ="VERSAdos"ƒNameforthisoperatingsystem.:‚REVISION‚="REV04.30"‚Revisionofthisoperatingsystem.7‚TIMSLICƒ=2ŒNumberoftimerinterruptspertimeslice.>‚TIMINTVƒ=10‹Numberofmillisecondsbetweentimerinterrupts.A‚MEMEND1ƒ=$E0000‡Thisvaluedefinestheendingaddressofsystem-‚*šmemory.Theusershouldputavaluelarger4‚*šthanactualmemorytoallowforfutureexpansion.3‚MEMEND2ƒ=$0‹RequiredforcompatabilityinINDV.AG3‚MEMEND3ƒ=$0‹RequiredforcompatabilityinINDV.AG‚*˜terminalsinthesystem.@‚WHERLOAD‚=$10200‡Memoryaddresswherebootfilewillbeloaded2‚*˜NonzeroonVM01only.‚Ifnonzero,VERSAdoswill#‚*˜bemovedatinitializationtime..‚*WHERLOAD‚=$10200‡For64Kbyteon-boardram*‚*WHERLOAD‚=$0‹For32Kbyteon-boardram‚MSG‰A‚MSG‰************************************************************;‚MSG‰**VALPAR--Validateparameterstokeepyouhonest‡**A‚MSG‰************************************************************‚SUBSˆVM01.VALPAR.AG‚ASM‰VM01.VALPAR.AG,,\ASMLS;R-C ‚*’VALPARFOF ‚IFGTˆ\$RDD…PAUSE‡Abortsysgeniferrorsinassembly-elsehitcarriagereturn‚ENDC ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚MSG‰B‚MSG‰*************************************************************#‚MSG‰**…Generateexecprocess--œ**B‚MSG‰************************************************************* ‚*’EXECFOFB‚MSG‰*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*‚MSG‰*„PROCESSVM01.RMS.LO¤*B‚MSG‰*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*‚IFNEˆ\WHERLOAD …PCˆ=$E00 …STACK…=$C00…STARTRMS‚=$F00‚ENDC‚IFEQˆ\WHERLOAD …PCˆ=$10E00…STACK…=$10C00…STARTRMS‚=$10F00‚ENDC‚PROCESS…VM01.RMS.LO ‚END‰EXEC‚IFEQˆ\LINKLSW…=COPY‡VM01.RMS.LL,\WORKLS;A‚ENDC‚MSG‰B‚MSG‰*************************************************************‚MSG‰**ˆPhysicalIPCdriverž**B‚MSG‰************************************************************* ‚IPCDRVRƒ=*‚IFEQˆ\TOTDSK+\NOMCCMS‚ENDC‚IFNEˆ\TOTDSK+\NOMCCMS…SUBSˆIPCDRV.LG…LINKˆIPCDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …PROCESS…IPCD …*’IPCDFOF …END‰IPCD‚ENDC‚IFEQˆ\NOLTERM‚ENDC  ‚MSG‰B‚MSG‰*************************************************************'‚MSG‰**EPCIDRV2661terminaldriverœ**B‚MSG‰*************************************************************‚MSG‰ ‚EPCIDRVR‚=*‚IFEQˆ\TOTTERM5…MSG‰~~~~~~~~~TERMINALDRIVERNOTREQUIRED~~~~~~~~~‚ENDC‚IFNEˆ\TOTTERM…SUBSˆEPCIDRV.LG…LINKˆEPCIDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…PROCESS…EPCID.LO …END‰EPCID.LO‚ENDC  ‚IFEQˆ\NOLTERM‚ENDC‚MSG‰B‚MSG‰*************************************************************0‚MSG‰**STARTOFPHYSICALINTERPRETIVEDRIVER“**B‚MSG‰*************************************************************‚MSG‰ ‚CHIDRVRƒ=*‚IFNEˆ\NOLTERM …SUBSˆCHPI.LG …LINKˆCHPI.LG …PROCESS…CHID …*’CHIDFOF …END‰CHID…IFEQˆ\LINKLSWˆ=COPY‡\ASMLS,\WORKLS;A…ENDC‚ENDC%‚MEMBEG„=*ŒStartofavailablememory‚MSG‰B‚MSG‰*************************************************************<‚MSG‰**IFWEHAVELOCALPRINTERS,ADDTHEDRIVER-VMPRT‡**B‚MSG‰*************************************************************‚MSG‰‚PRTSTR„=*ŒPRTLOADADDRESS!‚PRTASR„=*+2ŠPRTASRENTRYPOINT ‚IFEQˆ\NOLPRT‚ENDC ‚IFNEˆ\NOLPRT…TASKˆVMPRT,.PRT…STATE…='DORM'…PRIORITY‚=$D8 …SESSIONƒ=1…SUBSˆVM01.PRT.LG,PRTB.AG…ASM‰PRTB.AG,PRTB,\ASMLS …IFEQˆ\ASMLSWˆ=COPY‡\ASMLS,\WORKLS;A…ENDC…LINKˆVM01.PRT.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …*’VMPRTFOF…END  ‰PRT‚ENDC‚MSG‰ ‚*’IXRFOF ‚SUBSˆIXR.AG‚ASM‰IXR.AG,IXR,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚MSG‰@‚MSG‰***********************************************************=‚MSG‰**‚IOS--Input/OutputServices(trap#2servertask)ƒ**@‚MSG‰***********************************************************‚IOSSTR„=*ŒIOSloadaddr.!‚IOSASR„=*+2ŠIOSASRentrypoint‚IFNEˆ\IOSHERE…TASKˆIOS,.IOS…STATE…='DORM'…PRIORITY‚=$D1 …SESSIONƒ=1 …*’IOSFOF …SUBSˆIOS.LG …LINKˆIOS.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…END‰IOS‚ENDC‚MSG‰B‚MSG‰*************************************************************>‚MSG‰**ƒFHS--FileHandlingServices(trap#3servertask)ƒ**B‚MSG‰*************************************************************‚FHSSTR„=*ŒFHS‚loadaddr.!‚FHSASR„=*+2ŠFHSASRentrypoint‚IFNEˆ\FHSHERE…TASKˆFHS,.FHS…STATE…='DORM' …SESSIONƒ=1…PRIORITY‚=$D1 …*’FHSFOF …SUBSˆFHS.LG …LINKˆFHS.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…END‰FHS‚ENDC‚MSG‰B‚MSG‰*************************************************************(‚MSG‰**ˆFMS--FileManagementSystem”**B‚MSG‰*************************************************************‚FMSSTR„=*ŒFMSloadaddr.!‚FMSASR„=*+2ŠFMSASRentrypoint‚IFNEˆ\FMSHERE…TASKˆFMS,.FMS…STATE…='DORM'…PRIORITY‚=$D0 …*’FMSFOF …SUBSˆFMS.LG …LINKˆFMS.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…END‰FMS‚ENDC‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆEET--EntryExitTask›**B‚MSG‰*************************************************************‚EETSTR„=*ŒEETloadaddr.‚IFNEˆ\EETHERE…TASKˆEET,&EET…STATE…='READ' …SESSIONƒ=2…PRIORITY‚=$C8 …*’EETFOF1%…SUBSˆEET.LG,9995.&.EET.EQ,CMDLIST.AG'…ASM‰EET.EQ/CMDLIST.AG,CMDLIST,\ASMLS;R …IFEQˆ\ASMLSWˆ=COPY‡\ASMLS,\WORKLS;A…ENDC …LINKˆEET.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…END‰EET‚ENDC‚MSG‰B‚MSG‰*************************************************************.‚MSG‰**ˆLDR--Loader(trap#4servertask)Ž**B‚MSG‰*************************************************************‚LDRSTR„=*ŒLDRloadaddr.‚IFNEˆ\LDRHERE…TASKˆLDR,&LDR…STATE…='READ'…PRIORITY‚=$C8 …SESSIONƒ=4…SUBSˆNOMMU.LOADER.LG…LINKˆNOMMU.LOADER.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …*’LDRFOF…END‰LDR‚ENDC‚MSG‰@‚MSG‰***********************************************************‚MSG‰**ˆIOCOM&IOI¤**@‚MSG‰***********************************************************‚TASKˆIOI,.IOI‚STATE…='READ' ‚SESSIONƒ=1‚PRIORITY‚=$DA ‚IOCSTR„=*‚SUBSˆVM01.IOC.AG1‚ASM‰IODM.AG/VM01.IOC.AG,VM01.IOC.RO,\ASMLS;RZ=95 ‚*’IOIFOF1 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVM01.ASR.AG#‚ASM‰VM01.ASR.AG,VM01.ASR.RO,\ASMLS ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC/‚ASM‰VM01.OSLIST.AG,VM01.OSLIST.RO,\ASMLS;Z=105 ‚*’IOIFOF2 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVM01.IOI.LG‚LINKˆVM01.IOI.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚*’IOIFOF3‚END‰IOI‚MSG‰@‚MSG‰***********************************************************%‚MSG‰**ˆINIT--SystemInitializer•**@‚MSG‰*********************************************************** ‚PROCESS…INIT ‚INTSTR„=*2‚SUBSˆM68XXX.INITDAT.AG,VM01.INITIO.AG,VM01.INT.LG1‚ASM‰M68XXX.INITDAT.AG,M68XXX.INITDAT.RO,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC+‚ASM‰VM01.INITIO.AG,VM01.INITIO.RO,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚LINKˆVM01.INT.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚*’INITFOF ‚END‰INIT@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚MSG‰*¹*)‚MSG‰*‹MAKESUBSTITUTIONSINVERSAPT.CFŽ*‚MSG‰*¹*@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚SUBSˆVM01.VERSAPT.CF‚MSG‰@‚MSG‰***************************  ********************************@‚MSG‰***********************************************************5‚MSG‰**‡"SYSGENCOMPLETIONPROCESSINGINPROGRESS"†**‚MSG‰**“Haveaniceday.”**@‚MSG‰***********************************************************@‚MSG‰*********************************************************** ‚END‰SYSGENééé=OPT -N=/**********************=/*VM01.SYSGEN.CF…*=/**********************=OPT K,NM=/***************************************************************************"=/*Chainfiletoperformsysgen¬*=/*É*=/*Callingsequence:·*=/*É*)=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5£*=/*É*7=/*„Notalloftheargumentsneedtobeenteredsince”*$=/*†theyeachhaveadefaultvalue¥*=/*É*6=/*„arg1-commandfilename(defaultstoSYSCMD.CD)•*=/*É*,=/*„arg2-Tempvolanduserno./BootfileŸ*9=/*Temp.vol.anduserno.defaultstovolumenameand‰*)=/*usernumberofcommandfile(arg1).—**=/*Bootfiledefaultsto'VERSADOS.SY'.˜*=/*É*=/*É*9=/*„arg3-Listdeviceorfilenameforsysgenmessages’*=/*(defaultstoSYSLIST.LS)¤*;=/*‹Iffilename-sysgenuses'.LS'asdefaultextension‰*=/*É*9=/*‡NOTE:Thefirstthreeargumentsarethesameasthe*4=/*threecommandlinefieldsusedininvokingtheŽ*=/*sysgenutilitydirectly.¤*=/*É*E=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')†*=/*É*5=/*„arg5-Listingdeviceorfile(Defaultsto#PR)–*A=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.*:=/*Allassemblylistingsandlinkmapswillbedirectedˆ*<=/*Tothespecifieddeviceorfileusingthecopyutility†*>=/*withappendoption.‚SYSGEN.TFisusedasanintermediateƒ*7=/*filetocontaintheassemblyorlinklistoutput.‹*@=/*Duetorestrictionsinsysgenliteralsubstitutionprocess‚*8=/*thisfieldcannotcontainmorethan10characters.Š*M=/***************************************************************************=/*5=/* Insure that no more than 5 arguments are defined:=/*=/RX=\0 =/IF RX>5ƒ=OPT-N<ƒ=/*Error-chainfilestartedwithmorethan5arguments-5ƒ=/*ƒPleaserestart,theargumentdefinitionsfollow:ƒ=/*(ƒ=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5ƒ=/*6ƒ=/*„Notalloftheargumentsneedtobeenteredsince$ƒ=/*†theyeachhaveadefaultvalue.ƒ=/*-86F>OF5ƒ=/*„arg1-commandfilename(defaultstoSYSCMD.CD)ƒ=/*+ƒ=/*„arg2-Tempvolanduserno./Bootfile8ƒ=/*Temp.vol.anduserno.defaultstovolumenameand(ƒ=/*usernumberofcommandfile(arg1).)ƒ=/*Bootfiledefaultsto'VERSADOS.SY'.ƒ=/*Gƒ=/&**Typecarriagereturnormoreinformation,'break'toterminate.ƒ=/*8ƒ=/*„arg3-Listdeviceorfilenameforsysgenmessagesƒ=/*(defaultstoSYSLIST.LS):ƒ=/*‹Iffilename-sysgenuses'.LS'asdefaultextensionƒ=/*8ƒ=/*‡NOTE:Thef  irstthreeargumentsarethesameasthe3ƒ=/*threecommandlinefieldsusedininvokingtheƒ=/*sysgenutilitydirectly.ƒ=/*Dƒ=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')ƒ=/*4ƒ=/*„arg5-Listingdeviceorfile(Defaultsto#PR)Aƒ=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.9ƒ=/*Allassemblylistingsandlinkmapswillbedirected;ƒ=/*Tothespecifieddeviceorfileusingthecopyutility=ƒ=/*withappendoption.‚SYSGEN.TFisusedasanintermediate6ƒ=/*filetocontaintheassemblyorlinklistoutput.?ƒ=/*Duetorestrictionsinsysgenliteralsubstitutionprocess7ƒ=/*thisfieldcannotcontainmorethan10characters.ƒ=/*ƒ=END=/ENDIF=/*2=/* Force the definition of 5 exactly 5 arguments.=/* =/IF RX=0+ƒ=ARGSYSCMD.CD,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=1$ƒ=ARG\1,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=2&ƒ=ARG\1,\2,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=3ƒ=ARG\1,\2,\3,SINGLE-HARD,#PR=/ENDIF =/IF RX=4ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*8=/* We have 5 arguments - now default any null arguments=/*=/IFC \1ƒ=ARGSYSCMD.CD,\2,\3,\4,\5=/ENDIF=/*=/IFC \3ƒ=ARG\1,\2,SYSLIST.LS,\4,\5=/ENDIF=/*=/IFC \4ƒ=ARG\1,\2,\3,SINGLE-HARD,\5=/ENDIF=/*=/IFC \5ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*N=/* If arg5 is not #PR,#PR1,#PR2,#PR3,# or #NULL then treat as file and delete:=/*ƒsetswitch(arg6)to1forprinterdevice,0forfile.=/*0=ARG \1,\2,\3,\4,\5,0,#PR,#PR1,#PR2,#PR3,#,#NULL =/FOR 7,\0ƒ=/IFEQ"\5"\(RX)1†=ARG\1,\2,\3,\4,\5,1,#PR,#PR1,#PR2,#PR3,#,#NULLƒ=/ENDIF=/ENDFOR=/RX=\6 =/IF RX=0ƒ=DEL\5=/ENDIF=/*=/* Set switch (arg7) TO:=/*„01--‚SINGLE-HARD=/*=ARG \1,\2,\3,\4,\5,\6,10=/IFEQ "\4"SINGLE-HARDƒ=ARG\1,\2,\3,\4,\5,\6,01=/ENDIF=/*9=/* Abort chain if an invalid configuration was requested=/*=/RX=\7 =/IF RX=10ƒ=OPT-N3ƒ=/*‚\4isaninvalidconfiguration-(argument#4)8ƒ=/*…Theonlyvalidconfigurationis'SINGLE-HARD'which3ƒ=/*…isthedefault.Pleaserestartchainfilewithƒ=/*…correctparameters.ƒ=END=/ENDIF#=ARG \1,\2,\3,\4,\5,\6,\7,SYSGEN.TF=/*3=/* The argument list now looks like the following:=/* =/*ƒarg1ƒ-ƒNameofcommandfile.=/*0=/*ƒarg2ƒ-ƒTemporaryvolume/bootfile(ornull).=/*3=/*ƒarg3ƒ-ƒListdeviceorfileforsysgenmessages.=/*(=/*ƒarg4ƒ-ƒSystemconfigurationmnemonic=/*'SINGLE-HARD'=/*(seearg7)=/*@=/*ƒarg5ƒ-ƒListingfileordeviceforassembliesandlink-edits.4=/*SYSGEN.TFisthetemporaryfilewhichisusedin1=/*conjunctionwith=COPY;Atoproduceasingle=/*listingfile.=/*(seearg6)=/*=/*ƒarg6ƒ-ƒSwitch-"=/*0=‚arg5specifiesafilename=/*1=‚arg5specifiesadevice=/*(seearg5)=/*%=/*ƒarg7ƒ-ƒNumberconfigurationkey-%=/*01=‚signle-userharddisksystem=/*(seearg4)=/*8=/*ƒarg8ƒ-ƒSYSGEN.TFtemporaryfileforusewithcopyin+=/*creatinglistingfilespecifiedbyarg3=/*=/*9=/* Justify argument positions and invoke sysgen utility.=/*=ARG \5,\6,\7,\8,\1,\2,\3,\4=/*)=/* Turn off echo of sysgen command lines=OPT J=OPT -N=SYSGEN VM01.\5,\6,\7;T=250 =OPT -J,-N8=/**‚ApplyingpatchesfromXVERSAPT.CFtothebootfile.=/@ VM01.XVERSAPT.CFM=/***************************************************************************M=/***************************************************************************=/**=/**‚SysgenCompleted--=/**6=/**„Assemblyandlinklistingshavebeenoutputto\1=/**1=/**„Sysgencommandlistinghasbeenoutputto\7=/**M=/***************************************************************************M=/***************************************************************************=OPT -K=END  éééééé,1IOI ASREL'VM01 IOI SAS „í2pFMSDLEN pNOTASKS pNOCDCB pNODCBS pNOFCBS pIOCOML pIOCOMS pCCSEG pOSMTBL pNODVS pNOFATS pOSMEND pFHSASR pFMSASQ pFMSASR pNOLPRT pIOSASR pPRTASQ pPRTASR pNOVDTS pNOLTERM !HF3`F3$ IOSG((K3´@€.|*B#ü()2"|(J‘gB |)N!iLé? G3@Hè? (g (f(p=/*ƒcontainpatchestobeappliedtoVERSADOSafterthesysgen =/*ƒprocess.=/*=PATCH VERSADOS.SYH*---+----:----+----:----+----:----+----:----+----:----+----:----+----:--H*>----------------------------------------------------------------------O\IOSSTR*StartofIOSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FHSSTR*StartofFHSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FMSSTR*StartofFMSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\EETSTR*StartofEETH*<----------------------------------------------------------------------H*>--------------------  --------------------------------------------------O\LDRSTR*StartofLDRH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\IOCSTR*StartofIOCH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\INTSTR*StartofINTH*<----------------------------------------------------------------------QUIT=/*!=/*†PATCHIPCDRVONLYIFITEXIST=/*=/RD = \TOTDSK + \NOMCCMS =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\IPCDRVRŽ*StartofIPCDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHVM22DRVONLYIFITEXIST=/*=/RD = \NOVM22 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\VM22DRV*StartofVM22DRVt1}L…H*<----------------------------------------------------------------------QUIT=/ENDIF=/*!=/*†PATCHPRTDRVONLYIFITEXIST=/*=/RD = \NOLPRT =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\PRTDRVRŽ*StartofPRTDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCSUPONLYIFITEXIST=/*=/RD = \NOTERM02 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCSUPŽ*StartofMPSCSUPH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCSPRONLYIFITEXIST=/*=/RD = \NOTERM40 =/IFRD‚>=0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCSPRŽ*StartofMPSCSPRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCDRVONLYIFITEXIST=/*=/RD = \NOTERM02+\NOTERM40 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCDRVŽ*StartofMPSCDRVH*<----------------------------------------------------------------------QUIT=/ENDIF=/*!=/*†PATCHWINDRVONLYIFITEXIST=/* =/RD = \NOWIN =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\WINDRVRŽ*StartofWINDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHSASIDRVONLYIFITEXIST=/*=/RD = \NOSASI =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\SASIDRVŽ*StartofSASIDRVH*<----------------------------------------------------------------------QUIT=/ENDIF=/*#=/*†PATCHMTADRVRONLYIFITEXISTS=/*=/RD = \TOTM435 =/IF RD <> 0=PATCH VERSADOS.SYG*>---------------------------------------------------------------------O\MTADRVRŽ*StartofMTADRVRG*<---------------------------------------------------------------------QUIT=/ENDIF=/*8=/* SYSTEM MUST BE RE-BOOTED FOR PATCHES TO TAKE EFFECT.=/*=ENDéé  ééééé PAGE)ASR IDNT 11,11 ASR ADDRS. FOR I/O MODULES*8*ASR-FILE OF ASR ADDRESSES OF I/O MODULES-NEEDED FOR IOI* XDEF FMSASR,FHSASR,IOSASRFMSASR EQU \FMSASRFHSASR EQU \FHSASRIOSASR EQU \IOSASR ENDééééééé  PAGEO*********************************************************************************ˆIOC--DEFINEDCB'SANDCDB'S*&*ˆThemacrosusedaredefinedinIODM.*%*ˆ9/2/83„modifiedformagtapedriver4*ˆ11/10/83‚modifiedtouseIOCVECandIOCLVLequates&*’includesWinchesterandSASIdrivers*’magtapeatlevel1*O******************************************************************************* *@*‚ThissectionbecomesIOCOMS,whichisusedbyFMS,IOS,&FHS.*#IOCOM„IDNT†0  4,01‡I/OCOMMONSEGMENT SECTION 0 OPT MEX XDEF IOCOMS,IOCOML,CCSEG *1*‚Definethephysicaladdressesofdevicedrivers*‚usingtheSYSGENparameters.*PRT†EQU‡\PRTDRVRMSUP…EQU‡\MPSCSUPMSPR…EQU‡\MPSCSPRMPSC…EQU‡\MPSCDRVIPC†EQU‡\IPCDRVRVM22…EQU‡\VM22DRVMTA†EQU‡\MTADRVRWIN†EQU‡\WINDRVRSASI…EQU‡\SASIDRV PAGE*6*‚Hereareparametersdescribingthetablesandlists.*IOCOMS  DC.L 0 I/O sysgen options. ( DC.L DCQSTR Start address of DCQ space.&DC.LDCQENDEndƒaddressofDCQspace.DC.L0†Addressof1stDCQ. ( DC.L LUTSTR Start address of LUT space.&DC.LLUTENDEndƒaddressofLUTspace.DC.L0†Addressof1stLUT. ( DC.L DCBTBL Start address of DCB space.&DC.LDCBENDEndƒaddressofDCBspace. DC.L DCBTBL Address of 1st DCB.  DC.L 0 SEMAPHORE FLAG&DC.B'\SYSNAME'„OPERATINGSYSTEMI.D.DC.B'\REVISION'ƒANDƒREVISION( DC.L 0,0,0 TASK ID FOR UNCLAIMED BREAKS PAGEO********************************************************************************C*ˆStorageforDCQ'sandLUT's.‚Initiallythesetwolistsareempty.*O******************************************************************************* * *‚DCQspace.* DCQSTR EQU * DS.B 256*\DCQPGEDCQEND EQU *-1 * *‚LUTspace.* LUTSTR EQU * DS.B LUTBEG*\NOTASKS DS.B LUTSEG*\NOTASKS*(\MAXLU+1)LUTEND EQU *-1‰PAGEO**********************************************************************************ˆDefineDCB'sbasedonSYSGENparameters.* –UŸ,§9¯0·0¿-Ç0Ï:×CßBç@ï5÷<ÿARNFL'HO******************************************************************************* *DCBTBLEQU*‡ThisisthetopofDCBspace. &**************************************$*‚SETUPDCB'SFORLOCALTERMINALS‚*&************************************** CCRTDV„SET‚'CN00'„Firstlocalterminalis#CN00,nextis#CN01,etc.  IFGT \NOTERM02ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8& \WCP$FILV,\WCP$FSOF,\WCP$FPSM,\WCP$FSHD,\WCP$FTRD,\WCP$FCOM,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC‚IFGE‚\FDWIN-2*9*2NDFLOPPYDISKƒ#FDx3-8"singledensity,doublesided*DSKNMƒSETDSKNM+1WCP$FAW8 SET $0204WCP$FTNS SET 4004H DSKDCB DSKNM,IOSID,IOSESS,$1F,71,4,'WIND',3,\WCP$FATM,\WCP$PM,WCP$FAW8,L& \DCP$FBPS/2,WCP$FTNS,\DCP$WTO,\DCP$RTO,\WCP$FSPT+10,\WCP$FHDS,\WCP$FTRK-3,D& \WCP$FILV,\WCP$FSOF,\WCP$FPSM/2,\WCP$FSHD,\WCP$FTRD-3,\WCP$FCOM-2,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC ENDC** ‚IFNEƒ\NOSASI$*************************************¢**ƒSetupDCBsfordiskson‡**ƒMVME420-SA1403diskŠ* *ƒcontroller.*¢*$*************************************0DSKDVƒSETƒDSKDV+$100Bumpcontrollernumberby1‚IFGE\HDSASI-1**1STHARDDISK„#HDx0*DSKNMƒSET‚HDDV+DSKDV+$30G DSKDCB DSKNM,IOSID,IOSESS,$1F,75,4,'SASI',0,\SCP$ATM,\SCP$PM,\SCP$HAW,F& \DCP$HBPS,\SCP$HTNS,\DCP$WTO,\DCP$RTO,\SCP$HSPT,\SCP$HHDS,\SCP$HTRK,>& \SCP$HILV,\SCP$HSOF,\SCP$HPSM,\SCP$HSHD,\SCP$HTRD,\SCP$HCOM,)& \SCP$HPTD,\SCP$HSRD,\SCP$HRWC,\SCP$HECC‚ENDC‚IFGE‚\HDSASI-2**2NDHARDDISK„#HDx1*DSKNMƒSET‚DSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,75,4,'SASI',1,\SCP$ATM,\SCP$PM,\SCP$HAW,F& \DCP$HBPS,\SCP$HTNS,\DCP$WTO,\DCP$RTO,\SCP$HSPT,\SCP$HHDS,\SCP$HTRK,>& \SCP$HILV,\SCP$HSOF,\SCP$HPSM,\SCP$HSHD,\SCP$HTRD,\SCP$HCOM,)& \SCP$HPTD,\SCP$HSRD,\SCP$HRWC,\SCP$HECC‚ENDC‚IFGE‚\FDSASI-1**1STFLOPPYDISK„#FDx2*DSKNMƒSETFDDV+DSKDV+$32G DSKDCB DSKNM,IOSID,IOSESS,$1F,76,4,'SASI',2,\SCP$ATM,\SCP$PM,\SCP$FAW,F& \DCP$FBPS,\SCP$FTNS,\DCP$WTO,\DCP$RTO,\SCP$FSPT,\SCP$FHDS,\SCP$FTRK,>& \SCP$FILV,\SCP$FSOF,\SCP$FPSM,\SCP$FSHD,\SCP$FTRD,\SCP$FCOM,)& \SCP$FPTD,\SCP$FSRD,\SCP$FRWC,\SCP$FECC ENDC‚IFGE‚\FDSASI-2**2NDFLOPPYDISK…#FDx3*DSKNMƒSETDSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,76,4,'SASI',3,\SCP$ATM,\SCP$PM,\SCP$FAW,F& \DCP$FBPS,\SCP$FTNS,\DCP$WTO,\DCP$RTO,\SCP$FSPT,\SCP$FHDS,\SCP$FTRK,>& \SCP$FILV,\SCP$FSOF,\SCP$FPSM,\SCP$FSHD,\SCP$FTRD,\SCP$FCOM,)& \SCP$FPTD,\SCP$FSRD,\SCP$FRWC,\SCP$FECC ENDC ENDC* ‰PAGEE**********************************************************************ˆMAGTAPEDRIVERADDITIONC************** *****************************************************IFNE…\TOTM435(*****************************************¦*$*‚SETUPDCB'SFORMAGTAPEDRIVER„**¦*(******************************************—FIRSTBOARD‰SECONDBOARD**FIRSTTRANSPORT‹MT00‘MT10*SECONDTRANSPORTŠMT01‘MT11*THIRDTRANSPORT‹MT02‘MT12*FOURTHTRANSPORTŠMT03‘MT13*….*….*….*EIGHTHTRANSPORTŠMT07‘MT17**MTA0DVƒSET‡$00003000‹__0_MTA1DVƒSET‡$00003100‹__1_MTDV…EQU‡$4D540000‹MT__‚IFGE‚\NOMTA0-1*%*ƒFIRSTTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTDV+MTA0DV+$30GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',0,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-2*&*ƒSECOND‚TAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',1,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-3*%*ƒTHIRDƒTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',2,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-4*&*ƒFOURTH‚TAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',3,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-5*%*ƒFIFTHƒTAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',4,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-6*%*ƒSIXTHƒTAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',5,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-7*'*ƒSEVENTHTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',6,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-8*&*ƒEIGHTH‚TAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',7,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-1*&*ƒFIRST‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTDV+MTA1DV+$30GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',0,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-2*'*ƒSECOND‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',1,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-3*&*ƒTHIRDƒTAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',2,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-4*'*ƒFOURTH‚TAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',3,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-5*&*ƒFIFTHƒTAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',4,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-6*&*ƒSIXTHƒTAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',5,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-7*(*ƒSEVENTHTAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',6,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-8*'*ƒEIGHTH‚TAPEDRIVEƒON SECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',7,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC‚ENDC ‰PAGE5*****************************************************3*‚SETUPDCBFORNULLDEVICE;THISMUSTALWAYSBE‚*/*‚LASTSINCEITSPOINTERTONEXTISSETTO0.†*5***************************************************** LLUN: ‰DC.L†0‰ADDRESSNEXTDCBINLIST.‰DC.L†'NULL'„ASCIIIDENTIFICATIONFORTHISDCB‰DC.L†0‰DCQLIST‰DC.L†0,0‡DRIVERID/SESSION‰DC.L†0‰ADDRESSOFLUT‰DC.L†$FF‡DEVICEATTRIBUTES‰DC.W†0‰W/RPROTECTCODES‰DC.W†0‰DEVICEINUSEFLAG‰DC.L†0‰W/RCOUNT#‰DC.B…$FFˆDEVICEFLAG(DEVICECODE)#‰DC.B†1‰DEVICEFLAG(DEVICESTATUS)‰DC.L†0‰CHANNELID‰DC.B†0‰CHANNELDEVICENO.‰DC.B†0‰REQUESTOR'SPRIORITY‰DC.L†0‰CURRENTRECORDNO.1‰DS.B†IOSBLN„ROOMFORREQUESTOR'SPARAMETERBLOCK:‰DC.L†0‰LOGICALADDROFPARAMETERBLKINUSERMEMORYSPACE'‰DC.B†0‰CONFIGURATIONCOORDINATIONFLAG‰DC.B†0‰BREAKCOUNT$‰DC.L†0‰ADDRESSOFBREAKSERVICELUT‰DC.L†0‰BREAKSERVICEADDRESS>‰DC.L†0,0,0,0ƒBUFFERZONEBETWEENDEVICEINDEPENDENT/DEPENDENT)‰DC.B†IOSTLN„SPACEFORCONFIGURATIONINFO‰DCB.B…DCBLEN-(*-LLUN),0 (DCBENDEQU*-1…EndaddressofDCBspace.HIOCOML EQU (*-IOCOMS+255)/256*256 Get length of common segment (force to*§nextpageboundary). PAGE SECTION 1‰PAGEO*********************************************************************************‰CHANNELDATABLOCKS*O******************************************************************************* CCSEG EQU * ******‚LOCALPRINTERS IFGT \NOLPRTJ CDB 0,'CPRT',XTPRTL,254,PRT,0,\LPDA$00,7,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC  IFGT \NOLPRT-1J CDB 0,'CPR1',XTPRTL,254,PRT,0,\LPDA$01,7,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC ******‚LOCALTERMINALS  IFGT \NOTERM02I CDB $0011,'SUP1',0,254,MSUP,0,\LTDA$00,1,$8C,6,$30,0,0,0,0,0,0,0,0,0,0,0N CDB $0009,'CMPS',XTS7A2,254,MPSC,'SUP1',\LTDA$00,1,$8C,6,$30,0,0,0,0,0,0,0,0,& 0,0,0 ENDC  IFGT \NOTERM02-1N CDB $0009,'CMP1',XTS7B2,254,MPSC,'SUP1',\LTDA$01,1,$8C,6,$30,0,0,0,0,0,0,0,0,& 0,0,0 ENDC  IFGT \NOTERM40@ CDB $0011,'SUP2',0,254,MSPR,0,\LTDA$02,1,\IOCVEC3,\IOCLVL3,$30,&‚0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP2',XTS7AR,254,MPSC,'SUP2',\LTDA$02,1,\IOCVEC3,\IOCLVL3,$30,& 0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-1J CDB $0009,'CMP3',XTS7BR,254,MPSC,'SUP2',\LTDA$03,1,\IOCVEC3,\IOCLVL3,$30,& 0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-2@ CDB $0011,'SUP3',0,254,MSPR,0,\LTDA$04,1,\IOCVEC3,\IOCLVL3,$30,&„0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP4',XTS7AR,254,MPSC,'SUP3',\LTDA$04,1,\IOCVEC3,\IOCLVL3,$30,& 0,0,0 ENDC  IFGT \NOTERM40-3J CDB $0009,'CMP5',XTS7BR,254,MPSC,'SUP3',\LTDA$05,1,\IOCVEC3,\IOCLVL3,$30,& 0,0,0,0,0,0,0,0,0,0,0,0 ENDC ******‚MCCMCHANNELS  IFNE \NOTERM0+\NOPRT0O CDB 0,'COM1',XTMIPC,254,IPC,0,$FF1000,$1FF,$F7,4,$10,0,$181,$FF,$FF,$F,0,$183,&‚$FF,$FF,$F,0 ENDC  IFNE \NOTERM1+\NOPRT1O CDB 0,'COM2',XTMIPC,254,IPC,0,$FF1200,$1FF,$F6,4,$10,0,$181,$FF,$FF,$F,0,$183,&‚$FF,$FF,$F,0 ENDC  IFNE \NOTERM2+\NOPRT2O CDB 0,'COM3',XTMIPC,254,IPC,0,$FF1400,$1FF,$F5,4,$10,0,$181,$FF,$FF,$F,0,$183,&ƒ$FF,$FF,$F,0 ENDC  IFNE \NOTERM3+\NOPRT3O CDB 0,'COM4',XTMIPC,254,IPC,0,$FF1600,$1FF,$F4,4,$10,0,$181,$FF,$FF,$F,0,$183,&ƒ$FF,$FF,$F,0 ENDC $******‚HARDANDFLOPPYDISKCHANNELS %DEVADD SET $FEFE00 INIT. DEVICE ADDR. VECTNO SET $100 INIT. VECTOR NO. IFNE \HDUDC0+\FDUDC0DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CRD1',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC IFNE \NOFD0DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CFD1',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,4,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC  IFNE \HDUDC1+\FDUDC1DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CRD2',XTDIPC,254,I PC,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC IFNE \NOFD1DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CFD2',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,4,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC ******ƒVM22DISKCHANNELS IFGT‚\NOVM22DEVADD SET DEVADD+$200DEVM22 SET DEVADD+$101VECTNO SET VECTNO-1G CDB 0,'VM22',$12,254,VM22,0,DEVM22,1,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC**ˆWINCHESTER‚DISKCHANNEL* IFGT‚\NOWIND CDB 0,'WIND',XTDWIN,254,WIN,0,\LWIN$00,1,\IOCVEC3,\IOCLVL3,$10,0,0,&ƒ0,0,0,0,0,0,0,0,0 ENDC **ˆSASI‚DISKCHANNEL* IFGT \NOSASIE CDB 0,'SASI',XTDSAS,254,SASI,0,\LSAS$00,1,\IOCVEC3,\IOCLVL3,$10,0,0,&ƒ0,0,0,0,0,0,0,0,0 ENDC ,*********************************************ª**ˆMAGTAPEDRIVER“**ˆCHANNELDATABLOCK**ª*,*********************************************$******ƒFIRSTADAPTERBOARD(MVME435)* IFGTƒ\NOMTA0L CDB 0,'MTA0',XTM435,0,MTA,0,\LMTA$00,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0,0,0, &„0,0,0,0 ENDC*%******‚SECONDADAPTERBOARD(MVME435)* IFGT‚\NOMTA1L CDB 0,'MTA1',XTM435,0,MTA,0,\LMTA$01,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0,0,0, &„0,0,0,0 ENDC* ) DC.L 0 Link of 0 marks end of CDB chain.  END é‰XDEF†OSMTBL,FMSASQ‰XDEF†OSMEND,FMSDLEN‰XREF†FHSASR,IOSASR,FMSASR*-*ˆTABLEOFOPERATINGSYSTEMMODULETASKNAMES*‰NOLIST‰INCLUDEƒ9995.&.IOE.EQ‰INCLUDEƒ9995.&.TR1.EQ‰INCLUDEƒ9995.&.EXE.EQ‰INCLUDEƒ9995.&.NIO.EQ‰INCLUDEƒ9995.&.LV5.EQ‰INCLUDEƒ9995.&.FME.EQ‰INCLUDEƒ9995.&.FMI.EQ‰LIST SECTION 1OSMTBLƒDC.L…FHSIDŽFHSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+FHSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+FHSNLN‡QUEUELENGTH‰DC.L„FHSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…IOSIDŽIOSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+IOSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+IOSNLN‡QUEUELENGTH‰DC.L„IOSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED**‰DC.L…FMSIDŽFMSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRD‚ASQSTATUS'‰DC.B„EVTLEN+FHSNLN‡MAX.MESSAGELENGTHFMSASQƒDC.L„0QUEUELENGTH‰DC.L„FMSASRŽADDR.OFASR‰DC.W„0**‰DC.W„SGOPPAŽOPTIONS-LOG.ADDR=PHYS.ADDR.‰DC.W„SGATRW+SGATSS‡ATTRIBUTES‰DC.L„FMSDSEG.NAME‰DC.L„0LOGICALADDRESSFMSDLEN‚DC.L„0SEGMENTLENGTH**OSMENDƒEQU…*“ENDOFTABLE ‰END‡OSMTBLééé/9  PAGE*#*VALPAR VALIDATES SYSGEN PARAMETERSG*…FAILERRORISGENERATEDFOREACHPARAMETERTHATISNOTINVALIDRANGE:*ANY ERROR SHOULD MAKE OPERATOR ABORT SYSGEN SINCE FURTHER/*…SYSGENPROCESSINGASSUMESPARAMETERSAREGOOD*.*MAKE SURE TOTAL NUMBER OF TERMINALS IS SUM OF*…DIFFERENTTYPESOFTERMINALSH IFNE \TOTTERM-(\NOTERM02+\NOTERM40+\NOTERM0+\NOTERM1+\NOTERM2+\NOTERM3) FAIL 100 ENDC*MAKE SAME CHECK FOR PRINTERS7 IFNE \TOTPRT-(\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2+\NOPRT3) FAIL 100 ENDC *MAKE SAME CHECK FOR DISK DRIVES(DSKCNT SET \HDSASI+\FDSASI+\HDWIN+\FDWINODSKCNT SET DSKCNT+\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1+\HDVM22+\FDVM22 IFNE \TOTDSK-DSKCNT FAIL 100 ENDC1*MAKE SURE NO. OF VM22'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \HDVM22+\FDVM22 CNT SET CNT+1 ENDC IFNE CNT-\NOVM22 FAIL 100 ENDC0*MAKE SURE NO. OF IPC'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOFD0 CNT SET CNT+1 ENDC IFNE \NOFD1 CNT SET CNT+1 ENDC IFNE \HDUDC0+\FDUDC0 CNT SET CNT+1 ENDC IFNE \HDUDC1+\FDUDC1 CNT SET CNT+1 ENDC IFNE CNT-\NOIPCS FAIL 100 ENDC1*MAKE SURE NO. OF MCCM'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOTERM0+\NOPRT0 CNT SET CNT+1 ENDC IFNE \NOTERM1+\NOPRT1 CNT SET CNT+1 ENDC IFNE \NOTERM2+\NOPRT2 CNT SET CNT+1 ENDC IFNE \NOTERM3+\NOPRT3 CNT SET CNT+1 ENDC IFNE CNT-\NOMCCMS FAIL 100 ENDC=*CAN'T HAVE MORE THAN 2 LOCAL PRINTER OR MORE THAN 1 PER MCCM IFGT \NOLPRT-2 FAIL 100 ENDC IFGT \NOPRT0-1 FAIL 100 ENDC IFGT \NOPRT1-1 FAIL 100 ENDC IFGT \NOPRT2-1 FAIL 100 ENDC IFGT \NOPRT3-1 FAIL 100 ENDC'*CAN'T HAVE MORE THAN 2 VM02 TERMINALS. IFGT \NOTERM02-2 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 MVME 400 TERMINALS. IFGT \NOTERM40-4 FAIL 100 ENDC**CAN'T HAVE MORE THAN 4 TERMINALS PER MCCM IFGT \NOTERM0-4 FAIL 100 ENDC IFGT \NOTERM1-4 FAIL 100 ENDC IFGT \NOTERM2-4 FAIL 100 ENDC IFGT \NOTERM3-48cAsI FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER IPC IFGT \NOFD0-4 FAIL 100 ENDC IFGT \NOFD1-4 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 HARD DRIVES PER UDC IFGT \HDUDC0-4 FAIL 100 ENDC IFGT \HDUDC1-4 FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER UDC IFGT \FDUDC0-4 FAIL 100 ENDC IFGT \FDUDC1-4 FAIL 100 ENDC8*CAN'T HAVE MORE THAN 4 DRIVES PER WINCHESTER CONTROLLER IFGT \HDWIN+\FDWIN-4 FAIL 100 ENDC2*CAN'T HAVE MORE THAN 4 DRIVES PER SASI CONTROLLER IFGT \HDSASI+\FDSASI-4 FAIL 100 ENDC**IF NO MVME435, CAN'T HAVE ANY TAPE DRIVES IFEQ \TOTM435 ‚IFGT\NOMTAT ‚FAIL100‚ENDC ENDC/*CAN'T HAVE MORE THAN 8 TAPE DRIVES PER MVME435 IFGT \NOMTA0-8 FAIL 100 ENDC IFGT \NOMTA1-8 FAIL 100 ENDC9*CAN'T HAVE 0 OR MORE THAN 75 TASKS IN SYSTEM AT ONE TIME IFEQ \NOTASKS FAIL 100 ENDC IFGT \NOTASKS-75 FAIL 100 ENDC1*MAXIMUM LU CANNOT BE LESS THAN 8 OR MORE THAN 31 IFLT \MAXLU-8 FAIL 100 ENDC IFGT \MAXLU-31 FAIL 100 ENDC2*MAXIMUM LU CANNOT BE LESS THAN NO. OF DISK DRIVES IFLT \MAXLU-\TOTDSK FAIL 100 ENDCC*MAXIMUM NO. OF PAGES FOR DCQ,UST,GST,IOV, AND TRACE CANNOT BE 0 OR*…MORETHAN10 IFEQ \DCQPGE FAIL 100 ENDC IFGT \DCQPGE-10 FAIL 100 ENDC IFEQ \GST FAIL 100 ENDC IFGT \GST-10 FAIL 100 ENDC IFEQ \UST FAIL 100 ENDC IFGT \UST-10 FAIL 100 ENDC IFNE \TRCFLAG IFEQ \TRACE FAIL 100 ENDC ENDC IFNE \TRCFLAG IFGT \TRACE-10 FAIL 100 ENDC ENDC IFEQ \IOV FAIL 100 ENDC IFGT \IOV-10 FAIL 100 ENDCG*MAXIMUM NO. OF DIFFERENT FILES MUST BE .LE. MAXIMUM NO. OF TOTAL FILES IFGT \NODIFFIL-\NOFILES FAIL 100 ENDC2*MAXIMUM NO. O F FILES CANNOT BE 0 OR MORE THAN 200 IFEQ \NODIFFIL FAIL 100 ENDC IFGT \NODIFFIL-200 FAIL 100 ENDC IFEQ \NOFILES FAIL 100 ENDC IFGT \NOFILES-200 FAIL 100 ENDCG*MAXIMUM NO. OF DEFAULT VOLUMES CANNOT BE 0 OR MORE THAN NO. OF TASKS+3 IFEQ \NODEFVOL FAIL 100 ENDC IFGT \NODEFVOL-(\NOTASKS+3) FAIL 100 ENDCE*NUMBER OF DEFAULT VOLUMES MUST BE GREATER THAN OR EQUAL TO NUMBER OF*ƒLOGONTERMINALS IFGT \NOLOGONS-\NODEFVOL FAIL 100 ENDC**DEFAULT FAB SIZE CANNOT BE 0 MORE THAN 20 IFEQ \DEFFAB FAIL 100 ENDC IFGT \DEFFAB-20 FAIL 100 ENDC7*DEFAULT DB SIZE CANNOT BE LESS THAN 4 OR MORE THAN 255 IFGT \DEFDAT-255 FAIL 100 ENDC IFLT \DEFDAT-4 FAIL 100 ENDC END ééééé=LINK ,IOI,\LINKLS;HAMIXSSEGMENT IOSG:0 \IOCSTRSEGMENT .IOI:1INPUT VM02.IOC.ROINPUT VM02.IOI.ROINPUT VM02.OSLIST.RO INPUT IXR.ROINPUT VM02.ASR.ROEND=ENDéééééé éQ ‚******************‚*VM02.SYSCMD.CD*M‚****************************************************************************‚*SYSGENCOMMANDFILE-´*?‚*ƒUSEINCONJUNCTIONWITHSYSGEN.CFOREXECUTEDIRECTLYWITH*‚*†THEFOLLOWINGARGUMENTS:¬*‚*Ê*@‚*†ARG1-LISTINGFILEORDEVICEFORASSEMBLIESANDLINKEDITS‰*‚*Ê*-‚*†ARG2-SWITCH--0=ARG1ISAFILENAMEœ*‚*—1=ARG1ISADEVICENAMEš*‚*Ê*8‚*†ARG3-CONFIGURATIONSWITCH--1=SINGLE-USERHARD‘*‚*Ê*@‚*†ARG4-WORKINGFILEFORUSEWITHCOPY;ATOPRODUCELISTING‰*‚*Ê*M‚**************************************************************************** ‚MSG‰SYSGENCOMMANDFILE +‚MSG‰SETSYSGENPARAMETERSFROMPASSEDARGS *‚ASMLSW„=\2‹*ASSEMBLYLISTINGFILESWITCH‚*”0=ASMLSISAFILE‚*”1=ASMLSISADEVICE'‚LINKLSWƒ=\2‹*LINKLISTINGFILESWITCH‚*”0=LINKLSISAFILE‚*”1=LINKLSISADEVICE  ‚IFEQˆ\ASMLSW$…ASMLS…="\4"‰*ASMLISTINGWORKFILE‚ENDC ‚IFNEˆ\ASMLSW!…ASMLS…="\1"‰*ASMLISTINGDEVICE‚ENDC ‚IFEQˆ\LINKLSW&…LINKLS„="\4"‰*LINKLISTINGWORKFILE‚ENDC‚IFNEˆ\LINKLSW#…LINKLS„="\1"‰*LINKLISTINGDEVICE‚ENDC +‚WORKLS„="\1"‰*OVERALLLISTINGFILE/DEVICE6‚LINK1TFƒ="INIT1.TF"„*INTERMEDIATELINKFILEFORINIT6‚LINK2TFƒ="INIT2.TF"„*INTERMEDIATELINKFILEFORINIT C‚MSG‰**************************************************************C‚MSG‰**************************************************************?‚MSG‰**„Systemgeneration(SYSGEN)commandfileforusersof‚**?‚MSG‰**„VERSAdosontheVMC68/2computer.‚Prepared5/01/82.**C‚MSG‰**************************************************************C‚MSG‰**************************************************************‚MSG‰C‚MSG‰**************************************************************(‚MSG‰**ˆParametersdescribingdevices•**C‚MSG‰**************************************************************(‚*˜Total#ofterminals(localandMCCM)B‚TOTTERMƒ=\NOTERM02+\NOTERM40+\NOTERM0+\NOTERM1+\NOTERM2+\NOTERM3 Z<c;kJsA{/ƒ7‹9“-›3£+«1³-»1Ã(Ë1Ó,Û.ã?ëXó@ûTU *(‚*˜Total#ofprinters(localandMCCM).1‚TOTPRT„=\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2+\NOPRT3‚*˜Totalnumberofdisks-+‚*˜floppydrivesandharddiskdrives.‚Each(‚*˜volumedefinedrequiresapproximately‚*˜2-1/4Kbytesofmemory.C‚&Tˆ=\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1+\HDVM22+\FDVM22+‚TOTDSK„=\&T+\HDWIN+\FDWIN+\HDSASI+\FDSASI‚*&‚NOIPCS„=2Œ#ofdiskIPC'sandUDC's.'‚NOVM22„=0Œ#ofVM22diskcontrollers.‚NOMCCMSƒ=0Œ#ofMCCM's.‚*5‚NOTERM02‚=2Œ#ofterminalsusingVM02serialports.9‚NOTERM40‚=0Œ#ofterminalsusingMVME400serialports. ‚NOLPRT„=1Œ#oflocalprinters. ‚NOLTERMƒ="\NOTERM02+\NOTERM40"0‚*˜TOTALnumberoflocalterminalforthesystem‚*‚*-‚HDUDC0„=2Œ#ofhardƒdiskdriveson1stUDC.-‚HDUDC1„=0Œ#ofhardƒdiskdriveson2ndUDC./‚FDUDC0„=2Œ#offloppydiskdriveson1stUDC./‚FDUDC1„=0Œ#offloppydiskdriveson2ndUDC.‚*:‚NOFD0…=2Œ#offloppydiskdriveson1stfloppydiskIPC.:‚NOFD1…=0Œ#offloppydiskdriveson2ndfloppydiskIPC.‚*+‚FDVM22„=0Œ#offloppydiskdrivesonVM22)‚HDVM22„=0Œ#ofhardƒdiskdrivesonVM22‚*‚*,‚NOWIN…=0Œ#ofWinchestercontrollerboards9‚HDWIN…=0Œ#ofharddiskdrivesonWinchestercontroller;‚FDWIN…=0Œ#offloppydiskdriveso nWinchestercontroller‚*1‚NOSASI„=0Œ#ofSASIinterfacecontrollerboards)‚HDSASI„=0Œ#ofharddiskdrivesonSASI+‚FDSASI„=0Œ#offloppydiskdrivesonSASI‚*‚*(‚NOTERM0ƒ=0Œ#ofterminalson1stMCCM.&‚NOPRT0„=0Œ#ofprinters‚on1stMCCM.(‚NOTERM1ƒ=0Œ#ofterminalson2ndMCCM.&‚NOPRT1„=0Œ#ofprinters‚on2ndMCCM.(‚NOTERM2ƒ=0Œ#ofterminalson3rdMCCM.&‚NOPRT2„=0Œ#ofprinters‚on3rdMCCM.(‚NOTERM3ƒ=0Œ#ofterminalson4thMCCM.&‚NOPRT3„=0Œ#ofprinters‚on4thMCCM.‚*=‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRAD1…=0ŒNO.OFRADBOARDS‚NUSRRADƒ=0ŒNO.OFRADUSERS‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRADdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RADRV…=0‚*@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRIO†=0ŒNumberofRIOboards‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRIOdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RIODRVRƒ=0‚*@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~#‚NDAC1…=0ŒNumberofMVME605boards;‚NUSRDACƒ=0ŒNumberofusers(total)fortheMVME605boards‚*"‚NACO†=0ŒNumberofMVME615boards;‚NUSRACOƒ=0ŒNumberofusers(total)fortheMVME615boards‚*‚*#‚NDCO1…=0ŒNumberofMVME625boards;‚NUSRDCOƒ=0ŒNumberofusers(total)fortheMVME625boards‚*‚*%‚NVME610=0ŽNumberofMVME610boards%‚NVME620=0ŽNumberofMVME620boards‚*‚*‚*>‚PCDRV…=0ŒIfnon-zeroincludespecialI/Ochannelinitializer2‚*˜forProcessControlDriversinusernumber9992‚* 5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~F‚*†IFtheMAGTAPEdriverIStoBEusedYOUmustMERGEfileMTALDPNT.SA‚*†intoVM02.INITIO1.AG5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~9**********************************************************·**ˆMAGTAPEDRIVER **ˆNOTESONBOARDJUMPERING—**·*9************************************************************ˆINTERRUPTLEVEL*6*ˆThechanneldatablockisconfiguredforI/Ochannel2*ˆinterruptlevel1inIOC.AG.‚Pleasebesurethat2*ˆyourboardisjumperedforthisinterruptlevel,3*ˆasdescribedintheMVME435magnetictapeadapter *ˆmanual.*7*ˆAsdescribedintheMVME435manual,tohavea‚level17*ˆinterrupt,thejumperonJ2mustbeplacedtoconnect*ˆpins7-8asfollows:* *’+--------+ *1‚|+„+|‚2*’|ˆ| *3‚|+„+|‚4*’|ˆ| *5‚|+„+|‚6*’|ˆ|*7‚|+----+|‚8 *’+--------+***ˆADDRESS‚ONI/OCHANNEL*6*ˆThechanneldatablockisconfiguredforI/Ochannel;*ˆaddressesLMTA$00=(I/Ochannel‚baseaddress)+$3E9and.*ˆLMTA$01=(I/Ochannelbaseaddress)+$3A9.4*ˆPleasebesurethatyourboard(s)is(are)jumpered*ˆforoneoftheseaddresses.*?*ˆTohaveaboardaddressof(I/Ochannelbaseaddress)+$3E9,&*ˆremovealljumpersonJ3asfollows:* *’+--------+ *1‚|+„+|‚2*’|ˆ| *3‚|+„+|‚4*’|ˆ| *5‚|+„+|‚6*’|ˆ| *7‚|+„+|‚8 *’+--------+***?*ˆTohaveaboardaddressof(I/Ochannel‚baseaddress)+$3A9,$*ˆconnect‚pins7-8onJ3asfollows:* *’+--------+ *1‚|+„+|‚2*’|ˆ| *3‚|+„+|‚4*’|ˆ| *5‚|+„+|‚6*’|ˆ|*7‚|+----+|‚8 *’+--------+******8‚TOTM435ƒ=0ŒTotal#ofmagtapeMVME435adapterboards.3‚NOMTA0„=0Œ#oftapedrivesonfirstMVME435‚board4‚NOMTA1„=0Œ#oftapedrivesonsecondMVME435‚boardD‚NOMTAT„=\NOMTA0+\NOMTA1‚Totalnumberoftapedrivesforthesystem‚MSG‰C‚MSG‰**************************************************************-‚MSG‰**ˆParametersabouttablesizes,etc.**C‚MSG‰**************************************************************2‚PAGESIZE‚=256ŠSizeinbytesofapageofmemory.*‚ASN‡=0Œ#ofaddressspaces--notusedbut'‚*œneededtosatisfyM68XXX.INITDAT.AG.4‚DCQPGE„=2ŒNumbero fpagesofmemoryforthedevice-‚*˜connectionqueue(DCQ).‚Minimumof1page,*‚*˜maximumof10pages.‚TheDCQisusedto/‚*˜saveconcurrentrequeststothesamefileor.‚*˜device.‚EachpageoftheDCQcanaccomodate‚*˜approximately9entries.1‚GST‡=2ŒNumberofpagesinglobalsegmenttable.)‚*˜Minumumof1,maximumof10.‚Eachpage+‚*˜canaccomodateapproximately14entries.5‚UST‡=2ŒNumberofpagesintheusersemaphoretable.-‚*˜Minimumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately11entries.6‚TRACE…=0Œ*No.ofpagesintracetable.‚TRACEmustbe+‚*˜nonzeroifTRCFLAGisnonzero.‚Eachpage+‚*˜canaccomodateapproximately10entries.2‚UDR‡=1ŒNumberofpagesinuser-defineddirective+‚*˜table,minimumof0,maximumof10.‚Each0‚*˜pagecanaccomodateapproximately25entries.2‚IOV‡=1Œ#ofpagesinI/Ovectortable.ƒEachpage+‚*˜canaccomodateapproximately12entries.@‚PAT‡=(\NOLOGONS*32*2+16+(\PAGESIZE-1))/\PAGESIZE#ofpagesin+‚*˜periodicactivationtable.‚Eachpagecan'‚*˜accomodateapproximately12entries.‚*˜PATsizeis\PAT.<‚NOTASKSƒ=10‹Maximumnumberoftasksinsystematonetime.-‚*˜VERSAdoscontainsamaximumof11resident%‚*˜tasks.‚Allowingforthatplusfour/‚*˜eachterminalwillaccomodatemostrequests.<‚MAXLU…=16‹Maximumlogicalunitnumberthatcanbeassigned/‚*˜foreachtaskinthesystem.‚Limitis31and.‚*˜minimumis8.‚MAXLUmustbegreaterthanor2‚*˜equaltoTOTDSK.‚MAXLUandNOTASKdeterminethe1‚*˜amountofmemoryrequiredforthelogicalunit1‚*˜table(LUT).‚Thealgorithmfordeterminingthe!‚*˜sizeoftheLUTisasfollows:'‚*˜LUT=16*NOTASKS+8*NOTASKS*(MAXLU+1),‚*˜Theremustbea1LUforeachdiskvolume,‚*˜(FMSassignsadifferentlogicalunitfor,‚*˜eachdisk.)‚ThismeansthatMAXLUmustbe#‚*˜greaterthanorequaltoTOTDSK.‚IFGTˆ\TOTDSK-\MAXLU!…MSG‰SYSGENparametersizeerror.3…MSG‰MAXLUmustbegreaterthanorequaltoTOTDSK.:…MSG‰Inthissysgen,MAXLU=\MAXLUandTOTDSK=\TOTDSK.5…MSG‰Pleaseadjustparametersandstartsysgenagain.…ABORT‡‚ENDC;‚NOFILESƒ=12‹Maximumnumberoffilesthatcanbeopenedin(‚*˜thesystematonetime.‚Limitof200.‚*9‚NODIFFIL‚=12‹MaximumnumberDIFFERENTfilesthatcanbe-‚*˜openedatonetime.‚Cannotbegreaterthan,‚*˜NOFILES.‚Foreverythreedifferentfiles,,‚*˜approximately1Kofmemoryisrequired.‚A&‚*˜rationof5filesforeachterminal‚*˜accomodatesmostrequests.‚*;‚NODEFVOL‚=8ŒMaximumnumberofdefaultvolumesthatcanbe-‚*˜defined.‚CannotbegreaterthanNOTASKS+3.‚*9‚DEFFAB„=1ŒDefaultFileAllocationBlock(FAB)lengthin/‚*˜sectors(256bytespersector).‚Usedbyfile-‚*˜handlerwhennoFABsizeisgiven.‚Minimum!‚*˜sizeis1,maximumsizeis20.‚*;‚DEFDAT„=4ŒDefaultdatablocklengthinsectors(256bytes1‚*˜persector).‚Usedbyfilehandlerwhennodata/‚*˜blocksizeisgivenatfileallocationtime.*‚*˜Minumumsizeis4,maximumsizeis255.‚MSG‰C‚MSG‰**************************************************************‚MSG‰**ˆEETEQUvalues¥**C‚MSG‰**************************************************************‚*>‚DEFAULTƒ="SYS:0.&"„*Systemdefaultvolume:usernumber.catalog‚*<‚TERMOCNT‚=2Œ*No.ofterminaloutputtimeoutsbeforelogoff‚*7‚SECURITY‚=1ŒSwitchtoindicateifsecuritypackageis-‚*˜supported.‚Valueofzeroexcludespackage,-‚*˜nonzeroincludesit.‚Thispackagerequires‚*˜approximately1Kofmemory.‚*<‚SPCCMD„=1ŒSwitchtoindicateifthefollowingusersession0‚*˜managementcommandsaresupported:‚HELP,CLOSE0‚*˜ASSIGN,NEWS.‚Valueofzeroexcludescommands.-‚*˜Thispackagerequiresapproximately1/2of ‚*˜memory.‚*>‚CHAINBAT‚=1ŒSwitchtoindicateifchainandbatchprocessing2‚*˜aresupported.‚Valueofzeroexcludesbatchand.‚*˜chain;non-zeroincludesthem.‚Thispackage+‚*˜requiresapproximately3-1/2Kofmemory.‚*9‚CONBATCH‚=1ŒNumberofconcurrentbatchjobsthatcanbe(‚*˜running.‚Cannotbemoret hanNOTASKS.‚*<‚BATCHPGE‚=2ŒNo.ofpagesforbatchjobqueueing.‚Eachpage0‚*˜accomodates32entries.‚Inaddition,thereis+‚*˜spacefor31entriesminusthenumberof‚*˜terminalsinthesystem.‚*=‚BATDLY„=16000ˆ*delayinmsinbatchbetweenreloadattempts‚*=‚NOLOGONƒ=3ŒMaxmimumnumberofinvalidlogonattemptsbefore‚*˜beingrejected.‚*B‚NOLOGONS‚=\TOTTERM…#ofterminalsallowedtologoninthesystem‚*,‚LOGMSG1ƒ="VERSAdosV"Logonmessagepart1)‚LOGMSG2ƒ="ERSION"„Logonmessagepart2(‚REVNUMBR‚="4.3"†Logonmessagepart3‚*2‚*˜REVNUMBRisuseddynamicallyinCMDLISTaspart*‚*¡ofthelogonmessage.Ifthisvalueis'‚*¡changedthen'REVISION'inthisfile)‚*¡shouldbechangedtomatchthedynamic ‚*¡value.‚*B‚AUTOTERM‚='CN00'‡TerminalIDofdeviceautologonistooccuron‚*‚AUTOLOGN‚=1ŒBit0:‚*›0-->Autobreakinactive‚*›1-->Autobreakactive ‚*˜Bit1:‚*›0-->Autologoninactive‚*›1-->Autologonactive‚*‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**‰Vectornumbers£**C‚MSG‰**************************************************************.‚IOCVEC1ƒ=$71ŠI/Ochannelinterrupt1vector..‚IOCVEC2ƒ=$72ŠI/Ochannelinterrupt2vector..‚IOCVEC3ƒ=$73ŠI/Ochannelinterrupt3vector..‚IOCVEC4ƒ=$74ŠI/Ochannelinterrupt4vector.+‚IOCLVL1ƒ=2ŒI/Ochannelinterrupt1level.+‚IOCLVL2ƒ=3ŒI/Ochannelinterrupt2level.+‚IOCLVL3ƒ=4ŒI/Ochannelinterrupt3level.+‚IOCLVL4ƒ=5ŒI/Ochannelinterrupt4level.2‚SERPTS„=140ŠSerialport(7201)interruptvector./‚PTMVECTƒ=28‹Programmabletimervectornumber./‚FAIL†=$94ŠBoardfailinterruptvectornumber.*‚SWABRT„=31‹Softwareabortvectornumber.7‚KILVECTƒ=142ŠVectornumberwhichforcessystemcrash./‚BCLRV…=147ŠBusclearinterruptvectornumber.‚*‚MSG‰C‚MSG‰**************************************************************#‚MSG‰**ˆAddressesoftimer,etc.š**C‚MSG‰***************************************************************‚MMU‡=$0‹AddressofMMU(noneonaVM02)."‚TIMER…=$F70000†Addressoftimer.6‚CLOCKFRQ‚=0800‰Numberofclocktickspermillisecond#‚PANEL…=$0‹Addressoffrontpanel.@‚BUGTRACƒ=$F000BC†Addressoffirmwaredebugger'straceroutine.6‚TRCFLAGƒ=0ŒTraceflag.‚Zeroimpliesdon'ttrace.‚The0‚*˜settingofbitsintheTRCFLAGparameterwill2‚*˜controlwhicheventscauseanentrytobebuilt‚*˜inthetracetable.‚*˜Bit#inTRCFLAG†Event ‚*›15‘TRAP#1‚*›14‘I/Ointerruptnotclaimed‚*°byusertask.‚*›13‘Timerinterrupt.‚*›12‘Usertrap(2-15)‚*›11‘Exception‚*›10‘Dispatch‚*œ9‘I/Ointerruptclaimedby ‚*°usertask‚*œ8‘ReturnfromLOADMMU‚*œ7‘Simulatedinterrupt‚*œ6‘SYSFAILinterrupt.‚*>‚HOGMODEƒ=0ŒSpecifieswhetherornotyouwanttheVM02tohog3‚*˜theVERSAbus(whichallowsittorunfasterwhen4‚*˜accessingtheVERSAbus).‚ThismayONLYbeusedif4‚*˜therearenoothercardsinthesystemcapableof+‚*˜becomingbusmaster!‚Ifindoubt,use0.‚*š0=don'thogthebus.1‚*š1=hogthebus(nootherintelligentboards).‚*@‚SYSFAIL=0ŽDetermineswhetherornottheoperatingsystemwill6‚*˜beinterruptedwhenSYSFAILisassertedonthebus.3‚*˜SomeintelligentboardswillassertSYSFAILwhen1‚*˜theyexperienceafailureofsomekind.‚Ifyou6‚*˜havesuchboardsinthesystem,ANDTHEDRIVERSFOR4‚*˜THESEBOARDSHAVESYSFAILHANDLERS,thenyouwill3‚*˜probablywantSYSFAILinterruptsenabled.‚Ifthe5‚*˜appropriateSYSFAILhandlersarenotwritten,then6‚*˜takingaSYSFAILinterruptwillhangupthesystem,1‚*˜soyouwouldwantSYSFAILinterruptsdisabled."‚*š0=disableSYSFAILinterrupts.!‚*š1=‚enableSYSFAILinterrupts.‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**2‚MSG‰**ƒLOCALTERMINAL/PRINTERDEVICEADDRESSES**+‚MSG‰**ƒMAGTAPEADAPTERBOARDADDRESSESˆ** ‚MSG‰**ƒRWIN1ANDSASIADDRESSES ‚MSG‰**«**0‚MSG‰**ƒBaseAddressJumpers:‚'.'=nojumper‚**‚MSG‰**š'J'=jumper…**4 ‚MSG‰***********************************************‚MSG‰‚LTDA$00ƒ=$F70015†VM02portA‚LTDA$01ƒ=$F70017†VM02portBC‚LTDA$02ƒ=$F801CD†MVME400withbaseaddressjumpers(...J)portAC‚LTDA$03ƒ=$F801CF†MVME400withbaseaddressjumpers(...J)portBC‚LTDA$04ƒ=$FFFFFF†MVME400withbaseaddressjumpers(????)portAC‚LTDA$05ƒ=$FFFFFF†MVME400withbaseaddressjumpers(????)portBC‚LPDA$00ƒ=$F801E1†MVME410withbaseaddressjumpers(....)portAC‚LPDA$01ƒ=$F801E9†MVME410withbaseaddressjumpers(....)portB<‚LMTA$00ƒ=$F803E9†MVME435withbaseaddressjumpers(....)<‚LMTA$01ƒ=$F803A9†MVME435withbaseaddressjumpers(...J) ‚LWIN$00ƒ=$F800D3†RWIN1‚address‚LSAS$00ƒ=$F800F1†SASIƒaddress‚*‚*-‚IOBASE„=$F80000†BaseaddressofI/Ochannel‚*‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒSYSGENPARAMETERSFORTERMINALŠ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(TCP=TERMINALCONFIG.PARAMETERS)…** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*2‚TCP$RECƒ=80‹Widthofterminal(characters/line).-‚TCP$RSZƒ=24‹Depthofterminal(lines/page).C‚TCP$WTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.C‚TCP$RTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outaread.>‚TCP$XOFƒ=$17ŠXOFFchar;whenreceived,suspendstransmission ‚*˜(0=none).?‚TCP$XONƒ=0ŒXONchar;whenreceived,cancelsapriorXOFFchar‚*˜(0=anychar).@‚TCP$BRCƒ=$03ŠChartobeinterpretedlikeabreakwhenreceived ‚*˜(0=none).<‚TCP$DOPƒ=$0FŠCharwhichcausesoutputtobediscardedwhen‚*˜received(0=none).:‚TCP$RLNƒ=$13ŠCharwhichcauseslinetobereprintedwhen‚*˜received(0=none).A‚TCP$CLCƒ=$18ŠCharwhichcauseslinetobedeletedwhenreceived ‚*˜(0=none)./‚TCP$RTVƒ=$0DDE0000„Readterminators(CR,$DE).0‚TCP$EOLƒ=$0D0A0000„Endoflinestring(CR,LF).<‚TCP$BRTƒ=$0EŠBaudratecode($0E=9600baud).‚Thefollowing1‚*˜codesmaybeusedtoindicatethedesiredbaud‚*˜rate:*‚*˜Code‚RateƒCodeRateƒCodeRateƒCodeRate#‚*˜$00ƒ50…$05‚300„$09‚2000ƒ$0E‚9600$‚*˜$01ƒ75…$06‚600„$0A‚2400ƒ$0F‚19200$‚*˜$02ƒ110„$07‚1200ƒ$0C‚4800ƒ$10-$FF'‚*˜$03ƒ134.5‚$08‚1800ƒ$0D‚7200ƒReserved?‚TCP$NLSƒ=0Œ#ofASCIINULchar'stosendaftereachCRorLF.+‚TCP$TRCƒ=$00ŠTerminatorclass($0X=none)..‚TCP$TTPƒ=$00ŠTerminaltype(0=EXORterm155).J‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.>‚TCP$HCPY‚=0Œ1meanstheterminalisahardcopydevice,nota‚*˜CRT.8‚TCP$XCTL‚=0Œ1meansuseXON/XOFFtocontrolterminal's‚*˜transmission,notCTS.@‚TCP$BITS‚=0Œ1meanstransmit&receive7bits/charratherthan‚*˜8.<‚TCP$STPB‚=0Œ1meansfolloweachcharsentwith2stopbits‚*˜ratherthan1.=‚TCP$USEP‚=0Œ1meansparityshouldbecheckedandgenerated.<‚TCP$PRTY‚=0Œ1meansparity(ifused)shouldbeevenrather ‚*˜thanodd.<‚TCP$ECHO‚=0Œ1meansthedrivershouldnotechocharacters.@‚TCP$TAHD‚=0Œ1meansthetype-aheadfeatureshouldnotbeused.9‚TCP$TFUL‚=1Œ1meansfillingthebufferonareadshould‚*˜terminatetheread.>‚TCP$PNUL‚=0Œ1meansNULchar'sshouldbeconsidereddatafor‚*˜imagereads.7‚TCP$MODM‚=0Œ1meanstheportisconnectedtoamodem.9‚TCP$OFFH‚=0Œ1meanstheport,ifconnectedtomodem,is ‚*˜offhook.‚*L‚***************************************************************************'‚*†NOTEonhowtomodifyasingleport:‚*<‚*†Firstduplicatealltheparametersthataretochangefor<‚*†thisparticularport(e.g.TCP$BRT).‚Modifytheduplicate=‚*†labelssothattheybecomeunique.‚Onetechniqueistoput9‚*†theportnumberattheendofthelabel(e.g.forCN12;‚*†TCP$BRTbecomesTCP$BRT2andTCP$BITSbecomesTCP$BIT2).8‚*†Rememberthatthelabelmustnotexceed8characters!;‚*†Changetheparametertothedesiredvalue(e.g.toseta5‚*†300baudrateforanon-EXORtermterminalonCN12,$‚*†TCP$BRT2=$0 5andTCP$TTP2=1).‚*4‚*†Nowsubstitutethesenewparametersintothefile6‚*†VM02.IOC.AGfortheCRTDCBmacrodefiningtheport.+‚*†Tocontinuethebaudrateexampleabove:?‚*ˆTCP$ATWSET\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3=‚*ˆTCP$ATWSETTCP$ATW+\TCP$USEP<<4+\TCP$PRTY<<5+\TCP$ECHO<<6=‚*ˆTCP$ATWSETTCP$ATW+\TCP$TAHD<<7+\TCP$TFUL<<8+\TCP$PNUL<<9$‚*ˆTCP$ATWSETTCP$ATW+\TCP$MODM<<10=‚*‰CRTDCB'CN12',IOSID,IOSESS,$133,31,1,'COM1',2,$047C,$5803,‚*©~~:‚*ˆ&ƒTCP$ATW,\TCP$REC,\TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,;‚*ˆ&ƒ\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,\TCP$CLC,\TCP$RTV,2‚*ˆ&„TCP$EQL,TCP$BRT2,\TCP$NLS,\TCP$TRC,TCP$TTP2‚*•~~~~~~~~~“~~~~~~~~~4‚*†where~~~~~~underlinestheCRTDCBmodifications.‚*>‚*†Thissametechniquemaybeusedwiththeprinterparameters<‚*†bymodifyingthePCP$xxxlabelsandsubstitutingintothe=‚*†PRTDCBmacro.‚Itmayalsobeusedwiththediskparameters=‚*†bymodifyingtheappropriatelabelsbelowandsubstituting‚*†intotheDSKDCBmacro.‚*L‚***************************************************************************‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**(‚MSG‰**ƒSYSGENPARAMETERSFORPRINTER‹**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**-‚MSG‰**ƒ(PCP=PRINTER‚CONFIG.PARAMETERS)…** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*A‚PCP$RECƒ=132ŠWidthofprinter‚(characters/physicalprintline).,‚PCP$RSZƒ=66‹Depthofprinter‚(lines/page).B‚PCP$WTOƒ=120000‡(2minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.6‚PCP$LRLƒ=132ŠLogicallinelength<=widthofprinter<‚PCP$EOLƒ=$0A0D0000„Endoflinestring(LF,CR).(MCCMonly)$‚PCP$ELCƒ=$0DŠEndoflinecharacterJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.9‚PCP$LNFD‚=0Œ1meanstheprintersupportsautolinefeed5‚PCP$AFFƒ=0Œ1meanssupressauto-formfeedonassign>‚PCP$TLRL‚=0Œ0meanswrap-aroundprintiflogicallinelength3‚*˜exceeded.‚1meanstruncateprintatlogicalline ‚*˜length.‚MSG‰8‚MSG‰*************************************************** ‚MSG‰**¯**%‚MSG‰**ƒSYSGENPARAMETERSFORDISK’**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES‰**0‚MSG‰**ƒ(DCP=DISKCONFIGURATIONPARAMETERS)‡**5‚MSG‰**ƒ(VCP=VM22DiskConfigurationParameters)‚** ‚MSG‰**¯**/‚MSG‰**ƒSomevaluesarenotusedbyalldiskˆ**-‚MSG‰**ƒdrivers.‚Thatiscontrolledbythe‰**-‚MSG‰**ƒattributesmaskandtheparametersŠ**,‚MSG‰**ƒmask;however,eachparameterand‹**0‚MSG‰**ƒattributeisspecifiedtoallowdisks‡**0‚MSG‰**ƒtobeinterchangedbetweencontroller‡**‚MSG‰**ƒboards.¥**-‚MSG‰**ƒEachcontrollerboarddrivercaresŠ**3‚MSG‰**ƒaboutdifferentdevice/mediaattributes.„** ‚MSG‰**¯**8‚MSG‰***************************************************‚MSG‰‚*&‚DCP$WTOƒ=0ŒWriteTimeout-alldisks%‚DCP$RTOƒ=0ŒRead‚Timeout-alldisks?‚DCP$HBPS‚=256Š#ofVERSAdosbytespersector-allharddisksA‚DCP$FBPS‚=256Š#ofVERSAdosbytespersector-allfloppydisks>‚DCP$HSPT‚=064ŠNumberofsector'spertrackforharddisk-IPC@‚DCP$FSPT‚=026ŠNumberofsector'spertrackforfloppydisk-IPC0‚DCP$HTNS‚=0ŒHard-totalnumberofsectors-IPC2‚DCP$FTNS‚=0ŒFloppy-totalnumberofsectors-IPC(‚DCP$HNOH‚=0ŒHardƒ-numberofheads-IPC*‚DCP$FNOH‚=2ŒFloppy-numberofheads-IPC)‚DCP$HNOT‚=0ŒHardƒ-numberoftracks-IPC,‚DCP$FNOT‚=77‹Floppy-numberoftracks-IPC*‚DCP$HILF‚=0ŒHardƒ-interleavefactor-IPC,‚DCP$FILF‚=1ŒFloppy-interleavefactor-IPC&‚DCP$HSPL‚=0ŒHardƒ-spiraloffset-IPC(‚DCP$FSPL‚=0ŒFloppy-spiraloffset-IPCJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.3‚DCP$NONE‚=0ŒdeviceattributesforIPCdiskdriver‚*5‚*CONFIGURATIONINFORMATIONFORVM22DISKCONTROLLER‚*†Hardandfloppydisks:4‚*†ThevaluesgivenforthehardareforCMDdrives.1‚*†Refertoyourdiskdrivemanualifyouarenot‚*†usingthesetconfiguration.‚*†(H=Hard,R=Removable)8‚*†Thevaluesgivenforth efloppydisksarefor8inch,<‚*†single-sided,single-density,48TPIdisks.‚Refertoyour=‚*†diskdrivemanualifyouarenotusingthatconfiguration.‚*†(F=Floppy)‚*1‚VCP$HTNS‚=52672ˆtotal#ofsectors-fixeddisk+‚VCP$HSPT‚=64‹#sectors/track-fixeddisk"‚VCP$HHDS‚=1Œ#heads-fixeddisk4‚VCP$HTRK‚=823Š#ofcylindersonmedia-fixeddisk,‚VCP$HILV‚=1Œinterleavefactor-fixeddisk(‚VCP$HSOF‚=0Œspiraloffset-fixeddisk:‚VCP$HPSM‚=256Šphysicalsectorsizeofmedia-fixeddisk9‚VCP$HSHD‚=16‹startingheadnumberondrive-fixeddisk4‚VCP$HTRD‚=823Š#ofcylindersondrive-fixeddisk1‚VCP$HCOM‚=0Œpre-compensationvalue-fixeddisk@‚VCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-fixeddisk‚*7‚VCP$RSHD‚=0Œstartingheadnumberondrive-remvdisk‚*1‚VCP$FTNS‚=2002‰total#ofsectors-floppydisk,‚VCP$FSPT‚=26‹#sectors/track-floppydisk#‚VCP$FHDS‚=2Œ#heads-floppydisk4‚VCP$FTRK‚=77‹#ofcylindersonmedia-floppydisk-‚VCP$FILV‚=1Œinterleavefactor-floppydisk)‚VCP$FSOF‚=0Œspiraloffset-floppydisk;‚VCP$FPSM‚=128Šphysicalsectorsizeofmedia-floppydisk9‚VCP$FSHD‚=0Œstartingheadnumberondrive-floppydisk4‚VCP$FTRD‚=77‹#ofcylindersondrive-floppydisk3‚VCP$FCOM‚=38‹pre-compensationvalue-floppydiskA‚VCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk‚*/‚*‚Theattributesmaskandparametermaskdon't)‚*‚changeforharddisksorfloppydisks.‚*‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚FMencoding‚*‚48TPIonmedia‚*‚Single-sideddiskette‚*‚Motorolaformat‚*‚Floppydisk‚*‚48TPIondrive‚*‚8-inchdisk‚*-‚VCP$HATM‚=$0090ˆattributesmask-harddisk/‚VCP$FATM‚=$025Fˆattributesmask-floppydisk,‚VCP$PM„=$5FF3ˆparametersmask-bothkinds,‚VCP$HAWƒ=$0010ˆattributesword-harddisk.‚VCP$FAWƒ=$0200ˆattributesword-floppydisk‚*4‚*‚Theattributesmask(word)isdefinedasfollows:‚*=‚*ƒBit0:‚MFM(1)/FM(0)encodingmethodonmedia-floppydisk>‚*ƒBit1:‚96(1)/48(0)TPItrackdensityonmedia-floppydisk/‚*ƒBit2:‚Double(1)/single(0)sidedfloppydisk7‚*ƒBit3:‚IBM(1)/Motorola(0)mediaformat-floppydisk8‚*ƒBit4:‚Harddisk(1)/floppydisk(0)media-bothdisksA‚*ƒBit5:‚MFM(1)/FM(0)encodingcapabilityondrive-floppydisk=‚*ƒBit6:‚96(1)/48(0)TPItrackdensity-drive-floppydisk@‚*ƒBit7:‚Seekreq'dwithheadswitch(1)-SMDdrive-harddisk@‚*ƒBit8:‚Post-read(1)/Pre-write(0)precompensation-bothdisks5‚*ƒBit9:‚8inch(1)/5-1/4inch(0)media-floppydisk‚*‚*;‚*ConfigurationinformationforWinchesterDiskController‚*hardandfloppydisks.<‚*Refertoyourharddiskdrivemanualifyouarenotusing‚*thesetconfiguration.‚*=‚*Thesevaluesarefor51/4"harddisks(ST506compatible).<‚*Thefollowingparameterschangeforformatteddisksizes:6‚*‚5megabytedisks:WCP$HTNS=19584ƒandƒWCP$HHDS=27‚*10megabytedisks:WCP$HTNS=39168ƒandƒWCP$HHDS=47‚*15megabytedisks:WCP$HTNS=58752ƒandƒWCP$HHDS=6‚*=‚*ThevaluesgivenforthefloppydisksareforSA400‚51/4"<‚*doublesided,doubledensity,96TPIdisks.‚RefertoyourD‚*floppydiskdrivemanualifyouarenotusingthatconfiguration.‚*0‚WCP$HTNS‚=58752ˆtotal#ofsectors-harddisk1‚WCP$FTNS‚=2552‰total#ofsectors-floppydisk*‚WCP$HSPT‚=32‹#sectors/track-harddisk,‚WCP$FSPT‚=16‹#sectors/track-floppydisk!‚WCP$HHDS‚=6Œ#heads-harddisk#‚WCP$FHDS‚=2Œ#heads-floppydisk3‚WCP$HTRK‚=306Š#ofcylindersonmedia-harddisk4‚WCP$FTRK‚=80‹#ofcylindersonmedia-floppydisk+‚WCP$HILV‚=1Œinterleavefactor-harddisk-‚WCP$FILV‚=1Œinterleavefactor-floppydisk'‚WCP$HSOF‚=0Œspiraloffset-harddisk)‚WCP$FSOF‚=0Œspiraloffset-floppydisk9‚WCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚WCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚WCP$H SHD‚=0Œstartingheadnumberondrive-harddisk9‚WCP$FSHD‚=0Œstartingheadnumberondrive-floppydisk3‚WCP$HTRD‚=306Š#ofcylindersondrive-harddisk4‚WCP$FTRD‚=80‹#ofcylindersondrive-floppydisk2‚WCP$HCOM‚=153Špre-compensationvalue-harddisk3‚WCP$FCOM‚=40‹pre-compensationvalue-floppydisk?‚WCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚WCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk0‚WCP$HSRD‚=0Œsteppingrateofdrive-harddisk2‚WCP$FSRD‚=0Œsteppingrateofdrive-floppydisk?‚WCP$HRWC‚=0Œreducedwritecurrentcylindernumber-harddiskA‚WCP$FRWC‚=0Œreducedwritecurrentcylindernumber-floppydisk/‚WCP$HECC‚=0ŒECCdataburstlength-harddisk1‚WCP$FECC‚=0ŒECCdataburstlength-floppydisk‚*@‚*‚Theattributesword,attributesmaskandparametermaskdon't@‚*‚changeforharddisks.‚Theparametermaskandattributesmask>‚*‚don'tchangeforfloppydisks.‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMencoding ‚*‚96TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*-‚WCP$HATM‚=$0010ˆattributesmask-harddisk.‚WCP$FATM‚=$001Fˆattributesmask-flopydisk,‚WCP$PM„=$1AF3ˆparametersmask-bothkinds,‚WCP$HAWƒ=$0010ˆattributesword-harddisk.‚WCP$FAWƒ=$004Fˆattributesword-floppydisk‚*I‚*‚thefollowingflagsdefinetheattributeswordfortheWINcontroller:‚*E‚*WCP$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppy‚*˜diskE‚*WCP$FTDN‚=1(bit1)„96(1)/48(0)TPItrackdensity-media-floppy‚*˜disk<‚*WCP$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*WCP$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*WCP$HDSC‚=1(bit4)„harddisk"‚*WCP$FDSC‚=0(bit4)„floppydiskE‚*WCP$FTDD‚=1(bit6)„96(1)/48(0)TPItrackdensity-drive-floppy‚*˜disk7‚*WCP$FDSS‚=0(bit9)„8"(1)/5-1/4"(0)floppydisksize‚*E‚*‚ConfigurationinformationfortheSASIcontrollerboard(SA1403D).7‚*‚RefertoyourdiskdrivemanualifyouarenotusingA‚*‚thesetconfiguration.‚ThesevaluesareforSA1000fixeddisks‚*‚andSA800floppydisks.‚*0‚SCP$HTNS‚=32768ˆtotal#ofsectors-harddisk1‚SCP$FTNS‚=3991‰total#ofsectors-floppydisk*‚SCP$HSPT‚=32‹#sectors/track-harddisk,‚SCP$FSPT‚=26‹#sectors/track-floppydisk!‚SCP$HHDS‚=4Œ#heads-harddisk#‚SCP$FHDS‚=2Œ#heads-floppydisk3‚SCP$HTRK‚=256Š#ofcylindersonmedia-harddisk4‚SCP$FTRK‚=77‹#ofcylindersonmedia-floppydisk,‚SCP$HILV‚=16‹interleavefactor-harddisk.‚SCP$FILV‚=13‹interleavefactor-floppydisk'‚SCP$HSOF‚=0Œspiraloffset-harddisk)‚SCP$FSOF‚=0Œspiraloffset-floppydisk9‚SCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚SCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚SCP$HSHD‚=0Œstartingheadnumberofdrive-harddisk9‚SCP$FSHD‚=0Œstartingheadnumberofdrive-floppydisk3‚SCP$HTRD‚=256Š#ofcylindersondrive-harddisk4‚SCP$FTRD‚=77‹#ofcylindersondrive-floppydisk0‚SCP$HCOM‚=0Œpre-compensationvalue-harddisk2‚SCP$FCOM‚=0Œpre-compensationvalue-floppydisk?‚SCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚SCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk0‚SCP$HSRD‚=0Œsteppingrateofdrive-harddisk2‚SCP$FSRD‚=0Œsteppingrateofdrive-floppydisk?‚SCP$HRWC‚=0Œreducedwritecurrentcylindernumber-harddiskA‚SCP$FRWC‚=0Œreducedwritecurrentcylindernumber-floppydisk/‚SCP$HECC‚=0ŒECCdataburstlength-harddisk1‚SCP$FECC‚=0ŒECCdataburstlength-floppydisk‚*@‚*‚Theattributesword,attributesmaskandparametermaskdon't@‚*‚changeforharddisks.‚Theparametermaskandattributesmask>‚*‚don'tchangeforfloppydisks.‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMe ncoding ‚*‚48TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*'‚SCP$ATMƒ=$0015ˆattributesmask-both,‚SCP$PM„=$02F3ˆparametersmask-bothkinds-‚SCP$HAWƒ=$0210ˆattributesword-harddisks/‚SCP$FAWƒ=$020Dˆattributesword-floppydisks‚*7‚*‚thefollowingflagsarefortheSASIcontrollerdisk‚*E‚*SCP$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppy‚*˜diskE‚*SCP$FTDN‚=0(bit1)„96(1)/48(0)TPItrackdensity-media-floppy‚*˜disk<‚*SCP$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*SCP$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*SCP$HDSC‚=1(bit4)„harddisk"‚*SCP$FDSC‚=0(bit4)„floppydiskE‚*SCP$FTDD‚=0(bit6)„96(1)/48(0)TPItrackdensity-drive-floppy‚*˜disk7‚*SCP$FDSS‚=1(bit9)„8"(1)/5-1/4"(0)floppydisksize4‚MSG‰*********************************************** ‚MSG‰**«**/‚MSG‰**ƒSYSGENPARAMETERSFORMAGTAPEDRIVE„**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(MCP=MAGTAPECONFIG.PARAMETERS)…** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*;‚MCP$WTOƒ=5000‰WriteTimeout(5secondstowrite4Kbytes);‚MCP$RTOƒ=360000‡Read‚Timeout(6minutestoread4Kbytes,,‚*štosearchforafilemark,toreadablank&‚*štapetotheendoftape,torewind)6‚MCP$DENƒ=0ŒDensityselectedforwritefromloadpoint ‚*š0means1600bpi(PEdensity)!‚*š1means‚800bpi(NRZIdensity)6‚MCP$RDTƒ=3ŒNumberofreadtriesbeforeerrormessage1‚MCP$WRTƒ=3ŒNumberofwritetriesbeforeerasing:‚MCP$ERTƒ=1ŒNumberoftimestoerasebeforeerrormessage‚*<‚MCP$ATMƒ=$0002ˆBit1isrecognizedforaconfigurecommand9‚MCP$PM„=$00F0ˆDEN,RDT,WRT,ERTfieldsarerecognizedfor‚*šaconfigurecommand.‚* ‚MCP$AW„=$0000ˆBit0=RESERVED4‚*˜Bit1=1meansuserrequestsadensityforwrite2‚*˜Bit1=0meansuserdoesnotrequestadensity‚*‚MSG‰A‚MSG‰************************************************************7‚MSG‰**…Descriptiveinfoaboutthisoperatingsystem‡**A‚MSG‰************************************************************5‚SYSNAMEƒ="VERSAdos"ƒNameforthisoperatingsystem.:‚REVISION‚="REV04.30"‚Revisionofthisoperatingsystem.7‚TIMSLICƒ=2ŒNumberoftimerinterruptspertimeslice.>‚TIMINTVƒ=10‹Numberofmillisecondsbetweentimerinterrupts.A‚MEMEND1ƒ=$20000‡Endingaddrforon-board‚memorymustbe=this.2‚*˜Note:ForVM11-2(512k)RAMboardsetMEMEND2to#‚*ž$40000.Jumperboardaccordinly.E‚MEMEND3ƒ=$E0000‡Ceilingaddrforoff-boardmemory(mustbe‚MSG‰**ƒFHS--FileHandlingServices(trap#3servertask)ƒ**B‚MSG‰*************************************************************‚TASKˆFHS,.FHS‚STATE…='DORM' ‚SESSIONƒ=1‚PRIORITY‚=$D1‚FHSSTR„=*ŒFHS‚loadaddr.!‚FHSASR„=*+2ŠFHSASRentrypoint ‚*’FHSFOF ‚SUBSˆFHS.LG ‚LINKˆFHS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FHS‚MSG‰B‚MSG‰*************************************************************(‚MSG‰**ˆFMS--FileManagementSystem”**B‚MSG‰*************************************************************‚TASKˆFMS,.FMS‚STATE…='DORM'‚PRIORITY‚=$D0‚FMSSTR„=*ŒFMSloadaddr.!‚FMSASR„=*+2ŠFMSASRentrypoint ‚*’FMSFOF ‚SUBSˆFMS.LG ‚LINKˆFMS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FMS‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆEET--EntryExitTask›**B‚MSG‰*************************************************************‚TASKˆEET,&EET‚STATE…='READ' ‚SESSIONƒ=2‚PRIORITY‚=$C8‚EETSTR„=*ŒEETloadaddr. ‚*’EETFOF1%‚SUBSˆEET.LG,9995.&.EET.EQ,CMDLIST.AG'‚ASM‰EET.EQ/CMDLIST.AG,CMDLIST,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC ‚LINKˆEET.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰EET‚MSG‰B‚MSG‰*************************************************************.‚MSG‰**ˆLDR--Loader(trap#4servertask)Ž**B‚MSG‰*************************************************************‚TASKˆLDR,&LDR‚STATE…='READ'‚PRIORITY‚=$C8 ‚SESSIONƒ=4‚LDRSTR„=*ŒLDRloadaddr.‚SUBSˆNOMMU.LOADER.LG‚LINKˆNOMMU.LOADER.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚*’LDRFOF‚END‰LDR‚MSG‰@‚MSG‰***********************************************************‚MSG‰**ˆIOCOM&IOI¤**@‚MSG‰***********************************************************‚TASKˆIOI,.IOI‚STATE…='READ' ‚SESSIONƒ=1‚PRIORITY‚=$DA ‚IOCSTR„=*‚SUBSˆVM02.IOC.AG1‚ASM‰IODM.AG/VM02.IOC.AG,VM02.IOC.RO,\ASMLS;RZ=95 ‚*’IOIFOF1 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVM02.ASR.AG#‚ASM‰VM02.ASR.AG,VM02.ASR.RO,\ASMLS ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC.‚ASM‰VM02.OSLIST.AG,VM02.OSLIST.RO,\ASMLS;Z=95 ‚*’IOIFOF2 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVM02.IOI.LG‚LINKˆVM02.IOI.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚*’IOIFOF3‚END‰IOIE‚MSG‰*********************************** *****************************‚MSG‰*C‚MSG‰*‚SpecialI/OChannnelInitializerforProcessControlDrivers‚MSG‰*E‚MSG‰**************************************************************** ‚IFNEˆ\PCDRV…INCLUDE….&.IOCI.CI‚ENDC‚MSG‰@‚MSG‰***********************************************************%‚MSG‰**ˆINIT--SystemInitializer•**@‚MSG‰*********************************************************** ‚PROCESS…INIT ‚INTSTR„=*%‚SUBS…VM02.INITIO1.AG,VM02.INITIO2.AG‚SUBS…VM02.INT1.LG,VM02.INT2.LG-‚ASM†VM02.INITIO1.AG,VM02.INITIO1.RO,\ASMLS;R ‚IFEQ…\ASMLSW…=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VM02.INT1.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC‚=COPY„\LINK2TF,\LINK1TF;Y ‚IFNE…\NDAC1‰INCLUDEƒ.&.D605MEM.CI‚ENDC  ‚IFNE…\NACO‰INCLUDEƒ.&.D615MEM.CI‚ENDC ‚IFNE…\NDCO1‰INCLUDEƒ.&.D625MEM.CI‚ENDC ‚IFNE…\NVME610+\NVME620‰INCLUDEƒ.&.D610INT.CI‚ENDC-‚ASMVM02.INITIO2.AG,VM02.INITIO2.RO,\ASMLS;R ‚IFEQ…\ASMLSW‹=COPY…\ASMLS,\WORKLS;A‚ENDC‚SUBS…M68XXX.INITDAT.AG1‚ASM†M68XXX.INITDAT.AG,M68XXX.INITDAT.RO,\ASMLS;R ‚IFEQ…\ASMLSW†=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VM02.INT2.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC ‚*’INITFOF ‚END‰INIT@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚MSG‰*¹*)‚MSG‰*‹MAKESUBSTITUTIONSINVERSAPT.CFŽ*‚MSG‰*¹*@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚SUBSˆVM02.VERSAPT.CF‚MSG‰@‚MSG‰***********************************************************@‚MSG‰***********************************************************5‚MSG‰**‡"SYSGENCOMPLETIONPROCESSINGINPROGRESS"†**‚MSG‰**“Haveaniceday.”**@‚MSG‰***********************************************************@‚MSG‰*********************************************************** ‚END‰SYSGENééé=OPT -N=/**********************=/*VM02.SYSGEN.CF…*=/**********************=OPT K,NM=/***************************************************************************"=/*Chainfiletoperformsysgen¬*=/*É*=/*Callingsequence:·*=/*É*)=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5£*=/*É*7=/*„Notalloftheargumentsneedtobeenteredsince”*$=/*†theyeachhaveadefaultvalue¥*=/*É*6=/*„arg1-commandfilename(defaultstoSYSCMD.CD)•*=/*É*,=/*„arg2-Tempvolanduserno./BootfileŸ*9=/*Temp.vol.anduserno.defaultstovolumenameand‰*)=/*usernumberofcommandfile(arg1).—**=/*Bootfiledefaultsto'VERSADOS.SY'.˜*=/*É*=/*É*9=/*„arg3-Listdeviceorfilenameforsysgenmessages’*=/*(defaultstoSYSLIST.LS)¤*;=/*‹Iffilename-sysgenuses'.LS'asdefaultextension‰*=/*É*9=/*‡NOTE:Thefirstthreeargumentsarethesameasthe*4=/*threecommandlinefieldsusedininvokingtheŽ*=/*sysgenutilitydirectly.¤*=/*É*E=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')†*=/*É*5=/*„arg5-Listingdeviceorfile(Defaultsto#PR)–*A=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.*:=/*Allassemblylistingsandlinkmapswillbedirectedˆ*<=/*Tothespeci fieddeviceorfileusingthecopyutility†*>=/*withappendoption.‚SYSGEN.TFisusedasanintermediateƒ*7=/*filetocontaintheassemblyorlinklistoutput.‹*@=/*Duetorestrictionsinsysgenliteralsubstitutionprocess‚*8=/*thisfieldcannotcontainmorethan10characters.Š*M=/***************************************************************************=/*5=/* Insure that no more than 5 arguments are defined:=/*=/RX=\0 =/IF RX>5ƒ=OPT-N<ƒ=/*Error-chainfilestartedwithmorethan5arguments-5ƒ=/*ƒPleaserestart,theargumentdefinitionsfollow:ƒ=/*(ƒ=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5ƒ=/*6ƒ=/*„Notalloftheargumentsneedtobeenteredsince$ƒ=/*†theyeachhaveadefaultvalue.ƒ=/*8F$O,5ƒ=/*„arg1-commandfilename(defaultstoSYSCMD.CD)ƒ=/*+ƒ=/*„arg2-Tempvolanduserno./Bootfile8ƒ=/*Temp.vol.anduserno.defaultstovolumenameand(ƒ=/*usernumberofcommandfile(arg1).)ƒ=/*Bootfiledefaultsto'VERSADOS.SY'.ƒ=/*Gƒ=/&**Typecarriagereturnormoreinformation,'break'toterminate.ƒ=/*8ƒ=/*„arg3-Listdeviceorfilenameforsysgenmessagesƒ=/*(defaultstoSYSLIST.LS):ƒ=/*‹Iffilename-sysgenuses'.LS'asdefaultextensionƒ=/*8ƒ=/*‡NOTE:Thefirstthreeargumentsarethesameasthe3ƒ=/*threecommandlinefieldsusedininvokingtheƒ=/*sysgenutilitydirectly.ƒ=/*Dƒ=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')ƒ=/*4ƒ=/*„arg5-Listingdeviceorfile(Defaultsto#PR)Aƒ=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.9ƒ=/*Allassemblylistingsandlinkmapswillbedirected;ƒ=/*Tothespecifieddeviceorfileusingthecopyutility=ƒ=/*withappendoption.‚SYSGEN.TFisusedasanintermediate6ƒ=/*filetocontaintheassemblyorlinklistoutput.?ƒ=/*Duetorestrictionsinsysgenliteralsubstitutionprocess7ƒ=/*thisfieldcannotcontainmorethan10characters.ƒ=/*ƒ=END=/ENDIF=/*2=/* Force the definition of 5 exactly 5 arguments.=/* =/IF RX=0+ƒ=ARGSYSCMD.CD,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=1$ƒ=ARG\1,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=2&ƒ=ARG\1,\2,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=3ƒ=ARG\1,\2,\3,SINGLE-HARD,#PR=/ENDIF =/IF RX=4ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*8=/* We have 5 arguments - now default any null arguments=/*=/IFC \1ƒ=ARGSYSCMD.CD,\2,\3,\4,\5=/ENDIF=/*=/IFC \3ƒ=ARG\1,\2,SYSLIST.LS,\4,\5=/ENDIF=/*=/IFC \4ƒ=ARG\1,\2,\3,SINGLE-HARD,\5=/ENDIF=/*=/IFC \5ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*N=/* If arg5 is not #PR,#PR1,#PR2,#PR3,# or #NULL then treat as file and delete:=/*ƒsetswitch(arg6)to1forprinterdevice,0forfile.=/*0=ARG \1,\2,\3,\4,\5,0,#PR,#PR1,#PR2,#PR3,#,#NULL =/FOR 7,\0ƒ=/IFEQ"\5"\(RX)1†=ARG\1,\2,\3,\4,\5,1,#PR,#PR1,#PR2,#PR3,#,#NULLƒ=/ENDIF=/ENDFOR=/RX=\6 =/IF RX=0ƒ=DEL\5=/ENDIF=/*=/* Set switch (arg7) TO:=/*„01--‚SINGLE-HARD=/*=ARG \1,\2,\3,\4,\5,\6,10=/IFEQ "\4"SINGLE-HARDƒ=ARG\1,\2,\3,\4,\5,\6,01=/ENDIF=/*9=/* Abort chain if an invalid configuration was requested=/*=/RX=\7 =/IF RX=10ƒ=OPT-N3ƒ=/*‚\4isaninvalidconfiguration-(argument#4)8ƒ=/*…Theonlyvalidconfigurationis'SINGLE-HARD'which3ƒ=/*…isthedefault.Pleaserestartchainfilewithƒ=/*…correctparameters.ƒ=END=/ENDIF#=ARG \1,\2,\3,\4,\5,\6,\7,SYSGEN.TF=/*3=/* The argument list now looks like the following:=/* =/*ƒarg1ƒ-ƒNameofcommandfile.=/*0=/*ƒarg2ƒ-ƒTemporaryvolume/bootfile(ornull).=/*3=/*ƒarg3ƒ-ƒListdeviceorfileforsysgenmessages.=/*(=/*ƒarg4ƒ-ƒSystemconfigurationmnemonic=/*'SINGLE-HARD'=/*(seearg7)=/*@=/*ƒarg5ƒ-ƒLis tingfileordeviceforassembliesandlink-edits.4=/*SYSGEN.TFisthetemporaryfilewhichisusedin1=/*conjunctionwith=COPY;Atoproduceasingle=/*listingfile.=/*(seearg6)=/*=/*ƒarg6ƒ-ƒSwitch-"=/*0=‚arg5specifiesafilename=/*1=‚arg5specifiesadevice=/*(seearg5)=/*%=/*ƒarg7ƒ-ƒNumberconfigurationkey-%=/*01=‚signle-userharddisksystem=/*(seearg4)=/*8=/*ƒarg8ƒ-ƒSYSGEN.TFtemporaryfileforusewithcopyin+=/*creatinglistingfilespecifiedbyarg3=/*=/*9=/* Justify argument positions and invoke sysgen utility.=/*=ARG \5,\6,\7,\8,\1,\2,\3,\4=/*)=/* Turn off echo of sysgen command lines=OPT J=OPT -N=SYSGEN VM02.\5,\6,\7;T=350 =OPT -J,-N8=/**‚ApplyingpatchesfromXVERSAPT.CFtothebootfile.=/@ VM02.XVERSAPT.CFM=/***************************************************************************M=/***************************************************************************=/**=/**‚SysgenCompleted--=/**6=/**„Assemblyandlinklistingshavebeenoutputto\1=/**1=/**„Sysgencommandlistinghasbeenoutputto\7=/**M=/***************************************************************************M=/***************************************************************************=OPT -K=ENDééééééd1IOI ASREL'VM02 IOI SA „VERSAdos I/O Initialization System Task V 4.1 - 09/13/82×2pFMSDLEN pNOTASKS pNOCDCB pNODCBS pNOFCBS pIOCOML pIOCOMS pCCSEG pOSMTBL pNODVS pNOFATS pOSMEND pFHSASR pFMSASQ  pFMSASR pNOLPRT pIOSASR pNOVDTS pNOLTERM !@F3`F3$ IOSG((K3´@€.|*B#ü()2"|(J‘gH |)N1i!iG3Lé? Hè? (g (f(p=/*ƒcontainpatchestobeappliedtoVERSADOSafterthesysgen =/*ƒprocess.=/*=PATCH VERSADOS.SYH*---+----:----+----:----+----:----+----:----+----:----+----:----+----:--H*>----------------------------------------------------------------------O\IOSSTR*StartofIOSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FHSSTR*StartofFHSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FMSSTR*StartofFMSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\EETSTR*StartofEETH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\LDRSTR*StartofLDRH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\IOCSTR*StartofIOCH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\INTSTR*StartofINTH*<----------------------------------------------------------------------QUIT=/*!=/*†PATCHIPCDRVONLYIFITEXIST=/*=/RD = \TOTDSK+\NOMCCMS =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\IPCDRVRŽ*StartofIPCDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHVM22DRVONLYIFITEXIST=/*=/RD = \NOVM22 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\VM22DRV*StartofVM22DRVZ1c>H*<----------------------------------------------------------------------QUIT=/ENDIF=/*!=/*†PATCHPRTDRVONLYIFITEXIST=/*=/RD = \NOLPRT =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\PRTDRVRŽ*StartofPRTDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCSUPONLYIFITEXIST=/*=/RD = \NOTERM02 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCSUPŽ*StartofMPSCSUPH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCSPRONLYIFITEXIST=/*=/RD = \NOTERM40 =/IFRD‚>=0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCSPRŽ*StartofMPSCSPRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCDRVONLYIFITEXIST=/*=/RD = \NOTERM02+\NOTERM40 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCDRVŽ*StartofMPSCDRVH*<----------------------------------------------------------------------QUIT=/ENDI F=/*#=/*†PATCHMTADRVRONLYIFITEXISTS=/*=/RD = \TOTM435 =/IF RD <> 0=PATCH VERSADOS.SYG*>---------------------------------------------------------------------O\MTADRVRŽ*StartofMTADRVRG*<---------------------------------------------------------------------QUIT=/ENDIF=/*8=/* SYSTEM MUST BE RE-BOOTED FOR PATCHES TO TAKE EFFECT.=/*=ENDé PAGEO*********************************************************************************ˆIOC--DEFINEDCB'SANDCDB'S*&*ˆThemacrosusedaredefinedinIODM.*%*ˆ9/2/83„modifiedformagtapedriver4*ˆ11/10/83‚modifiedtouseIOCVECandIOCLVLequates&*’includesWinchesterandSASIdrivers*’magtapeatlevel1**O******************************************************************************* *@*‚ThissectionbecomesIOCOMS,whichisusedbyFMS,IOS,&FHS.*#IOCOM„IDNT†04,01‡I/OCOMMONSEGMENT SECTION 0 OPT MEX XDEF IOCOMS,IOCOML,CCSEG *1*‚Definethephysicaladdressesofdevicedrivers*‚usingtheSYSGENparameters.*PRT†EQU‡\PRTDRVRMSUP…EQU‡\MPSCSUPMSPR…EQU‡\MPSCSPRMPSC…EQU‡\MPSCDRVIPC†EQU‡\IPCDRVRVM22…EQU‡\VM22DRVMTA†EQU‡\MTADRVRWIN†EQU‡\WINDRVRSASI…EQU‡\SASIDRV PAGE*6*‚Hereareparametersdescribingthetablesandlists.*IOCOMS  DC.L 0 I/O sysgen options. ( DC.L DCQSTR Start address of DCQ space.&DC.LDCQENDEndƒaddressofDCQspace.DC.L0†Addressof1stDCQ. ( DC.L LUTSTR Start address of LUT space.&DC.LLUTENDEndƒaddressofLUTspace.DC.L0†Addressof1stLUT. ( DC.L DCBTBL Start address of DCB space.&DC.LDCBENDEndƒaddressofDCBspace. DC.L DCBTBL Address of 1st DCB.  DC.L 0 SEMAPHORE FLAG&DC.B'\SYSNAME'„OPERATINGSYSTEMI.D.DC.B'\REVISION'ƒANDƒREVISION( DC.L 0,0,0 TASK ID FOR UNCLAIMED BREAKS PAGEO********************************************************************************C*ˆStorageforDCQ'sandLUT's.‚Initiallythesetwolistsareempty.*O******************************************************************************* * *‚DCQspace.* DCQSTR EQU * DS.B 256*\DCQPGEDCQEND EQU *-1 * *‚LUTspace.* LUTSTR EQU * DS.B LUTBEG*\NOTASKS DS.B LUTSEG*\NOTASKS*(\MAXLU+1)LUTEND EQU *-1‰PAGEO**********************************************************************************ˆDefineDCB'sbasedonSYSGENparameters.* kVt,|9„0Œ0”-œ0¤:¬C´B¼@Ä5Ì<ÔAÜRäNìFôKüCO******************************************************************************* *DCBTBLEQU*‡ThisisthetopofDCBspace. &**************************************$*‚SETUPDCB'SFORLOCALTERMINALS‚*&************************************** CCRTDV„SET‚'CN00'„Firstlocalterminalis#CN00,nextis#CN01,etc.  IFGT \NOTERM02ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8& \WCP$FILV,\WCP$FSOF,\WCP$FPSM,\WCP$FSHD,\WCP$FTRD,\WCP$FCOM,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC‚IFGE‚\FDWIN-2*9*2NDFLOPPYDISKƒ#FDx3-8"singledensity,doublesided*DSKNMƒSETDSKNM+1WCP$FAW8 SET $0204WCP$FTNS SET 4004H DSKDCB DSKNM,IOSID,IOSESS,$1F,71,4,'WIND',3,\WCP$FATM,\WCP$PM,WCP$FAW8,L& \DCP$FBPS/2,WCP$FTNS,\DCP$WTO,\DCP$RTO,\WCP$FSPT+10,\WCP$FHDS,\WCP$FTRK-3,D& \WCP$FILV,\WCP$FSOF,\WCP$FPSM/2,\WCP$FSHD,\WCP$FTRD-3,\WCP$FCOM-2,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC ENDC** ‚IFNEƒ\NOSASI$*************************************¢**ƒSetupDCBsfordiskson‡**ƒMVME420-SA1403diskŠ* *ƒcontroller.*¢*$*************************************0DSKDVƒSETƒDSKDV+$100Bumpcontrollernumberby1‚IFGE\HDSASI-1**1STHARDDISK„#HDx0*DSKNMƒSET‚HDDV+DSKDV+$30G DSKDCB DSKNM,IOSID,IOSESS,$1F,75,4,'SASI',0,\SCP$ATM,\SCP$PM,\SCP$HAW,F& \DCP$HBPS,\SCP$HTNS,\DCP$WTO,\DCP$RTO,\SCP$HSPT,\SCP$HHDS,\SCP$HTRK,>& \SCP$HILV,\SCP$H SOF,\SCP$HPSM,\SCP$HSHD,\SCP$HTRD,\SCP$HCOM,)& \SCP$HPTD,\SCP$HSRD,\SCP$HRWC,\SCP$HECC‚ENDC‚IFGE‚\HDSASI-2**2NDHARDDISK„#HDx1*DSKNMƒSET‚DSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,75,4,'SASI',1,\SCP$ATM,\SCP$PM,\SCP$HAW,F& \DCP$HBPS,\SCP$HTNS,\DCP$WTO,\DCP$RTO,\SCP$HSPT,\SCP$HHDS,\SCP$HTRK,>& \SCP$HILV,\SCP$HSOF,\SCP$HPSM,\SCP$HSHD,\SCP$HTRD,\SCP$HCOM,)& \SCP$HPTD,\SCP$HSRD,\SCP$HRWC,\SCP$HECC‚ENDC‚IFGE‚\FDSASI-1**1STFLOPPYDISK„#FDx2*DSKNMƒSETFDDV+DSKDV+$32G DSKDCB DSKNM,IOSID,IOSESS,$1F,76,4,'SASI',2,\SCP$ATM,\SCP$PM,\SCP$FAW,F& \DCP$FBPS,\SCP$FTNS,\DCP$WTO,\DCP$RTO,\SCP$FSPT,\SCP$FHDS,\SCP$FTRK,>& \SCP$FILV,\SCP$FSOF,\SCP$FPSM,\SCP$FSHD,\SCP$FTRD,\SCP$FCOM,)& \SCP$FPTD,\SCP$FSRD,\SCP$FRWC,\SCP$FECC ENDC‚IFGE‚\FDSASI-2**2NDFLOPPYDISK…#FDx3*DSKNMƒSETDSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,76,4,'SASI',3,\SCP$ATM,\SCP$PM,\SCP$FAW,F& \DCP$FBPS,\SCP$FTNS,\DCP$WTO,\DCP$RTO,\SCP$FSPT,\SCP$FHDS,\SCP$FTRK,>& \SCP$FILV,\SCP$FSOF,\SCP$FPSM,\SCP$FSHD,\SCP$FTRD,\SCP$FCOM,)& \SCP$FPTD,\SCP$FSRD,\SCP$FRWC,\SCP$FECC ENDC ENDC* ‰PAGEE**********************************************************************ˆMAGTAPEDRIVERADDITIONC*******************************************************************IFNE…\TOTM435(*****************************************¦*$*‚SETUPDCB'SFORMAGTAPEDRIVER„**¦*(******************************************—FIRSTBOARD‰SECONDBOARD**FIRSTTRANSPORT‹MT00‘MT10*SECONDTRANSPORTŠMT01‘MT11*THIRDTRANSPORT‹MT02‘MT12*FOURTHTRANSPORTŠMT03‘MT13*….*….*….*EIGHTHTRANSPORTŠMT07‘MT17**MTA0DVƒSET‡$00003000‹__0_MTA1DVƒSET‡$00003100‹__1_MTDV…EQU‡$4D540000‹MT__ ‚IFNE‚\NOMTA0*%*ƒFIRSTTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTDV+MTA0DV+$30GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',0,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-1*&*ƒSECOND‚TAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',1,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-2*%*ƒTHIRDƒTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',2,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-3*&*ƒFOURTH‚TAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',3,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-4*%*ƒFIFTHƒTAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',4,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-5*%*ƒSIXTHƒTAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',5,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-6*'*ƒSEVENTHTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',6,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA0-7*&*ƒEIGHTH‚TAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',7,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFNE‚\NOMTA1*&*ƒFIRST‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTDV+MTA1DV+$30GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',0,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-1*'*ƒSECOND‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',1,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RT O,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-2*&*ƒTHIRDƒTAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',2,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-3*'*ƒFOURTH‚TAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',3,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-4*&*ƒFIFTHƒTAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',4,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-5*&*ƒSIXTHƒTAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',5,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-6*(*ƒSEVENTHTAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',6,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGT‚\NOMTA1-7*'*ƒEIGHTH‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',7,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC‚ENDC ‰PAGE5*****************************************************3*‚SETUPDCBFORNULLDEVICE;THISMUSTALWAYSBE‚*/*‚LASTSINCEITSPOINTERTONEXTISSETTO0.†*5***************************************************** LLUN: ‰DC.L†0‰ADDRESSNEXTDCBINLIST.‰DC.L†'NULL'„ASCIIIDENTIFICATIONFORTHISDCB‰DC.L†0‰DCQLIST‰DC.L†0,0‡DRIVERID/SESSION‰DC.L†0‰ADDRESSOFLUT‰DC.L†$FF‡DEVICEATTRIBUTES‰DC.W†0‰W/RPROTECTCODES‰DC.W†0‰DEVICEINUSEFLAG‰DC.L†0‰W/RCOUNT#‰DC.B…$FFˆDEVICEFLAG(DEVICECODE)#‰DC.B†1‰DEVICEFLAG(DEVICESTATUS)‰DC.L†0‰CHANNELID‰DC.B†0‰CHANNELDEVICENO.‰DC.B†0‰REQUESTOR'SPRIORITY‰DC.L†0‰CURRENTRECORDNO.1‰DS.B†IOSBLN„ROOMFORREQUESTOR'SPARAMETERBLOCK:‰DC.L†0‰LOGICALADDROFPARAMETERBLKINUSERMEMORYSPACE'‰DC.B†0‰CONFIGURATIONCOORDINATIONFLAG‰DC.B†0‰BREAKCOUNT$‰DC.L†0‰ADDRESSOFBREAKSERVICELUT‰DC.L†0‰BREAKSERVICEADDRESS>‰DC.L†0,0,0,0ƒBUFFERZONEBETWEENDEVICEINDEPENDENT/DEPENDENT)‰DC.B†IOSTLN„SPACEFORCONFIGURATIONINFO‰DCB.B…DCBLEN-(*-LLUN),0 (DCBENDEQU*-1…EndaddressofDCBspace.HIOCOML EQU (*-IOCOMS+255)/256*256 Get length of common segment (force to*§nextpageboundary). PAGE SECTION 1‰PAGEO*********************************************************************************‰CHANNELDATABLOCKS*O******************************************************************************* CCSEG EQU * ******‚LOCALPRINTERS IFGT \NOLPRT@ CDB 0,'CPRT',XTPRTL,254,PRT,0,\LPDA$00,7,\IOCVEC1,\IOCLVL1,$10,&ƒ0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOLPRT-1@ CDB 0,'CPR1',XTPRTL,254,PRT,0,\LPDA$01,7,\IOCVEC1,\IOCLVL1,$10,&ƒ0,0,0,0,0,0,0,0,0,0,0 ENDC ******‚LOCALTERMINALS  IFGT \NOTERM02I CDB $0011,'SUP1',0,254,MSUP,0,\LTDA$00,1,$43,4,$30,0,0,0,0,0,0,0,0,0,0,0N CDB $0009,'CMPS',XTS7A2,254,MPSC,'SUP1',\LTDA$00,1,$43,4,$30,0,0,0,0,0,0,0,0,& 0,0,0 ENDC  IFGT \NOTERM02-1N CDB $0009,'CMP1',XTS7B2,254,MPSC,'SUP1',\LTDA$01,1,$43,4,$30,0,0,0,0,0,0,0,0,& 0,0,0 ENDC IFGT‚\NOTERM40 @ CDB $0011,'SUP2',0,254,MSPR,0,\LTDA$02,1,\IOCVEC3,\IOCLVL3,$30,&„0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP2',XTS7AR,254,MPSC,'SUP2',\LTDA$02,1,\IOCVEC3,\IOCLVL3,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-1J CDB $0009,'CMP3',XTS7BR,254,MPSC,'SUP2',\LTDA$03,1,\IOCVEC3,\IOCLVL3,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-2@ CDB $0011,'SUP3',0,254,MSPR,0,\LTDA$04,1,\IOCVEC3,\IOCLVL3,$30,&„0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP4',XTS7AR,254,MPSC,'SUP3',\LTDA$04,1,\IOCVEC3,\IOCLVL3,$30,&„0,  0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-3J CDB $0009,'CMP5',XTS7BR,254,MPSC,'SUP3',\LTDA$05,1,\IOCVEC3,\IOCLVL3,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC ******‚MCCMCHANNELS  IFNE \NOTERM0+\NOPRT0O CDB 0,'COM1',XTMIPC,254,IPC,0,$FF1000,$1FF,$F7,4,$10,0,$181,$FF,$FF,$F,0,$183,&‚$FF,$FF,$F,0 ENDC  IFNE \NOTERM1+\NOPRT1O CDB 0,'COM2',XTMIPC,254,IPC,0,$FF1200,$1FF,$F6,4,$10,0,$181,$FF,$FF,$F,0,$183,&‚$FF,$FF,$F,0 ENDC  IFNE \NOTERM2+\NOPRT2O CDB 0,'COM3',XTMIPC,254,IPC,0,$FF1400,$1FF,$F5,4,$10,0,$181,$FF,$FF,$F,0,$183,&ƒ$FF,$FF,$F,0 ENDC  IFNE \NOTERM3+\NOPRT3O CDB 0,'COM4',XTMIPC,254,IPC,0,$FF1600,$1FF,$F4,4,$10,0,$181,$FF,$FF,$F,0,$183,&ƒ$FF,$FF,$F,0 ENDC $******‚HARDANDFLOPPYDISKCHANNELS %DEVADD SET $FEFE00 INIT. DEVICE ADDR. VECTNO SET $100 INIT. VECTOR NO. IFNE \HDUDC0+\FDUDC0DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CRD1',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC IFNE \NOFD0DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CFD1',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,4,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC  IFNE \HDUDC1+\FDUDC1DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CRD2',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC IFNE \NOFD1DEVADD SET DEVADD+$200VECTNO SET VECTNO-1L CDB 0,'CFD2',XTDIPC,254,IPC,0,DEVADD,$1FF,VECTNO,4,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC ******ƒVM22DISKCHANNELS IFGT‚\NOVM22DEVADD SET DEVADD+$200DEVM22 SET DEVADD+$101VECTNO SET VECTNO-1G CDB 0,'VM22',$12,254,VM22,0,DEVM22,1,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC IFGT‚\NOWIN@ CDB 0,'WIND',XTDWIN,254,WIN,0,\LWIN$00,1,\IOCVEC3,\IOCLVL3,$10,&„0,0,0,0,0,0,0,0,0,0,0 ENDC IFGT \NOSASIA CDB 0,'SASI',XTDSAS,254,SASI,0,\LSAS$00,1,\IOCVEC3,\IOCLVL3,$10,&ƒ0,0,0,0,0,0,0,0,0,0,0 ENDC ,*********************************************ª**ˆMAGTAPEDRIVER“**ˆCHANNELDATABLOCK**ª*,*********************************************$******ƒFIRSTADAPTERBOARD(MVME435)* IFGT‚\NOMTA0H CDB 0,'MTA0',XTM435,0,MTA,0,\LMTA$00,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC*%******‚SECONDADAPTERBOARD(MVME435)* IFGT‚\NOMTA1H CDB 0,'MTA1',XTM435,0,MTA,0,\LMTA$01,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC* ) DC.L 0 Link of 0 marks end of CDB chain.  END éé PAGE)ASR IDNT 11,11 ASR ADDRS. FOR I/O MODULES*8*ASR-FILE OF ASR ADDRESSES OF I/O MODULES-NEEDED FOR IOI* XDEF FMSASR,FHSASR,IOSASRFMSASR EQU \FMSASRFHSASR EQU \FHSASRIOSASR EQU \IOSASR ENDééé  éééé ‰XDEF†OSMTBL,FMSASQ‰XDEF†OSMEND,FMSDLEN‰XREF†FHSASR,IOSASR,FMSASR*-*ˆTABLEOFOPERATINGSYSTEMMODULETASKNAMES*‰NOLIST‰INCLUDEƒ9995.&.IOE.EQ‰INCLUDEƒ9995.&.TR1.EQ‰INCLUDEƒ9995.&.EXE.EQ‰INCLUDEƒ9995.&.NIO.EQ‰INCLUDEƒ9995.&.LV5.EQ‰INCLUDEƒ9995.&.FME.EQ‰INCLUDEƒ9995.&.FMI.EQ‰LIST SECTION 1OSMTBLƒDC.L…FHSIDŽFHSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+FHSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+FHSNLN‡QUEUELENGTH‰DC.L„FHSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…IOSIDŽIOSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+IOSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+IOSNLN‡QUEUELENGTH‰DC.L„IOSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED**‰DC.L…FMSIDŽFMSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRD‚ASQSTATUS'‰DC.B„EVTLEN+FHSNLN‡MAX.MESSAGELENGTHFMSASQƒDC.L„0QUEUELENGTH‰DC.L„FMSASRŽADDR.OFASR‰DC.W„0**‰DC.W„SGOPPAŽOPTIONS-LOG.ADDR=PHYS.ADDR.‰DC.W„SGATRW+SGATSS‡ATTRIBUTES‰DC.L„FMSDSEG.NAME‰DC.L„0LOGICALADDRESSFMSDLEN‚DC.L„0SEGMENTLENGTH**OSMENDƒEQU…*“ENDOFTABLE ‰END‡OSMTBLééé 9 PAGE*#*VALPAR VALIDATES SYSGEN PARAMETERSG*…FAILERRORISGENERATEDFOREACHPARAMETERTHATISNOTINVALIDRANGE:*ANY ERROR SHOULD MAKE OPERATOR ABORT SYSGEN SINCE FURTHER/*…SYSGENPROCESSINGASSUMESPARAMETERSAREGOOD*.*MAKE SURE TOTAL NUMBER OF TERMINALS IS SUM OF*…DIFFERENTTYPESOFTERMINALSH IFNE \TOTTERM-(\NOTERM02+\NOTERM40+\NOTERM0+\NOTERM1+\NOTERM2+\NOTERM3) FAIL 100 ENDC*MAKE SAME CHECK FOR PRINTERS7 IFNE \TOTPRT-(\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2+\NOPRT3) FAIL 10! 0 ENDC *MAKE SAME CHECK FOR DISK DRIVES(DSKCNT SET \HDSASI+\FDSASI+\HDWIN+\FDWINODSKCNT SET DSKCNT+\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1+\HDVM22+\FDVM22 IFNE \TOTDSK-DSKCNT FAIL 100 ENDC1*MAKE SURE NO. OF VM22'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \HDVM22+\FDVM22 CNT SET CNT+1 ENDC IFNE CNT-\NOVM22 FAIL 100 ENDC0*MAKE SURE NO. OF IPC'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOFD0 CNT SET CNT+1 ENDC IFNE \NOFD1 CNT SET CNT+1 ENDC IFNE \HDUDC0+\FDUDC0 CNT SET CNT+1 ENDC IFNE \HDUDC1+\FDUDC1 CNT SET CNT+1 ENDC IFNE CNT-\NOIPCS FAIL 100 ENDC1*MAKE SURE NO. OF MCCM'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOTERM0+\NOPRT0 CNT SET CNT+1 ENDC IFNE \NOTERM1+\NOPRT1 CNT SET CNT+1 ENDC IFNE \NOTERM2+\NOPRT2 CNT SET CNT+1 ENDC IFNE \NOTERM3+\NOPRT3 CNT SET CNT+1 ENDC IFNE CNT-\NOMCCMS FAIL 100 ENDC=*CAN'T HAVE MORE THAN 2 LOCAL PRINTER OR MORE THAN 1 PER MCCM IFGT \NOLPRT-2 FAIL 100 ENDC IFGT \NOPRT0-1 FAIL 100 ENDC IFGT \NOPRT1-1 FAIL 100 ENDC IFGT \NOPRT2-1 FAIL 100 ENDC IFGT \NOPRT3-1 FAIL 100 ENDC'*CAN'T HAVE MORE THAN 2 VM02 TERMINALS. IFGT \NOTERM02-2 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 MVME 400 TERMINALS. IFGT \NOTERM40-4 FAIL 100 ENDC**CAN'T HAVE MORE THAN 4 TERMINALS PER MCCM IFGT \NOTERM0-4 FAIL 100 ENDC IFGT \NOTERM1-4 FAIL 100 ENDC IFGT \NOTERM2-4 FAIL 100 ENDC IFGT \NOTERM3-4ct' FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER IPC IFGT \NOFD0-4 FAIL 100 ENDC IFGT \NOFD1-4 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 HARD DRIVES PER UDC IFGT \HDUDC0-4 FAIL 100 ENDC IFGT \HDUDC1-4 FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER UDC IFGT \FDUDC0-4 FAIL 100 ENDC IFGT \FDUDC1-4 FAIL 100 ENDC**IF NO MVME435, CAN'T HAVE ANY TAPE DRIVES IFEQ \TOTM435 ‚IFGT\NOMTAT ‚FAIL100‚ENDC ENDC/*CAN'T HAVE MORE THAN 8 TAPE DRIVES PER MVME435 IFGT \NOMTA0-8 FAIL 100 ENDC IFGT \NOMTA1-8 FAIL 100 ENDC9*CAN'T HAVE 0 OR MORE THAN 75 TASKS IN SYSTEM AT ONE TIME IFEQ \NOTASKS FAIL 100 ENDC IFGT \NOTASKS-75 FAIL 100 ENDC1*MAXIMUM LU CANNOT BE LESS THAN 8 OR MORE THAN 31 IFLT \MAXLU-8 FAIL 100 ENDC IFGT \MAXLU-31 FAIL 100 ENDC2*MAXIMUM LU CANNOT BE LESS THAN NO. OF DISK DRIVES IFLT \MAXLU-\TOTDSK FAIL 100 ENDCC*MAXIMUM NO. OF PAGES FOR DCQ,UST,GST,IOV, AND TRACE CANNOT BE 0 OR*…MORETHAN10 IFEQ \DCQPGE FAIL 100 ENDC IFGT \DCQPGE-10 FAIL 100 ENDC IFEQ \GST FAIL 100 ENDC IFGT \GST-10 FAIL 100 ENDC IFEQ \UST FAIL 100 ENDC IFGT \UST-10 FAIL 100 ENDC IFNE \TRCFLAG IFEQ \TRACE FAIL 100 ENDC ENDC IFNE \TRCFLAG IFGT \TRACE-10 FAIL 100 ENDC ENDC IFEQ \IOV FAIL 100 ENDC IFGT \IOV-10 FAIL 100 ENDCG*MAXIMUM NO. OF DIFFERENT FILES MUST BE .LE. MAXIMUM NO. OF TOTAL FILES IFGT \NODIFFIL-\NOFILES FAIL 100 ENDC2*MAXIMUM NO. OF FILES CANNOT BE 0 OR MORE THAN 200 IFEQ \NODIFFIL FAIL 100 ENDC IFGT \NODIFFIL-200 FAIL 100 ENDC IFEQ \NOFILES FAIL 100 ENDC IFGT \NOFILES-200 FAIL 100 ENDCG*MAXIMUM NO. OF DEFAULT VOLUMES CANNOT BE 0 OR MORE THAN NO. OF TASKS+3 IFEQ \NODEFVOL FAIL 100 ENDC IFGT \NODEFVOL-(\NOTASKS+3) FAIL 100 ENDCE*NUMBER OF DEFAULT VOLUMES MUST BE GREATER THAN OR EQUAL TO NUMBER OF*ƒLOGONTERMINALS IFGT \NOLOGONS-\NODEFVOL FAIL 100 ENDC**DEFAULT FAB SIZE CANNOT BE 0 MORE THAN 20 IFEQ \DEFFAB FAIL 100 ENDC IFGT \DEFFAB-20 FAIL 100 ENDC7*DEFAULT DB SIZE CANNOT BE LESS THAN 4 OR MORE THAN 255 IFGT \DEFDAT-255 FAIL 100!  ENDC IFLT \DEFDAT-4 FAIL 100 ENDC END éééééé=LINK ,IOI,\LINKLS;HAMIXSSEGMENT IOSG:0 \IOCSTRSEGMENT .IOI:1INPUT VM03.IOC.ROINPUT VM03.IOI.ROINPUT VM03.OSLIST.RO INPUT IXR.ROINPUT VM03.ASR.ROEND=ENDééééééé/ " ‚******************‚*VM03.SYSCMD.CD*M‚****************************************************************************‚*SYSGENCOMMANDFILE-´*?‚*ƒUSEINCONJUNCTIONWITHSYSGEN.CFOREXECUTEDIRECTLYWITH*‚*†THEFOLLOWINGARGUMENTS:¬*‚*Ê*@‚*†ARG1-LISTINGFILEORDEVICEFORASSEMBLIESANDLINKEDITS‰*‚*Ê*-‚*†ARG2-SWITCH--0=ARG1ISAFILENAMEœ*‚*—1=ARG1ISADEVICENAMEš*‚*Ê*8‚*†ARG3-CONFIGURATIONSWITCH--1=SINGLE-USERHARD‘*‚*Ê*@‚*†ARG4-WORKINGFILEFORUSEWITHCOPY;ATOPRODUCELISTING‰*‚*Ê*M‚**************************************************************************** ‚MSG‰SYSGENCOMMANDFILE +‚MSG‰SETSYSGENPARAMETERSFROMPASSEDARGS *‚ASMLSW„=\2‹*ASSEMBLYLISTINGFILESWITCH‚*”0=ASMLSISAFILE‚*”1=ASMLSISADEVICE'‚LINKLSWƒ=\2‹*LINKLISTINGFILESWITCH‚*”0=LINKLSISAFILE‚*”1=LINKLSISADEVICE  ‚IFEQˆ\ASMLSW$…ASMLS…="\4"‰*ASMLISTINGWORKFILE‚ENDC ‚IFNEˆ\ASMLSW!…ASMLS…="\1"‰*ASMLISTINGDEVICE‚ENDC ‚IFEQˆ\LINKLSW&…LINKLS„="\4"‰*LINKLISTINGWORKFILE‚ENDC‚IFNEˆ\LINKLSW#…LINKLS„="\1"‰*LINKLISTINGDEVICE‚ENDC +‚WORKLS„="\1"‰*OVERALLLISTINGFILE/DEVICE6‚LINK1TFƒ="INIT1.TF"ƒ*INTERMEDIATELINKFILEFORINIT6‚LINK2TFƒ="INIT2.TF"ƒ*INTERMEDIATELINKFILEFORINIT C‚MSG‰**************************************************************C‚MSG‰**************************************************************?‚MSG‰**„Systemgeneration(SYSGEN)commandfileforusersof‚**?‚MSG‰**„VERSAdosontheVMC68/2computer.‚Prepared5/01/82.**C‚MSG‰**************************************************************C‚MSG‰**************************************************************‚MSG‰C‚MSG‰**************************************************************(‚MSG‰**ˆParametersdescribingdevices•**C‚MSG‰**************************************************************B‚TOTTERMƒ=\NOTERM02+\NOTERM40+\NOTERM0+\NOTERM1+\NOTERM2+\NOTERM3(‚*˜Total#ofterminals(localandMCCM) 8<A<I=QKY.a*i:q-y/*‰0‘,™2¡(©1±-¹0ÁNÉTÑCÙTáWé1‚TOTPRT„=\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2+\NOPRT3(‚*˜Total#ofprinters(localandMCCM).B&TŠ=\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1+\HDVM22+\FDVM22+‚TOTDSK„=\&T+\HDWIN+\FDWIN+\HDSASI+\FDSASI+‚*˜floppydrivesandharddiskdrives.‚Each(‚*˜volumedefinedrequiresapproximately‚*˜2-1/4Kbytesofmemory.&‚NOIPCS„=2Œ#ofdiskIPC'sandUDC's.'‚NOVM22„=0Œ#ofVM22diskcontrollers.‚NOMCCMSƒ=0Œ#ofMCCM's.‚*5‚NOTERM02‚=2Œ#ofterminalsusingVM03serialports.9‚NOTERM40‚=0Œ#ofterminalsusingMVME400serialports. ‚NOLPRT„=1Œ#oflocalprinters. ‚NOLTERMƒ="\NOTERM02+\NOTERM40"0‚*˜TOTALnumberoflocalterminalforthesystem‚*‚*-‚HDUDC0„=2Œ#ofhardƒdiskdriveson1stUDC.-‚HDUDC1„=0Œ#ofhardƒdiskdriveson2ndUDC./‚FDUDC0„=2Œ#offloppydiskdriveson1stUDC./‚FDUDC1„=0Œ#offloppydiskdriveson2ndUDC.‚*:‚NOFD0…=2Œ#offloppydiskdriveson1stfloppydiskIPC.:‚NOFD1…=0Œ#offloppydiskdriveson2ndfloppydiskIPC.‚*+‚FDVM22„=0Œ#offloppydiskdrivesonVM22)‚HDVM22„=0Œ#ofhardƒdiskdrivesonVM22‚*(‚NOTERM0ƒ=0Œ#ofterminalson1stMCCM.&‚NOPRT0„=0Œ#ofprinters‚on1stMCCM.(‚NOTERM1ƒ=0Œ#ofterminalson2ndMCCM.&‚NOPRT1„=0Œ#ofprinters‚on2ndMCCM.(‚NOTERM2ƒ=0Œ#ofterminalson3rdMCCM.&‚NOPRT2„=0Œ#ofprinters‚on3rdMCCM.(‚NOTERM3ƒ=0Œ#ofterminalson4thMCCM.&‚NOPRT3„=0Œ#ofprinters‚on4thMCCM.‚*=‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRAD1…=0ŒNO.OFRADBOARDS‚NUSRRADƒ=0ŒNO.OFRADUSERS‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRADdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RADRV…=0‚*@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~" ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRIO†=0ŒNumberofRIOboards‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRIOdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RIODRVRƒ=0‚*A‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~#‚NDAC1…=0ŒNumberofMVME605boards;‚NUSRDACƒ=0ŒNumberofusers(total)fortheMVME605boards‚*"‚NACO†=0ŒNumberofMVME615boards;‚NUSRACOƒ=0ŒNumberofusers(total)fortheMVME615boards‚*‚*#‚NDCO1…=0ŒNumberofMVME625boards;‚NUSRDCOƒ=0ŒNumberofusers(total)fortheMVME625boards‚*‚*%‚NVME610=0ŽNumberofMVME610boards%‚NVME620=0ŽNumberofMVME620boards‚*‚*O*******************************************************************************>‚PCDRV…=0ŒIfnon-zeroincludespecialI/Ochannelinitializer2‚*˜forProcessControlDriversinusernumber9992‚*‚*‚*,‚NOWIN…=0Œ#ofWinchestercontrollerboards9‚HDWIN…=0Œ#ofharddiskdrivesonWinchestercontroller;‚FDWIN…=0Œ#offloppydiskdrivesonWinchestercontroller‚*1‚NOSASI„=0Œ#ofSASIinterfacecontrollerboards)‚HDSASI„=0Œ#ofharddiskdrivesonSASI+‚FDSASI„=0Œ#offloppydiskdrivesonSASI‚*5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~F‚*†IFtheMAGTAPEdriverIStoBEusedYOUmustMERGEfileMTALDPNT.SA‚*†intoVM03.INITIO1.AG5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:‚*********************************************************‚*·*‚*ˆMAGTAPEDRIVER *‚*ˆNOTESONBOARDJUMPERING—*‚*·*:‚*********************************************************‚*‚*‚*ˆINTERRUPTLEVEL‚*7‚*ˆThechanneldatablockisconfiguredforI/Ochannel3‚*ˆinterruptlevel1inIOC.AG.‚Pleasebesurethat3‚*ˆyourboardisjumperedforthisinterruptlevel,4‚*ˆasdescribedintheMVME435magnetictapeadapter ‚*ˆmanual.‚*8‚*ˆAsdescribedintheMVME435manual,tohavea‚level18‚*ˆinterrupt,thejumperonJ2mustbeplacedtoconnect‚*ˆpins7-8asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+----+|‚8 ‚*’+--------+‚*‚*‚*ˆADDRESS‚ONI/OCHANNEL‚*7‚*ˆThechanneldatablockisconfiguredforI/Ochannel<‚*ˆaddressesLMTA$00=(I/Ochannel‚baseaddress)+$3E9and/‚*ˆLMTA$01=(I/Ochannelbaseaddress)+$3A9.5‚*ˆPleasebesurethatyourboard(s)is(are)jumpered‚*ˆforoneoftheseaddresses.‚*@‚*ˆTohaveaboardaddressof(I/Ochannelbaseaddress)+$3E9,)‚*ˆremovealljumpersfromJ3asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+„+|‚8 ‚*’+--------+‚*‚*‚*@‚*ˆTohaveaboardaddressof(I/Ochannel‚baseaddress)+$3A9,%‚*ˆconnect‚pins7-8onJ3asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+----+|‚8 ‚*’+--------+‚*‚*‚*‚*‚*‚*8‚TOTM435ƒ=0ŒTotal#ofmagtapeMVME435adapterboards.‚*3‚NOMTA0„=0Œ#oftapedrivesonfirstMVME435‚board4‚NOMTA1„=0Œ#oftapedrivesonsecondMVME435‚boardD‚NOMTAT„=\NOMTA0+\NOMTA1‚Totalnumberoftapedrivesforthesystem‚MSG‰C‚MSG‰**************************************************************-‚MSG‰**ˆParametersabouttablesizes,etc.**C‚MSG‰**************************************************************2‚PAGESIZE‚=256ŒSizeinbytesofapageofmemory.‚ASN‡=127Œ#ofaddressspaces.4‚DCQPGE„=2ŒNumberofpagesofmemoryforthedevice-‚*˜connectionqueue(DCQ).‚Minimumof1page,*‚*˜maximumof10pages.‚TheDCQisusedto/‚*˜saveconcurrentrequeststothesamefileor.‚*˜device.‚EachpageoftheDCQcanaccomodate‚*˜approximately9entries.‚*1‚GST‡=2ŒNumberofpagesinglobalsegmenttable.-‚*˜Minumumof1,maximumof10.‚Eachpagecan'‚*˜accomodateap# proximately14entries.‚*5‚UST‡=2ŒNumberofpagesintheusersemaphoretable.-‚*˜Minimumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately11entries.‚*8‚TRACE…=0ŒNumberofpagesintracetable.‚TRACEmustbe/‚*˜nonzeroifTRCFLAGisnonzero.‚Eachpagecan'‚*˜accomodateapproximately10entries.‚*2‚UDR‡=1ŒNumberofpagesinuser-defineddirective0‚*˜table,minimumof0,maximumof10.‚Eachpage+‚*˜canaccomodateapproximately25entries.‚*7‚IOV‡=1ŒNumberofpagesinI/Ovectortable.‚Eachpage3‚*˜canaccomodateapproximately12entries.‚Minimum!‚*˜sizeis1,maximumsizeis10.‚*@‚PAT‡=(\NOLOGONS*32*2+16+(\PAGESIZE-1))/\PAGESIZE#ofpagesin3‚*˜periodicactivationtable.‚Eachpagecanaccomo-3‚*˜dateapproximately8entries.‚PATsizeis\PAT.‚*<‚NOTASKSƒ=10‹Maximumnumberoftasksinsystematonetime.-‚*˜VERSAdoscontainsamaximumof11resident)‚*˜tasks.‚Allowingforthatplusfourfor/‚*˜eachterminalwillaccomodatemostrequests.<‚MAXLU…=08‹Maximumlogicalunitnumberthatcanbeassigned/‚*˜foreachtaskinthesystem.‚Limitis31and.‚*˜minumumis8.‚MAXLUmustbegreaterthanor2‚*˜equaltoTOTDSK.‚MAXLUandNOTASKdeterminethe1‚*˜amountofmemoryrequiredforthelogicalunit1‚*˜table(LUT).‚Thealgorithmfordeterminingthe!‚*˜sizeoftheLUTisasfollows:'‚*˜LUT=16*NOTASKS+8*NOTASKS*(MAXLU+1),‚*˜Theremustbea1LUforeachdiskvolume,‚*˜(FMSassignsadifferentlogicalunitfor,‚*˜eachdisk.)‚ThismeansthatMAXLUmustbe#‚*˜greaterthanorequaltoTOTDSK.‚IFGTˆ\TOTDSK-\MAXLU!…MSG‰SYSGENparametersizeerror.3…MSG‰MAXLUmustbegreaterthanorequaltoTOTDSK.9…MSG‰Inthissysgen,MAXLU=\MAXLUandTOTDSK=\TOTDSK.5…MSG‰Pleaseadjustparametersandstartsysgenagain.‚ENDC;‚NOFILESƒ=12‹Maximumnumberoffilesthatcanbeopenedin(‚*˜thesystematonetime.‚Limitof200.9‚NODIFFIL‚=12‹MaximumnumberDIFFERENTfilesthatcanbe-‚*˜openedatonetime.‚Cannotbegreaterthan,‚*˜NOFILES.‚Foreverythreedifferentfiles,,‚*˜approximately1Kofmemoryisrequired.‚A&‚*˜rationof5filesforeachterminal‚*˜accomodatesmostrequests.;‚NODEFVOL‚=8ŒMaximumnumberofdefaultvolumesthatcanbe-‚*˜defined.‚CannotbegreaterthanNOTASKS+3.9‚DEFFAB„=1ŒDefaultFileAllocationBlock(FAB)lengthin/‚*˜sectors(256bytespersector).‚Usedbyfile-‚*˜handlerwhennoFABsizeisgiven.‚Minimum!‚*˜sizeis1,maximumsizeis20.;‚DEFDAT„=4ŒDefaultdatablocklengthinsectors(256bytes1‚*˜persector).‚Usedbyfilehandlerwhennodata/‚*˜blocksizeisgivenatfileallocationtime.*‚*˜Minumumsizeis4,maximumsizeis255.‚MSG‰C‚MSG‰**************************************************************‚MSG‰**ˆEETEQUvalues¥**C‚MSG‰**************************************************************>‚DEFAULTƒ="SYS:0.&"„*Systemdefaultvolume:usernumber.catalog<‚TERMOCNT‚=2Œ*No.ofterminaloutputtimeoutsbeforelogoff7‚SECURITY‚=1ŒSwitchtoindicateifsecuritypackageis-‚*˜supported.‚Valueofzeroexcludespackage,-‚*˜nonzeroincludesit.‚Thispackagerequires‚*˜approximately1Kofmemory.<‚SPCCMD„=1ŒSwitchtoindicateifthefollowingusersession0‚*˜managementcommandsaresupported:‚HELP,CLOSE0‚*˜ASSIGN,NEWS.‚Valueofzeroexcludescommands./‚*˜Thispackagerequiresapproximately1/2Kof ‚*˜memory.>‚CHAINBAT‚=1ŒSwitchtoindicateifchainandbatchprocessing2‚*˜aresupported.‚Valueofzeroexcludesbatchand.‚*˜chain;non-zeroincludesthem.‚Thispackage+‚*˜requiresapproximately3-1/2Kofmemory.9‚CONBATCH‚=1ŒNumberofconcurrentbatchjobsthatcanbe(‚*˜running.‚CannotbemorethanNOTASKS.<‚BATCHPGE‚=2ŒNo.ofpagesforbatchjobqueueing.‚Eachpage0‚*˜accomodates32entries.‚Inaddition,thereis+‚*˜spacefor31entriesminusthenumberof‚*˜terminalsinthesystem.=‚BATDLY„=16000ˆ*delayinmsinbatchbetweenreloadattempts=‚NOLOGONƒ=3ŒMaxmimumnumberofinvalidlogonattemptsbefore‚*# ˜beingrejected.B‚NOLOGONS‚=\TOTTERM…#ofterminalsallowedtologoninthesystem,‚LOGMSG1ƒ="VERSAdosV"Logonmessagepart1)‚LOGMSG2ƒ="ERSION"„Logonmessagepart2(‚REVNUMBR‚="4.3"†Logonmessagepart3‚*2‚*˜REVNUMBRisuseddynamicallyinCMDLISTaspart*‚*¡ofthelogonmessage.Ifthisvalueis'‚*¡changedthen'REVISION'inthisfile)‚*¡shouldbechangedtomatchthedynamic ‚*¡value.‚*B‚AUTOTERM‚='CN00'‡TerminalIDofdeviceautologonistooccuron‚AUTOLOGN‚=1ŒBit0:‚*›0-->Autobreakinactive‚*›1-->Autobreakactive ‚*˜Bit1:‚*›0-->Autologoninactive‚*›1-->Autologonactive‚*‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**‰Vectornumbers£**C‚MSG‰**************************************************************.‚IOCVEC1ƒ=$49ŠI/Ochannelinterrupt1vector..‚IOCVEC2ƒ=$4AŠI/Ochannelinterrupt2vector..‚IOCVEC3ƒ=$4BŠI/Ochannelinterrupt3vector..‚IOCVEC4ƒ=$4CŠI/Ochannelinterrupt4vector.*+‚IOCLVL1ƒ=‚3‹I/Ochannelinterrupt1level.+‚IOCLVL2ƒ=‚4‹I/Ochannelinterrupt2level.+‚IOCLVL3ƒ=‚5‹I/Ochannelinterrupt3level.+‚IOCLVL4ƒ=‚6‹I/Ochannelinterrupt4level. 2‚SERPTS„=$43ŠSerialport(7201)interruptvector.‚*‚MSG‰C‚MSG‰**************************************************************#‚MSG‰**ˆAddressesoftimer,etc.š**C‚MSG‰**************************************************************‚MMU‡=$F80000†AddressofMMU."‚TIMER…=$F80081†Addressoftimer.6‚CLOCKFRQ‚=0800‰Numberofclocktickspermillisecond#‚PANEL…=$0‹Addressoffrontpanel.@‚BUGTRACƒ=$F000BC†Addressoffirmwaredebugger'straceroutine.6‚TRCFLAGƒ=0ŒTraceflag.‚Zeroimpliesdon'ttrace.‚The0‚*˜settingofbitsintheTRCFLAGparameterwill2‚*˜controlwhicheventscauseanentrytobebuilt‚*˜inthetracetable.‚*˜Bit#inTRCFLAG†Event ‚*›15‘TRAP#1‚*›14‘I/Ointerruptnotclaimed‚*°byusertask.‚*›13‘Timerinterrupt.‚*›12‘Usertrap(2-15)‚*›11‘Exception‚*›10‘Dispatch‚*œ9‘I/Ointerruptclaimedby ‚*°usertask‚*œ8‘ReturnfromLOADMMU‚*œ7‘Simulatedinterrupt‚*œ6‘SYSFAILinterrupt.>‚HOGMODEƒ=0ŒSpecifieswhetherornotyouwanttheVM03tohog3‚*˜theVERSAbus(whichallowsittorunfasterwhen4‚*˜accessingtheVERSAbus).‚ThismayONLYbeusedif4‚*˜therearenoothercardsinthesystemcapableof+‚*˜becomingbusmaster!‚Ifindoubt,use0.‚*š0=don'thogthebus.1‚*š1=hogthebus(nootherintelligentboards).@‚SYSFAIL=0ŽDetermineswhetherornottheoperatingsystemwill6‚*˜beinterruptedwhenSYSFAILisassertedonthebus.3‚*˜SomeintelligentboardswillassertSYSFAILwhen1‚*˜theyexperienceafailureofsomekind.‚Ifyou6‚*˜havesuchboardsinthesystem,ANDTHEDRIVERSFOR4‚*˜THESEBOARDSHAVESYSFAILHANDLERS,thenyouwill3‚*˜probablywantSYSFAILinterruptsenabled.‚Ifthe5‚*˜appropriateSYSFAILhandlersarenotwritten,then6‚*˜takingaSYSFAILinterruptwillhangupthesystem,1‚*˜soyouwouldwantSYSFAILinterruptsdisabled."‚*š0=disableSYSFAILinterrupts.!‚*š1=‚enableSYSFAILinterrupts.‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**2‚MSG‰**ƒLOCALTERMINAL/PRINTERDEVICEADDRESSES**+‚MSG‰**ƒMAGTAPEADAPTERBOARDADDRESSESˆ** ‚MSG‰**«**0‚MSG‰**ƒBaseAddressJumpers:‚'.'=nojumper‚**‚MSG‰**š'J'=jumper…**4‚MSG‰***********************************************‚MSG‰‚LTDA$00ƒ=$F80065†VM03portA‚LTDA$01ƒ=$F80067†VM03portBC‚LTDA$02ƒ=$FA01CD†MVME400withbaseaddressjumpers(...J)portAC‚LTDA$03ƒ=$FA01CF†MVME400withbaseaddressjumpers(...J)portBC‚LTDA$04ƒ=$FFFFFF†MVME400withbaseaddressjumpers(????)portAC‚LTDA$05ƒ=$FFFFFF†MVME400withbaseaddressjumpers(????)portBC‚LPDA$00ƒ=$FA01E1†MVME410withbaseaddressjumpers(....)portAC‚LPDA$01ƒ=$FA01E9†MVME410withbaseaddressjumpers(....)portB<‚LMTA$00ƒ=$FA03E9†MVME435withbaseaddressjumpers(....)<‚LMTA$$ 01ƒ=$FA03A9†MVME435withbaseaddressjumpers(...J) ‚LWIN$00ƒ=$FA00D3†RWIN1address‚LSAS$00ƒ=$FA00F1†SASIaddress‚*2‚IOBASE„=$FA0000†I/OChannelbasaddressforVM03‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒSYSGENPARAMETERSFORTERMINALŠ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(TCP=TERMINALCONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEBELOW…**4‚MSG‰***********************************************‚MSG‰‚*2‚TCP$RECƒ=80‹Widthofterminal(characters/line).-‚TCP$RSZƒ=24‹Depthofterminal(lines/page).C‚TCP$WTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.C‚TCP$RTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outaread.>‚TCP$XOFƒ=$17ŠXOFFchar;whenreceived,suspendstransmission ‚*˜(0=none).?‚TCP$XONƒ=0ŒXONchar;whenreceived,cancelsapriorXOFFchar‚*˜(0=anychar).@‚TCP$BRCƒ=$03ŠChartobeinterpretedlikeabreakwhenreceived ‚*˜(0=none).<‚TCP$DOPƒ=$0FŠCharwhichcausesoutputtobediscardedwhen‚*˜received(0=none).:‚TCP$RLNƒ=$13ŠCharwhichcauseslinetobereprintedwhen‚*˜received(0=none).A‚TCP$CLCƒ=$18ŠCharwhichcauseslinetobedeletedwhenreceived ‚*˜(0=none)./‚TCP$RTVƒ=$0DDE0000„Readterminators(CR,$DE).0‚TCP$EOLƒ=$0D0A0000„Endoflinestring(CR,LF).<‚TCP$BRTƒ=$0EŠBaudratecode($0E=9600baud).‚Thefollowing1‚*˜codesmaybeusedtoindicatethedesiredbaud‚*˜rate:*‚*˜Code‚RateƒCodeRateƒCodeRateƒCodeRate#‚*˜$00ƒ50…$05‚300„$09‚2000ƒ$0E‚9600$‚*˜$01ƒ75…$06‚600„$0A‚2400ƒ$0F‚19200$‚*˜$02ƒ110„$07‚1200ƒ$0C‚4800ƒ$10-$FF'‚*˜$03ƒ134.5‚$08‚1800ƒ$0D‚7200ƒReserved?‚TCP$NLSƒ=0Œ#ofASCIINULchar'stosendaftereachCRorLF.+‚TCP$TRCƒ=$00ŠTerminatorclass($0X=none)..‚TCP$TTPƒ=$00ŠTerminaltype(0=EXORterm155).J‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.>‚TCP$HCPY‚=0Œ1meanstheterminalisahardcopydevice,nota‚*˜CRT.8‚TCP$XCTL‚=0Œ1meansuseXON/XOFFtocontrolterminal's‚*˜transmission,notCTS.@‚TCP$BITS‚=0Œ1meanstransmit&receive7bits/charratherthan‚*˜8.<‚TCP$STPB‚=0Œ1meansfolloweachcharsentwith2stopbits‚*˜ratherthan1.=‚TCP$USEP‚=0Œ1meansparityshouldbecheckedandgenerated.<‚TCP$PRTY‚=0Œ1meansparity(ifused)shouldbeevenrather ‚*˜thanodd.<‚TCP$ECHO‚=0Œ1meansthedrivershouldnotechocharacters.@‚TCP$TAHD‚=0Œ1meansthetype-aheadfeatureshouldnotbeused.9‚TCP$TFUL‚=1Œ1meansfillingthebufferonareadshould‚*˜terminatetheread.>‚TCP$PNUL‚=0Œ1meansNULchar'sshouldbeconsidereddatafor‚*˜imagereads.7‚TCP$MODM‚=0Œ1meanstheportisconnectedtoamodem.9‚TCP$OFFH‚=0Œ1meanstheport,ifconnectedtomodem,is ‚*˜offhook.‚*L‚***************************************************************************'‚*†NOTEonhowtomodifyasingleport:‚*<‚*†Firstduplicatealltheparametersthataretochangefor<‚*†thisparticularport(e.g.TCP$BRT).‚Modifytheduplicate=‚*†labelssothattheybecomeunique.‚Onetechniqueistoput9‚*†theportnumberattheendofthelabel(e.g.forCN02;‚*†TCP$BRTbecomesTCP$BRT2andTCP$BITSbecomesTCP$BIT2).8‚*†Rememberthatthelabelmustnotexceed8characters!;‚*†Changetheparametertothedesiredvalue(e.g.toseta5‚*†300baudrateforanon-EXORtermterminalonCN02,$‚*†TCP$BRT2=$05andTCP$TTP2=1).‚*4‚*†Nowsubstitutethesenewparametersintothefile6‚*†VM03.IOC.AGfortheCRTDCBmacrodefiningtheport.+‚*†Tocontinuethebaudrateexampleabove:?‚*ˆTCP$ATWSET\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3=‚*ˆTCP$ATWSETTCP$ATW+\TCP$USEP<<4+\TCP$PRTY<<5+\TCP$ECHO<<6=‚*ˆTCP$ATWSETTCP$ATW+\TCP$TAHD<<7+\TCP$TFUL<<8+\TCP$PNUL<<92‚*ˆTCP$ATWSETTCP$ATW+\TCP$MODM<<10+\TCP$OFFH<<11=‚*‰CRTDCB'CN02',IOSID,IOSESS,$133,36,0,'CMP3',0,$0FFF,$7FF3,‚*©~~:‚*ˆ&ƒTCP$ATW,\TCP$REC,\TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,;‚*ˆ&ƒ\TCP$XON,\TCP$BRC,\TCP$DOP,\T$ CP$RLN,\TCP$CLC,\TCP$RTV,2‚*ˆ&„TCP$EQL,TCP$BRT2,\TCP$NLS,\TCP$TRC,TCP$TTP2‚*•~~~~~~~~~“~~~~~~~~~4‚*†where~~~~~~underlinestheCRTDCBmodifications.‚*>‚*†Thissametechniquemaybeusedwiththeprinterparameters<‚*†bymodifyingthePCP$xxxlabelsandsubstitutingintothe=‚*†PRTDCBmacro.‚Itmayalsobeusedwiththediskparameters@‚*†bymodifyingtheappropriatelabelsandsubstitutingintothe‚*†DSKDCBmacro.‚*L‚***************************************************************************‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**(‚MSG‰**ƒSYSGENPARAMETERSFORPRINTER‹**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**-‚MSG‰**ƒ(PCP=PRINTER‚CONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE…**4‚MSG‰***********************************************‚MSG‰‚*A‚PCP$RECƒ=132ŠWidthofprinter‚(characters/physicalprintline).,‚PCP$RSZƒ=66‹Depthofprinter‚(lines/page).B‚PCP$WTOƒ=120000‡(2minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.6‚PCP$LRLƒ=132ŠLogicallinelength<=widthofprinter<‚PCP$EOLƒ=$0A0D0000„Endoflinestring(LF,CR).(MCCMonly)$‚PCP$ELCƒ=$0DŠEndoflinecharacterJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.9‚PCP$LNFD‚=0Œ1meanstheprintersupportsautolinefeed5‚PCP$AFFƒ=0Œ1meanssupressauto-formfeedonassign>‚PCP$TLRL‚=0Œ0meanswrap-aroundprintiflogicallinelength3‚*˜exceeded.‚1meanstruncateprintatlogicalline ‚*˜length.‚MSG‰8‚MSG‰*************************************************** ‚MSG‰**¯**%‚MSG‰**ƒSYSGENPARAMETERSFORDISK’**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES‰**0‚MSG‰**ƒ(DCP=DISKCONFIGURATIONPARAMETERS)‡**5‚MSG‰**ƒ(VCP=VM22DiskConfigurationParameters)‚** ‚MSG‰**¯**/‚MSG‰**ƒSomevaluesarenotusedbyalldiskˆ**-‚MSG‰**ƒdrivers.‚Thatiscontrolledbythe‰**-‚MSG‰**ƒattributesmaskandtheparametersŠ**,‚MSG‰**ƒmask;however,eachparameterand‹**0‚MSG‰**ƒattributeisspecifiedtoallowdisks‡**0‚MSG‰**ƒtobeinterchangedbetweencontroller‡**‚MSG‰**ƒboards.¥**-‚MSG‰**ƒEachcontrollerboarddrivercaresŠ**3‚MSG‰**ƒaboutdifferentdevice/mediaattributes.„** ‚MSG‰**¯**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE‰**8‚MSG‰***************************************************‚MSG‰‚*&‚DCP$WTOƒ=0ŒWriteTimeout-alldisks%‚DCP$RTOƒ=0ŒRead‚Timeout-alldisks?‚DCP$HBPS‚=256Š#ofVERSAdosbytespersector-allharddisksA‚DCP$FBPS‚=256Š#ofVERSAdosbytespersector-allfloppydisks>‚DCP$HSPT‚=064ŠNumberofsector'spertrackforharddisk-IPC@‚DCP$FSPT‚=026ŠNumberofsector'spertrackforfloppydisk-IPC0‚DCP$HTNS‚=0ŒHard-totalnumberofsectors-IPC2‚DCP$FTNS‚=0ŒFloppy-totalnumberofsectors-IPC(‚DCP$HNOH‚=0ŒHardƒ-numberofheads-IPC*‚DCP$FNOH‚=2ŒFloppy-numberofheads-IPC)‚DCP$HNOT‚=0ŒHardƒ-numberoftracks-IPC,‚DCP$FNOT‚=77‹Floppy-numberoftracks-IPC*‚DCP$HILF‚=0ŒHardƒ-interleavefactor-IPC,‚DCP$FILF‚=1ŒFloppy-interleavefactor-IPC&‚DCP$HSPL‚=0ŒHardƒ-spiraloffset-IPC(‚DCP$FSPL‚=0ŒFloppy-spiraloffset-IPCJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.3‚DCP$NONE‚=0ŒdeviceattributesforIPCdiskdriver‚*5‚*CONFIGURATIONINFORMATIONFORVM22DISKCONTROLLER‚*†Hardandfloppydisks:4‚*†ThevaluesgivenforthehardareforCMDdrives.1‚*†Refertoyourdiskdrivemanualifyouarenot‚*†usingthesetconfiguration.‚*†(H=Hard,R=Removable)8‚*†Thevaluesgivenforthefloppydisksarefor8inch,<‚*†single-sided,single-density,48TPIdisks.‚Refertoyour=‚*†diskdrivemanualifyouarenotusingthatconfiguration.‚*†(F=Floppy)‚*1‚VCP$HTNS‚=52672ˆtotal#ofsectors-fixeddisk+‚VCP$HSPT‚=64‹#sectors/track-fixeddisk"‚VCP$HHDS‚=1Œ#heads-fixeddisk4‚VCP$HTRK‚=823Š#ofcylindersonmedia-fixeddisk,‚VCP$HILV‚=1Œinterleavefactor-fixeddisk(‚VCP$HSOF‚=0Œspiraloffset-fixeddisk:‚VCP$HPS% M‚=256Šphysicalsectorsizeofmedia-fixeddisk9‚VCP$HSHD‚=16‹startingheadnumberondrive-fixeddisk4‚VCP$HTRD‚=823Š#ofcylindersondrive-fixeddisk1‚VCP$HCOM‚=0Œpre-compensationvalue-fixeddisk@‚VCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-fixeddisk‚*7‚VCP$RSHD‚=0Œstartingheadnumberondrive-remvdisk‚*1‚VCP$FTNS‚=2002‰total#ofsectors-floppydisk,‚VCP$FSPT‚=26‹#sectors/track-floppydisk#‚VCP$FHDS‚=2Œ#heads-floppydisk4‚VCP$FTRK‚=77‹#ofcylindersonmedia-floppydisk-‚VCP$FILV‚=1Œinterleavefactor-floppydisk)‚VCP$FSOF‚=0Œspiraloffset-floppydisk;‚VCP$FPSM‚=128Šphysicalsectorsizeofmedia-floppydisk9‚VCP$FSHD‚=0Œstartingheadnumberondrive-floppydisk4‚VCP$FTRD‚=77‹#ofcylindersondrive-floppydisk3‚VCP$FCOM‚=38‹pre-compensationvalue-floppydiskA‚VCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk‚*A‚*‚Theattributesmaskandparametermaskdon'tchangeforfloppy‚*‚orharddisks.‚*‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚FMencoding‚*‚48TPIonmedia‚*‚Single-sideddiskette‚*‚Motorolaformat‚*‚Floppydisk‚*‚48TPIondrive‚*‚8-inchdisk‚*-‚VCP$HATM‚=$0090ˆattributesmask-harddisk/‚VCP$FATM‚=$025Fˆattributesmask-floppydisk,‚VCP$PM„=$5FF3ˆparametersmask-bothkinds,‚VCP$HAWƒ=$0010ˆattributesword-harddisk.‚VCP$FAWƒ=$0200ˆattributesword-floppydisk‚*4‚*‚Theattributesmask(word)isdefinedasfollows:‚*=‚*ƒBit0:‚MFM(1)/FM(0)encodingmethodonmedia-floppydisk>‚*ƒBit1:‚96(1)/48(0)TPItrackdensityonmedia-floppydisk/‚*ƒBit2:‚Double(1)/single(0)sidedfloppydisk7‚*ƒBit3:‚IBM(1)/Motorola(0)mediaformat-floppydisk8‚*ƒBit4:‚Harddisk(1)/floppydisk(0)media-bothdisksA‚*ƒBit5:‚MFM(1)/FM(0)encodingcapabilityondrive-floppydisk=‚*ƒBit6:‚96(1)/48(0)TPItrackdensity-drive-floppydisk@‚*ƒBit7:‚Seekreq'dwithheadswitch(1)-SMDdrive-harddisk@‚*ƒBit8:‚Post-read(1)/Pre-write(0)precompensation-bothdisks5‚*ƒBit9:‚8inch(1)/5-1/4inch(0)media-floppydisk‚*‚*‚*;‚*ConfigurationinformationforWinchesterDiskController‚*hardandfloppydisks.<‚*Refertoyourharddiskdrivemanualifyouarenotusing‚*thesetconfiguration.‚*=‚*Thesevaluesarefor51/4"harddisks(ST506compatible).<‚*Thefollowingparameterschangeforformatteddisksizes:6‚*‚5megabytedisks:WCP$HTNS=19584ƒandƒWCP$HHDS=27‚*10megabytedisks:WCP$HTNS=39168ƒandƒWCP$HHDS=47‚*15megabytedisks:WCP$HTNS=58752ƒandƒWCP$HHDS=6‚*=‚*ThevaluesgivenforthefloppydisksareforSA400‚51/4"<‚*doublesided,doubledensity,96TPIdisks.‚RefertoyourD‚*floppydiskdrivemanualifyouarenotusingthatconfiguration.‚*0‚WCP$HTNS‚=58752ˆtotal#ofsectors-harddisk1‚WCP$FTNS‚=2552‰total#ofsectors-floppydisk*‚WCP$HSPT‚=32‹#sectors/track-harddisk,‚WCP$FSPT‚=16‹#sectors/track-floppydisk!‚WCP$HHDS‚=6Œ#heads-harddisk#‚WCP$FHDS‚=2Œ#heads-floppydisk3‚WCP$HTRK‚=306Š#ofcylindersonmedia-harddisk4‚WCP$FTRK‚=80‹#ofcylindersonmedia-floppydisk+‚WCP$HILV‚=1Œinterleavefactor-harddisk-‚WCP$FILV‚=1Œinterleavefactor-floppydisk'‚WCP$HSOF‚=0Œspiraloffset-harddisk)‚WCP$FSOF‚=0Œspiraloffset-floppydisk9‚WCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚WCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚WCP$HSHD‚=0Œstartingheadnumberondrive-harddisk9‚WCP$FSHD‚=0Œstartingheadnumberondrive-floppydisk3‚WCP$HTRD‚=306Š#ofcylindersondrive-harddisk4‚WCP$FTRD‚=80‹#ofcylindersondrive-floppydisk2‚WCP$HCOM‚=153Špre-compensationvalue-harddisk3‚WCP$FCOM‚=40‹pre-compensationvalue-floppydisk?‚WCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚WCP$FPTD‚=0Œ#ofphys.secto% rspertrackondrive-floppydisk0‚WCP$HSRD‚=0Œsteppingrateofdrive-harddisk2‚WCP$FSRD‚=0Œsteppingrateofdrive-floppydisk?‚WCP$HRWC‚=0Œreducedwritecurrentcylindernumber-harddiskA‚WCP$FRWC‚=0Œreducedwritecurrentcylindernumber-floppydisk/‚WCP$HECC‚=0ŒECCdataburstlength-harddisk1‚WCP$FECC‚=0ŒECCdataburstlength-floppydisk‚*@‚*‚Theattributesword,attributesmaskandparametermaskdon't@‚*‚changeforharddisks.‚Theparametermaskandattributesmask>‚*‚don'tchangeforfloppydisks.‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMencoding ‚*‚96TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*-‚WCP$HATM‚=$0010ˆattributesmask-harddisk.‚WCP$FATM‚=$001Fˆattributesmask-flopydisk,‚WCP$PM„=$1AF3ˆparametersmask-bothkinds,‚WCP$HAWƒ=$0010ˆattributesword-harddisk.‚WCP$FAWƒ=$004Fˆattributesword-floppydisk‚*I‚*‚thefollowingflagsdefinetheattributeswordfortheWINcontroller:‚*E‚*WCP$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppy‚*˜diskE‚*WCP$FTDN‚=1(bit1)„96(1)/48(0)TPItrackdensity-media-floppy‚*˜disk<‚*WCP$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*WCP$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*WCP$HDSC‚=1(bit4)„harddisk"‚*WCP$FDSC‚=0(bit4)„floppydiskE‚*WCP$FTDD‚=1(bit6)„96(1)/48(0)TPItrackdensity-drive-floppy‚*˜disk7‚*WCP$FDSS‚=0(bit9)„8"(1)/5-1/4"(0)floppydisksize‚*E‚*‚ConfigurationinformationfortheSASIcontrollerboard(SA1403D).7‚*‚RefertoyourdiskdrivemanualifyouarenotusingA‚*‚thesetconfiguration.‚ThesevaluesareforSA1000fixeddisks‚*‚andSA800floppydisks.‚*0‚SCP$HTNS‚=32768ˆtotal#ofsectors-harddisk1‚SCP$FTNS‚=3991‰total#ofsectors-floppydisk*‚SCP$HSPT‚=32‹#sectors/track-harddisk,‚SCP$FSPT‚=26‹#sectors/track-floppydisk!‚SCP$HHDS‚=4Œ#heads-harddisk#‚SCP$FHDS‚=2Œ#heads-floppydisk3‚SCP$HTRK‚=256Š#ofcylindersonmedia-harddisk4‚SCP$FTRK‚=77‹#ofcylindersonmedia-floppydisk,‚SCP$HILV‚=16‹interleavefactor-harddisk.‚SCP$FILV‚=13‹interleavefactor-floppydisk'‚SCP$HSOF‚=0Œspiraloffset-harddisk)‚SCP$FSOF‚=0Œspiraloffset-floppydisk9‚SCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚SCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚SCP$HSHD‚=0Œstartingheadnumberofdrive-harddisk9‚SCP$FSHD‚=0Œstartingheadnumberofdrive-floppydisk3‚SCP$HTRD‚=256Š#ofcylindersondrive-harddisk4‚SCP$FTRD‚=77‹#ofcylindersondrive-floppydisk0‚SCP$HCOM‚=0Œpre-compensationvalue-harddisk2‚SCP$FCOM‚=0Œpre-compensationvalue-floppydisk?‚SCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚SCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk0‚SCP$HSRD‚=0Œsteppingrateofdrive-harddisk2‚SCP$FSRD‚=0Œsteppingrateofdrive-floppydisk?‚SCP$HRWC‚=0Œreducedwritecurrentcylindernumber-harddiskA‚SCP$FRWC‚=0Œreducedwritecurrentcylindernumber-floppydisk/‚SCP$HECC‚=0ŒECCdataburstlength-harddisk1‚SCP$FECC‚=0ŒECCdataburstlength-floppydisk‚*@‚*‚Theattributesword,attributesmaskandparametermaskdon't@‚*‚changeforharddisks.‚Theparametermaskandattributesmask>‚*‚don'tchangeforfloppydisks.‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMencoding ‚*‚48TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*'‚SCP$ATMƒ=$0015ˆattributesmask-both,‚SCP$PM„=$02F3ˆparametersmask-bothkinds-‚SCP$HAWƒ=$0210ˆattributesword-harddisks/‚SCP$FAWƒ=$020Dˆattributesword-floppydisks‚*7‚*‚thefollowingflagsarefortheSASIcontrollerdisk‚*E‚*SCP$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppy‚*˜diskE‚*SC& P$FTDN‚=0(bit1)„96(1)/48(0)TPItrackdensity-media-floppy‚*˜disk<‚*SCP$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*SCP$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*SCP$HDSC‚=1(bit4)„harddisk"‚*SCP$FDSC‚=0(bit4)„floppydiskE‚*SCP$FTDD‚=0(bit6)„96(1)/48(0)TPItrackdensity-drive-floppy‚*˜disk7‚*SCP$FDSS‚=1(bit9)„8"(1)/5-1/4"(0)floppydisksize* 4‚MSG‰*********************************************** ‚MSG‰**«**/‚MSG‰**ƒSYSGENPARAMETERSFORMAGTAPEDRIVE„**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(MCP=MAGTAPECONFIG.PARAMETERS)…** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*;‚MCP$WTOƒ=5000‰WriteTimeout(5secondstowrite4Kbytes);‚MCP$RTOƒ=360000‡Read‚Timeout(6minutestoread4Kbytes,,‚*štosearchforafilemark,toreadablank&‚*štapetotheendoftape,torewind)6‚MCP$DENƒ=0ŒDensityselectedforwritefromloadpoint ‚*š0means1600bpi(PEdensity)!‚*š1means‚800bpi(NRZIdensity)6‚MCP$RDTƒ=3ŒNumberofreadtriesbeforeerrormessage1‚MCP$WRTƒ=3ŒNumberofwritetriesbeforeerasing:‚MCP$ERTƒ=1ŒNumberoftimestoerasebeforeerrormessage‚*<‚MCP$ATMƒ=$0002ˆBit1isrecognizedforaconfigurecommand9‚MCP$PM„=$00F0ˆDEN,RDT,WRT,ERTfieldsarerecognizedfor‚*šaconfigurecommand.‚* ‚MCP$AW„=$0000ˆBit0=RESERVED4‚*˜Bit1=1meansuserrequestsadensityforwrite2‚*˜Bit1=0meansuserdoesnotrequestadensity‚*‚MSG‰A‚MSG‰************************************************************7‚MSG‰**…Descriptiveinfoaboutthisoperatingsystem‡**A‚MSG‰************************************************************5‚SYSNAMEƒ="VERSAdos"ƒNameforthisoperatingsystem.:‚REVISION‚="REV04.30"‚Revisionofthisoperatingsystem.7‚TIMSLICƒ=2ŒNumberoftimerinterruptspertimeslice.>‚TIMINTVƒ=10‹Numberofmillisecondsbetweentimerinterrupts.A‚MEMEND1ƒ=$40000‡Endingaddrforon-board‚memorymustbe=this.E‚MEMEND3ƒ=$E0000‡Ceilingaddrforoff-boardmemory(mustbe‚MSG‰**ƒFHS--FileHandlingServices(trap#3servertask)ƒ**B‚MSG‰*************************************************************‚TASKˆFHS,.FHS‚STATE…='DORM' ‚SESSIONƒ=1‚PRIORITY‚=$D1‚FHSSTR„=*ŒFHS‚loadaddr.!‚FHSASR„=*+2ŠFHSASRentrypoint ‚*’FHSFOF ‚SUBSˆFHS.LG ‚LINKˆFHS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FHS‚MSG‰B‚MSG‰*************************************************************(‚MSG‰**ˆFMS--FileManagementSystem”**B‚MSG‰*************************************************************‚TASKˆFMS,.FMS‚STATE…='DORM'‚PRIORITY‚=$D0‚FMSSTR„=*ŒFMSloadaddr.!‚FMSASR„=*+2ŠFMSASRentrypoint ‚*’FMSFOF ‚SUBSˆFMS.LG ‚LINKˆFMS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FMS‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆEET--EntryExitTask›**B‚MSG‰*************************************************************‚TASKˆEET,&EET‚STATE…='READ' ‚SESSIONƒ=2‚PRIORITY‚=$C8‚EETSTR„=*ŒEETloadaddr. ‚*’EETFOF1%‚SUBSˆEET.LG,9995.&.EET.EQ,CMDLIST.AG'‚ASM‰EET.EQ/CMDLIST.AG,CMDLIST,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC ‚LINKˆEET.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰EET‚MSG‰B‚MSG‰*************************************************************.‚MSG‰**ˆLDR--Loader(trap#4servertask)Ž**B‚MSG‰*************************************************************‚TASKˆLDR,&LDR‚STATE…='READ'‚PRIORITY‚=$C8 ‚SESSIONƒ=4‚LDRSTR„=*ŒLDRloadaddr.‚SUBSˆMMU.LOADER.LG‚LINKˆMMU.LOADER.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚*’LDRFOF‚END‰LDR‚MSG‰@‚MSG‰***********************************************************‚MSG‰**ˆIOCOM&IOI¤**@‚MSG‰***********************************************************‚TASKˆIOI,.IOI‚STATE…='READ' ‚SESSIONƒ=1‚PRIORITY‚=$DA ‚IOCSTR„=*‚SUBSˆVM03.IOC.AG1‚ASM‰IODM.AG/VM03.IOC.AG,VM03.IOC.RO,\ASMLS;RZ=95 ‚*’IOIFOF1 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVM03.ASR.AG#‚ASM‰VM03.ASR.AG,VM03.ASR.RO,\ASMLS ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC.‚ASM‰VM03.OSLIST.AG,VM03.OSLIST.RO,\ASMLS;Z=95 ‚*’IOIFOF2 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVM03.IOI.LG‚LINKˆVM03.IOI.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚*’IOIFOF3‚END‰IOIE‚MSG‰****************************************************************‚MSG‰*C‚MSG‰*‚SpecialI/OChannnelInitializerforProcessControlDrivers‚MSG‰*E‚MSG‰**************************************************************** ‚IFNEˆ\PCDRV…INCLUDE….&.IOCI.CI‚ENDC‚MSG‰@‚MSG‰***********************************************************%‚MSG‰**ˆINIT--SystemInitializer•**@‚MSG‰*********************************************************** ‚PROCESS…INIT ‚INTSTR„=*%‚SUBS…VM03.INITIO1.AG,VM03.INITIO2.AG‚SUBS…VM03.INT1.LG,VM03.INT2.LG-‚ASM†VM03.INITIO1.AG,VM03.INITIO1.RO,\ASMLS;R ‚IFEQ…\ASMLSW…=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VM03.INT1.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC‚=COPY„\LINK2TF,\LINK1TF;Y ‚IFNE…\NDAC1‰INCLUDEƒ.&.D605MEM.CI‚ENDC ‚IFNE…\NACO‰INCLUDEƒ.&.D615MEM.CI‚ENDC ‚IFNE…\NDCO1‰INCLUDEƒ.&.D625MEM.CI‚ENDC ‚IFNE…\NVME610+\NVME620‰INCLUDEƒ.&.D610INT.CI‚ENDC-‚ASMVM03.INITIO2.AG,VM03.INITIO2.RO,\ASMLS;R ‚IFEQ…\ASMLSW‹=COPY…\ASMLS,\WORKLS;A‚ENDC‚SUBS…M68XXX.INITDAT.AG1‚ASM†M68XXX.INITDAT.AG,M68XXX.INITDAT.RO,\ASMLS;R ‚IFEQ…\ASMLSW†=' COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VM03.INT2.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC ‚*’INITFOF ‚END‰INIT@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚MSG‰*¹*)‚MSG‰*‹MAKESUBSTITUTIONSINVERSAPT.CFŽ*‚MSG‰*¹*@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚SUBSˆVM03.VERSAPT.CF‚MSG‰@‚MSG‰***********************************************************@‚MSG‰***********************************************************5‚MSG‰**‡"SYSGENCOMPLETIONPROCESSINGINPROGRESS"†**‚MSG‰**“Haveaniceday.”**@‚MSG‰***********************************************************@‚MSG‰*********************************************************** ‚END‰SYSGENééééé=OPT -N=/**********************=/*VM03.SYSGEN.CF…*=/**********************=OPT K,NM=/***************************************************************************"=/*Chainfiletoperformsysgen¬*=/*É*=/*Callingsequence:·*=/*É*)=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5£*=/*É*7=/*„Notalloftheargumentsneedtobeenteredsince”*$=/*†theyeachhaveadefaultvalue¥*=/*É*6=/*„arg1-commandfilename(defaultstoSYSCMD.CD)•*=/*É*,=/*„arg2-Tempvolanduserno./BootfileŸ*9=/*Temp.vol.anduserno.defaultstovolumenameand‰*)=/*usernumberofcommandfile(arg1).—**=/*Bootfiledefaultsto'VERSADOS.SY'.˜*=/*É*=/*É*9=/*„arg3-Listdeviceorfilenameforsysgenmessages’*=/*(defaultstoSYSLIST.LS)¤*;=/*‹Iffilename-sysgenuses'.LS'asdefaultextension‰*=/*É*9=/*‡NOTE:Thefirstthreeargumentsarethesameasthe*4=/*threecommandlinefieldsusedininvokingtheŽ*=/*sysgenutilitydirectly.¤*=/*É*E=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')†*=/*É*5=/*„arg5-Listingdeviceorfile(Defaultsto#PR)–*A=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.*:=/*Allassemblylistingsandlinkmapswillbedirectedˆ*<=/*Tothespecifieddeviceorfileusingthecopyutility†*>=/*withappendoption.‚SYSGEN.TFisusedasanintermediateƒ*7=/*filetocontaintheassemblyorlinklistoutput.‹*@=/*Duetorestrictionsinsysgenliteralsubstitutionprocess‚*8=/*thisfieldcannotcontainmorethan10characters.Š*M=/***************************************************************************=/*5=/* Insure that no more than 5 arguments are defined:=/*=/RX=\0 =/IF RX>5ƒ=OPT-N<ƒ=/*Error-chainfilestartedwithmor( ethan5arguments-5ƒ=/*ƒPleaserestart,theargumentdefinitionsfollow:ƒ=/*(ƒ=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5ƒ=/*6ƒ=/*„Notalloftheargumentsneedtobeenteredsince$ƒ=/*†theyeachhaveadefaultvalue.ƒ=/*ñ8úFO 5ƒ=/*„arg1-commandfilename(defaultstoSYSCMD.CD)ƒ=/*+ƒ=/*„arg2-Tempvolanduserno./Bootfile8ƒ=/*Temp.vol.anduserno.defaultstovolumenameand(ƒ=/*usernumberofcommandfile(arg1).)ƒ=/*Bootfiledefaultsto'VERSADOS.SY'.ƒ=/*Gƒ=/&**Typecarriagereturnormoreinformation,'break'toterminate.ƒ=/*8ƒ=/*„arg3-Listdeviceorfilenameforsysgenmessagesƒ=/*(defaultstoSYSLIST.LS):ƒ=/*‹Iffilename-sysgenuses'.LS'asdefaultextensionƒ=/*8ƒ=/*‡NOTE:Thefirstthreeargumentsarethesameasthe3ƒ=/*threecommandlinefieldsusedininvokingtheƒ=/*sysgenutilitydirectly.ƒ=/*Dƒ=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')ƒ=/*4ƒ=/*„arg5-Listingdeviceorfile(Defaultsto#PR)Aƒ=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.9ƒ=/*Allassemblylistingsandlinkmapswillbedirected;ƒ=/*Tothespecifieddeviceorfileusingthecopyutility=ƒ=/*withappendoption.‚SYSGEN.TFisusedasanintermediate6ƒ=/*filetocontaintheassemblyorlinklistoutput.?ƒ=/*Duetorestrictionsinsysgenliteralsubstitutionprocess7ƒ=/*thisfieldcannotcontainmorethan10characters.ƒ=/*ƒ=END=/ENDIF=/*2=/* Force the definition of 5 exactly 5 arguments.=/* =/IF RX=0+ƒ=ARGSYSCMD.CD,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=1$ƒ=ARG\1,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=2&ƒ=ARG\1,\2,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=3ƒ=ARG\1,\2,\3,SINGLE-HARD,#PR=/ENDIF =/IF RX=4ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*8=/* We have 5 arguments - now default any null arguments=/*=/IFC \1ƒ=ARGSYSCMD.CD,\2,\3,\4,\5=/ENDIF=/*=/IFC \3ƒ=ARG\1,\2,SYSLIST.LS,\4,\5=/ENDIF=/*=/IFC \4ƒ=ARG\1,\2,\3,SINGLE-HARD,\5=/ENDIF=/*=/IFC \5ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*N=/* If arg5 is not #PR,#PR1,#PR2,#PR3,# or #NULL then treat as file and delete:=/*ƒsetswitch(arg6)to1forprinterdevice,0forfile.=/*0=ARG \1,\2,\3,\4,\5,0,#PR,#PR1,#PR2,#PR3,#,#NULL =/FOR 7,\0ƒ=/IFEQ"\5"\(RX)1†=ARG\1,\2,\3,\4,\5,1,#PR,#PR1,#PR2,#PR3,#,#NULLƒ=/ENDIF=/ENDFOR=/RX=\6 =/IF RX=0ƒ=DEL\5=/ENDIF=/*=/* Set switch (arg7) TO:=/*„01--‚SINGLE-HARD=/*=ARG \1,\2,\3,\4,\5,\6,10=/IFEQ "\4"SINGLE-HARDƒ=ARG\1,\2,\3,\4,\5,\6,01=/ENDIF=/*9=/* Abort chain if an invalid configuration was requested=/*=/RX=\7 =/IF RX=10ƒ=OPT-N3ƒ=/*‚\4isaninvalidconfiguration-(argument#4)8ƒ=/*…Theonlyvalidconfigurationis'SINGLE-HARD'which3ƒ=/*…isthedefault.Pleaserestartchainfilewithƒ=/*…correctparameters.ƒ=END=/ENDIF#=ARG \1,\2,\3,\4,\5,\6,\7,SYSGEN.TF=/*3=/* The argument list now looks like the following:=/* =/*ƒarg1ƒ-ƒNameofcommandfile.=/*0=/*ƒarg2ƒ-ƒTemporaryvolume/bootfile(ornull).=/*3=/*ƒarg3ƒ-ƒListdeviceorfileforsysgenmessages.=/*(=/*ƒarg4ƒ-ƒSystemconfigurationmnemonic=/*'SINGLE-HARD'=/*(seearg7)=/*@=/*ƒarg5ƒ-ƒListingfileordeviceforassembliesandlink-edits.4=/*SYSGEN.TFisthetemporaryfilewhichisusedin1=/*conjunctionwith=COPY;Atoproduceasingle=/*listingfile.=/*(seearg6)=/*=/*ƒarg6ƒ-ƒSwitch-"=/*0=‚arg5specifiesafilename=/*1=‚arg5specifiesadevice=/*(seearg5)=/*%=/*ƒarg7ƒ-ƒNumberconfigurationkey-%=/*01=‚signle-userharddisksystem=/*(seearg4)=/*8=/*ƒarg8ƒ-ƒSYSGEN.TFtemporaryfileforusewithcopyin+=/*creatinglistingfilespecifiedby( arg3=/*=/*9=/* Justify argument positions and invoke sysgen utility.=/*=ARG \5,\6,\7,\8,\1,\2,\3,\4=/*)=/* Turn off echo of sysgen command lines=OPT J=OPT -N=SYSGEN VM03.\5,\6,\7;T=350 =OPT -J,-N8=/**‚ApplyingpatchesfromXVERSAPT.CFtothebootfile.=/@ VM03.XVERSAPT.CFM=/***************************************************************************M=/***************************************************************************=/**=/**‚SysgenCompleted--=/**6=/**„Assemblyandlinklistingshavebeenoutputto\1=/**1=/**„Sysgencommandlistinghasbeenoutputto\7=/**M=/***************************************************************************M=/***************************************************************************=OPT -K=ENDééééééd1IOI ASREL'VM03 IOI SAF „VERSAdos I/O Initialization System Task V 4.1 - 09/13/82×2pFMSDLEN pNOTASKS pNOCDCB pNODCBS pNOFCBS pIOCOML pIOCOMS pCCSEG pOSMTBL pNODVS pNOFATS pOSMEND pFHSASR pFMSASQ  pFMSASR pNOLPRT pIOSASR pNOVDTS pNOLTERM !@F3`F3$ IOSG((K3´@€.|*B#ü()2"|(J‘gH |)N1i!iG3Lé? Hè? (g (f(p=/*ƒcontainpatchestobeappliedtoVERSADOSafterthesysgen =/*ƒprocess.=/*=PATCH VERSADOS.SYH*---+----:----+----:----+----:----+----:----+----:----+----:----+----:--H*>----------------------------------------------------------------------O\IOSSTR*StartofIOSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FHSSTR*StartofFHSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FMSSTR*StartofFMSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\EETSTR*StartofEETH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\LDRSTR*StartofLDRH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\IOCSTR*StartofIOCH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\INTSTR*StartofINTH*<----------------------------------------------------------------------QUIT=/*!=/*†PATCHPRTDRVONLYIFITEXIST=/*=/RD = \NOLPRT =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\PRTDRVRŽ*StartofPRTDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*'=/*†PATCHEPCIDRIVERONLYIFITEXISTS=/*=/RD = \NOLTERM =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\EPCIDRVRŽ*StartofCHIDRVR* 019H*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHM315DRVONLYIFITEXIST=/*=/RD = \TOTDSK + \NOMCCMS =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\M315DRVRŽ*StartofM315DRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*8=/* SYSTEM MUST BE RE-BOOTED FOR PATCHES TO TAKE EFFECT.=/*=ENDéééééé PAGEO********************************************************************************A*ˆVME101.IOC.AG--defineDCB'SandCDB'SforVME101modulesystem**ˆThemacrosusedaredefinedin&.IODM.AG*O******************************************************************************* *@*‚ThissectionbecomesIOCOMS,whichisusedbyFMS,IOS,&FHS.*#IOCOM„IDNT†12,12‡I/OCOMMONSEGMENT SECTION 0 OPT MEX XDEF IOCOMS,IOCOML,CCSEG *1*‚Definethephysicaladdressesofdevicedrivers*‚usingtheSYSGENparameters.*PRT†EQU‡\PRTDRVRM315…EQU‡\M315DRVREPCI…EQU‡\EPCIDRVR** PAGE*6*‚Hereareparametersdescribingthetablesandlists.*IOCOMS  DC.L 0 I/O sysgen options. ( DC.L DCQSTR Start address of DCQ space.&DC.LDCQENDEndƒaddressofDCQspace.DC.L0†Addressof1stDCQ. ( DC.L LUTSTR Start address of LUT space.&DC.LLUTENDEndƒaddressofLUTspace.DC.L0†Addressof1stLUT. ( DC.L DCBTBL Start address of DCB space.&DC.LDCBENDEndƒaddressofDCBspace. DC.L DCBTBL Address of 1st DCB.  DC.L 0 SEMAPHORE FLAG&DC.B'\SYSNAME'„OPERATINGSYSTEMI.D.DC.B'\REVISION'ƒANDƒREVISION( DC.L 0,0,0 TASK ID FOR UNCLAIMED BREAKS PAGEO********************************************************************************C*ˆStorageforDCQ'sandLUT's.‚Initiallythesetwolistsareempty.*O******************************************************************************* * *‚DCQspace.* DCQSTR EQU * DS.B 256*\DCQPGEDCQEND EQU *-1 * *‚LUTspace.* LUTSTR EQU * DS.B LUTBEG*\NOTASKS DS.B LUTSEG*\NOTASKS*(\MAXLU+1)LUTEND EQU *-1‰PAGEO**********************************************************************************ˆDefineDCB'sbasedonSYSG* ENparameters.*O******************************************************************************* *DCBTBLEQU*‡ThisisthetopofDCBspace. 0PRTDVSET'PR‚'INITIALVALUEFORPRINTERDEVICE*$************************************ARJ?RPZMbJjB#*SETUPDCB'SFORLOCALPRINTERS‚*$************************************* IFNE \NOLPRT*.PCP$ATW‚SET…\PCP$TLRL<<2+\PCP$AFF<<1+\PCP$LNFDK PRTDCB PRTDV,IOSID,IOSESS,$632,95,1,'CPRT',0,$0007,$0033,PCP$ATW,\PCP$REC,%&‡\PCP$RSZ,\PCP$WTO,\PCP$LRL,\PCP$ELC ENDC &**************************************$*‚SETUPDCB'SFORLOCALTERMINALS‚*&************************************** IFNE \NOLTERMITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8‰DC.L†0,0,0,0ƒBUFFERZONEBETWEENDEVICEINDEPENDENT/DEPENDENT)‰DC.B†IOSTLN„SPACEFORCONFIGURATIONINFO (DCBENDEQU*-1…EndaddressofDCBspace.HIOCOML EQU (*-IOCOMS+255)/256*256 Get length of common segment (force to*§nextpageboundary). PAGE SECTION 1O*********************************************************************************‰CHANNELDATABLOCKS*O******************************************************************************* CCSEG EQU * ******‚LOCALPRINTERS IFGT \NOLPRTI CDB 0,'CPRT',XTPRTL,254,PRT,0,\LPDA$00,7,$1B,3,$10,0,0,0,0,0,0,0,0,0,0,0 ENDC  ******‚LOCALTERMINALS ‚IFGT\NOLTERME CDB $0000,'EPC1',XTEPCI,254,EPCI,0,\LTDA$00,6,$1C,4,$30,0,0,0,0,0,0, & 0,0,0,0,0 ENDC   IFGT \NOLTERM-1E CDB $0000,'EPC2',XTEPCI,254,EPCI,0,\LTDA$01,6,$1D,5,$30,0,0,0,0,0,0, & 0,0,0,0,0 ENDC ‰PAGE*"*‡MVME315diskcontrollerchannels*** %DEVADD SET $FEFE00 INIT. DEVICE ADDR.VECTNO SET 63 INIT. VECTOR NO. IFGT \NOIPCSDEVADD SET DEVADD+$200VECTNO SET VECTNO+1M CDB 0,'CRD1',XTD315,254,M315,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC*** IFGT \NOIPCS-1DEVADD SET DEVADD+$200VECTNO SET VECTNO+1M CDB 0,'CRD2',XTD315,254,M315,0,DEVADD,$1FF,VECTNO,3,$10,0,$181,$FF,$FF,$F,0,&ƒ$183,$FF,$FF,$F,0 ENDC** ) DC.L 0 Link of 0 marks end of CDB chain.  ENDéé PAGE*#*VALPAR VALIDATES SYSGEN PARAMETERSG*…FAILERRORISGENERATEDFOREACHPARAMETERTHATISNOTINVALIDRANGE:*ANY ERROR SHOULD MAKE OPERATOR ABORT SYSGEN SINCE FURTHER/*…SYSGENPROCESSINGASSUMESPARAMETERSAREGOOD*.*MAKE SURE TOTAL NUMBER OF TERMINALS IS SUM OF*…DIFFERENTTYPESOFTERMINALS IFNE \TOTTERM-(\NOLTERM) FAIL 100 ENDC'*CAN'T HAVE MORE THAT 2 LOCAL TERMINALS IFGT \NOLTERM-2 FAIL 100 ENDC *MAKE SAME CHECK FOR DISK DRIVES= IFNE \TOTDSK-(\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1) FAIL 100 ENDC0*MAKE SURE NO. OF IPC'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOFD0 CNT SET CNT+1 ENDC IFNE \NOFD1 CNT SET CNT+1 ENDC IFNE \HDUDC0+\FDUDC0 CNT SET CNT+1 ENDC IFNE \HDUDC1+\FDUDC1 CNT SET CNT+1 ENDC IFNE CNT-\NOIPCS FAIL 100 ENDC1*MAKE SURE NO. OF MCCM'S AGREES WITH DEVICE INFO. CNT SET 0 IFNE \NOTERM0+\NOPRT0 CNT SET CNT+1 ENDC IFNE \NOTERM1+\NOPRT1 CNT SET CNT+1 ENDC IFNE \NOTERM2+\NOPRT2 CNT SET CNT+1 ENDC IFNE \NOTERM3+\NOPRT3 CNT SET CNT+1 ENDC IFNE CNT-\NOMCCMS FAIL 100 ENDC=*CAN'T HAVE MORE THAN 1 LOCAL PRINTER OR MORE THAN 1 PER MCCM IFGT \NOLPRT-1 FAIL 100 ENDC IFGT \NOPRT0-1 FAIL 100 ENDC IFGT \NOPRT1-1 FAIL 100 ENDC IFGT \NOPRT2-1 FAIL 100 ENDC IFGT \NOPRT3-1 FAIL 100 ENDC9*CAN'T HAVE MORE THAN 2 LOCAL TERM. IF ANY MCCM TERMINALS IFNE \NOTERM0+\NOTERM1+\NOTERM2 IFGT \NOLTERM-2 FAIL 100 ENDC ENDC8*CAN'T,  HAVE MORE THAN 4 LOCAL TERMS IF NO MCCM TERMINALS IFEQ \NOTERM0+\NOTERM1+\NOTERM2 IFGT \NOLTERM-4 FAIL 100 ENDC ENDC**CAN'T HAVE MORE THAN 4 TERMINALS PER MCCM IFGT \NOTERM0-4 FAIL 100 ENDC IFGT \NOTERM1-4 FAIL 100 ENDC IFGT \NOTERM2-4 FAIL 100 ENDC IFGT \NOTERM3-4 FAIL 100 ENDC-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER IPC IFGT \NOFD0-4 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 HARD DRIVES PER UDC IFGT \HDUDC0-4 FAIL 100 ENDCrg{g-*CAN'T HAVE MORE THAN 4 FLOPPY DRIVES PER UDC IFGT \FDUDC0-4 FAIL 100 ENDC9*CAN'T HAVE 0 OR MORE THAN 75 TASKS IN SYSTEM AT ONE TIME IFEQ \NOTASKS FAIL 100 ENDC IFGT \NOTASKS-75 FAIL 100 ENDC1*MAXIMUM LU CANNOT BE LESS THAN 8 OR MORE THAN 31 IFLT \MAXLU-8 FAIL 100 ENDC IFGT \MAXLU-31 FAIL 100 ENDC2*MAXIMUM LU CANNOT BE LESS THAN NO. OF DISK DRIVES IFLT \MAXLU-\TOTDSK FAIL 100 ENDCC*MAXIMUM NO. OF PAGES FOR DCQ,UST,GST,IOV, AND TRACE CANNOT BE 0 OR*…MORETHAN10 IFEQ \DCQPGE FAIL 100 ENDC IFGT \DCQPGE-10 FAIL 100 ENDC IFEQ \GST FAIL 100 ENDC IFGT \GST-10 FAIL 100 ENDC IFEQ \UST FAIL 100 ENDC IFGT \UST-10 FAIL 100 ENDC IFNE \TRCFLAG IFEQ \TRACE FAIL 100 ENDC ENDC IFNE \TRCFLAG IFGT \TRACE-10 FAIL 100 ENDC ENDC IFEQ \IOV FAIL 100 ENDC IFGT \IOV-10 FAIL 100 ENDCG*MAXIMUM NO. OF DIFFERENT FILES MUST BE .LE. MAXIMUM NO. OF TOTAL FILES IFGT \NODIFFIL-\NOFILES FAIL 100 ENDC2*MAXIMUM NO. OF FILES CANNOT BE 0 OR MORE THAN 200 IFEQ \NODIFFIL FAIL 100 ENDC IFGT \NODIFFIL-200 FAIL 100 ENDC IFEQ \NOFILES FAIL 100 ENDC IFGT \NOFILES-200 FAIL 100 ENDCG*MAXIMUM NO. OF DEFAULT VOLUMES CANNOT BE 0 OR MORE THAN NO. OF TASKS+3 IFEQ \NODEFVOL FAIL 100 ENDC IFGT \NODEFVOL-(\NOTASKS+3) FAIL 100 ENDCE*NUMBER OF DEFAULT VOLUMES MUST BE GREATER THAN OR EQUAL TO NUMBER OF*ƒLOGONTERMINALS IFGT \NOLOGONS-\NODEFVOL FAIL 100 ENDC**DEFAULT FAB SIZE CANNOT BE 0 MORE THAN 20 IFEQ \DEFFAB FAIL 100 ENDC IFGT \DEFFAB-20 FAIL 100 ENDC7*DEFAULT DB SIZE CANNOT BE LESS THAN 4 OR MORE THAN 255 IFGT \DEFDAT-255 FAIL 100 ENDC IFLT \DEFDAT-4  FAIL 100 ENDC END  PAGE)ASR IDNT 11,11 ASR ADDRS. FOR I/O MODULES*8*ASR-FILE OF ASR ADDRESSES OF I/O MODULES-NEEDED FOR IOI* XDEF FMSASR,FHSASR,IOSASRFMSASR EQU \FMSASRFHSASR EQU \FHSASRIOSASR EQU \IOSASR ENDéééé, éééƒ ‰XDEF†OSMTBL,FMSASQ‰XDEF†OSMEND,FMSDLEN‰XREF†FHSASR,IOSASR,FMSASR*-*ˆTABLEOFOPERATINGSYSTEMMODULETASKNAMES*‰NOLIST‰INCLUDEƒ9995.&.IOE.EQ‰INCLUDEƒ9995.&.TR1.EQ‰INCLUDEƒ9995.&.EXE.EQ‰INCLUDEƒ9995.&.NIO.EQ‰INCLUDEƒ9995.&.LV5.EQ‰INCLUDEƒ9995.&.FME.EQ‰INCLUDEƒ9995.&.FMI.EQ‰LIST SECTION 1‰PAGE**ˆTABLEOFOSMODULETASKNAMES*OSMTBLƒDC.L…FHSIDŽFHSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+FHSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+FHSNLN‡QUEUELENGTH‰DC.L„FHSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…IOSIDŽIOSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+IOSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+IOSNLN‡QUEUELENGTH‰DC.L„IOSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED***‰DC.L…FMSIDŽFMSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRD‚ASQSTATUS'‰DC.B„EVTLEN+FHSNLN‡MAX.MESSAGELENGTHFMSASQƒDC.L„0QUEUELENGTH‰DC.L„FMSASRŽADDR.OFASR‰DC.W„0**‰DC.W„SGOPPAŽOPTIONS-LOG.ADDR=PHYS.ADDR.‰DC.W„SGATRW+SGATSS‡ATTRIBUTES‰DC.L„FMSDSEG.NAME‰DC.L„0LOGICALADDRESSFMSDLEN‚DC.L„0SEGMENTLENGTH**OSMENDƒEQU…*“ENDOFTABLE ‰END‡OSMTBLééŒ>=LINK ,IOI,\LINKLS;HAMIXSSEGMENT IOSG:0 \IOCSTRSEGMENT .IOI:1INPUT VME101.IOC.ROINPUT VME101.IOI.ROINPUT VME101.OSLIST.RO INPUT IXR.ROINPUT VME101.ASR.ROEND=ENDéé- ééééé• ‚********************‚*VME101.SYSCMD.CD*M‚****************************************************************************‚*SYSGENCOMMANDFILE-´*?‚*ƒUSEINCONJUNCTIONWITHSYSGEN.CFOREXECUTEDIRECTLYWITH*‚*†THEFOLLOWINGARGUMENTS:¬*‚*Ê*@‚*†ARG1-LISTINGFILEORDEVICEFORASSEMBLIESANDLINKEDITS‰*‚*Ê*-‚*†ARG2-SWITCH--0=ARG1ISAFILENAMEœ*‚*—1=ARG1ISADEVICENAMEš*‚*Ê*8‚*†ARG3-CONFIGURATIONSWITCH--1=SINGLE-USERHARD‘*‚*Ê*@‚*†ARG4-WORKINGFILEFORUSEWITHCOPY;ATOPRODUCELISTING‰*‚*Ê*M‚**************************************************************************** ‚MSG‰SYSGENCOMMANDFILE +‚MSG‰SETSYSGENPARAMETERSFROMPASSEDARGS *‚ASMLSW„=\2‹*ASSEMBLYLISTINGFILESWITCH‚*”0=ASMLSISAFILE‚*”1=ASMLSISADEVICE'‚LINKLSWƒ=\2‹*LINKLISTINGFILESWITCH‚*”0=LINKLSISAFILE‚*”1=LINKLSISADEVICE  ‚IFEQˆ\ASMLSW$…ASMLS…="\4"‰*ASMLISTINGWORKFILE‚ENDC ‚IFNEˆ\ASMLSW!…ASMLS…="\1"‰*ASMLISTINGDEVICE‚ENDC ‚IFEQˆ\LINKLSW&…LINKLS„="\4"‰*LINKLISTINGWORKFILE‚ENDC‚IFNEˆ\LINKLSW#…LINKLS„="\1"‰*LINKLISTINGDEVICE‚ENDC +‚WORKLS„="\1"‰*OVERALLLISTINGFILE/DEVICE C‚MSG‰**************************************************************C‚MSG‰**************************************************************?‚MSG‰**„Systemgeneration(SYSGEN)commandfileforusersof‚**4‚MSG‰**„VERSAdosonforVME101.Prepared5/05/83.**C‚MSG‰**************************************************************C‚MSG‰**************************************************************‚MSG‰C‚MSG‰**************************************************************(‚MSG‰**ˆParametersdescribingdevices•**C‚MSG‰**************************************************************(‚*˜Total#ofterminals(localandMCCM)7‚TOTTERMƒ=\NOLTERM+\NOTERM0+\NOTERM1+\NOTERM2+\NOTERM3(‚*˜Total#ofprinters(localandMCCM).1‚TOTPRT„=\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2+\NOPRT3‚*˜Totalnumberofdisks- ž=§5¯1·.¿1Ç9Ï.×.ß5ç9ï+÷EÿIO +‚*˜floppydrivesandharddiskdrives.‚Each(‚*˜volumedefinedrequiresapproximately‚*˜2-1/4Kbytesofmemory.7‚TOTDSK„=\NOFD0+\NOFD1+\HDUDC0+\FDUDC0+\HDUDC1+\FDUDC1‚*‚*,‚NOLTERMƒ=2Œ#oflocalterminals(maxis2)*‚NOLPRT„=1Œ#oflocalpri- nters(maxis1)‚*:‚*‚Note:MCCM'sarenotapplicablewithaVME101processor3‚*ˆboard.‚Theseparametersareleftheretobeable3‚*ˆusethegenericVERSAdosmodulessuchastheI/O‚*ˆinitializer(IOI).‚*)‚NOTERM0ƒ=0ŒnoofMCCMfirstserialport*‚NOTERM1ƒ=0ŒnoofMCCMsecondserialport)‚NOTERM2ƒ=0ŒnoofMCCMthird‚serialport*‚NOTERM3ƒ=0ŒnoofMCCMfourthserialport‚*(‚NOPRT0„=0ŒnoofMCCMfirstparal.port)‚NOPRT1„=0ŒnoofMCCMsecondparal.port(‚NOPRT2„=0ŒnoofMCCMthird‚paral.port)‚NOPRT3„=0ŒnoofMCCMfourthparal.port‚*‚NOMCCMSƒ=0ŒnumberofMCCM's‚*<‚*‚Note:‚InaVME101basedsystemthetermUDCreferstothe7‚*‰MVME315diskcontrollerboard.‚Thisboardiscapable=‚*‰ofcontrolling4floppydisksand4Winchesterharddisks.B‚*‰The4WinchesterharddisksareconnectedtoaSASIcontroller..‚*‰Thefloppydisksmaybeeither5.25"or8".:‚*‰TheparametersforFDCarekepttoallowuseofgeneric‚*‰VERSAdosmodules.‚*6‚NOFD0…=0ŒnooffloppydrivesonfirstFDC-notused7‚NOFD1…=0ŒnooffloppydrivesonsecondFDC-notused*‚HDUDC0„=2ŒnoofharddrivesonfirstUDC+‚HDUDC1„=0ŒnoofharddrivesonsecondUDC,‚FDUDC0„=4ŒnooffloppydrivesonfirstUDC-‚FDUDC1„=0ŒnooffloppydrivesonsecondUDC1‚NOIPCS„=1ŒnoofMVME315diskcontrollerboards.‚*‚*†Parametersaboutdisksizes‚*1‚N8FUDC0ƒ=2Œnumberof8"floppydiskson1stUDC1‚N8FUDC1ƒ=0Œnumberof8"floppydiskson2ndUDC4‚N5FUDC0ƒ=2Œnumberof5.25"floppydiskson1stUDC4‚N5FUDC1ƒ=0Œnumberof5.25"floppydiskson2ndUDC‚*‚MSG‰C‚MSG‰**************************************************************8‚MSG‰**ˆParametersabouttablesizesusedbyVERSAdos…**‚MSG‰**ˆandRMS68K.§**C‚MSG‰**************************************************************‚*2‚PAGESIZE‚=256ŒSizeinbytesofapageofmemory.*‚ASN‡=0Ž#ofaddressspaces--notusedbut'‚*šneededtosatisfyM68XXX.INITDAT.AG.4‚DCQPGE„=2ŒNumberofpagesofmemoryforthedevice-‚*˜connectionqueue(DCQ).‚Minimumof1page,*‚*˜maximumof10pages.‚TheDCQisusedto/‚*˜saveconcurrentrequeststothesamefileor.‚*˜device.‚EachpageoftheDCQcanaccomodate‚*˜approximately9entries.‚*1‚GST‡=2ŒNumberofpagesinglobalsegmenttable.-‚*˜Minumumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately14entries.‚*5‚UST‡=2ŒNumberofpagesintheusersemaphoretable.-‚*˜Minimumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately11entries.‚*6‚TRACE…=5Œ*No.ofpagesintracetable.‚TRACEmustbe/‚*˜nonzeroifTRCFLAGisnonzero.‚Eachpagecan'‚*˜accomodateapproximately10entries.‚*2‚UDR‡=1ŒNumberofpagesinuser-defineddirective0‚*˜table,minimumof0,maximumof10.‚Eachpage'‚*˜accomodateapproximately25entries.‚*6‚IOV‡=1Œ#ofpagesinI/Ovectortable.‚Eachpagecan'‚*˜accomodateapproximately12entries.‚*@‚PAT‡=(\NOLOGONS*32*2+16+(\PAGESIZE-1))/\PAGESIZE#ofpagesin0‚*˜periodicactivationtable.‚Eachpagecanhold.‚*˜approximately8entries.‚PATsizeis\PAT.‚*<‚NOTASKSƒ=10‹Maximumnumberoftasksinsystematonetime.-‚*˜VERSAdoscontainsamaximumof11resident)‚*˜tasks.‚Allowingforthatplusfourfor/‚*˜eachterminalwillaccomodatemostrequests.‚*<‚MAXLU…=12‹Maximumlogicalunitnumberthatcanbeassigned/‚*˜foreachtaskinthesystem.‚Limitis31and.‚*˜minumumis8.‚MAXLUmustbegreaterthanor2‚*˜equaltoTOTDSK.‚MAXLUandNOTASKdeterminethe1‚*˜amountofmemoryrequiredforthelogicalunit1‚*˜table(LUT).‚Thealgorithmfordeterminingthe!‚*˜sizeoftheLUTisasfollows:'‚*˜LUT=16*NOTASKS+8*NOTASKS*(MAXLU+1),‚*˜Theremustbea1LUforeachdiskvolume,‚*˜(FMSassignsadifferentlogicalunitfor,‚*˜eachdisk.)‚ThismeansthatMAXLUmustbe#‚*˜greaterthanorequaltoTOTDSK.‚*‚IFGTˆ\TOTDSK-\MAXLU!…MSG‰SYSGENparametersizeerror.3…MSG‰MAXLUmustbegreaterthanorequaltoTOTDSK.:…MSG‰In. thissysgen,MAXLU=\MAXLUandTOTDSK=\TOTDSK.5…MSG‰Pleaseadjustparametersandstartsysgenagain.…ABORT‚ENDC;‚NOFILESƒ=12‹Maximumnumberoffilesthatcanbeopenedin(‚*˜thesystematonetime.‚Limitof200.9‚NODIFFIL‚=12‹MaximumnumberDIFFERENTfilesthatcanbe-‚*˜openedatonetime.‚Cannotbegreaterthan,‚*˜NOFILES.‚Foreverythreedifferentfiles,,‚*˜approximately1Kofmemoryisrequired.‚A&‚*˜rationof5filesforeachterminal‚*˜accomodatesmostrequests.;‚NODEFVOL‚=4ŒMaximumnumberofdefaultvolumesthatcanbe-‚*˜defined.‚CannotbegreaterthanNOTASKS+3.9‚DEFFAB„=1ŒDefaultFileAllocationBlock(FAB)lengthin/‚*˜sectors(256bytespersector).‚Usedbyfile-‚*˜handlerwhennoFABsizeisgiven.‚Minimum!‚*˜sizeis1,maximumsizeis20.;‚DEFDAT„=4ŒDefaultdatablocklengthinsectors(256bytes1‚*˜persector).‚Usedbyfilehandlerwhennodata/‚*˜blocksizeisgivenatfileallocationtime.*‚*˜Minumumsizeis4,maximumsizeis255.‚MSG‰C‚MSG‰**************************************************************‚MSG‰**ˆEETEQUvalues¥**C‚MSG‰**************************************************************‚*9‚*‹Theseparametersareusedbethesessioncontroltask.9‚*‹Theydefinetheoperatingenvironmentsuchasifbatch<‚*‹andchainprocessingistobeinclued,howmanyterminals ‚*‹maybeloggedonatonetime.‚*>‚DEFAULTƒ="SYS:0.&"„*Systemdefaultvolume:usernumber.catalog;‚TERMOCNT‚=2ŒNo.ofterminaloutputtimeoutsbeforelogoff7‚SECURITY‚=1ŒSwitchtoindicateifsecuritypackageis-‚*˜supported.‚Valueofzeroexcludespackage,-‚*˜nonzeroincludesit.‚Thispackagerequires‚*˜approximately1Kofmemory.<‚SPCCMD„=1ŒSwitchtoindicateifthefollowingusersession0‚*˜managementcommandsaresupported:‚HELP,CLOSE0‚*˜ASSIGN,NEWS.‚Valueofzeroexcludescommands./‚*˜Thispackagerequiresapproximately1/2Kof ‚*˜memory.>‚CHAINBAT‚=1ŒSwitchtoindicateifchainandbatchprocessing2‚*˜aresupported.‚Valueofzeroexcludesbatchand.‚*˜chain;non-zeroincludesthem.‚Thispackage+‚*˜requiresapproximately3-1/2Kofmemory.9‚CONBATCH‚=1ŒNumberofconcurrentbatchjobsthatcanbe(‚*˜running.‚CannotbemorethanNOTASKS.<‚BATCHPGE‚=2ŒNo.ofpagesforbatchjobqueueing.‚Eachpage0‚*˜accomodates32entries.‚Inaddition,thereis+‚*˜spacefor31entriesminusthenumberof‚*˜terminalsinthesystem.=‚BATDLY„=16000ˆ*delayinmsinbatchbetweenreloadattempts=‚NOLOGONƒ=3ŒMaxmimumnumberofinvalidlogonattemptsbefore‚*˜beingrejected.B‚NOLOGONS‚=\TOTTERM…#ofterminalsallowedtologoninthesystem ‚*˜(maxis2),‚LOGMSG1ƒ="VERSAdosV"Logonmessagepart1)‚LOGMSG2ƒ="ERSION"„Logonmessagepart2(‚REVNUMBR‚="4.3"†Logonmessagepart3‚*2‚*˜REVNUMBRisuseddynamicallyinCMDLISTaspart*‚*¡ofthelogonmessage.Ifthisvalueis'‚*¡changedthen'REVISION'inthisfile)‚*¡shouldbechangedtomatchthedynamic ‚*¡value.‚*B‚AUTOTERM‚='CN00'‡TerminalIDofdeviceautologonistooccuron‚AUTOLOGN‚=1ŒBit0:‚*›0-->Autobreakinactive‚*›1-->Autobreakactive ‚*˜Bit1:‚*›0-->Autologoninactive‚*›1-->Autologonactive‚*‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**‰Vectornumbers£**C‚MSG‰**************************************************************5‚PRTVEC„=27‹printerport-level3autovectorloc$6C4‚SERPTS„=29‹serialport-level5autovectorloc$740‚PTMVECTƒ=30‹timer†-level6autovectorloc$782‚FAIL†=31‹Boardfail-level7autovectorloc$7C7‚SWABRT„=31‹Softwareabort-level7autovectorloc$7C1‚*‹ACFAILandsoftwareabortusethesamevector.;‚*‹Themodulestatusregistermustbereadtodeterminethe7‚*‹interruptsource.‚ThisversionofVERSAdossendsthe3‚*‹softwareabortinterrruptdirectlytoVME101bug.‚*‚MSG‰C‚MSG‰**************************************************************#‚MSG‰**ˆAddressesoftimer,etc.š**C‚MSG‰*****************. *********************************************,‚MMU‡=$0‹AddressofMMU(noneonaVME101)."‚TIMER…=$FE00D0†Addressoftimer.7‚CLOCKFRQ‚=0800‰Numberofclocktickspermillisecond.#‚PANEL…=$0‹Addressoffrontpanel.@‚BUGTRACƒ=$F00552†Addressoffirmwaredebugger'straceroutine.2‚TRCFLAGƒ=$C000ˆTraceflag-0meansdon'ttrace.0‚*˜settingofbitsintheTRCFLAGparameterwill2‚*˜controlwhicheventscauseanentrytobebuilt‚*˜inthetracetable.‚*˜Bit#inTRCFLAG†Event ‚*›15‘TRAP#1‚*›14‘I/Ointerruptnotclaimed‚*°byusertask.‚*›13‘Timerinterrupt.‚*›12‘Usertrap(2-15)‚*›11‘Exception‚*›10‘Dispatch‚*œ9‘I/Ointerruptclaimedby ‚*°usertask‚*œ8‘ReturnfromLOADMMU‚*œ7‘Simulatedinterrupt‚*œ6‘SYSFAILinterrupt.‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒLOCALTERMINAL‰DEVICEADDRESES‚** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰2‚LTDA$00ƒ=$FE00A1†2661address-localterminal12‚LTDA$01ƒ=$FE00B1†2661address-localterminal2-‚LPDA$00ƒ=$FE00C1†LocalPrinterbaseaddress‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒSYSGENPARAMETERSFORTERMINALŠ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(TCP=TERMINALCONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEBELOW…**4‚MSG‰***********************************************‚MSG‰‚*2‚TCP$RECƒ=80‹Widthofterminal(characters/line).-‚TCP$RSZƒ=24‹Depthofterminal(lines/page).C‚TCP$WTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.C‚TCP$RTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outaread.>‚TCP$XOFƒ=$17ŠXOFFchar;whenreceived,suspendstransmission ‚*˜(0=none).?‚TCP$XONƒ=0ŒXONchar;whenreceived,cancelsapriorXOFFchar‚*˜(0=anychar).@‚TCP$BRCƒ=$03ŠChartobeinterpretedlikeabreakwhenreceived ‚*˜(0=none).<‚TCP$DOPƒ=$0FŠCharwhichcausesoutputtobediscardedwhen‚*˜received(0=none).:‚TCP$RLNƒ=$13ŠCharwhichcauseslinetobereprintedwhen‚*˜received(0=none).A‚TCP$CLCƒ=$18ŠCharwhichcauseslinetobedeletedwhenreceived ‚*˜(0=none)./‚TCP$RTVƒ=$0DDE0000„Readterminators(CR,$DE).0‚TCP$EOLƒ=$0D0A0000„Endoflinestring(CR,LF).<‚TCP$BRTƒ=$0EŠBaudratecode($0E=9600baud).‚Thefollowing1‚*˜codesmaybeusedtoindicatethedesiredbaud‚*˜rate:*‚*˜Code‚RateƒCodeRateƒCodeRateƒCodeRate#‚*˜$00ƒ50…$05‚300„$09‚2000ƒ$0E‚9600$‚*˜$01ƒ75…$06‚600„$0A‚2400ƒ$0F‚19200$‚*˜$02ƒ110„$07‚1200ƒ$0C‚4800ƒ$10-$FF'‚*˜$03ƒ134.5‚$08‚1800ƒ$0D‚7200ƒReserved?‚TCP$NLSƒ=0Œ#ofASCIINULchar'stosendaftereachCRorLF.+‚TCP$TRCƒ=$00ŠTerminatorclass($0X=none)..‚TCP$TTPƒ=$00ŠTerminaltype(0=EXORterm155).J‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.>‚TCP$HCPY‚=0Œ1meanstheterminalisahardcopydevice,nota‚*˜CRT.8‚TCP$XCTL‚=0Œ1meansuseXON/XOFFtocontrolterminal's‚*˜transmission,notCTS.@‚TCP$BITS‚=0Œ1meanstransmit&receive7bits/charratherthan‚*˜8.<‚TCP$STPB‚=0Œ1meansfolloweachcharsentwith2stopbits‚*˜ratherthan1.=‚TCP$USEP‚=0Œ1meansparityshouldbecheckedandgenerated.<‚TCP$PRTY‚=0Œ1meansparity(ifused)shouldbeevenrather ‚*˜thanodd.<‚TCP$ECHO‚=0Œ1meansthedrivershouldnotechocharacters.@‚TCP$TAHD‚=0Œ1meansthetype-aheadfeatureshouldnotbeused.9‚TCP$TFUL‚=1Œ1meansfillingthebufferonareadshould‚*˜terminatetheread.>‚TCP$PNUL‚=0Œ1meansNULchar'sshouldbeconsidereddatafor‚*˜imagereads.7‚TCP$MODM‚=0Œ1meanstheportisconnectedtoamodem.B‚TCP$OFFH‚=0Œ1meanstheport,ifconnectedtomodem,isoffhook.‚*L‚***************************************************************************'‚*†NOTEonhowtomodifyasingleport:‚*<‚*†Firstduplicatealltheparametersthataretochangefor<‚*†thisparticularport(e.g.TCP$BRT).‚Modifytheduplicate=‚*†labelssothattheybecomeunique.‚Onetechniqueistoput9‚*†theportnumbera/ ttheendofthelabel(e.g.forCN12;‚*†TCP$BRTbecomesTCP$BRT2andTCP$BITSbecomesTCP$BIT2).8‚*†Rememberthatthelabelmustnotexceed8characters!;‚*†Changetheparametertothedesiredvalue(e.g.toseta5‚*†300baudrateforanon-EXORtermterminalonCN12,$‚*†TCP$BRT2=$05andTCP$TTP2=1).‚*4‚*†Nowsubstitutethesenewparametersintothefile:‚*†EXORMACS.IOC.AGfortheCRTDCBmacrodefiningtheport.+‚*†Tocontinuethebaudrateexampleabove:?‚*ˆTCP$ATWSET\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3=‚*ˆTCP$ATWSETTCP$ATW+\TCP$USEP<<4+\TCP$PRTY<<5+\TCP$ECHO<<6=‚*ˆTCP$ATWSETTCP$ATW+\TCP$TAHD<<7+\TCP$TFUL<<8+\TCP$PNUL<<9$‚*ˆTCP$ATWSETTCP$ATW+\TCP$MODM<<10=‚*‰CRTDCB'CN12',IOSID,IOSESS,$133,31,1,'COM1',2,$047C,$5803,‚*©~~:‚*ˆ&ƒTCP$ATW,\TCP$REC,\TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,;‚*ˆ&ƒ\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,\TCP$CLC,\TCP$RTV,2‚*ˆ&„TCP$EQL,TCP$BRT2,\TCP$NLS,\TCP$TRC,TCP$TTP2‚*•~~~~~~~~~“~~~~~~~~~4‚*†where~~~~~~underlinestheCRTDCBmodifications.‚*>‚*†Thissametechniquemaybeusedwiththeprinterparameters<‚*†bymodifyingthePCP$xxxlabelsandsubstitutingintothe=‚*†PRTDCBmacro.‚Itmayalsobeusedwiththediskparameters=‚*†bymodifyingtheDCP$xxxxlabelsandsubstitutingintothe‚*†DSKDCBmacro.‚*L‚***************************************************************************‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**(‚MSG‰**ƒSYSGENPARAMETERSFORPRINTER‹**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**-‚MSG‰**ƒ(PCP=PRINTER‚CONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE…**4‚MSG‰***********************************************‚MSG‰‚*A‚PCP$RECƒ=132ŠWidthofprinter‚(characters/physicalprintline).,‚PCP$RSZƒ=66‹Depthofprinter‚(lines/page).B‚PCP$WTOƒ=120000‡(2minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.6‚PCP$LRLƒ=132ŠLogicallinelength<=widthofprinter<‚PCP$EOLƒ=$0A0D0000„Endoflinestring(LF,CR).(MCCMonly)$‚PCP$ELCƒ=$0DŠEndoflinecharacterJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.9‚PCP$LNFD‚=0Œ1meanstheprintersupportsautolinefeed5‚PCP$AFFƒ=0Œ1meanssupressauto-formfeedonassignB‚PCP$TLRL‚=0Œ0meanswrap-aroundprintiflog.linelen.exceeded0‚*š1meanstruncateprintatlogicallinelength‚*~~~~~~~~~~~~~‚MSG8‚MSG*************************************************** ‚MSG**¯**%‚MSG**‡SYSGENPARAMETERSFORDISKŽ**.‚MSG**‡CONFIGURATIONPARAMETERS/ATTRIBUTES…***‚MSG**‡DCP=DISKCONFIGUREPARAMETERS‰**‚MSG**COMMONTOALLDISKS** ‚MSG**¯**-‚MSG**‡TheMVME315diskcontrollerdriver†**&‚MSG**‡hasseveralconfigurations.**+‚MSG**‡Thesubstitutionparametersusedˆ**/‚MSG**‡dependonthesizeandtheformatof„**-‚MSG**‡thedisks.‚Thegeneralformatused…**‚MSG**‡is:¥**‚MSG**‡Myz$(parametername)”**'‚MSG**‡M=MVME315controllerboardŒ***‚MSG**‡y=disksize5=5.25",8=8"‰**2‚MSG**‡z=type:F=floppydisk,H=harddisk** ‚MSG**¯**.‚MSG**TOMODIFYPARAMETERSSEENOTEABOVE‹**8‚MSG***************************************************‚MSG‚* .‚DCP$WTO=0ŠWRITETIMEOUT-mustbe0fordisks-‚DCP$RTO=0ŠREAD‚TIMEOUT-mustbe0fordisks‚*‚*7‚*‚These2parametersdefinetheVERSAdossectorsize-4‚*‚thelogicalsectorsize.‚Thephysicalsectorsize‚*‚isdefinedbyMyz$PSM.‚*6‚DCP$HBPS=256‡Numberofbytespersectorforharddisk8‚DCP$FBPS=256‡Numberofbytespersectorforfloppydisk‚*‚*†define8"floppies1‚*†Thisissetupfor:‚doublesided,FMencoding,8‚*†48TPI,Motorolaformat,floppydisk,interleave=1,5‚*†128bytesphysicalsectorsize.‚(Thisisthesame!‚*†formatasEXORmacsdiskettes.)‚* ‚M8F$ATM=$021F‚attributesmask‚M8F$PM‚=$52F3‚parametersmask‚M8F$AW‚=$0204‚attributesword0‚M8F$TNS=‚0…total#ofsectors-returnedvalue!‚M8F$SPT=‚26„#sectorspertrack‚M8F$HDS=‚2…#ofheads$‚M8F$TRK=‚77„#ofcylinders-media‚M/ 8F$ILV=‚1…interleavefactor‚M8F$SOF=‚0…spiraloffset,‚M8F$PSM=‚128ƒphysicalsectorsizeonmedia*‚M8F$PSD=‚0…physicalsectorsizeondrive$‚M8F$TRD=‚77„#ofcylinders-drive#‚M8F$COM=‚44„precompensationvalue+‚M8F$PSPT=0…#ofphysicalsectors-drive‚M8F$SRƒ=2…steppingrate2‚M8F$RWC‚=0…reducedwritecurrentcylindernumber"‚M8F$ECC‚=0…ECCdataburstlength‚*‚*†define51/4"floppies2‚*†Thisissetupfor:‚doublesided,MFMencoding,3‚*†96TPI,IBMformat,floppydisk,interleave=1,"‚*†256bytesphysicalsectorsize.‚* ‚M5F$ATM=$021F‚attributesmask‚M5F$PM‚=$42F3‚parametersmask‚M5F$AW‚=$000F‚attributesword0‚M5F$TNS=‚0…total#ofsectors-returnedvalue!‚M5F$SPT=‚16„#sectorspertrack‚M5F$HDS=‚2…#ofheads$‚M5F$TRK=‚80„#ofcylinders-media‚M5F$ILV=‚1…interleavefactor‚M5F$SOF=‚0…spiraloffset,‚M5F$PSM=‚256ƒphysicalsectorsizeonmedia*‚M5F$PSD=‚0…physicalsectorsizeondrive$‚M5F$TRD=‚80„#ofcylinders-drive"‚M5F$COM=‚0…precompensationvalue+‚M5F$PSPT=0…#ofphysicalsectors-drive‚M5F$SRƒ=1…steppingrate2‚M5F$RWC‚=0…reducedwritecurrentcylindernumber"‚M5F$ECC‚=0…ECCdataburstlength‚*&‚*†define51/4"Winchesterharddisks‚* ‚M5H$ATM=$0110‚attributesmask‚M5H$PM‚=$93F2‚parametersmask‚M5H$AW‚=$0010‚attributesword0‚M5H$TNS=‚0…total#ofsectors-returnedvalue!‚M5H$SPT=‚32„#sectorspertrack‚M5H$HDS=‚4…#ofheads%‚M5H$TRK=‚306ƒ#ofcylinders-media‚M5H$ILV=‚13„interleavefactor‚M5H$SOF=‚0…spiraloffset,‚M5H$PSM=‚256ƒphysicalsectorsizeonmedia*‚M5H$PSD=‚0…physicalsectorsizeondrive%‚M5H$TRD=‚306ƒ#ofcylinders-drive$‚M5H$COM=‚350ƒprecompensationvalue+‚M5H$PSPT=0…#ofphysicalsectors-drive‚M5H$SRƒ=0…steppingrate4‚M5H$RWC‚=153ƒreducedwritecurrentcylindernumber#‚M5H$ECC‚=11„ECCdataburstlength‚MSG‰A‚MSG‰************************************************************7‚MSG‰**…Descriptiveinfoaboutthisoperatingsystem‡**A‚MSG‰************************************************************5‚SYSNAMEƒ="VERSAdos"ƒNameforthisoperatingsystem.:‚REVISION‚="REV04.3"‚Revisionofthisoperatingsystem.7‚TIMSLICƒ=2ŒNumberoftimerinterruptspertimeslice.>‚TIMINTVƒ=10‹Numberofmillisecondsbetweentimerinterrupts.‚*A‚*‚MemoryfortheVME101startsat$0foron-boardRAM.‚Off-board=‚*‚memorystartsat$10000.‚Allmemoryissizedtogether.‚The<‚*‚parametersMEMEND2andMEMEND3arebasicallyfortheVM02=‚*‚board.‚Thearekeptherewithzerovaluestoallowtheuse:‚*‚ofthegenericmemorysizingtableandroutine.‚MEMEND19‚*‚isofimportanceforaVME101basedsystem.‚ThisvalueH‚*‚mustbelargerthanthehighestmemeoryaddressbyatleastonebyte.E‚*‚Thevalueherewillworkusingfrom1to4256-bytememoryboards.>‚*‚Ifyouhavemorethen4memoryboards,pleaseadd$40000to%‚*‚MEMEND1foreachadditionalboard.‚*‚*5‚MEMEND1ƒ=$100000†Endingaddrmemorymustbe=this.‚NotapplicableforVME110..*šNotapplicableforVME101.Boththeseboards,*šuseoff-boardfortheoperatingsystemand *šusertasks.9‚DPRVAO„=$0‹Dualportedramversadosoffset.(VM02only)D‚WHERLOAD‚=$00000‡Addressatwhichtoloadintheoperatingsystem.I*------------------------------------------------------------------------‚MSG‰A‚MSG‰************************************************************;‚MSG‰**VALPAR--Validateparameterstokeepyouhonest‡**A‚MSG‰************************************************************‚SUBSˆVME101.VALPAR.AG!‚ASM‰VME101.VALPAR.AG,,\ASMLS;R-C ‚IFGT\$RDE‚PAUSE‡Abortsysgeniferrorsinassembly-elsehitcarriagereturn.‚ENDC ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDCK*--------------------------------------------------------------------------‚MSG‰B‚MSG‰*************************************************************#‚MSG‰**…Generateexecprocess--œ**B‚MSG‰*******0 ******************************************************B‚MSG‰*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*‚MSG‰*„PROCESSVME101.RMS.LO¢*B‚MSG‰*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~* ‚PCˆ=$10000 ‚STACK…=$C00‚STARTRMS‚=$10100‚PROCESS„VME101.RMS.LO‚ENDˆVME101.RMS.LO‚IFEQˆ\LINKLSW…=COPY‡VME101.RMS.LL,\WORKLS;A‚ENDCK*--------------------------------------------------------------------------‚MSG‰B‚MSG‰*************************************************************)‚MSG‰**ˆMVME315diskcontrollerdriver“**B‚MSG‰************************************************************* ‚M315DRVRƒ=* ‚IFEQ‚\TOTDSK‚ENDC ‚IFNE‚\TOTDSK‚SUBSˆM315DRV.LG‚LINKˆM315DRV.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚PROCESS…M315D.LO ‚END‰M315D.LO‚ENDCO*------------------------------------------------------------------------------‚MSG‰B‚MSG‰*************************************************************'‚MSG‰**EPCIDRV2661terminaldriverœ**B‚MSG‰*************************************************************‚MSG‰ ‚EPCIDRVRƒ=*‚IFEQƒ\TOTTERM5‚MSG‰~~~~~~~~~TERMINALDRIVERNOTREQUIRED~~~~~~~~~‚ENDC‚IFNEˆ\TOTTERM…SUBSˆEPCIDRV.LG…LINKˆEPCIDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…PROCESS…EPCID.LO …END‰EPCID.LO‚ENDCO*------------------------------------------------------------------------------‚MSG‰B‚MSG‰*************************************************************.‚MSG‰**IFWEHAVEPRINTERS,ADDTHEDRIVER•**B‚MSG‰*************************************************************‚MSG‰ ‚PRTDRVRƒ=* ‚IFEQƒ\NOLPRT4‚MSG‰~~~~~~~~~PRINTERDRIVERNOTREQUIRED~~~~~~~~~‚ENDC ‚IFNEˆ\NOLPRT…SUBSˆPRTDRV.LG…LINKˆPRTDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …PROCESS…PRTD …END‰PRTD‚ENDCH*----------------------------------------------------------------------- ‚MEMBEG„=*‚MSG?‚MSGˆ**********************************************************7‚MSGˆ**‚IXRisusedasinputtotheVERSAdosmodulesˆ**?‚MSGˆ********************************************************** ‚SUBS‚IXR.AG‚ASMƒIXR.AG,IXR.RO,\ASMLS ‚IFEQ‚\ASMLSWˆ=COPY\ASMLS,\WORKLS;A‚ENDCO*------------------------------------------------------------------------------‚MSG‰@‚MSG‰***********************************************************=‚MSG‰**‚IOS--Input/OutputServices(trap#2servertask)ƒ**@‚MSG‰***********************************************************‚TASKˆIOS,.IOS‚STATE…='DORM'‚PRIORITY‚=$D1 ‚SESSIONƒ=1‚IOSSTR„=*ŒIOSloadaddr.!‚IOSASR„=*+2ŠIOSASRentrypoint ‚SUBSˆIOS.LG ‚LINKˆIOS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰IOS‚MSG‰B‚MSG‰*************************************************************>‚MSG‰**ƒFHS--FileHandlingServices(trap#3servertask)ƒ**B‚MSG‰*************************************************************‚TASKˆFHS,.FHS‚STATE…='DORM' ‚SESSIONƒ=1‚PRIORITY‚=$D1‚FHSSTR„=*ŒFHS‚loadaddr.!‚FHSASR„=*+2ŠFHSASRentrypoint ‚SUBSˆFHS.LG ‚LINKˆFHS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FHS‚MSG‰B‚MSG‰*************************************************************(‚MSG‰**ˆFMS--FileManagementSystem”**B‚MSG‰*************************************************************‚TASKˆFMS,.FMS‚STATE…='DORM'‚PRIORITY‚=$D0‚FMSSTR„=*ŒFMSloadaddr.!‚FMSASR„=*+2ŠFMSASRentrypoint ‚SUBSˆFMS.LG ‚LINKˆFMS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FMS‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆEET--EntryExitTask›**B‚MSG‰*************************************************************‚TASKˆEET,&EET‚STATE…='READ' ‚SESSIONƒ=2‚PRIORITY‚=$C8‚EETSTR„=*ŒEETloadaddr.%‚SUBSˆEET.LG,9995.&.EET.EQ,CMDLIST.AG'‚ASM‰EET.EQ/CMDLIST.AG,CMDLIST,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC ‚LINKˆEET.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰EET‚MSG‰B‚MSG‰***********************************0 **************************.‚MSG‰**ˆLDR--Loader(trap#4servertask)Ž**B‚MSG‰*************************************************************‚TASKˆLDR,&LDR‚STATE…='READ'‚PRIORITY‚=$C8 ‚SESSIONƒ=4‚LDRSTR„=*ŒLDRloadaddr.‚SUBSˆNOMMU.LOADER.LG‚LINKˆNOMMU.LOADER.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰LDR‚MSG‰@‚MSG‰***********************************************************‚MSG‰**ˆIOCOM&IOI¤**@‚MSG‰***********************************************************‚TASKˆIOI,.IOI‚STATE…='READ' ‚SESSIONƒ=1‚PRIORITY‚=$DA ‚IOCSTR„=*‚SUBSˆVME101.IOC.AG6‚ASM‰IODM.AG/VME101.IOC.AG,VME101.IOC.RO,\ASMLS;RZ=105 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVME101.ASR.AG'‚ASM‰VME101.ASR.AG,VME101.ASR.RO,\ASMLS ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC3‚ASM‰VME101.OSLIST.AG,VME101.OSLIST.RO,\ASMLS;Z=105 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVME101.IOI.LG‚LINKˆVME101.IOI.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰IOI‚MSG‰@‚MSG‰***********************************************************%‚MSG‰**ˆINIT--SystemInitializer•**@‚MSG‰*********************************************************** ‚PROCESS…INIT ‚INTSTR„=*6‚SUBSˆM68XXX.INITDAT.AG,VME101.INITIO.AG,VME101.INT.LG1‚ASM‰M68XXX.INITDAT.AG,M68XXX.INITDAT.RO,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC/‚ASM‰VME101.INITIO.AG,VME101.INITIO.RO,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚LINKˆVME101.INT.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC ‚END‰INIT@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚MSG‰*¹*)‚MSG‰*‹MAKESUBSTITUTIONSINVERSAPT.CFŽ*‚MSG‰*¹*@‚MSG‰***********************************************************@‚MSG‰***********************************************************ƒSUBSƒVME101.VERSAPT.CF‚MSG‰@‚MSG‰***********************************************************@‚MSG‰*********************************************************** ‚MSG‰**ENDƒOFƒSYSGENŽ**‚MSG‰**•Haveaniceday.’**@‚MSG‰***********************************************************@‚MSG‰***********************************************************éééééé=OPT -N=/**********************=/*VME101.SYSGEN.CFƒ*=/**********************=OPT K,NM=/***************************************************************************"=/*Chainfiletoperformsysgen¬*=/*É*=/*Callingsequence:·*=/*É*)1 =/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5£*=/*É*7=/*„Notalloftheargumentsneedtobeenteredsince”*$=/*†theyeachhaveadefaultvalue¥*=/*É*6=/*„arg1-commandfilename(defaultstoSYSCMD.CD)•*=/*É*,=/*„arg2-Tempvolanduserno./BootfileŸ*9=/*Temp.vol.anduserno.defaultstovolumenameand‰*)=/*usernumberofcommandfile(arg1).—**=/*Bootfiledefaultsto'VERSADOS.SY'.˜*=/*É*=/*É*9=/*„arg3-Listdeviceorfilenameforsysgenmessages’*=/*(defaultstoSYSLIST.LS)¤*;=/*‹Iffilename-sysgenuses'.LS'asdefaultextension‰*=/*É*9=/*‡NOTE:Thefirstthreeargumentsarethesameasthe*4=/*threecommandlinefieldsusedininvokingtheŽ*=/*sysgenutilitydirectly.¤*=/*É*E=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')†*=/*É*5=/*„arg5-Listingdeviceorfile(Defaultsto#PR)–*A=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.*:=/*Allassemblylistingsandlinkmapswillbedirectedˆ*<=/*Tothespecifieddeviceorfileusingthecopyutility†*>=/*withappendoption.‚SYSGEN.TFisusedasanintermediateƒ*7=/*filetocontaintheassemblyorlinklistoutput.‹*@=/*Duetorestrictionsinsysgenliteralsubstitutionprocess‚*8=/*thisfieldcannotcontainmorethan10characters.Š*M=/***************************************************************************=/*5=/* Insure that no more than 5 arguments are defined:=/*=/RX=\0 =/IF RX>5ƒ=OPT-N<ƒ=/*Error-chainfilestartedwithmorethan5arguments-5ƒ=/*ƒPleaserestart,theargumentdefinitionsfollow:ƒ=/*(ƒ=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5ƒ=/*6ƒ=/*„Notalloftheargumentsneedtobeenteredsince$ƒ=/*†theyeachhaveadefaultvalue.ƒ=/*8 F(O0 5ƒ=/*„arg1-commandfilename(defaultstoSYSCMD.CD)ƒ=/*+ƒ=/*„arg2-Tempvolanduserno./Bootfile8ƒ=/*Temp.vol.anduserno.defaultstovolumenameand(ƒ=/*usernumberofcommandfile(arg1).)ƒ=/*Bootfiledefaultsto'VERSADOS.SY'.ƒ=/*Gƒ=/&**Typecarriagereturnormoreinformation,'break'toterminate.ƒ=/*8ƒ=/*„arg3-Listdeviceorfilenameforsysgenmessagesƒ=/*(defaultstoSYSLIST.LS):ƒ=/*‹Iffilename-sysgenuses'.LS'asdefaultextensionƒ=/*8ƒ=/*‡NOTE:Thefirstthreeargumentsarethesameasthe3ƒ=/*threecommandlinefieldsusedininvokingtheƒ=/*sysgenutilitydirectly.ƒ=/*Dƒ=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')ƒ=/*4ƒ=/*„arg5-Listingdeviceorfile(Defaultsto#PR)Aƒ=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.9ƒ=/*Allassemblylistingsandlinkmapswillbedirected;ƒ=/*Tothespecifieddeviceorfileusingthecopyutility=ƒ=/*withappendoption.‚SYSGEN.TFisusedasanintermediate6ƒ=/*filetocontaintheassemblyorlinklistoutput.?ƒ=/*Duetorestrictionsinsysgenliteralsubstitutionprocess7ƒ=/*thisfieldcannotcontainmorethan10characters.ƒ=/*ƒ=END=/ENDIF=/*2=/* Force the definition of 5 exactly 5 arguments.=/* =/IF RX=0+ƒ=ARGSYSCMD.CD,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=1$ƒ=ARG\1,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=2&ƒ=ARG\1,\2,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=3ƒ=ARG\1,\2,\3,SINGLE-HARD,#PR=/ENDIF =/IF RX=4ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*8=/* We have 5 arguments - now default any null arguments=/*=/IFC \1ƒ=ARGSYSCMD.CD,\2,\3,\4,\5=/ENDIF=/*=/IFC \3ƒ=ARG\1,\2,SYSLIST.LS,\4,\5=/ENDIF=/*=/IFC \4ƒ=ARG\1,\2,\3,SINGLE-HARD,\5=/ENDIF=/*=/IFC \5ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*N=/* If arg5 is not #PR,#PR1,#PR2,#PR3,# or #NULL then treat as file and delete:=/*ƒsetswitch(arg6)to1forprinterdevice,0forfile.=/*1 0=ARG \1,\2,\3,\4,\5,0,#PR,#PR1,#PR2,#PR3,#,#NULL =/FOR 7,\0ƒ=/IFEQ"\5"\(RX)1†=ARG\1,\2,\3,\4,\5,1,#PR,#PR1,#PR2,#PR3,#,#NULLƒ=/ENDIF=/ENDFOR=/RX=\6 =/IF RX=0ƒ=DEL\5=/ENDIF=/*=/* Set switch (arg7) TO:=/*„01--‚SINGLE-HARD=/*=ARG \1,\2,\3,\4,\5,\6,10=/IFEQ "\4"SINGLE-HARDƒ=ARG\1,\2,\3,\4,\5,\6,01=/ENDIF=/*9=/* Abort chain if an invalid configuration was requested=/*=/RX=\7 =/IF RX=10ƒ=OPT-N3ƒ=/*‚\4isaninvalidconfiguration-(argument#4)8ƒ=/*…Theonlyvalidconfigurationis'SINGLE-HARD'which3ƒ=/*…isthedefault.Pleaserestartchainfilewithƒ=/*…correctparameters.ƒ=END=/ENDIF#=ARG \1,\2,\3,\4,\5,\6,\7,SYSGEN.TF=/*3=/* The argument list now looks like the following:=/* =/*ƒarg1ƒ-ƒNameofcommandfile.=/*0=/*ƒarg2ƒ-ƒTemporaryvolume/bootfile(ornull).=/*3=/*ƒarg3ƒ-ƒListdeviceorfileforsysgenmessages.=/*(=/*ƒarg4ƒ-ƒSystemconfigurationmnemonic=/*'SINGLE-HARD'=/*(seearg7)=/*@=/*ƒarg5ƒ-ƒListingfileordeviceforassembliesandlink-edits.4=/*SYSGEN.TFisthetemporaryfilewhichisusedin1=/*conjunctionwith=COPY;Atoproduceasingle=/*listingfile.=/*(seearg6)=/*=/*ƒarg6ƒ-ƒSwitch-"=/*0=‚arg5specifiesafilename=/*1=‚arg5specifiesadevice=/*(seearg5)=/*%=/*ƒarg7ƒ-ƒNumberconfigurationkey-%=/*01=‚signle-userharddisksystem=/*(seearg4)=/*8=/*ƒarg8ƒ-ƒSYSGEN.TFtemporaryfileforusewithcopyin+=/*creatinglistingfilespecifiedbyarg3=/*=/*9=/* Justify argument positions and invoke sysgen utility.=/*=ARG \5,\6,\7,\8,\1,\2,\3,\4=/*)=/* Turn off echo of sysgen command lines=OPT J=OPT -N=SYSGEN VME101.\5,\6,\7;T=300 =OPT -J,-N8=/**‚ApplyingpatchesfromXVERSAPT.CFtothebootfile.=/@ VME101.XVERSAPT.CFM=/***************************************************************************M=/***************************************************************************=/**=/**‚SysgenCompleted--=/**6=/**„Assemblyandlinklistingshavebeenoutputto\1=/**1=/**„Sysgencommandlistinghasbeenoutputto\7=/**M=/***************************************************************************M=/***************************************************************************=OPT -K=NOARG=ENDéééééé2 d1IOI ASREL'VME101 IOI SA „VERSAdos I/O Initialization System Task V 4.1 - 09/13/82×2pFMSDLEN pNOTASKS pNOCDCB pNODCBS pNOFCBS pIOCOML pIOCOMS pCCSEG pOSMTBL pNODVS pNOFATS pOSMEND pFHSASR pFMSASQ  pFMSASR pNOLPRT pIOSASR pNOVDTS pNOLTERM !@F3`F3$ IOSG((K3´@€.|*B#ü()2"|(J‘gH |)N1i!iG3Lé? Hè? (g (f(p=/*ƒcontainpatchestobeappliedtoVERSADOSafterthesysgen =/*ƒprocess.=/*=PATCH VERSADOS.SYH*---+----:----+----:----+----:----+----:----+----:----+----:----+----:--H*>----------------------------------------------------------------------O\TTYSTR*StartofTTYH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\IOSSTR*StartofIOSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FHSSTR*StartofFHSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FMSSTR*StartofFMSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\EETSTR*StartofEETH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\LDRSTR*StartofLDRH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\IOCSTR*StartofIOCH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\INTSTR*StartofINTH*<----------------------------------------------------------------------QUIT=/*!=/*†PATCHPRTDRVONLYIFITEXIST=/*=/RD = \NOLPRT =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\PRTDRVRŽ*StartofPRTDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*#=/*†PATCHMPSCSPRONLYIFITEXISTS=/*^/gC=/RD = \NOTERM40 =/IFRD‚>=0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCSPRŽ*StartofMPSCSPRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"3 =/*†PATCHMPSCDRVONLYIFITEXIST=/*=/RD = \NOTERM40 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCDRVŽ*StartofMPSCDRVH*<----------------------------------------------------------------------QUIT=/ENDIF=/*'=/*†PATCHCHPIDRIVERONLYIFITEXISTS=/*=/RD = \NOLTERM =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\CHIDRVRŽ*StartofCHIDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*!=/*†PATCHWINDRVONLYIFITEXIST=/* =/RD = \NOWIN =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\WINDRVRŽ*StartofWINDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHSASIDRVONLYIFITEXIST=/*=/RD = \NOSASI =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\SASIDRVŽ*StartofSASIDRVH*<----------------------------------------------------------------------QUIT=/ENDIF=/*#=/*†PATCHMTADRVRONLYIFITEXISTS=/*=/RD = \TOTM435 =/IF RD <> 0=PATCH VERSADOS.SYG*>---------------------------------------------------------------------O\MTADRVRŽ*StartofMTADRVRG*<---------------------------------------------------------------------QUIT=/ENDIF=/*8=/* SYSTEM MUST BE RE-BOOTED FOR PATCHES TO TAKE EFFECT.=/*=END PAGE)ASR IDNT 11,11 ASR ADDRS. FOR I/O MODULES*8*ASR-FILE OF ASR ADDRESSES OF I/O MODULES-NEEDED FOR IOI*! XDEF FMSASR,FHSASR,IOSASR,TTYASRFMSASR EQU \FMSASRFHSASR EQU \FHSASRIOSASR EQU \IOSASRTTYASR EQU \TTYASR ENDéééééééo 4  PAGEO********************************************************************************>*ˆVME110.IOC.AG--defineDCB'SandCDB'SforVMEmodulesystem*(*ˆThemacrosusedaredefinedinIODM.AG*'*ˆ11/10/83‚modifiedformagtapedriver+*’modifiedtouseIOCVECandIOCLVLequates&*’includesWinchesterandSASIdrivers*’magtapeatlevel1*7*ˆ2/3/84„modifiedforSASI51/4"diskcontroller(BWN)*O******************************************************************************* *@*‚ThissectionbecomesIOCOMS,whichisusedbyFMS,IOS,&FHS.*#IOCOM„IDNT†12,12‡I/OCOMMONSEGMENT SECTION 0 OPT MEX XDEF IOCOMS,IOCOML,CCSEG *1*‚Definethephysicaladdressesofdevicedrivers*‚usingtheSYSGENparameters.*PRT†EQU‡\PRTDRVRMSPR…EQU‡\MPSCSPRMPSC…EQU‡\MPSCDRVCHI†EQU‡\CHIDRVRWIN†EQU‡\WINDRVRSASI…EQU‡\SASIDRVGPIB…EQU‡\GPIBDRVMTA†EQU‡\MTADRVR PAGE*6*‚Hereareparametersdescribingthetablesandlists.*IOCOMS  DC.L 0 I/O sysgen options. ( DC.L DCQSTR Start address of DCQ space.&DC.LDCQENDEndƒaddressofDCQspace.DC.L0†Addressof1stDCQ. ( DC.L LUTSTR Start address of LUT space.&DC.LLUTENDEndƒaddressofLUTspace.DC.L0†Addressof1stLUT. ( DC.L DCBTBL Start address of DCB space.&DC.LDCBENDEndƒaddressofDCBspace. DC.L DCBTBL Address of 1st DCB.  DC.L 0 SEMAPHORE FLAG&DC.B'\SYSNAME'„OPERATINGSYSTEMI.D.DC.B'\REVISION'ƒANDƒREVISION( DC.L 0,0,0 TASK ID FOR UNCLAIMED BREAKS PAGEO********************************************************************************C*ˆStorageforDCQ'sandLUT's.‚Initiallythesetwolistsareempty.*O******************************************************************************* * *‚DCQspace.* DCQSTR EQU * DS.B 256*\DCQPGEDCQEND EQU *-1 * *‚LUTspace.* LUTSTR EQU * DS.B LUTBEG*\NOTASKS DS.B LUTSEG*\NOTASKS*(\MAXLU+1)LUTEND EQU *-1‰PAGExR<‰I‘D™>¡Q©O±J¹NÁO**********************************************************************************ˆDefineDCB'sbasedonSYSGENparameters.*O******************************************************************************* *DCBTBLEQU*‡ThisisthetopofDCBspace. &**************************************$*‚SETUPDCB'SFORLOCALTERMINALS‚*&************************************** IFNE \NOLTERMB CRTDCB 'CN00',TTYID,IOSESS,$133,35,1,'CTTY',0,0,0,$9500,\TCP$REC,4& \TCP$RSZ,\TCP$WTO,\TCP$RTO,0,0,0,0,0,0,0,0,0,0,0,0 ENDC**$*ˆSETUPDCB'SFORMVME400TERMINALS*  IFGT \NOTERM40ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8& \WCP$FILV,\WCP$FSOF,\WCP$FPSM,\WCP$FSHD,\WCP$FTRD,\WCP$FCOM,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC‚IFGT‚\FDWIN-1*9*2NDFLOPPYDISKƒ#FD03-8"singledensity,doublesided*DSKNMƒSETDSKNM+1WCP$FAW8 SET $0204WCP$FTNS SET 4004H DSKDCB DSKNM,IOSID,IOSESS,$1F,71,4,'WIND',3,\WCP$FATM,\WCP$PM,WCP$FAW8,L& \DCP$FBPS/2,WCP$FTNS,\DCP$WTO,\DCP$RTO,\WCP$FSPT+10,\WCP$FHDS,\WCP$FTRK-3,D& \WCP$FILV,\WCP$FSOF,\WCP$FPSM/2,\WCP$FSHD,\WCP$FTRD-3,\WCP$FCOM-2,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC ENDC** ‚IFNEƒ\NOSASI$*************************************¢**ƒSetupDCBsfordiskson‡**ƒMVME420-SA1403diskŠ* *ƒcontroller.*¢*$************************************* ‚IFNE\HDSASI**1STHARDDISK„#HD20*DSKNMƒSET‚HDDV+$3230G DSKDCB DSKNM,IOSID,IOSESS,$1F,75,4,'SASI',0,\SCP$ATM,\SCP$PM,\SCP$HAW,F& \DCP$HBPS,\SCP$HTNS,\DCP$WTO,\DCP$RTO,\SCP$HSPT,\SCP$HHDS,\SCP$HTRK,>& \SCP$HILV,\SCP$HSOF,\SCP$HPSM,\SCP$HSHD,\SCP$HTRD,\SCP$HCOM,)& \SCP$HPTD,\SCP$HSRD,\SCP$HRWC,\SCP$HECC‚ENDC‚IFGT‚\HDSASI-1**2NDHARDDISK„#HD21*DSKNMƒSET‚DSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,75,4,'SASI',1,\SCP$ATM,\SCP$PM,\SCP$HAW,F& \DCP$HBPS,\SCP$HTNS,\DCP$WTO,\DCP$RTO,\SCP$HSPT,\SCP$HHDS,\SCP$HTRK,>& \SCP$HILV,\SCP$HSOF,\SCP$HPSM,\SCP$HSHD,\SCP$HTRD,\SCP$HCOM,)& \SCP$HPTD,\SCP$HSRD,\SCP$HRWC,\SCP$HECC‚ENDC ‚IFNE‚\FDSASI**1STFLOPPYDISK„#FD22*DSKNMƒSETFDDV+$3232G DSKDCB DSKNM,IOSID,IOSESS,$1F,76,4,'SASI',2,\SCP$ATM,\SCP$PM,\SCP$FAW,F& \DCP$FBPS,\SCP$FTNS,\DCP$WTO,\DCP$RTO,\SCP$FSPT,\SCP$FHDS,\SCP$FTRK,>& \SCP$FILV,\SCP$FSOF,\SCP$FPSM,\SCP$FSHD,\SCP$FTRD,\SCP$FCOM,)& \SCP$FPTD,\SCP$FSRD,\SCP$FRWC,\SCP$FECC ENDC‚IFGT‚\FDSASI-1**2NDFLOPPYDISK…#FD23*DSKNMƒSETDSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,76,4,'SASI',3,\SCP$ATM,\SCP$PM,\SCP$FAW,F& \DCP$FBPS,\SCP$FTNS,\DCP$WTO,\DCP$RTO,\SCP$FSPT,\SCP$FHDS,\SCP$FTRK,>& \SCP$FILV,\SCP$FSOF,\SCP$FPSM,\SCP$FSHD,\SCP$FTRD,\SCP$FCOM,)& \SCP$FPTD,\SCP$FSRD,\SCP$FRWC,\SCP$FECC ENDC ENDC*‚IFNEƒ\NOSASI5$*************************************¢**ƒSetupDCBsfordiskson‡**ƒMVME420-DTC520Adisk‰**ƒcontroller.”**¢*$*************************************‚IFNE\HDSASI5**1STHARDDISK„#HD10**ˆSet‚parametersfor15mbdisk*!WCP$HTNSSET‡58752…No.ofsectorsWCP$HHDSSET‡6‰No.ofheads$WCP$HTRKSET‡306‡Cylinderspermedia$WCP$HTRDSET‡306‡Cylindersperdrive**DSKNMƒSET‚HDDV+$3130G DSKDCB DSKNM,IOSID,IOSESS,$1F,77,4,'SAS5',0,\SC5$ATM,\SC5$PM,\SC5$HAW,C5 & \DCP$HBPS,WCP$HTNS,\DCP$WTO,\DCP$RTO,\WCP$HSPT,WCP$HHDS,WCP$HTRK,=& \SC5$HILV,\WCP$HSOF,\WCP$HPSM,\WCP$HSHD,WCP$HTRD,\WCP$HCOM,)& \WCP$HPTD,\WCP$HSRD,\WCP$HRWC,\WCP$HECC‚ENDC‚IFGT‚\HDSASI5-1**2NDHARDDISK„#HD11**ˆSet‚parametersfor40mbdisk*"WCP$HTNSSET‡156672„No.ofsectorsWCP$HHDSSET‡6‰No.ofheads$WCP$HTRKSET‡640‡Cylinderspermedia$WCP$HTRDSET‡640‡Cylindersperdrive***DSKNMƒSET‚DSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,77,4,'SAS5',1,\SC5$ATM,\SC5$PM,\SC5$HAW,C& \DCP$HBPS,WCP$HTNS,\DCP$WTO,\DCP$RTO,\WCP$HSPT,WCP$HHDS,WCP$HTRK,=& \SC5$HILV,\WCP$HSOF,\WCP$HPSM,\WCP$HSHD,WCP$HTRD,\WCP$HCOM,)& \WCP$HPTD,\WCP$HSRD,\WCP$HRWC,\WCP$HECC‚ENDC‚IFNE‚\FDSASI5**1STFLOPPYDISK„#FD12*DSKNMƒSETFDDV+$3132G DSKDCB DSKNM,IOSID,IOSESS,$1F,78,4,'SAS5',2,\SC5$ATM,\SC5$PM,\SC5$FAW,F& \DCP$FBPS,\WCP$FTNS,\DCP$WTO,\DCP$RTO,\WCP$FSPT,\WCP$FHDS,\WCP$FTRK,>& \SC5$FILV,\WCP$FSOF,\WCP$FPSM,\WCP$FSHD,\WCP$FTRD,\WCP$FCOM,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC‚IFGT‚\FDSASI5-1**2NDFLOPPYDISK…#FD13*DSKNMƒSETDSKNM+1G DSKDCB DSKNM,IOSID,IOSESS,$1F,78,4,'SAS5',3,\SC5$ATM,\SC5$PM,\SC5$FAW,F& \DCP$FBPS,\WCP$FTNS,\DCP$WTO,\DCP$RTO,\WCP$FSPT,\WCP$FHDS,\WCP$FTRK,>& \SC5$FILV,\WCP$FSOF,\WCP$FPSM,\WCP$FSHD,\WCP$FTRD,\WCP$FCOM,)& \WCP$FPTD,\WCP$FSRD,\WCP$FRWC,\WCP$FECC ENDC   ENDC*‰PAGEA******************************************************************.*…DefineGPIBDefaultParametersandAttribute*A******************************************************************GPD$ATM‚EQU‡$1F‘ATTRIBUTEMASKGPD$PAM‚EQU‡$FFFPARAMETERMASK7GPD$AT1‚EQU‡$2137DEVICEATTRIBUTES(BUS,NOTSHARABLE)7GPD$AT2‚EQU‡$6137DEVICEATTRIBUTES(DEV,NOTSHARABLE)3GPD$AT3‚EQU‡$4137DEVICEATTRIBUTSE(DEV,SHARABLE)/GPD$ATW‚EQU‡$3’ATTRIBUTEWORD(TALKER/LISTENER)(GPD$WTO‚EQU‡30000WRITETIMEOUT(30SEC)'GPD$RTO‚EQU‡30000READTIMEOUT‚(30SEC)#GPD$EOR‚EQU‡$19010901‹ENDOFRECORDGPD$EOS‚EQU‡$0A0AENDOFSTRING'GPD$PPC‚EQU‡$80‘PARALLELPOLLCONFIGUREGPD$PRA‚EQU‡$10‘PRIMARYADDRESS$GPD$WLN‚EQU‡$0’WRITETRANSFERLENGTH#GPD$RLN‚EQU‡$0’READTRANSFERLENGTH*GPD$RSM‚EQU‡$0’READSECONDARYADDRESSMASK+GPD$WSM‚EQU‡$0’WRITESECONDARYADDRESSMASK*6*‚DCBƒDEFINITIONFORIEEE-488BUSANDBUSSABLEDEVICES* IFGE \NOGPIB-1*C GPDVDCB.14 'BUSA',GPD$AT1,0,1,GPD$ATM,GPD$PAM,$1F,GPD$WTO,GPD$RTO,B& GPD$EOR,GPD$EOS,GPD$PPC,GPD$PRA,GPD$WLN,GPD$RLN,GPD$RSM,GPD$WSM,& $0,$0,'BUS0'*D GPDVDCB 'BA0A',GPD$AT2,0,1,GPD$ATM,GPD$PAM,GPD$ATW,GPD$WTO,GPD$RTO,B& GPD$EOR,GPD$EOS,GPD$PPC,GPD$PRA,GPD$WLN,GPD$RLN,GPD$RSM,GPD$WSM,& $0,$0,'BUS0'*D GPDVDCB 'BA0B',GPD$AT3,0,1,GPD$ATM,GPD$PAM,GPD$ATW,GPD$WTO,GPD$RTO,B& GPD$EOR,GPD$EOS,GPD$PPC,GPD$PRA,GPD$WLN,GPD$RLN,GPD$RSM,GPD$WSM,& $0,$0,'BUS0'*D GPDVDCB 'BA0C',GPD$AT2,0,1,GPD$ATM,GPD$PAM,GPD$ATW,GPD$WTO,GPD$RTO,B& GPD$EOR,GPD$EOS,GPD$PPC,GPD$PRA,GPD$WLN,GPD$RLN,GPD$RSM,GPD$WSM,& $0,$0,'BUS0'*D GPDVDCB 'BA0D',GPD$AT3,0,1,GPD$ATM,GPD$PAM,GPD$ATW,GPD$WTO,GPD$RTO,B& GPD$EOR,GPD$EOS,GPD$PPC,GPD$PRA,GPD$WLN,GPD$RLN,GPD$RSM,GPD$WSM,& $0,$0,'BUS0'**†HANDLETHERESTASDEFAULTS* GPDFDCB.BA0E* ENDC** IFGE \NOGPIB-2*C GPDVDCB.14 'BUSB',GPD$AT1,0,1,GPD$ATM,GPD$PAM,$1F,GPD$WTO,GPD$RTO,B& GPD$EOR,GPD$EOS,GPD$PPC,GPD$PRA,GPD$WLN,GPD$RLN,GPD$RSM,GPD$WSM,& $0,$0,'BUS1'**†HANDLETHERESTASDEFAULTS* GPDFDCB.BB0A*  ENDC*ˆMAGTAPEDRIVERADDITIONC*******************************************************************IFNE…\TOTM435(*****************************************¦*$*‚SETUPDCB'SFORMAGTAPEDRIVER„**¦*(******************************************—FIRSTBOARD‰SECONDBOARD**FIRSTTRANSPORT‹MT00‘MT10*SECONDTRANSPORTŠMT01‘MT11*THIRDTRANSPORT‹MT02‘MT12*FOURTHTRANSPORTŠMT03‘MT13*….*….*….*EIGHTHTRANSPORTŠMT07‘MT17**MTA0DVƒSET‡$00003000‹__0_MTA1DVƒSET‡$00003100‹__1_MTDV…EQU‡$4D540000‹MT__‚IFGE‚\NOMTA0-1*%*ƒFIRSTTAPEDRIVEƒONFIRSTTRANSP5 ORT*MTANM„SET‡MTDV+MTA0DV+$30GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',0,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-2*&*ƒSECOND‚TAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',1,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-3*%*ƒTHIRDƒTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',2,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-4*&*ƒFOURTH‚TAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',3,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-5*%*ƒFIFTHƒTAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',4,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-6*%*ƒSIXTHƒTAPEDRIVE‚ONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',5,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-7*'*ƒSEVENTHTAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',6,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA0-8*&*ƒEIGHTH‚TAPEDRIVEƒONFIRSTTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA0',7,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-1*&*ƒFIRST‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTDV+MTA1DV+$30GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',0,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-2*'*ƒSECOND‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',1,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-3*&*ƒTHIRDƒTAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',2,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-4*'*ƒFOURTH‚TAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',3,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-5*&*ƒFIFTHƒTAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',4,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-6*&*ƒSIXTHƒTAPEDRIVE‚ONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',5,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-7*(*ƒSEVENTHTAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',6,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC ‚IFGE‚\NOMTA1-8*'*ƒEIGHTH‚TAPEDRIVEƒONSECONDTRANSPORT*MTANM„SET‡MTANM+1GMTADCB‚MTANM,IOSID,IOSESS,$F7,60,00,'MTA1',7,\MCP$ATM,\MCP$PM,\MCP$AW,7&‚\MCP$WTO,\MCP$RTO,\MCP$DEN,\MCP$RDT,\MCP$WRT,\MCP$ERT‚ENDC  ENDC‰PAGE5*****************************************************3*‚SETUPDCBFORNULLDEVICE;THISMUSTALWAYSBE‚*/*‚LASTSINCEITSPOINTERTONEXTISSETTO0.†*5***************************************************** LLUN: ‰DC.L†0‰ADDRESSNEXTDCBINLIST.‰DC.L†'NULL'„ASCIIIDENTIFICATIONFORTHISDCB‰DC.L†0‰DCQLIST‰DC.L†0,0‡DRIVERID/SESSION‰DC.L†0‰ADDRESSOFLUT‰DC.L†$FF‡DEVICEATTRIBUTES6 ‰DC.W†0‰W/RPROTECTCODES‰DC.W†0‰DEVICEINUSEFLAG‰DC.L†0‰W/RCOUNT#‰DC.B…$FFˆDEVICEFLAG(DEVICECODE)#‰DC.B†1‰DEVICEFLAG(DEVICESTATUS)‰DC.L†0‰CHANNELID‰DC.B†0‰CHANNELDEVICENO.‰DC.B†0‰REQUESTOR'SPRIORITY‰DC.L†0‰CURRENTRECORDNO.1‰DS.B†IOSBLN„ROOMFORREQUESTOR'SPARAMETERBLOCK:‰DC.L†0‰LOGICALADDROFPARAMETERBLKINUSERMEMORYSPACE'‰DC.B†0‰CONFIGURATIONCOORDINATIONFLAG‰DC.B†0‰BREAKCOUNT$‰DC.L†0‰ADDRESSOFBREAKSERVICELUT‰DC.L†0‰BREAKSERVICEADDRESS>‰DC.L†0,0,0,0ƒBUFFERZONEBETWEENDEVICEINDEPENDENT/DEPENDENT)‰DC.B†IOSTLN„SPACEFORCONFIGURATIONINFO‰DCB.B…DCBLEN-(*-LLUN),0 (DCBENDEQU*-1…EndaddressofDCBspace.HIOCOML EQU (*-IOCOMS+255)/256*256 Get length of common segment (force to*§nextpageboundary). PAGE SECTION 1‰PAGEO*********************************************************************************‰CHANNELDATABLOCKS*O******************************************************************************* CCSEG EQU * ******‚LOCALPRINTERS IFGT \NOLPRTH CDB 0,'CPRT',XTPRTL,254,PRT,0,\LPDA$00,7,26,1,$10,0,0,0,0,0,0,0,0,0,0,0 ENDC  ******‚LOCALTERMINALS  IFGT \NOLTERMO CDB $0000,'CTTY',XTACIA,254,CHI,0,$FE8001,3,29,5,$30,1,0,$80,$80,0,3,0,0,0,0,0 ENDC   IFGT \NOTERM40@ CDB $0011,'SUP2',0,254,MSPR,0,\LTDA$01,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP2',XTS7AR,254,MPSC,'SUP2',\LTDA$01,1,\IOCVEC4,\IOCLVL4,$30,& 0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-1M CDB $0009,'CMP3',XTS7BR,254,MPSC,'SUP2',\LTDA$02,1,28,4,$30,0,0,0,0,0,0,0,0,& 0,0,0 ENDC **ˆDISKCHANNELS* IFGT‚\NOWIN@ CDB 0,'WIND',XTDWIN,254,WIN,0,\LWIN$00,1,\IOCVEC3,\IOCLVL3,$10,&„0,0,0,0,0,0,0,0,0,0,0 ENDC IFGT \NOSASIA CDB 0,'SASI',XTDSAS,254,SASI,0,\LSAS$00,1,\IOCVEC3,\IOCLVL3,$10,&ƒ0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOSASI5A CDB 0,'SAS5',XTDSAS,254,SASI,0,\LSA5$00,1,\IOCVEC3,\IOCLVL3,$10,&ƒ0,0,0,0,0,0,0,0,0,0,0 ENDC‰PAGE******‚IEEE-488CHANNELS  IFGE \NOGPIB-1J CDB $0001,'BUS0',XTGBUS,254,GPIB,0,\GPIB$00,64,$B0,4,$40,1,0,0,0,0,0,0,0,&…0,0,0 ENDC* IFGE \NOGPIB-2J CDB $0001,'BUS1',XTGBUS,254,GPIB,0,\GPIB$01,64,$B1,4,$40,1,0,0,0,0,0,0,0,&…0,0,0 ENDC*,*********************************************ª**ˆMAGTAPEDRIVER“**ˆCHANNELDATABLOCK**ª*,*********************************************$******ƒFIRSTADAPTERBOARD(MVME435)* IFGT‚\NOMTA0H CDB 0,'MTA0',XTM435,0,MTA,0,\LMTA$00,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC*%******‚SECONDADAPTERBOARD(MVME435)* IFGT‚\NOMTA1H CDB 0,'MTA1',XTM435,0,MTA,0,\LMTA$01,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC**) DC.L 0 Link of 0 marks end of CDB chain.  ENDéééé6 é ‰XREF†TTYASR ‰XDEF†TTYASQ‰XDEF†OSMTBL,FMSASQ‰XDEF†OSMEND,FMSDLEN‰XREF†FHSASR,IOSASR,FMSASR*-*ˆTABLEOFOPERATINGSYSTEMMODULETASKNAMES*‰NOLIST‰INCLUDEƒ9995.&.IOE.EQ‰INCLUDEƒ9995.&.TR1.EQ‰INCLUDEƒ9995.&.EXE.EQ‰INCLUDEƒ9995.&.NIO.EQ‰INCLUDEƒ9995.&.LV5.EQ‰INCLUDEƒ9995.&.FME.EQ‰INCLUDEƒ9995.&.FMI.EQ‰LIST SECTION 1‰PAGE**ˆTABLEOFOSMODULETASKNAMES*OSMTBLƒDC.L…FHSIDŽFHSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+FHSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+FHSNLN‡QUEUELENGTH‰DC.L„FHSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…IOSIDŽIOSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+IOSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+IOSNLN‡QUEUELENGTH‰DC.L„IOSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED***‰DC.L…FMSIDŽFMSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRD‚ASQSTATUS'‰DC.B„EVTLEN+FHSNLN‡MAX.MESSAGELENGTHFMSASQƒDC.L„0QUEUELENGTH‰DC.L„FMSASRŽADDR.OFASR‰DC.W„0**‰DC.W„SGOPPAŽOPTIONS-LOG.ADDR=PHYS.ADDR.‰DC.W„SGATRW+SGATSS‡ATTRIBUTES‰DC.L„FMSDSEG.NAME‰DC.L„0LOGICALADDRESSFMSDLEN‚DC.L„0SEGMENTLENGTH*$‰DC.L†TTYID‡CONSOLEDRIVERTASKNAME‰DC.L†1‹TASKSESSIONNUMBER‰DC.B†07ŠASQSTATUS ‰DC.B†$10‰MAXIMUMMESSAGELENGTHTTYASQ:‰DC.L†$100ˆQUEUELENGTH‰DC.L†TTYASR†ADDRESSOFASR‰DC.W†0$‰DC.L†0,0,0,0…NODATASEGMENTNEEDED*OSMENDƒEQU…*“ENDOFTABLE ‰END‡OSMTBLéÉI PAGE*#*VALPAR VALIDATES SYSGEN PARAMETERSG*…FAILERRORISGENERATEDFOREACHPARAMETERTHATISNOTINVALIDRANGE:*ANY ERROR SHOULD MAKE OPERATOR ABORT SYSGEN SINCE FURTHER/*…SYSGENPROCESSINGASSUMESPARAMETERSAREGOOD*+*CAN'T HAVE MORE THAN 4 MVME 400 TERMINALS. IFGT \NOTERM40-4 FAIL 100 ENDC8*CAN'T HAVE MORE THAN 4 DRIVES PER WINCHESTER CONTROLLER IFGT \HDWIN+\FDWIN-4 FAIL 100 ENDC5*CAN'THAVEMORETHAN4DRIVESPERSASI‚8"ƒCONTROLLER IFGT \HDSASI+\FDSASI-4 FAIL 100 ENDC9*CAN'THAVEMORETHAN4DRIVESPERSASI51/4"ƒCONTROLLER IFGT \HDSASI5+\FDSASI5-4 FAIL 100 ENDC9*CAN'T HAVE 0 OR MORE THAN 75 TASKS IN SYSTEM AT ONE TIME IFEQ \NOTASKS FAIL 100 ENDC IFGT \NOTASKS-75 FAIL 100 ENDC1*MAXIMUM LU CANNOT BE LESS THAN 8 OR MORE THAN 31 IFLT \MAXLU-8 FAIL 100 ENDC IFGT \MAXLU-31 FAIL 100 ENDC2*MAXIMUM LU CANNOT BE LESS THAN NO. OF DISK DRIVES IFLT \MAXLU-\TOTDSK FAIL 100 ENDC**IF NO MVME435, CAN'T HAVE ANY TAPE DRIVES IFEQ \TOTM435 ‚IFGT\NOMTAT ‚FAIL100‚ENDC ENDC/*CAN'T HAVE MORE THAN 8 TAPE DRIVES PER MVME435 IFGT \NOMTA0-8 FAIL 100 ENDC IFGT \NOMTA1-8 FAIL 100 ENDCC*MAXIMUM NO. OF PAGES FOR DCQ,UST,GST,IOV, AND TRACE CANNOT BE 0 OR*…MORETHAN10 IFEQ \DCQPGE FAIL 100 ENDC IFGT \DCQPGE-10 FAIL 100 ENDC IFEQ \GST FAIL 100 ENDC IFGT \GST-10 FAIL 100 ENDC IFEQ \UST FAIL 100 ENDC IFGT \UST-10 FAIL 100 ENDC IFNE \TRCFLAG 7  IFEQ \TRACE FAIL 100 ENDC ENDC IFNE \TRCFLAG IFGT \TRACE-10 FAIL 100 ENDC ENDC IFEQ \IOV FAIL 100 ENDC IFGT \IOV-10 FAIL 100 ENDCG*MAXIMUM NO. OF DIFFERENT FILES MUST BE .LE. MAXIMUM NO. OF TOTAL FILES IFGT \NODIFFIL-\NOFILES FAIL 100 ENDC2*MAXIMUM NO. OF FILES CANNOT BE 0 OR MORE THAN 200 IFEQ \NODIFFIL FAIL 100 ENDC IFGT \NODIFFIL-200 FAIL 100 ENDC IFEQ \NOFILES FAIL 100 ENDC IFGT \NOFILES-200 FAIL 100 ENDCÒkÛG*MAXIMUM NO. OF DEFAULT VOLUMES CANNOT BE 0 OR MORE THAN NO. OF TASKS+3 IFEQ \NODEFVOL FAIL 100 ENDC IFGT \NODEFVOL-(\NOTASKS+3) FAIL 100 ENDCE*NUMBER OF DEFAULT VOLUMES MUST BE GREATER THAN OR EQUAL TO NUMBER OF*ƒLOGONTERMINALS IFGT \NOLOGONS-\NODEFVOL FAIL 100 ENDC**DEFAULT FAB SIZE CANNOT BE 0 MORE THAN 20 IFEQ \DEFFAB FAIL 100 ENDC IFGT \DEFFAB-20 FAIL 100 ENDC7*DEFAULT DB SIZE CANNOT BE LESS THAN 4 OR MORE THAN 255 IFGT \DEFDAT-255 FAIL 100 ENDC IFLT \DEFDAT-4 FAIL 100 ENDC END ééééé=LINK ,IOI,\LINKLS;HAMIXSSEGMENT IOSG:0 \IOCSTRSEGMENT .IOI:1INPUT VME110.IOC.ROINPUT VME110.IOI.ROINPUT VME110.OSLIST.RO INPUT IXR.ROINPUT VME110.ASR.ROEND=ENDéééé7 éééã ‚********************‚*VME110.SYSCMD.CD*M‚****************************************************************************‚*SYSGENCOMMANDFILE-´*?‚*ƒUSEINCONJUNCTIONWITHSYSGEN.CFOREXECUTEDIRECTLYWITH*‚*†THEFOLLOWINGARGUMENTS:¬*‚*Ê*@‚*†ARG1-LISTINGFILEORDEVICEFORASSEMBLIESANDLINKEDITS‰*‚*Ê*-‚*†ARG2-SWITCH--0=ARG1ISAFILENAMEœ*‚*—1=ARG1ISADEVICENAMEš*‚*Ê*8‚*†ARG3-CONFIGURATIONSWITCH--1=SINGLE-USERHARD‘*‚*Ê*@‚*†ARG4-WORKINGFILEFORUSEWITHCOPY;ATOPRODUCELISTING‰*‚*Ê*M‚**************************************************************************** ‚MSG‰SYSGENCOMMANDFILE +‚MSG‰SETSYSGENPARAMETERSFROMPASSEDARGS *‚ASMLSW„=\2‹*ASSEMBLYLISTINGFILESWITCH‚*”0=ASMLSISAFILE‚*”1=ASMLSISADEVICE'‚LINKLSWƒ=\2‹*LINKLISTINGFILESWITCH‚*”0=LINKLSISAFILE‚*”1=LINKLSISADEVICE  ‚IFEQˆ\ASMLSW$…ASMLS…="\4"‰*ASMLISTINGWORKFILE‚ENDC ‚IFNEˆ\ASMLSW!…ASMLS…="\1"‰*ASMLISTINGDEVICE‚ENDC ‚IFEQˆ\LINKLSW&…LINKLS„="\4"‰*LINKLISTINGWORKFILE‚ENDC‚IFNEˆ\LINKLSW#…LINKLS„="\1"‰*LINKLISTINGDEVICE‚ENDC +‚WORKLS„="\1"‰*OVERALLLISTINGFILE/DEVICE6‚LINK1TFƒ="INIT1.TF"„*INTERMEDIATELINKFILEFORINIT6‚LINK2TFƒ="INIT2.TF"„*INTERMEDIATELINKFILEFORINIT C‚MSG‰**************************************************************C‚MSG‰**************************************************************?‚MSG‰**„Systemgeneration(SYSGEN)commandfileforusersof‚**4‚MSG‰**„VERSAdosonforVME110.Prepared1/26/83.**C‚MSG‰**************************************************************C‚MSG‰**************************************************************‚MSG‰C‚MSG‰**************************************************************(‚MSG‰**ˆParametersdescribingdevices•**C‚MSG‰**************************************************************+‚*˜Total#ofterminals(localandMVME400)8‚TOTTERMƒ=\NOLTERM+\NOTERM40+\NOTERM0+\NOTERM1+\NOTERM2 ì<õ?ýD? 385%0-,5-=-E-M1U-]4e5m-uI}Q…BT•O/*‚*˜Total#ofprinters(localandMVME410))‚TOTPRT„=\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2‚*˜Totalnumberofdisks-+‚*˜floppydrivesandharddiskdrives.‚Each(‚*˜volumedefinedrequiresapproximately‚*˜2-1/4Kbytesofmemory.9‚TOTDSK„=\HDWIN+\FDWIN+\HDSASI+\FDSASI+\HDSASI5+\FDSASI5‚NOGPIB„=0Œ#ofGPIBchannels‚*,‚NOLTERMƒ=1Œ#oflocalterminals(maxis1)8‚NOTERM40‚=1Œ#ofterminalsusingMVME400serialports&‚NOLPRT„=1Œ#ofprinters(onMVME410)‚*,‚NOWIN…=1Œ#ofWinchestercontrollerboards9‚HDWIN…=2Œ#ofharddiskdrivesonWinchestercontroller;‚FDWIN…=2Œ#offloppydiskdrivesonWinchestercontroller‚**‚NOSASI„=1Œ#ofSASI8"controllerboards,‚HDSASI„=2Œ#ofharddiskdrivesonSASI‚8".‚FDSASI„=2Œ#offloppydisk8 drivesonSASI‚8"‚*/‚NOSASI5„=1Œ#ofSASI51/4"controllerboards1‚HDSASI5„=2Œ#ofharddiskdrivesonSASI„51/4"3‚FDSASI5„=2Œ#offloppydiskdrivesonSASI‚51/4"‚*=‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRAD1…=0ŒNO.OFRADBOARDS‚NUSRRADƒ=0ŒNO.OFRADUSERS‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRADdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RADRV…=0‚*@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRIO†=0ŒNumberofRIOboards‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRIOdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RIODRVRƒ=0‚*D‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~#‚NDAC1…=0ŒNumberofMVME605boards;‚NUSRDACƒ=0ŒNumberofusers(total)fortheMVME605boards‚*"‚NACO†=0ŒNumberofMVME615boards;‚NUSRACOƒ=0ŒNumberofusers(total)fortheMVME615boards‚*‚*#‚NDCO1…=0ŒNumberofMVME625boards;‚NUSRDCOƒ=0ŒNumberofusers(total)fortheMVME625boards‚*‚*%‚NVME610=0ŽNumberofMVME610boards%‚NVME620=0ŽNumberofMVME620boards‚*‚*B‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~>‚PCDRV…=0ŒIfnon-zeroincludespecialI/Ochannelinitializer2‚*˜forProcessControlDriversinusernumber9992‚*+‚NOTERM0ƒ=0Œnotused-butIXR.AGwantsit*‚NOPRT0„=0Œnotused-butIXR.AGwantsit+‚NOTERM1ƒ=0Œnotused-butIXR.AGwantsit*‚NOPRT1„=0Œnotused-butIXR.AGwantsit+‚NOTERM2ƒ=0Œnotused-butIXR.AGwantsit*‚NOPRT2„=0Œnotused-butIXR.AGwantsit5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~F‚*†IFtheMAGTAPEdriverIStoBEusedYOUmustMERGEfileMTALDPNT.SA‚*†intoVME110.INITIO1.AG5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~5‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:‚*********************************************************‚*·*‚*ˆMAGTAPEDRIVER *‚*ˆNOTESONBOARDJUMPERING—*‚*·*:‚*********************************************************‚*‚*‚*ˆINTERRUPTLEVEL‚*7‚*ˆThechanneldatablockisconfiguredforI/Ochannel3‚*ˆinterruptlevel1inIOC.AG.‚Pleasebesurethat3‚*ˆyourboardisjumperedforthisinterruptlevel,4‚*ˆasdescribedintheMVME435magnetictapeadapter ‚*ˆmanual.‚*8‚*ˆAsdescribedintheMVME435manual,tohavea‚level18‚*ˆinterrupt,thejumperonJ2mustbeplacedtoconnect‚*ˆpins7-8asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+----+|‚8 ‚*’+--------+‚*‚*‚*ˆADDRESS‚ONI/OCHANNEL‚*7‚*ˆThechanneldatablockisconfiguredforI/Ochannel<‚*ˆaddressesLMTA$00=(I/Ochannel‚baseaddress)+$3E9and/‚*ˆLMTA$01=(I/Ochannelbaseaddress)+$3A9.5‚*ˆPleasebesurethatyourboard(s)is(are)jumpered‚*ˆforoneoftheseaddresses.‚*@‚*ˆTohaveaboardaddressof(I/Ochannelbaseaddress)+$3E9,)‚*ˆremovealljumpersfromJ3asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+„+|‚8 ‚*’+--------+‚*‚*‚*@‚*ˆTohaveaboardaddressof(I/Ochannel‚baseaddress)+$3A9,%‚*ˆconnect‚pins7-8onJ3asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+----+|‚8 ‚*’+--------+‚*‚*‚*‚*‚*‚*8‚TOTM435ƒ=0ŒTotal#ofmagtapeMVME435adapterboards.*3‚NOMTA0„=0Œ#oftapedrivesonfirstMVME435‚board4‚NOMTA1„=0Œ#oftapedrivesonsecondMVME435‚boardD‚NOMTAT„=\NOMTA0+\NOMTA1‚Totalnumberoftapedrivesforthesystem*‚MSG‰C‚MSG‰**************************************************************-‚MSG‰**ˆParametersabouttablesizes,etc.**C‚MSG‰**************************************************************2‚PAGESIZE‚=256ŠSizeinbytesofapageofmemory.*‚ASN‡=08 Œ#ofaddressspaces--notusedbut'‚*˜neededtosatisfyM68XXX.INITDAT.AG.‚*4‚DCQPGE„=2ŒNumberofpagesofmemoryforthedevice-‚*˜connectionqueue(DCQ).‚Minimumof1page,*‚*˜maximumof10pages.‚TheDCQisusedto/‚*˜saveconcurrentrequeststothesamefileor.‚*˜device.‚EachpageoftheDCQcanaccomodate‚*˜approximately9entries.‚*1‚GST‡=2ŒNumberofpagesinglobalsegmenttable.-‚*˜Minumumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately14entries.‚*5‚UST‡=1ŒNumberofpagesintheusersemaphoretable.-‚*˜Minimumof1,maximumof10.‚Eachpagecan'‚*˜accomodateapproximately11entries.‚*8‚TRACE…=0ŒNumberofpagesintracetable.‚TRACEmustbe/‚*˜nonzeroifTRCFLAGisnonzero.‚Eachpagecan'‚*˜accomodateapproximately10entries.‚*2‚UDR‡=1ŒNumberofpagesinuser-defineddirective0‚*˜table,minimumof0,maximumof10.‚Eachpage+‚*˜canaccomodateapproximately25entries.‚*:‚IOV‡=1ŒNumberofpagesinI/Ovectortable.‚Minimumsize5‚*˜is1,maximumsizeis10.‚Eachpagecanaccomodate‚*˜approximately12entries.‚*@‚PAT‡=(\NOLOGONS*32*2+16+(\PAGESIZE-1))/\PAGESIZE#ofpagesin3‚*˜periodicactivationtable.‚RequiredforDELAYor5‚*˜RQSTPARMS68Kdirectives.‚Eachpagecanaccomodate.‚*˜approximately8entries.‚PATsizeis\PAT.‚*<‚NOTASKSƒ=10‹Maximumnumberoftasksinsystematonetime.-‚*˜VERSAdoscontainsamaximumof11resident)‚*˜tasks.‚Allowingforthatplusfourfor/‚*˜eachterminalwillaccomodatemostrequests.‚*<‚MAXLU…=12‹Maximumlogicalunitnumberthatcanbeassigned/‚*˜foreachtaskinthesystem.‚Limitis31and.‚*˜minimumis8.‚MAXLUmustbegreaterthanor2‚*˜equaltoTOTDSK.‚MAXLUandNOTASKdeterminethe1‚*˜amountofmemoryrequiredforthelogicalunit1‚*˜table(LUT).‚Thealgorithmfordeterminingthe!‚*˜sizeoftheLUTisasfollows:'‚*˜LUT=16*NOTASKS+8*NOTASKS*(MAXLU+1),‚*˜Theremustbea1LUforeachdiskvolume,‚*˜(FMSassignsadifferentlogicalunitfor,‚*˜eachdisk.)‚ThismeansthatMAXLUmustbe#‚*˜greaterthanorequaltoTOTDSK.‚*‚IFGTˆ\TOTDSK-\MAXLU!…MSG‰SYSGENparametersizeerror.3…MSG‰MAXLUmustbegreaterthanorequaltoTOTDSK.:…MSG‰Inthissysgen,MAXLU=\MAXLUandTOTDSK=\TOTDSK.5…MSG‰Pleaseadjustparametersandstartsysgenagain.…ABORT‚ENDC;‚NOFILESƒ=12‹Maximumnumberoffilesthatcanbeopenedin(‚*˜thesystematonetime.‚Limitof200.‚*9‚NODIFFIL‚=12‹MaximumnumberDIFFERENTfilesthatcanbe-‚*˜openedatonetime.‚Cannotbegreaterthan,‚*˜NOFILES.‚Foreverythreedifferentfiles,,‚*˜approximately1Kofmemoryisrequired.‚A&‚*˜rationof5filesforeachterminal‚*˜accomodatesmostrequests.‚*;‚NODEFVOL‚=8ŒMaximumnumberofdefaultvolumesthatcanbe-‚*˜defined.‚CannotbegreaterthanNOTASKS+3.‚*9‚DEFFAB„=1ŒDefaultFileAllocationBlock(FAB)lengthin/‚*˜sectors(256bytespersector).‚Usedbyfile-‚*˜handlerwhennoFABsizeisgiven.‚Minimum!‚*˜sizeis1,maximumsizeis20.‚*;‚DEFDAT„=4ŒDefaultdatablocklengthinsectors(256bytes1‚*˜persector).‚Usedbyfilehandlerwhennodata/‚*˜blocksizeisgivenatfileallocationtime.*‚*˜Minumumsizeis4,maximumsizeis255.‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**ˆEETEQUvalues¥**C‚MSG‰**************************************************************>‚DEFAULTƒ="SYS:0.&"„*Systemdefaultvolume:usernumber.catalog<‚TERMOCNT‚=2Œ*No.ofterminaloutputtimeoutsbeforelogoff‚*7‚SECURITY‚=1ŒSwitchtoindicateifsecuritypackageis-‚*˜supported.‚Valueofzeroexcludespackage,-‚*˜nonzeroincludesit.‚Thispackagerequires‚*˜approximately1Kofmemory.‚*<‚SPCCMD„=0ŒSwitchtoindicateifthefollowingusersession0‚*˜managementcommandsaresupported:‚HELP,CLOSE0‚*˜ASSIGN,NEWS.‚Valueofzeroexcludescommands./‚*˜Thispackagerequiresapproximately1/2Kof ‚*˜memory.‚*>‚CHAINBAT‚=1ŒSwitchtoindicateifchainan9 dbatchprocessing2‚*˜aresupported.‚Valueofzeroexcludesbatchand.‚*˜chain;non-zeroincludesthem.‚Thispackage+‚*˜requiresapproximately3-1/2Kofmemory.‚*9‚CONBATCH‚=1ŒNumberofconcurrentbatchjobsthatcanbe(‚*˜running.‚CannotbemorethanNOTASKS.‚*<‚BATCHPGE‚=2ŒNo.ofpagesforbatchjobqueueing.‚Eachpage0‚*˜accomodates32entries.‚Inaddition,thereis+‚*˜spacefor31entriesminusthenumberof‚*˜terminalsinthesystem.‚*=‚BATDLY„=16000ˆ*delayinmsinbatchbetweenreloadattempts=‚NOLOGONƒ=3ŒMaxmimumnumberofinvalidlogonattemptsbefore‚*˜beingrejected.B‚NOLOGONS‚=\TOTTERM…#ofterminalsallowedtologoninthesystem,‚LOGMSG1ƒ="VERSAdosV"Logonmessagepart1)‚LOGMSG2ƒ="ERSION"„Logonmessagepart2(‚REVNUMBR‚="4.3"†Logonmessagepart3‚*2‚*˜REVNUMBRisuseddynamicallyinCMDLISTaspart*‚*¡ofthelogonmessage.Ifthisvalueis'‚*¡changedthen'REVISION'inthisfile)‚*¡shouldbechangedtomatchthedynamic ‚*¡value.‚*B‚AUTOTERM‚='CN00'‡TerminalIDofdeviceautologonistooccuron‚AUTOLOGN‚=1ŒBit0:‚*›0-->Autobreakinactive‚*›1-->Autobreakactive ‚*˜Bit1:‚*›0-->Autologoninactive‚*›1-->Autologonactive‚*‚*‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**‰Vectornumbers£**C‚MSG‰***************************************************************5‚IOCVEC1ƒ=$19ŠI/Ochannelinterrupt1vector‚loc$645‚IOCVEC2ƒ=$1AŠI/Ochannelinterrupt2vector‚loc$685‚IOCVEC3ƒ=$1BŠI/Ochannelinterrupt3vector‚loc$6C5‚IOCVEC4ƒ=$1CŠI/Ochannelinterrupt4vector‚loc$70*+‚IOCLVL1ƒ=‚1‹I/Ochannelinterrupt1level.+‚IOCLVL2ƒ=‚2‹I/Ochannelinterrupt2level.+‚IOCLVL3ƒ=‚3‹I/Ochannelinterrupt3level.+‚IOCLVL4ƒ=‚4‹I/Ochannelinterrupt4level. 2‚ACIA†=29‹serialport-level5autovectorloc$740‚PTMVECTƒ=30‹timer†-level6autovectorloc$782‚FAIL†=31‹Boardfail-level7autovectorloc$7C7‚SWABRT„=31‹Softwareabort-level7autovectorloc$7C:‚*‹ACFAIL,SYSFAIL,andsoftwareabortusethesamevector>‚*‹Thestatusregistermustbereadtodeterminetheinterrupt ‚*‹source.‚*‚MSG‰C‚MSG‰**************************************************************#‚MSG‰**ˆAddressesoftimer,etc.š**C‚MSG‰**************************************************************,‚MMU‡=$0‹AddressofMMU(noneonaVME110)."‚TIMER…=$FE8010†Addressoftimer.6‚CLOCKFRQ‚=0800‰Numberofclocktickspermillisecond#‚PANEL…=$0‹Addressoffrontpanel.@‚BUGTRACƒ=$F03974†Addressoffirmwaredebugger'straceroutine.6‚TRCFLAGƒ=0ŒTraceflag.‚Zeroimpliesdon'ttrace.‚The0‚*˜settingofbitsintheTRCFLAGparameterwill2‚*˜controlwhicheventscauseanentrytobebuilt‚*˜inthetracetable.‚*˜Bit#inTRCFLAG†Event ‚*›15‘TRAP#1‚*›14‘I/Ointerruptnotclaimed‚*°byusertask.‚*›13‘Timerinterrupt.‚*›12‘Usertrap(2-15)‚*›11‘Exception‚*›10‘Dispatch‚*œ9‘I/Ointerruptclaimedby ‚*°usertask‚*œ8‘ReturnfromLOADMMU‚*œ7‘Simulatedinterrupt‚*œ6‘SYSFAILinterrupt.‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**2‚MSG‰**ƒLOCALTERMINAL/PRINTERDEVICEADDRESSES**+‚MSG‰**ƒMAGTAPEADAPTERBOARDADDRESSESˆ**#‚MSG‰**ƒRWIN1ANDSASIADDRESSES**$‚MSG‰**ƒGPIBCONTROLLERADDRESSES** ‚MSG‰**«**0‚MSG‰**ƒBaseAddressJumpers:‚'.'=nojumper‚**‚MSG‰**š'J'=jumper…**4‚MSG‰***********************************************‚MSG‰0‚LTDA$00ƒ=$FE8001†ACIAaddress-localterminalC‚LTDA$01ƒ=$FE61CD†MVME400withbaseaddressjumpers(...J)portAC‚LTDA$02ƒ=$FE61CF†MVME400withbaseaddressjumpers(...J)portBC‚LPDA$00ƒ=$FE61E1†MVME410withbaseaddressjumpers(....)portAC‚LPDA$01ƒ=$FE61E9†MVME410withbaseaddressjumpers(....)portB<‚LMTA$00ƒ=$FE63E9†MVME435withbaseaddressjumpers(....)<‚LMTA$01ƒ=$FE63A9†MVME435withbaseaddressjumpers(...J) ‚LWIN$00ƒ=$FE60D3†RWIN1address-‚LSAS$00ƒ=$FE60F1†SASI‚8"controlleraddress1‚LSA9 5$00ƒ=$FE60E1†SASI‚51/4"controlleraddressA‚GPIB$00ƒ=$FF0400†VME300withbaseaddressjumpers(JJJJJ.JJJJ)A‚GPIB$01ƒ=$FF0440†VME300withbaseaddressjumpers(JJJJJ.JJJ.)‚*-‚IOBASE„=$FE6000†BaseaddressofI/Ochannel‚*‚*4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒSYSGENPARAMETERSFORTERMINALŠ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(TCP=TERMINALCONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEBELOW…**4‚MSG‰***********************************************‚MSG‰‚*2‚TCP$RECƒ=80‹Widthofterminal(characters/line).-‚TCP$RSZƒ=24‹Depthofterminal(lines/page).C‚TCP$WTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.C‚TCP$RTOƒ=900000‡(15minutes)#ofmillisectoallowbeforetiming‚*˜outaread.>‚TCP$XOFƒ=$17ŠXOFFchar;whenreceived,suspendstransmission ‚*˜(0=none).?‚TCP$XONƒ=0ŒXONchar;whenreceived,cancelsapriorXOFFchar‚*˜(0=anychar).@‚TCP$BRCƒ=$03ŠChartobeinterpretedlikeabreakwhenreceived ‚*˜(0=none).<‚TCP$DOPƒ=$0FŠCharwhichcausesoutputtobediscardedwhen‚*˜received(0=none).:‚TCP$RLNƒ=$13ŠCharwhichcauseslinetobereprintedwhen‚*˜received(0=none).A‚TCP$CLCƒ=$18ŠCharwhichcauseslinetobedeletedwhenreceived ‚*˜(0=none)./‚TCP$RTVƒ=$0DDE0000„Readterminators(CR,$DE).0‚TCP$EOLƒ=$0D0A0000„Endoflinestring(CR,LF).<‚TCP$BRTƒ=$0EŠBaudratecode($0E=9600baud).‚Thefollowing1‚*˜codesmaybeusedtoindicatethedesiredbaud‚*˜rate:*‚*˜Code‚RateƒCodeRateƒCodeRateƒCodeRate#‚*˜$00ƒ50…$05‚300„$09‚2000ƒ$0E‚9600$‚*˜$01ƒ75…$06‚600„$0A‚2400ƒ$0F‚19200$‚*˜$02ƒ110„$07‚1200ƒ$0C‚4800ƒ$10-$FF'‚*˜$03ƒ134.5‚$08‚1800ƒ$0D‚7200ƒReserved?‚TCP$NLSƒ=0Œ#ofASCIINULchar'stosendaftereachCRorLF.+‚TCP$TRCƒ=$00ŠTerminatorclass($0X=none)..‚TCP$TTPƒ=$00ŠTerminaltype(0=EXORterm155).J‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.>‚TCP$HCPY‚=0Œ1meanstheterminalisahardcopydevice,nota‚*˜CRT.8‚TCP$XCTL‚=0Œ1meansuseXON/XOFFtocontrolterminal's‚*˜transmission,notCTS.@‚TCP$BITS‚=0Œ1meanstransmit&receive7bits/charratherthan‚*˜8.<‚TCP$STPB‚=0Œ1meansfolloweachcharsentwith2stopbits‚*˜ratherthan1.=‚TCP$USEP‚=0Œ1meansparityshouldbecheckedandgenerated.<‚TCP$PRTY‚=0Œ1meansparity(ifused)shouldbeevenrather ‚*˜thanodd.<‚TCP$ECHO‚=0Œ1meansthedrivershouldnotechocharacters.@‚TCP$TAHD‚=0Œ1meansthetype-aheadfeatureshouldnotbeused.9‚TCP$TFUL‚=1Œ1meansfillingthebufferonareadshould‚*˜terminatetheread.>‚TCP$PNUL‚=0Œ1meansNULchar'sshouldbeconsidereddatafor‚*˜imagereads.7‚TCP$MODM‚=0Œ1meanstheportisconnectedtoamodem.9‚TCP$OFFH‚=0Œ1meanstheport,ifconnectedtomodem,is ‚*˜offhook.‚*L‚***************************************************************************'‚*†NOTEonhowtomodifyasingleport:‚*<‚*†Firstduplicatealltheparametersthataretochangefor<‚*†thisparticularport(e.g.TCP$BRT).‚Modifytheduplicate=‚*†labelssothattheybecomeunique.‚Onetechniqueistoput9‚*†theportnumberattheendofthelabel(e.g.forCN02;‚*†TCP$BRTbecomesTCP$BRT2andTCP$BITSbecomesTCP$BIT2).8‚*†Rememberthatthelabelmustnotexceed8characters!;‚*†Changetheparametertothedesiredvalue(e.g.toseta5‚*†300baudrateforanon-EXORtermterminalonCN02,$‚*†TCP$BRT2=$05andTCP$TTP2=1).‚*4‚*†Nowsubstitutethesenewparametersintothefile8‚*†VME110.IOC.AGfortheCRTDCBmacrodefiningtheport.+‚*†Tocontinuethebaudrateexampleabove:?‚*ˆTCP$ATWSET\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3=‚*ˆTCP$ATWSETTCP$ATW+\TCP$USEP<<4+\TCP$PRTY<<5+\TCP$ECHO<<6=‚*ˆTCP$ATWSETTCP$ATW+\TCP$TAHD<<7+\TCP$TFUL<<8+\TCP$PNUL<<92‚*ˆTCP$ATWSETTCP$ATW+\TCP$MODM<<10+\TCP$OFFH<<11=‚*‰CRTDCB'CN02',IOSID,IOSESS,$133,36,1,'CMP3',0,$0FFF,$7FF3,‚*©~~:‚*ˆ&ƒTCP$A: TW,\TCP$REC,\TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,;‚*ˆ&ƒ\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,\TCP$CLC,\TCP$RTV,2‚*ˆ&„TCP$EQL,TCP$BRT2,\TCP$NLS,\TCP$TRC,TCP$TTP2‚*•~~~~~~~~~“~~~~~~~~~4‚*†where~~~~~~underlinestheCRTDCBmodifications.‚*>‚*†Thissametechniquemaybeusedwiththeprinterparameters<‚*†bymodifyingthePCP$xxxlabelsandsubstitutingintothe=‚*†PRTDCBmacro.‚Itmayalsobeusedwiththediskparameters@‚*†bymodifyingtheappropriatelabelsandsubstitutingintothe‚*†DSKDCBmacro.‚*L‚***************************************************************************‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**(‚MSG‰**ƒSYSGENPARAMETERSFORPRINTER‹**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**-‚MSG‰**ƒ(PCP=PRINTER‚CONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE…**4‚MSG‰***********************************************‚MSG‰‚*A‚PCP$RECƒ=132ŠWidthofprinter‚(characters/physicalprintline).,‚PCP$RSZƒ=66‹Depthofprinter‚(lines/page).B‚PCP$WTOƒ=120000‡(2minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.6‚PCP$LRLƒ=132ŠLogicallinelength<=widthofprinter<‚PCP$EOLƒ=$0A0D0000„Endoflinestring(LF,CR).(MCCMonly)$‚PCP$ELCƒ=$0DŠEndoflinecharacterJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.9‚PCP$LNFD‚=0Œ1meanstheprintersupportsautolinefeed5‚PCP$AFFƒ=0Œ1meanssupressauto-formfeedonassign>‚PCP$TLRL‚=0Œ0meanswrap-aroundprintiflogicallinelength3‚*˜exceeded.‚1meanstruncateprintatlogicalline ‚*˜length.‚MSG‰8‚MSG‰*************************************************** ‚MSG‰**¯**%‚MSG‰**ƒSYSGENPARAMETERSFORDISK’**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES‰***‚MSG‰**ƒ(DCP=DISKCONFIG.PARAMETERS)**5‚MSG‰**ƒ(WCP=Winchestercontrollerconfiguration‚**‚MSG‰**ƒparameters)¡**/‚MSG‰**ƒ(SCP=SASIcontrollerconfigurationˆ**‚MSG‰**ƒparameters8"drives)˜*/‚MSG‰**ƒ(SC5=SASIcontrollerconfigurationˆ**#‚MSG‰**ƒparameters5.25"drives)”**/‚MSG‰**ƒSomevaluesarenotusedbyalldiskˆ**-‚MSG‰**ƒdrivers.‚Thatiscontrolledbythe‰**-‚MSG‰**ƒattributesmaskandtheparametersŠ**,‚MSG‰**ƒmask;however,eachparameterand‹**0‚MSG‰**ƒattributeisspecifiedtoallowdisks‡**0‚MSG‰**ƒtobeinterchangedbetweencontroller‡**‚MSG‰**ƒboards.¥**-‚MSG‰**ƒEachcontrollerboarddrivercaresŠ**3‚MSG‰**ƒaboutdifferentdevice/mediaattributes.„**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE‰**8‚MSG‰***************************************************‚MSG‰‚*&‚DCP$WTOƒ=0ŒWriteTimeout-alldisks%‚DCP$RTOƒ=0ŒRead‚Timeout-alldisks?‚DCP$HBPS‚=256Š#ofVERSAdosbytespersector-allharddisksA‚DCP$FBPS‚=256Š#ofVERSAdosbytespersector-allfloppydisks>‚DCP$HSPT‚=064ŠNumberofsector'spertrackforharddisk-IPC@‚DCP$FSPT‚=026ŠNumberofsector'spertrackforfloppydisk-IPC0‚DCP$HTNS‚=0ŒHard-totalnumberofsectors-IPC2‚DCP$FTNS‚=0ŒFloppy-totalnumberofsectors-IPC(‚DCP$HNOH‚=0ŒHardƒ-numberofheads-IPC*‚DCP$FNOH‚=2ŒFloppy-numberofheads-IPC)‚DCP$HNOT‚=0ŒHardƒ-numberoftracks-IPC,‚DCP$FNOT‚=77‹Floppy-numberoftracks-IPC*‚DCP$HILF‚=0ŒHardƒ-interleavefactor-IPC,‚DCP$FILF‚=1ŒFloppy-interleavefactor-IPC&‚DCP$HSPL‚=0ŒHardƒ-spiraloffset-IPC(‚DCP$FSPL‚=0ŒFloppy-spiraloffset-IPC3‚DCP$NONE‚=0ŒdeviceattributesforIPCdiskdriver‚*;‚*ConfigurationinformationforWinchesterDiskController‚*hardandfloppydisks.<‚*Refertoyourharddiskdrivemanualifyouarenotusing‚*thesetconfiguration.‚*=‚*Thesevaluesarefor51/4"harddisks(ST506compatible).<‚*Thefollowingparameterschangeforformatteddisksizes.E‚*TheparametersarechangedusingtheSETcommandinVME110.IOC.AG.‚*‚*Ž5mb‰10mb‹15mbŒ40mb‚*A‚*WCP$HTNSƒ19584($4C80)ƒ39168($9900)‚58752($E580)†159360($26E80)‚*WCP$HHDS‡2Ž46’63‚*WCP$HTRK…306($132)†306($132)…306($132)Š830($33E)3‚*WCP$HTRD…306($1: 32)†306($132)…306($132)Š830($33E)‚*=‚*ThevaluesgivenforthefloppydisksareforSA400‚51/4"<‚*doublesided,doubledensity,96TPIdisks.‚RefertoyourD‚*floppydiskdrivemanualifyouarenotusingthatconfiguration.‚*0‚WCP$HTNS‚=58752ˆtotal#ofsectors-harddisk1‚WCP$FTNS‚=2552‰total#ofsectors-floppydisk*‚WCP$HSPT‚=32‹#sectors/track-harddisk,‚WCP$FSPT‚=16‹#sectors/track-floppydisk!‚WCP$HHDS‚=6Œ#heads-harddisk#‚WCP$FHDS‚=2Œ#heads-floppydisk4‚WCP$FTRK‚=80‹#ofcylindersonmedia-floppydisk+‚WCP$HILV‚=1Œinterleavefactor-harddisk-‚WCP$FILV‚=1Œinterleavefactor-floppydisk'‚WCP$HSOF‚=0Œspiraloffset-harddisk)‚WCP$FSOF‚=0Œspiraloffset-floppydisk9‚WCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚WCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚WCP$HSHD‚=0Œstartingheadnumberondrive-harddisk9‚WCP$FSHD‚=0Œstartingheadnumberondrive-floppydisk4‚WCP$FTRD‚=80‹#ofcylindersondrive-floppydisk2‚WCP$HCOM‚=153Špre-compensationvalue-harddisk3‚WCP$FCOM‚=40‹pre-compensationvalue-floppydisk?‚WCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚WCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk0‚WCP$HSRD‚=0Œsteppingrateofdrive-harddisk2‚WCP$FSRD‚=0Œsteppingrateofdrive-floppydisk?‚WCP$HRWC‚=0Œreducedwritecurrentcylindernumber-harddiskA‚WCP$FRWC‚=0Œreducedwritecurrentcylindernumber-floppydisk/‚WCP$HECC‚=0ŒECCdataburstlength-harddisk1‚WCP$FECC‚=0ŒECCdataburstlength-floppydisk‚*I‚*‚Theattributesmaskandparametermaskdon'tforhardorfloppydisks.‚*‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMencoding ‚*‚96TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚51/4inch‚*-‚WCP$HATM‚=$0010ˆattributesmask-harddisk/‚WCP$FATM‚=$001Fˆattributesmask-floppydisk,‚WCP$PM„=$1AF3ˆparametersmask-bothkinds,‚WCP$HAWƒ=$0010ˆattributesword-harddisk.‚WCP$FAWƒ=$004Fˆattributesword-floppydisk‚*I‚*‚thefollowingflagsdefinetheattributeswordfortheWINcontroller:‚*E‚*WCP$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppy‚*˜diskE‚*WCP$FTDN‚=1(bit1)„96(1)/48(0)TPItrackdensity-media-floppy‚*˜disk<‚*WCP$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*WCP$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*WCP$HDSC‚=1(bit4)„harddisk"‚*WCP$FDSC‚=0(bit4)„floppydiskE‚*WCP$FTDD‚=1(bit6)„96(1)/48(0)TPItrackdensity-drive-floppy‚*˜disk7‚*WCP$FDSS‚=0(bit9)„8"(1)/5-1/4"(0)floppydisksize‚*F‚*--------------------------------------------------------------------‚*E‚*‚ConfigurationinformationfortheSASIcontrollerboard(SA1403D)."‚*‚Thisisthe8"SASIcontroller.7‚*‚RefertoyourdiskdrivemanualifyouarenotusingA‚*‚thesetconfiguration.‚ThesevaluesareforSA1000fixeddisks‚*‚andSA800floppydisks.‚*0‚SCP$HTNS‚=32768ˆtotal#ofsectors-harddisk1‚SCP$FTNS‚=3991‰total#ofsectors-floppydisk*‚SCP$HSPT‚=32‹#sectors/track-harddisk,‚SCP$FSPT‚=26‹#sectors/track-floppydisk!‚SCP$HHDS‚=4Œ#heads-harddisk#‚SCP$FHDS‚=2Œ#heads-floppydisk3‚SCP$HTRK‚=256Š#ofcylindersonmedia-harddisk4‚SCP$FTRK‚=77‹#ofcylindersonmedia-floppydisk,‚SCP$HILV‚=16‹interleavefactor-harddisk.‚SCP$FILV‚=13‹interleavefactor-floppydisk'‚SCP$HSOF‚=0Œspiraloffset-harddisk)‚SCP$FSOF‚=0Œspiraloffset-floppydisk9‚SCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚SCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚SCP$HSHD‚=0Œstartingheadnumberofdrive-harddisk9‚SCP$FSHD‚=0Œstartingheadnumberofdrive-floppydisk3‚SCP$HTRD‚=256Š#ofcylindersondrive-harddisk4‚SCP$FTRD‚=77‹#ofcylindersondrive-floppydisk0‚SCP$HCOM‚=0Œpre-compensationvalue-harddisk2‚SCP$F; COM‚=0Œpre-compensationvalue-floppydisk?‚SCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚SCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk0‚SCP$HSRD‚=0Œsteppingrateofdrive-harddisk2‚SCP$FSRD‚=0Œsteppingrateofdrive-floppydisk?‚SCP$HRWC‚=0Œreducedwritecurrentcylindernumber-harddiskA‚SCP$FRWC‚=0Œreducedwritecurrentcylindernumber-floppydisk/‚SCP$HECC‚=0ŒECCdataburstlength-harddisk1‚SCP$FECC‚=0ŒECCdataburstlength-floppydisk‚*@‚*‚Theattributesword,attributesmaskandparametermaskdon't@‚*‚changeforharddisks.‚Theparametermaskandattributesmask>‚*‚don'tchangeforfloppydisks.‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMencoding ‚*‚48TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*'‚SCP$ATMƒ=$0217ˆattributesmask-both,‚SCP$PM„=$02F3ˆparametersmask-bothkinds-‚SCP$HAWƒ=$0210ˆattributesword-harddisks/‚SCP$FAWƒ=$020Dˆattributesword-floppydisks‚*:‚*‚thefollowingflagsarefortheSASI8"controllerdisk‚*E‚*SCP$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppy‚*˜diskE‚*SCP$FTDN‚=0(bit1)„96(1)/48(0)TPItrackdensity-media-floppy‚*˜disk<‚*SCP$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*SCP$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*SCP$HDSC‚=1(bit4)„harddisk"‚*SCP$FDSC‚=0(bit4)„floppydiskE‚*SCP$FTDD‚=0(bit6)„96(1)/48(0)TPItrackdensity-drive-floppy‚*˜disk7‚*SCP$FDSS‚=1(bit9)„8"(1)/5-1/4"(0)floppydisksize‚*E‚*-------------------------------------------------------------------‚*‚*<‚*ConfigurationinformationforSASI51/4"DiskController‚*hardandfloppydisks.<‚*Refertoyourharddiskdrivemanualifyouarenotusing‚*thesetconfiguration.‚*>‚*Thevaluesforthe51/4"harddisksontheSASIcontrollerC‚*arethesameasthoseforthe51/4"‚Winchesterdiskcontroller,A‚*exceptfortheattributesandparametersmasks,andinterleave ‚*factors.‚*+‚SC5$HILV‚=1Œinterleavefactor-harddisk-‚SC5$FILV‚=1Œinterleavefactor-floppydisk‚*@‚*‚Theattributesword,attributesmaskandparametermaskdon't@‚*‚changeforharddisks.‚Theparametermaskandattributesmask>‚*‚don'tchangeforfloppydisks.‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚*‚MFMencoding ‚*‚96TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*'‚SC5$ATM„=‚$0217ˆattributesmask-both,‚SC5$PM…=‚$02F3ˆparametersmask-bothkinds,‚SC5$HAW„=‚$0010ˆattributesword-harddisk.‚SC5$FAW„=‚$004Fˆattributesword-floppydisk‚*E‚*‚thefollowingflagsdefinetheattributeswordfortheSASI51/4" ‚*‚controller‚*J‚*SC5$FDEN‚=1(bit0)„MFM(1)/FM(0)encodingmethodonmedia-floppydiskJ‚*SC5$FTDN‚=1(bit1)„96(1)/48(0)TPItrackdensity-media-floppydisk<‚*SC5$FSID‚=1(bit2)„double(1)/single(0)sidedfloppydiskD‚*SC5$FFMT‚=1(bit3)„IBM(1)/Motorola(0)mediaformat-floppydisk ‚*SC5$HDSC‚=1(bit4)„harddisk"‚*SC5$FDSC‚=0(bit4)„floppydiskJ‚*SC5$FTDD‚=1(bit6)„96(1)/48(0)TPItrackdensity-drive-floppydisk7‚*SC5$FDSS‚=0(bit9)„8"(1)/5-1/4"(0)floppydisksize‚* ‚MSG‰;‚MSG‰******************************************************‚MSG‰*&‚MSG‰*‹GPIBUSERCONFIGURATIONEQUATES‚MSG‰*;‚MSG‰******************************************************‚MSG‰2‚GB0$UCLƒ=0ŒBUS0USERCONFIGURATIONLENGTH(UCL)‚G0A$UCLƒ=0ŒBUS0DEVAUCL,‚G0B$UCLƒ=0ŒReservedforfutureenhancement,‚G0C$UCLƒ=0ŒReservedforfutureenhancement,‚G0D$UCLƒ=0ŒReservedforfutureenhancement,‚G0E$UCLƒ=0ŒReservedforfutureenhancement,‚G0F$UCLƒ=0ŒReservedforfutureenhancement,‚G0G$UCLƒ=0ŒReservedforfutureenhancement,‚G0H$UCLƒ=0ŒReservedforfutureenhancement,‚G0I$UCLƒ=0ŒReservedfo; rfutureenhancement,‚G0J$UCLƒ=0ŒReservedforfutureenhancement,‚G0K$UCLƒ=0ŒReservedforfutureenhancement,‚G0L$UCLƒ=0ŒReservedforfutureenhancement,‚G0M$UCLƒ=0ŒReservedforfutureenhancement‚G0N$UCLƒ=0ŒBUS0DEVNUCL ,‚GB1$UCLƒ=0ŒBUS1USERCONFIGURATIONLENGTH‚G1A$UCLƒ=0ŒBUS1DEVAUCL,‚G1B$UCLƒ=0ŒReservedforfutureenhancement,‚G1C$UCLƒ=0ŒReservedforfutureehnancement,‚G1D$UCLƒ=0ŒReservedforfutureehnancement,‚G1E$UCLƒ=0ŒReservedforfutureehnancement,‚G1F$UCLƒ=0ŒReservedforfutureehnancement,‚G1G$UCLƒ=0ŒReservedforfutureehnancement,‚G1H$UCLƒ=0ŒReservedforfutureehnancement,‚G1I$UCLƒ=0ŒReservedforfutureehnancement,‚G1J$UCLƒ=0ŒReservedforfutureehnancement,‚G1K$UCLƒ=0ŒReservedforfutureehnancement,‚G1L$UCLƒ=0ŒReservedforfutureehnancement,‚G1M$UCLƒ=0ŒReservedforfutureehnancement‚G1N$UCLƒ=0ŒBUS1DEVNUCL 4‚MSG‰*********************************************** ‚MSG‰**«**/‚MSG‰**ƒSYSGENPARAMETERSFORMAGTAPEDRIVE„**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(MCP=MAGTAPECONFIG.PARAMETERS)…** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*;‚MCP$WTOƒ=5000‰WriteTimeout(5secondstowrite4Kbytes);‚MCP$RTOƒ=360000‡Read‚Timeout(6minutestoread4Kbytes,+*štosearchforafilemark,toreadablank%*štapetotheendoftape,torewind)6‚MCP$DENƒ=0ŒDensityselectedforwritefromloadpoint*š0means1600bpi(PEdensity) *š1means‚800bpi(NRZIdensity)6‚MCP$RDTƒ=3ŒNumberofreadtriesbeforeerrormessage1‚MCP$WRTƒ=3ŒNumberofwritetriesbeforeerasing:‚MCP$ERTƒ=1ŒNumberoftimestoerasebeforeerrormessage*<‚MCP$ATMƒ=$0002ˆBit1isrecognizedforaconfigurecommand9‚MCP$PM„=$00F0ˆDEN,RDT,WRT,ERTfieldsarerecognizedfor*šaconfigurecommand.*"‚MCP$AW„=$0000ˆBit0isRESERVED.3*šBit1=1meansuserrequestsadensityforwrite1*šBit1=0meansuserdoesnotrequestadensity*‚*‚MSG‰A‚MSG‰************************************************************7‚MSG‰**…Descriptiveinfoaboutthisoperatingsystem‡**A‚MSG‰************************************************************5‚SYSNAMEƒ="VERSAdos"ƒNameforthisoperatingsystem.:‚REVISION‚="REV04.30"‚Revisionofthisoperatingsystem.7‚TIMSLICƒ=2ŒNumberoftimerinterruptspertimeslice.>‚TIMINTVƒ=10‹Numberofmillisecondsbetweentimerinterrupts.4‚MEMEND1ƒ=$C0000‡Endingaddrmemorymustbe=this.‚NotapplicableforVME110.E‚MEMEND3ƒ=$00000‡Ceilingaddrforoff-boardmemory(mustbe‚MSG‰**ƒFHS--FileHandlingServices(trap#3servertask)ƒ**B‚MSG‰*************************************************************‚TASKˆFHS,.FHS‚STATE…='DORM' ‚SESSIONƒ=1‚PRIORITY‚=$D1‚FHSSTR„=*ŒFHS‚loadaddr.!‚FHSASR„=*+2ŠFHSASRentrypoint ‚*’FHSFOF ‚SUBSˆFHS.LG ‚LINKˆFHS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FHS‚MSG‰B‚MSG‰*************************************************************(‚MSG‰**ˆFMS--FileManagementSystem”**B‚MSG‰*************************************************************‚TASKˆFMS,.FMS‚STATE…='DORM'‚PRIORITY‚=$D0‚FMSSTR„=*ŒFMSloadaddr.!‚FMSASR„=*+2ŠFMSASRentrypoint ‚*’FMSFOF ‚SUBSˆFMS.LG ‚LINKˆFMS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FMS‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆEET--EntryExitTask›**B‚MSG‰*************************************************************‚TASKˆEET,&EET‚STATE…='READ' ‚SESSIONƒ=2‚PRIORITY‚=$C8‚EETSTR„=*ŒEETloadaddr. ‚*’EETFOF1%‚SUBSˆEET.LG,9995.&.EET.EQ,CMDLIST.AG'‚ASM‰EET.EQ/CMDLIST.AG,CMDLIST,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC ‚*’EETFOF2 ‚LINKˆEET.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰EET‚MSG‰B‚MSG‰*************************************************************.‚MSG‰**ˆLDR--Loader(trap#4servertask)Ž**B‚MSG‰*************************************************************‚TASKˆLDR,&LDR‚STATE…='READ'‚PRIORITY‚=$C8 ‚SESSIONƒ=4‚LDRSTR„=*ŒLDRloadaddr.‚SUBSˆNOMMU.LOADER.LG‚LINKˆNOMMU.LOADER.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰LDR ‚*’LDRFOF‚MSG‰@‚MSG‰***********************************************************‚MSG‰**ˆIOCOM&IOI¤**@‚MSG‰***********************************************************‚TASKˆIOI,.IOI‚S= TATE…='READ' ‚SESSIONƒ=1‚PRIORITY‚=$DA ‚IOCSTR„=*‚SUBSˆVME110.IOC.AG6‚ASM‰IODM.AG/VME110.IOC.AG,VME110.IOC.RO,\ASMLS;RZ=105 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVME110.ASR.AG'‚ASM‰VME110.ASR.AG,VME110.ASR.RO,\ASMLS ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC2‚ASM‰VME110.OSLIST.AG,VME110.OSLIST.RO,\ASMLS;Z=95 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVME110.IOI.LG‚LINKˆVME110.IOI.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰IOIN‚MSG*************************************************************************‚MSG*C‚MSG*‚SpecialI/OChannnelInitializerforProcessControlDrivers‚MSG*N‚MSG************************************************************************* ‚IFNE\PCDRV†INCLUDE.&.IOCI.CI‚ENDC‚MSG‰@‚MSG‰***********************************************************%‚MSG‰**ˆINIT--SystemInitializer•**@‚MSG‰*********************************************************** ‚PROCESS…INIT ‚INTSTR„=*)‚SUBS…VME110.INITIO1.AG,VME110.INITIO2.AG#‚SUBS…VME110.INT1.LG,VME110.INT2.LG1‚ASM†VME110.INITIO1.AG,VME110.INITIO1.RO,\ASMLS;R ‚IFEQ…\ASMLSW…=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VME110.INT1.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC‚=COPY„\LINK2TF,\LINK1TF;Y ‚IFNE…\NDAC1‰INCLUDE&.D605MEM.CI‚ENDC ‚IFNE…\NACO‰INCLUDE.&.D615MEM.CI‚ENDC ‚IFNE…\NDCO1‰INCLUDE.&.D625MEM.CI‚ENDC ‚IFNE…\NVME610+\NVME620‰INCLUDE‚.&.D610INT.CI‚ENDC1‚ASMVME110.INITIO2.AG,VME110.INITIO2.RO,\ASMLS;R ‚IFEQ…\ASMLSW‹=COPY…\ASMLS,\WORKLS;A‚ENDC‚SUBS…M68XXX.INITDAT.AG1‚ASM†M68XXX.INITDAT.AG,M68XXX.INITDAT.RO,\ASMLS;R ‚IFEQ…\ASMLSW†=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VME110.INT2.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC ‚END‰INIT ‚*’INITFOF@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚MSG‰*¹*)‚MSG‰*‹MAKESUBSTITUTIONSINVERSAPT.CFŽ*‚MSG‰*¹*@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚SUBSˆVME110.VERSAPT.CF‚MSG‰@‚MSG‰***********************************************************@‚MSG‰***********************************************************5‚MSG‰**‡"SYSGENCOMPLETIONPROCESSINGINPROGRESS"†**‚MSG‰**“Haveaniceday.”**@‚MSG‰***********************************************************@‚MSG‰*********************************************************** ‚END‰SYSGENéé=OPT -N=/**********************=/*VME110.SYSGEN.CFƒ*=/**********************=OPT K,NM=/***************************************************************************"=/*Chainfiletoperformsysgen¬*=/*É*=/*Callingsequence:·*=/*É*)=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5£*=/*É*7=/*„Notalloftheargumentsneedtobeenteredsince”*$=/*†theyeachhaveadefaultvalue¥*=/*É*6=/*„arg1-commandfilename(defaultstoSYSCMD.CD)•*=/*É*,=/*„arg2-Tempvolanduserno./BootfileŸ*9=/*Temp.vol.anduserno.defaultstovolumenameand‰*)=/*usernumberofcommandfile(arg1).—**=/*Bootfiledefaultsto'VERSADOS.SY'.˜*=/*É*=/*É*9=/*„arg3-Listdeviceorfilenameforsysgenmessages’*=/*(defaultstoSYSLI= ST.LS)¤*;=/*‹Iffilename-sysgenuses'.LS'asdefaultextension‰*=/*É*9=/*‡NOTE:Thefirstthreeargumentsarethesameasthe*4=/*threecommandlinefieldsusedininvokingtheŽ*=/*sysgenutilitydirectly.¤*=/*É*E=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')†*=/*É*5=/*„arg5-Listingdeviceorfile(Defaultsto#PR)–*A=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.*:=/*Allassemblylistingsandlinkmapswillbedirectedˆ*<=/*Tothespecifieddeviceorfileusingthecopyutility†*>=/*withappendoption.‚SYSGEN.TFisusedasanintermediateƒ*7=/*filetocontaintheassemblyorlinklistoutput.‹*@=/*Duetorestrictionsinsysgenliteralsubstitutionprocess‚*8=/*thisfieldcannotcontainmorethan10characters.Š*M=/***************************************************************************=/*5=/* Insure that no more than 5 arguments are defined:=/*=/RX=\0 =/IF RX>5ƒ=OPT-N<ƒ=/*Error-chainfilestartedwithmorethan5arguments-5ƒ=/*ƒPleaserestart,theargumentdefinitionsfollow:ƒ=/*(ƒ=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5ƒ=/*6ƒ=/*„Notalloftheargumentsneedtobeenteredsince$ƒ=/*†theyeachhaveadefaultvalue.ƒ=/*¥8®F¶O¾5ƒ=/*„arg1-commandfilename(defaultstoSYSCMD.CD)ƒ=/*+ƒ=/*„arg2-Tempvolanduserno./Bootfile8ƒ=/*Temp.vol.anduserno.defaultstovolumenameand(ƒ=/*usernumberofcommandfile(arg1).)ƒ=/*Bootfiledefaultsto'VERSADOS.SY'.ƒ=/*Gƒ=/&**Typecarriagereturnormoreinformation,'break'toterminate.ƒ=/*8ƒ=/*„arg3-Listdeviceorfilenameforsysgenmessagesƒ=/*(defaultstoSYSLIST.LS):ƒ=/*‹Iffilename-sysgenuses'.LS'asdefaultextensionƒ=/*8ƒ=/*‡NOTE:Thefirstthreeargumentsarethesameasthe3ƒ=/*threecommandlinefieldsusedininvokingtheƒ=/*sysgenutilitydirectly.ƒ=/*Dƒ=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')ƒ=/*4ƒ=/*„arg5-Listingdeviceorfile(Defaultsto#PR)Aƒ=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.9ƒ=/*Allassemblylistingsandlinkmapswillbedirected;ƒ=/*Tothespecifieddeviceorfileusingthecopyutility=ƒ=/*withappendoption.‚SYSGEN.TFisusedasanintermediate6ƒ=/*filetocontaintheassemblyorlinklistoutput.?ƒ=/*Duetorestrictionsinsysgenliteralsubstitutionprocess7ƒ=/*thisfieldcannotcontainmorethan10characters.ƒ=/*ƒ=END=/ENDIF=/*2=/* Force the definition of 5 exactly 5 arguments.=/* =/IF RX=0+ƒ=ARGSYSCMD.CD,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=1$ƒ=ARG\1,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=2&ƒ=ARG\1,\2,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=3ƒ=ARG\1,\2,\3,SINGLE-HARD,#PR=/ENDIF =/IF RX=4ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*8=/* We have 5 arguments - now default any null arguments=/*=/IFC \1ƒ=ARGSYSCMD.CD,\2,\3,\4,\5=/ENDIF=/*=/IFC \3ƒ=ARG\1,\2,SYSLIST.LS,\4,\5=/ENDIF=/*=/IFC \4ƒ=ARG\1,\2,\3,SINGLE-HARD,\5=/ENDIF=/*=/IFC \5ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*N=/* If arg5 is not #PR,#PR1,#PR2,#PR3,# or #NULL then treat as file and delete:=/*ƒsetswitch(arg6)to1forprinterdevice,0forfile.=/*0=ARG \1,\2,\3,\4,\5,0,#PR,#PR1,#PR2,#PR3,#,#NULL =/FOR 7,\0ƒ=/IFEQ"\5"\(RX)1†=ARG\1,\2,\3,\4,\5,1,#PR,#PR1,#PR2,#PR3,#,#NULLƒ=/ENDIF=/ENDFOR=/RX=\6 =/IF RX=0ƒ=DEL\5=/ENDIF=/*=/* Set switch (arg7) TO:=/*„01--‚SINGLE-HARD=/*=ARG \1,\2,\3,\4,\5,\6,10=/IFEQ "\4"SINGLE-HARDƒ=ARG\1,\2,\3,\4,\5,\6,01=/ENDIF=/*9=/* Abort chain if an invalid configuration was requested=/*=/RX=\7 =/IF RX=10ƒ=OPT-N3ƒ=/*‚\4isaninvalidconfiguration-(argument#4)8ƒ=> /*…Theonlyvalidconfigurationis'SINGLE-HARD'which3ƒ=/*…isthedefault.Pleaserestartchainfilewithƒ=/*…correctparameters.ƒ=END=/ENDIF#=ARG \1,\2,\3,\4,\5,\6,\7,SYSGEN.TF=/*3=/* The argument list now looks like the following:=/* =/*ƒarg1ƒ-ƒNameofcommandfile.=/*0=/*ƒarg2ƒ-ƒTemporaryvolume/bootfile(ornull).=/*3=/*ƒarg3ƒ-ƒListdeviceorfileforsysgenmessages.=/*(=/*ƒarg4ƒ-ƒSystemconfigurationmnemonic=/*'SINGLE-HARD'=/*(seearg7)=/*@=/*ƒarg5ƒ-ƒListingfileordeviceforassembliesandlink-edits.4=/*SYSGEN.TFisthetemporaryfilewhichisusedin1=/*conjunctionwith=COPY;Atoproduceasingle=/*listingfile.=/*(seearg6)=/*=/*ƒarg6ƒ-ƒSwitch-"=/*0=‚arg5specifiesafilename=/*1=‚arg5specifiesadevice=/*(seearg5)=/*%=/*ƒarg7ƒ-ƒNumberconfigurationkey-%=/*01=‚signle-userharddisksystem=/*(seearg4)=/*8=/*ƒarg8ƒ-ƒSYSGEN.TFtemporaryfileforusewithcopyin+=/*creatinglistingfilespecifiedbyarg3=/*=/*9=/* Justify argument positions and invoke sysgen utility.=/*=ARG \5,\6,\7,\8,\1,\2,\3,\4=/*)=/* Turn off echo of sysgen command lines=OPT J=OPT -N=SYSGEN VME110.\5,\6,\7;T=350 =OPT -J,-N8=/**‚ApplyingpatchesfromXVERSAPT.CFtothebootfile.=/@ VME110.XVERSAPT.CFM=/***************************************************************************M=/***************************************************************************=/**=/**‚SysgenCompleted--=/**6=/**„Assemblyandlinklistingshavebeenoutputto\1=/**1=/**„Sysgencommandlistinghasbeenoutputto\7=/**M=/***************************************************************************M=/***************************************************************************=OPT -K=ENDééééééd1IOI ASREL'VME110 IOI SA B „VERSAdos I/O Initialization System Task V 4.1 - 09/13/82â2pFMSDLEN pNOTASKS pNOCDCB pNODCBS pNOFCBS pIOCOML pIOCOMS pCCSEG pOSMTBL pNODVS pNOFATS pOSMEND pFHSASR pFMSASQ  pFMSASR pNOLPRT pIOSASR pNOVDTS pTTYASR pNOLTERM !@F3`F3$ IOSG((K3´@€.|*> B#ü()2"|(J‘gH |)N1i!iG3Lé? Hè? (g (f(p=/*ˆthistimeyoucanupdateorinitializeyourharddiskwith@=/*ˆtheVERSAdos4.3softwareandperformanewsysgen,changing?=/*ˆtheWINSIZEparameterinyourVMES10.SYSCMD.CDcommandfile>=/*ˆtoindicatetheappropriatesizefortheharddiskonyour;=/*ˆsystem.‚SYSGENwillgenerateaVERSADOS.SYfilethatis9=/*ˆcorrectlyconfiguredtosupportyourharddiskdrive.? éééÓÜEä)=/*B=/*ƒNotethatthischainfileissubstutedviaSUBScommandduringD=/*ƒsysgenprocessingtoproduceafilecalledVMES10.XPATCH.CF.‚TheI=/*ƒXPATCHfileistheonlyonethatwillworkifitisdirectlyinvoked.=/*!=/*”IdentifyingyourVME/10unit: =/*”=============================/*=/*š|‚Motorolaƒ|3=/*…descriptionŠ|partnumber|…physicalappearanceK=/*‚========================+=============+================================H=/*‚VME/10w/5MBWinchester|M68K101-1ƒ|singlewidthcardcageinrearK=/*‚------------------------+-------------+--------------------------------H=/*‚VME/10w/15MBWinchester|M68K102B1ƒ|doublewidthcardcageinrearK=/*‚------------------------+-------------+--------------------------------H=/*‚VME/10w/40MBWinchester|M68K102C3ƒ|doublewidthcardcageinrear=/*=/RA=0=/RD=0=/RX=\0 =/IF RX <> 1-ƒ=/*„***INVALIDNUMBEROFARGUMENTSENTERED!ƒ=/RD=1=/ELSEƒ=/IFEQ"5MB"\1&†=/*„-Goingtopatchfora5MBunit-†=/RX=5ƒ=/ELSE†=/IFEQ"15MB"\1'‰=/*„-Goingtopatchfora15MBunit- ‰=/RX=15†=/ELSE‰=/IFEQ"40MB"\1'Œ=/*„-Goingtopatchfora40MBunit- Œ=/RX=40‰=/ELSEŒ=/RD=2‰=/ENDIF†=/ENDIFƒ=/ENDIF=/ENDIF =/IF RD <> 0 ƒ=/IFRD=2$†=/*„***INVALIDARGUMENTSPECIFIED!ƒ=/ENDIFƒ=/*ƒ=/*„Invokeas:*ƒ=/*†=:0.VMES10.XPATCH.CF‚5MBŒfor‚5MBunitƒ=/*or,ƒ=/*†=:0.VMES10.XPATCH.CF15MBŒfor15MBunitƒ=/*or,ƒ=/*†=:0.VMES10.XPATCH.CF40MBŒfor40MBunitƒ=END=/ENDIF=/*1=/&‚Hit"RETURN"tocontinueor"BREAK"toabort. =/IF RX= 5=/*************************=/*Patchfor5MBsystem‚*=/*************************=PATCH VMES10.VERSADOS.SY O \IOCSTR2ME4C*MustpointtoWCP$HTNSparameterfor#HD00800004C80*DefinetotalnumberofsectorsWCP$HTNS=19584.2ME59*MustpointtoWCP$HHDSparameterfor#HD00,02“*DefinetotalnumberofheadsWCP$HHDS=270132‘*DefinenumberofcylindersonmediaWCP$HTRK=306.2ME62*MustpointtoWCH$HTRDparameterfor#HD00>0132‘*DefinetotalnumberofcylindersperdriveWCP$HTRD=306.QUIT=/ENDIF =/IF RX= 15=/*************************=/* Patch for 15MB system *=/*************************=PATCH VMES10.VERSADOS.SY O \IOCSTR2ME4C*MustpointtoWCP$HTNSparameterfor#HD0080000E580*DefinetotalnumberofsectorsWCP$HTNS=58752.2ME59*MustpointtoWCP$HHDSparameterfor#HD00,06“*DefinetotalnumberofheadsWCP$HHDS=670132‘*DefinenumberofcylindersonmediaWCH$HTRK=306.2ME62*MustpointtoWCH$HTRDparameterfor#HD00>0132‘*DefinetotalnumberofcylindersperdriveWCP$HTRD=306.QUIT=/ENDIF =/IF RX= 40=/*************************=/* Patch for 40MB system *=/*************************=PATCH VMES10.VERSADOS.SY O \IOCSTR2ME4C*MustpointtoWCP$HTNSparameterfor#HD00900026400*DefinetotalnumberofsectorsWCP$HTNS=156672.2ME59*MustpointtoWCP$HHDSparameterfor#HD00,06“*Definetotalnu? mberofheadsWCP$HHDS=670280‘*DefinenumberofcylindersonmediaWCP$HTRK=640.2ME62*MustpointtoWCH$HTRDparameterfor#HD00>0280‘*DefinetotalnumberofcylindersperdriveWCP$HTRD=640.QUIT=/ENDIFééé=/*=/*†VMES10.COPYSGEN.CF=/*=/RX=\0=/RD=0 =/IF RX=3…=ARG =/ELSE…=/RD=1=/ENDIF=/*=/*=/* =/IF RD=0 …=/IFC\1Š=/RD=1…=/ENDIF …=/IFC\2Š=/RD=1…=/ENDIF …=/IFC\3Š=/RD=1…=/ENDIF=/ENDIF=/* =/IF RD=1:ƒ=/*†ChainfiletocopythosefilesrequiredtodoaSYSGEN"ƒ=/*†intoaspecifiedusernumber.*ƒ=/*†EXCEPTIONStocopyincludefollowing:ƒ=/*&ƒ=/*‹EQUATEfilesƒ(9995)(.EQand.MC)ƒ=/*‹EQUATEfilesƒ(9999)(.EQ)ƒ=/*‹0..UTILIB.ROƒ=/*4ƒ=/*†Insufficientargumentsspecifiedforchainfileƒ=/*$ƒ=/*†Parameter01ˆSourcevolumename$ƒ=/*†Parameter02ˆTargetvolumename$ƒ=/*†Parameter03ˆTargetusernumberƒ=/*&ƒ=/*†VMES10.COPYSGEN.CFARG1,ARG2,ARG3ƒ=/*ƒ=ARGƒ=END=/ENDIF =OPTION O"=COPY\1:9992.&.IOCI.CI\2:\3;BYPC$=COPY\1:9992.&.IOCINT.AGŽ\2:\3;BYPC%=COPY\1:9992.&.LIOCINT.LG\2:\3;BYPC*=COPY\1:9993.VMES10.CRTINIT.ROˆ\2:\3;BYPC+=COPY\1:9993.VMES10.EDITMODE.RO‡\2:\3;BYPC)=COPY\1:9993.VMES10.FEEDER.RO‰\2:\3;BYPC)=COPY\1:9993.VMES10.INCHAR.RO‰\2:\3;BYPC+=COPY\1:9993.VMES10.KEYBOARD.RO‡\2:\3;BYPC)=COPY\1:9993.VMES10.OUTCHS.RO‰\2:\3;BYPC+=COPY\1:9993.VMES10.PAGEMODE.RO‡\2:\3;BYPC*=COPY\1:9993.VMES10.POUTCHS.ROˆ\2:\3;BYPC*=COPY\1:9993.VMES10.TERMDRV.ROˆ\2:\3;BYPC%=COPY\1:9993.&.MPSCDRV.LG\2:\3;BYPC%=COPY\1:9993.&.MPSCDRV.RO\2:\3;BYPC%=COPY\1:9993.&.MPSCSPR.LG\2:\3;BYPC%=COPY\1:9993.&.MPSCSPR.RO\2:\3;BYPC%=COPY\1:9993.&.MPSCSUP.RO\2:\3;BYPC%=COPY\1:9993.&.MTADRVR.LG\2:\3;BYPC%=COPY\1:9993.&.MTADRVR.RO\2:\3;BYPC&=COPY\1:9993.&.MTALDPNT.SAŒ\2:\3;BYPC%=COPY\1:9993.&.GPIBDRV.LG\2:\3;BYPC%=COPY\1:9993.&.GPIBDRV.RO\2:\3;BYPC%=COPY\1:9998.&.GPIBXTR.AG\2:\3;BYPC$=COPY\1:9993.&.PRTDRV.LGŽ\2:\3;BYPC$=COPY\1:9993.&.PRTDRV.ROŽ\2:\3;BYPC"=COPY\1:9993.&.TNTD.LG\2:\3;BYPC"=COPY\1:9993.&.TNTD.RO\2:\3;BYPC$=COPY\1:9993.&.WINDRV.LGŽ\2:\3;BYPC$=COPY\1:9993.&.WINDRV.ROŽ\2:\3;BYPC'=COPY\1:9994.NTS.NTSSERV.RO‹\2:\3;BYPC&=COPY\1:9998.VMES10.ASR.AGŒ\2:\3;BYPCìMõ4ý*=COPY\1:9999.VMES10.INITIO1.AGˆ\2:\3;BYPC*=COPY\1:9999.VMES10.INITIO2.AGˆ\2:\3;BYPC'=COPY\1:9999.VMES10.INT1.LG‹\2:\3;BYPC'=COPY\1:9999.VMES10.INT2.LG‹\2:\3;BYPC&=COPY\1:9998.VMES10.IOC.AGŒ\2:\3;BYPC"=COPY\1:9998.&.IODM.AG\2:\3;BYPC&=COPY\1:9998.VMES10.IOI.LGŒ\2:\3;BYPC&=COPY\1:9998.VMES10.IOI.ROŒ\2:\3;BYPC)=COPY\1:9998.VMES10.OSLIST.AG‰\2:\3;BYPC(=COPY\1:9998.VMES10.PATCH.CFŠ\2:\3;BYPC)=COPY\1:9998.VMES10.SYSCMD.CD‰\2:\3;BYPC)=COPY\1:9998.VMES10.SYSGEN.CF‰\2:\3;BYPC*=COPY\1:9998.VMES10.TERMDRV.LGˆ\2:\3;BYPC)=COPY\1:9998.VMES10.VALPAR.AG‰\2:\3;BYPC*=COPY\1:9998.VMES10.VERSAPT.CFˆ\2:\3;BYPC%=COPY\1:9998.&.CMDLIST.AG\2:\3;BYPC!=COPY\1:9998.&.DAT.RO‘\2:\3;BYPC!=COPY\1:9998.&.EET.LG‘\2:\3;BYPC!=COPY\1:9998.&.EET.@ RO‘\2:\3;BYPC%=COPY\1:9998.&.EMHNDLR.RO\2:\3;BYPC"=COPY\1:9998.&.FDTA.RO\2:\3;BYPC"=COPY\1:9998.&.FFHS.RO\2:\3;BYPC!=COPY\1:9998.&.FHS.LG‘\2:\3;BYPC!=COPY\1:9998.&.FHS.RO‘\2:\3;BYPC"=COPY\1:9998.&.FIOM.RO\2:\3;BYPC"=COPY\1:9998.&.FIOS.RO\2:\3;BYPC!=COPY\1:9998.&.FMS.LG‘\2:\3;BYPC"=COPY\1:9998.&.FUTY.RO\2:\3;BYPC!=COPY\1:9998.&.IOS.LG‘\2:\3;BYPC!=COPY\1:9998.&.IOS.RO‘\2:\3;BYPC!=COPY\1:9998.&.IXR.AG‘\2:\3;BYPC%=COPY\1:9998.&.SCTSASR.RO\2:\3;BYPC&=COPY\1:9998.&.SYSCNTRL.ROŒ\2:\3;BYPC!=COPY\1:9998.&.USM.RO‘\2:\3;BYPC$=COPY\1:9998.&.USMOPT.ROŽ\2:\3;BYPC&=COPY\1:9998.MMU.LOADER.LGŒ\2:\3;BYPC&=COPY\1:9998.MMU.LOADER.ROŒ\2:\3;BYPC'=COPY\1:9999.CAOE.SYSPAR.RO‹\2:\3;BYPC&=COPY\1:9999.CAOE.SYSPAR.RO‹\2:\3;BYP&=COPY\1:9999.VMES10.RMS.LLŒ\2:\3;BYPC&=COPY\1:9999.VMES10.RMS.LOŒ\2:\3;BYPC'=COPY\1:9999.M68XXX.INIT.RO‹\2:\3;BYPC*=COPY\1:9999.M68XXX.INITDAT.AGˆ\2:\3;BYPC"=COPY\1:9992.&.D605.LG\2:\3;BYPC"=COPY\1:9992.&.D605.RO\2:\3;BYPC"=COPY\1:9992.&.D610.RO\2:\3;BYPC"=COPY\1:9992.&.D615.RO\2:\3;BYPC"=COPY\1:9992.&.D625.RO\2:\3;BYPC%=COPY\1:9992.&.D605GEN.CI\2:\3;BYPC%=COPY\1:9992.&.D605IOC.AI\2:\3;BYPC%=COPY\1:9992.&.D605MEM.AG\2:\3;BYPC%=COPY\1:9992.&.D605MEM.CI\2:\3;BYPC%=COPY\1:9992.&.D605MEM.LG\2:\3;BYPC"=COPY\1:9992.&.D615.LG\2:\3;BYPC%=COPY\1:9992.&.D615GEN.CI\2:\3;BYPC%=COPY\1:9992.&.D615IOC.AI\2:\3;BYPC%=COPY\1:9992.&.D615MEM.AG\2:\3;BYPC%=COPY\1:9992.&.D615MEM.CI\2:\3;BYPC%=COPY\1:9992.&.D615MEM.LG\2:\3;BYPC"=COPY\1:9992.&.D625.LG\2:\3;BYPC%=COPY\1:9992.&.D625GEN.CI\2:\3;BYPC%=COPY\1:9992.&.D625IOC.AI\2:\3;BYPC%=COPY\1:9992.&.D625MEM.AG\2:\3;BYPC%=COPY\1:9992.&.D625MEM.CI\2:\3;BYPC%=COPY\1:9992.&.D625MEM.LG\2:\3;BYPC"=COPY\1:9992.&.D610.LG\2:\3;BYPC%=COPY\1:9992.&.D610GEN.CI\2:\3;BYPC%=COPY\1:9992.&.D610IOC.AI\2:\3;BYPC%=COPY\1:9992.&.D610INT.AG\2:\3;BYPC%=COPY\1:9992.&.D610INT.CI\2:\3;BYPC%=COPY\1:9992.&.D610INT.LG\2:\3;BYPC=ENDééééé2=/* This version of VERSAPT.CF is VME/10 oriented.=/*@=/*XVERSAPT.CFisbuiltfromVERSAPT.CFatsysgentime.‚Itwill>=/*ƒcontainpatchestobeappliedtoVERSADOSafterthesysgen =/*ƒprocess.=/*=PATCH VERSADOS.SYH*---+----:----+----:----+----:----+----:----+----:----+----:----+----:--H*>----------------------------------------------------------------------O\IOSSTR*StartofIOSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FHSSTR*StartofFHSH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\FMSSTR*StartofFMSH*<--------------@ --------------------------------------------------------H*>----------------------------------------------------------------------O\EETSTR*StartofEETH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\LDRSTR*StartofLDRH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\IOCSTR*StartofIOCH*<----------------------------------------------------------------------H*>----------------------------------------------------------------------O\INTSTR*StartofINTH*<----------------------------------------------------------------------QUIT=/*!=/*†PATCHPRTDRVONLYIFITEXIST=/*=/RD = \TOTPRT =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\PRTDRVRŽ*StartofPRTDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*=/*"=/*†PATCHMPSCSPRONLYIFITEXIST=/*=/RD = \NOTERM40 =/IFRD‚>=0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCSPRŽ*StartofMPSCSPR20H*<----------------------------------------------------------------------QUIT=/ENDIF=/*"=/*†PATCHMPSCDRVONLYIFITEXIST=/*=/RD = \NOTERM40 =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\MPSCDRVŽ*StartofMPSCDRVH*<----------------------------------------------------------------------QUIT=/ENDIF=/*=/*†PATCHTERMDRV=/*=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\TERMDRVŽ*StartofTERMDRVH*<----------------------------------------------------------------------QUIT=/*"=/*†PATCHWINDRVRONLYIFITEXIST=/* =/RD = \NOWIN =/IF RD <> 0=PATCH VERSADOS.SYH*>----------------------------------------------------------------------O\WINDRVRŽ*StartofWINDRVRH*<----------------------------------------------------------------------QUIT=/ENDIF=/*#=/*†PATCHMTADRVRONLYIFITEXISTS=/*=/RD = \TOTM435 =/IF RD <> 0=PATCH VERSADOS.SYG*>---------------------------------------------------------------------O\MTADRVRŽ*StartofMTADRVRG*<---------------------------------------------------------------------QUIT=/ENDIF=/*8=/* SYSTEM MUST BE RE-BOOTED FOR PATCHES TO TAKE EFFECT.=/*=ENDéé PAGE)ASR IDNT 11,11 ASR ADDRS. FOR I/O MODULES*8*ASR-FILE OF ASR ADDRESSES OF I/O MODULES-NEEDED FOR IOI* XDEF FMSASR,FHSASR,IOSASR IFNE \NOTNT ‚XDEF‚TNTASR ENDCFMSASR EQU \FMSASRFHSASR EQU \FHSASRIOSASR EQU \IOSASR IFNE \NOTNTTNTASR EQU \TNTASR ENDC ENDA éééééé*INDV…IDNT†3,1SystemInitializerDATAArea*-*„THEFOLLOWINGEQUATESAREUSEDFORBUILDING%*„AMEMORYTABLEFORTHEINITROUTINE*MTYP0‚EQU0‰RAMMEMORYTYPE0 MTYP1‚EQU1*16†RAMMEMORYTYPE1 MTYP2‚EQU2*16†RAMMEMORYTYPE2 MTYP3‚EQU3*16†RAMMEMORYTYPE3 MTYP4‚EQU4*16†RAMMEMORYTYPE4 MTYP5‚EQU5*16†RAMMEMORYTYPE5 MTYP6‚EQU6*16†RAMMEMORYTYPE6 MTYP7‚EQU7*16†RAMMEMORYTYPE7*PART0‚EQU0‰PARTITIONNUMBER0PART1‚EQU1‰PARTITIONNUMBER1PART2‚EQU2‰PARTITIONNUMBER2PART3‚EQU3‰PARTITIONNUMBER3PART4‚EQU4‰PARTITIONNUMBER4PART5‚EQU5‰PARTITIONNUMBER5PART6‚EQU6‰PARTITIONNUMBER6PART7‚EQU7‰PARTITIONNUMBER7PART8‚EQU8‰PARTITIONNUMBER8PART9‚EQU9‰PARTITIONNUMBER9!PART10EQU10ˆPARTITIONNUMBER10!PART11EQU11ˆPARTITIONNUMBER11!PART12EQU12ˆPARTITIONNUMBER12!PART13EQU13ˆPARTITIONNUMBER13!PART14EQU14ˆPARTITIONNUMBER14!PART15EQU15ˆPARTITIONNUMBER15‡PAGE*#*†MACROTOBUILDMEMORYTABLEENTRY* MTENTRY MACRO \@A„SET„0‡IFC„'\1','RAM' ‡DC.Bƒ\4+\5,0 ‡DC.Lƒ\2,\3‡DC.B„\6‡DC.B„0 \@A„SET„1‡ENDC‡IFC„'\1','ROM' ‡DC.Bƒ$FF,0 ‡DC.Lƒ\2,\3‡DC.Wƒ0 \@A„SET„1‡ENDC ‡IFEQƒ\@A ‡FAILƒ2000‡ENDC‡ENDM* MTENDƒMACRO ˆDC.Wƒ$FFFFˆENDM ‰PAGE ‰SECTION8*%*ˆDATAREQUIREDBYSYSTEMINITIALIZER* ‰XDEFƒTCBHEADTCBHEAD‚DC.Lƒ\$TCBLSTˆTCBHD ‰XDEFƒRDYHEADRDYHEAD‚DC.Lƒ\$TCBRDYˆREADYHD ‰XDEFƒESTART#ESTARTƒDC.Lƒ\STARTRMS‡STARTOFEXEC ‰XDEFƒEENDEEND…DC.Lƒ\MEMBEG‰ENDOFEXEC ‰XDEFƒESTACK%ESTACKƒDC.Lƒ\STACKŠEXECSTACKADDRESS ‰XDEFƒMMUMMU†DC.Lƒ\MMUŒMMUADDRESS ‰XDEFƒPANELA&PANELAƒDC.Lƒ\PANELŠFRONTPANELADDRESS ‰XDEFƒSMEMLOSMEMLOƒDC.Lƒ0SECMEMLO ‰XDEFƒSMEMHISMEMHIƒDC.Lƒ0SECMEMHI‰XDEFƒDISPATCH"DISPATCHDC.Lƒ\STARTRMS‡DISPATCHER ‰XDEFƒGSTSIZGSTSIZƒDC.Lƒ\GSTŒGST#OFPAGES ‰XDEFƒUSTSIZUSTSIZƒDC.Lƒ\USTŒUST#OFPAGES ‰XDEFƒUDRSIZUDRSIZƒDC.Lƒ\UDRŒUDR#OFPAGES ‰XDEFƒPATSIZPATSIZƒDC.Lƒ\PATŒPAT#OFPAGES ‰XDEFƒTRCSIZ\(4A )TRCSIZƒDC.Lƒ\TRACE‹TRACETABLE#OFPAGES ‰XDEFƒTRCFLAGTRCFLAG‚DC.Wƒ\TRCFLAG ‰XDEFƒTIMERA#TIMERAƒDC.Lƒ\TIMER‹ADDRESSOFTIMER‰XDEFƒTIMINTVA;TIMINTVADC.Wƒ\TIMINTVˆ#MILLISECSBETWEENTIMERINTERRUPTS ‰XDEFƒTIMSLIC?TIMSLIC‚DC.Wƒ\TIMSLICˆ#TIMERINTERRUPTSBEFORETASKRELINQUISH‰XDEFƒCLOCKFRQ1CLOCKFRQEQU„\CLOCKFRQ‡#CLOCKTICKSPERMILLISEC ‰XDEFƒIOVSIZ$IOVSIZƒDC.Lƒ\IOVSIZEOFIOVCTTABLE ‰XDEFƒMEMTYPA0MEMTYPA‚DC.BƒMTYP0ŒDEFAULTMEMORYTYPEFORASQ'S ‰XDEFƒMEMTYPT0MEMTYPT‚DC.BƒMTYP0ŒDEFAULTMEMORYTYPEFORTCB'S ‰XDEFƒMEMTYPSEMEMTYPS‚DC.BƒMTYP0,MTYP0†DEFAULTMEMORYTYPEFORSYSTEMTASKS(RO,RW) ‰XDEFƒMEMTYPUCMEMTYPU‚DC.BƒMTYP0,MTYP0†DEFAULTMEMORYTYPEFORUSERTASKS(RO,RW) ‰XDEFƒBUGTRAC8BUGTRAC‚DC.Lƒ\BUGTRAC‰ADDRESSOFMACSBUG'STRACEROUTINE‰XDEFƒDUMMYPTRADUMMYPTREQU„$A00‰USEASDUMMYPOINTERFORNON-EXISTANTADDRESSES‰XDEFƒWHERLOAD/WHERLOADDC.Lƒ\WHERLOAD…WHEREMACSBUGWILLLOADŠXDEF†PAGESIZE7PAGESIZE‚DC.L…\PAGESIZE„PAGESIZEFORSEGMENTALLOCATION ŠXDEF…ASN;ASN‡DC.L…\ASN‰NUMBEROFADDRESSSPACES(CURRENTLY0OR127)‹PAGE*9*‚MEMORYTABLE-USEDBYINITTOSETUPFREEMEMORYLISTS* ‹SECTIONƒ8 ‹OPT‡NOCL*‹XDEF†MEMTABL,ENDMEMT* TOPˆSET†0 BOTTOM…SET†1* MEMTABL„EQU†*,‹MTENTRY‚RAM,$00000,\MEMEND1,MTYP0,PART0,TOP‹IFNE…\MEMEND21‹MTENTRY‚RAM,\MEMEND2,\MEMEND3,MTYP0,PART1,BOTTOM‹ENDC‹MTEND‹DS.L…10 ENDMEMT„EQU†*‹ENDéé‰XDEF†OSMTBL,FMSASQ‰XDEF†OSMEND,FMSDLEN‰XREF†FHSASR,IOSASR,FMSASR ‰IFNE\NOTNT ‹XREF†TNTASR‰ENDC*-*ˆTABLEOFOPERATINGSYSTEMMODULETASKNAMES*‰NOLIST‰INCLUDEƒ9995.&.IOE.EQ‰INCLUDEƒ9995.&.TR1.EQ‰INCLUDEƒ9995.&.EXE.EQ‰INCLUDEƒ9995.&.NIO.EQ‰INCLUDEƒ9995.&.LV5.EQ‰INCLUDEƒ9995.&.FME.EQ‰INCLUDEƒ9995.&.FMI.EQ‰LIST SECTION 1OSMTBLƒDC.L…FHSIDŽFHSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+FHSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+FHSNLN‡QUEUELENGTH‰DC.L„FHSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED*‰DC.L…IOSIDŽIOSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRE‚ASQSTATUS'‰DC.B„EVULEN+IOSNLN‡MAX.MESSAGELENGTH ‰DC.L„EVULEN+IOSNLN‡QUEUELENGTH‰DC.L„IOSASRŽADDR.OFASR‰DC.W„0*$‰DC.L„0,0,0,0NODATASEGMENTNEEDED** IFNE \NOTNT*%*ˆTRANSPARENTNETWORKTERMINALDRIVER*‰DC.L†TNTIDTNTTASKNAME‰DC.L†IOSESSŽSESSION*%‰DC.B†AQSTQE+AQSTME+AQSTREASQSTATUS&‰DC.B†EVULEN+IOSNLN‡MAXMESSAGELENGTH ‰DC.L†EVULEN+IOSNLN‡QUEUELENGTH‰DC.L†TNTASRŽADDRESSOFASR‰DC.W†0*$‰DC.L†0,0,0,0NODATASEGMENTNEEDED ENDC**‰DC.L…FMSIDŽFMSTASKNAME‰DC.L…IOSESSSESSION*%‰DC.B„AQSTQE+AQSTME+AQSTRD‚ASQSTATUS'‰DC.B„EVTLEN+FHSNLN‡MAX.MESSAGELENGTHFMSASQƒDC.L„0QUEUELENGTH‰DC.L„FMSASRŽADDR.OFASR‰DC.W„0**‰DC.W„SGOPPAŽOPTIONS-LOG.ADDR=PHYS.ADDR.‰DC.W„SGATRW+SGATSS‡ATTRIBUTES‰DC.L„FMSDSEG.NAME‰DC.L„0LOGICALADDRESSFMSDLEN‚DC.L„0SEGMENTLENGTH**OSMENDƒEQU…*“ENDOFTABLE ‰END‡OSMTBLéB 0M PAGEO*********************************************************************************ˆIOC--DEFINEDCB'SANDCDB'S*&*ˆThemacrosusedaredefinedinIODM.*'*ˆ11/10/83‚modifiedformagtapedriver+*’modifiedtouseIOCVECandIOCLVLequates&*’includesWinchesterandSASIdrivers*’magtapeatlevel1**O******************************************************************************* *@*‚ThissectionbecomesIOCOMS,whichisusedbyFMS,IOS,&FHS.*#IOCOM„IDNT†12,12‡I/OCOMMONSEGMENT SECTION 0 OPT MEX XDEF IOCOMS,IOCOML,CCSEG *1*‚Definethephysicaladdressesofdevicedrivers*‚usingtheSYSGENparameters.*TERM…EQU‡\TERMDRVPRT†EQU‡\PRTDRVRMSPR…EQU‡\MPSCSPRMPSC…EQU‡\MPSCDRVWIN†EQU‡\WINDRVRMTA†EQU‡\MTADRVRGPIB…EQU‡\GPIBDRV PAGE*6*‚Hereareparametersdescribingthetablesandlists.*IOCOMS  DC.L 0 I/O sysgen options. ( DC.L DCQSTR Start address of DCQ space.&DC.LDCQENDEndƒaddressofDCQspace.DC.L0†Addressof1stDCQ. ( DC.L LUTSTR Start address of LUT space.&DC.LLUTENDEndƒaddressofLUTspace.DC.L0†Addressof1stLUT. ( DC.L DCBTBL Start address of DCB space.&DC.LDCBENDEndƒaddressofDCBspace. DC.L DCBTBL Address of 1st DCB.  DC.L 0 SEMAPHORE FLAG&DC.B'\SYSNAME'„OPERATINGSYSTEMI.D.DC.B'\REVISION'ƒANDƒREVISION( DC.L 0,0,0 TASK ID FOR UNCLAIMED BREAKS PAGEO********************************************************************************C*ˆStorageforDCQ'sandLUT's.‚Initiallythesetwolistsareempty.*O******************************************************************************* * *‚DCQspace.* DCQSTR EQU * DS.B 256*\DCQPGEDCQEND EQU *-1 * *‚LUTspace.* LUTSTR EQU * DS.B LUTBEG*\NOTASKS DS.B LUTSEG*\NOTASKS*(\MAXLU+1)LUTEND EQU *-1 PAGE‰PAGEO**********************************************************************************ˆDefineDCB'sbasedonSYSGENparameters.*9UB+J7RMZBb?jPrNzJ‚IŠ.O******************************************************************************* *DCBTBLEQU*‡ThisisthetopofDCBspace. IFGT…\NOTERMKSL**************************************************************************** *‚SETUPDCBFORSCREEN/KEYBOARDL**************************************************************************** ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8.TCP$ATW‚SET‚TCP$ATW+\TCP$PNUL<<9+\TCP$MODM<<10L CRTDCB 'CNSL',IOSID,IOSESS,$133,35,1,'CNSL',0,$03C1,$77F3,TCP$ATW,\TCP$REC,J& \TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,@& \TCP$CLC,\TCP$RTV,\TCP$EOL,\TCP$BRT,\TCP$NLS,\TCP$TRC,\TCP$TTP  ENDC K***************************************************************************$*‚SETUPDCB'SFORMVME400TERMINALSK***************************************************************************  IFGT \NOTERM40ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8.TCP$ATW‚SET‚TCP$ATW+\TCP$PNUL<<9+\TCP$MODM<<10L CRTDCB 'CN01',IOSID,IOSESS,$133,35,1,'CMP2',0,$0FFF,$7FF3,TCP$ATW,\TCP$REC,J& \TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,@& \TCP$CLC,\TCP$RTV,\TCP$EOL,\TCP$BRT,\TCP$NLS,\TCP$TRC,\TCP$TTP ENDC  IFGT \NOTERM40-1ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚B TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8.TCP$ATW‚SET‚TCP$ATW+\TCP$PNUL<<9+\TCP$MODM<<10L CRTDCB 'CN02',IOSID,IOSESS,$133,35,1,'CMP3',0,$0FFF,$7FF3,TCP$ATW,\TCP$REC,J& \TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,@& \TCP$CLC,\TCP$RTV,\TCP$EOL,\TCP$BRT,\TCP$NLS,\TCP$TRC,\TCP$TTP ENDC  IFGT \NOTERM40-2ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8.TCP$ATW‚SET‚TCP$ATW+\TCP$PNUL<<9+\TCP$MODM<<10L CRTDCB 'CN03',IOSID,IOSESS,$133,35,1,'CMP4',0,$0FFF,$7FF3,TCP$ATW,\TCP$REC,J& \TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,@& \TCP$CLC,\TCP$RTV,\TCP$EOL,\TCP$BRT,\TCP$NLS,\TCP$TRC,\TCP$TTP ENDC  IFGT \NOTERM40-3ITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8.TCP$ATW‚SET‚TCP$ATW+\TCP$PNUL<<9+\TCP$MODM<<10L CRTDCB 'CN04',IOSID,IOSESS,$133,35,1,'CMP5',0,$0FFF,$7FF3,TCP$ATW,\TCP$REC,J& \TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,@& \TCP$CLC,\TCP$RTV,\TCP$EOL,\TCP$BRT,\TCP$NLS,\TCP$TRC,\TCP$TTP ENDCL****************************************************************************%*‚SETUPDCB(S)FORNETWORKTERMINALSL**************************************************************************** IFNE \NOTNTITCP$ATW‚SET‚\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3+\TCP$USEP<<4GTCP$ATW‚SET‚TCP$ATW+\TCP$PRTY<<5+\TCP$ECHO<<6+\TCP$TAHD<<7+\TCP$TFUL<<8‰DC.L†0,0,0,0ƒBUFFERZONEBETWEENDEVICEINDEPENDENT/DEPENDENT)‰DC.B†IOSTLN„SPACEFORCONFIGURATIONINFO‰DCB.B…DCBLEN-(*-LLUN),0 (DCBENDEQU*-1…EndaddressofDCBspace.HIOCOML EQU (*-IOCOMS+255)/256*256 Get length of common segment (force to*§nextpageboundary). PAGE SECTION 1‰PAGEO*********************************************************************************‰CHANNELDATABLOCKS*O******************************************************************************* CCSEG EQU * ******‚VME/10KEYBOARD/SCREENIFGT„\NOTERMKS A CDB 0,'CNSL',XTSEXS,254,TERM,0,TERM,1,$42,3,$30,0,0,0,0,0,0,0,0,& 0,0,0  ENDC ******‚MVME410PRINTERS IFGT \TOTPRT@ CDB 0,'CPRT',XTPRTL,254,PRT,0,\LPDA$00,7,\IOCVEC1,\IOCLVL1,$10,&„0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \TOTPRT-1@ CDB 0,'CPR1',XTPRTL,254,PRT,0,\LPDA$01,7,\IOCVEC1,\IOCLVL1,$10,&„0,0,0,0,0,0,0,0,0,0,0 ENDC ******‚VME400TERMINALS  IFGT \NOTERM40@ CDB $0011,'SUP2',0,254,MSPR,0,\LTDA$02,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP2',XTS7AR,254,MPSC,'SUP2',\LTDA$02,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-1J CDB $0009,'CMP3',XTS7BR,254,MPSC,'SUP2',\D LTDA$03,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-2@ CDB $0011,'SUP3',0,254,MSPR,0,\LTDA$04,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0J CDB $0009,'CMP4',XTS7AR,254,MPSC,'SUP3',\LTDA$04,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC  IFGT \NOTERM40-3J CDB $0009,'CMP5',XTS7BR,254,MPSC,'SUP3',\LTDA$05,1,\IOCVEC4,\IOCLVL4,$30,&„0,0,0,0,0,0,0,0,0,0,0 ENDC IFGT‚\NOWIN@ CDB 0,'WIND',XTDWIN,254,WIN,0,\LWIN$00,1,\IOCVEC3,\IOCLVL3,$10,&„0,0,0,0,0,0,0,0,0,0,0 ENDCIFGT‚\NOWIN-1@ CDB 0,'WIN2',XTDWIN,254,WIN,0,\LWIN$01,1,\IOCVEC3,\IOCLVL3,$10,&„0,0,0,0,0,0,0,0,0,0,0 ENDC‰PAGE******‚IEEE-488CHANNELS  IFGE \NOGPIB-1J CDB $0001,'BUS0',XTGBUS,254,GPIB,0,\GPIB$00,64,$B0,4,$40,1,0,0,0,0,0,0,0,&…0,0,0 ENDC* IFGE \NOGPIB-2J CDB $0001,'BUS1',XTGBUS,254,GPIB,0,\GPIB$01,64,$B1,4,$40,1,0,0,0,0,0,0,0,&…0,0,0 ENDC* ,*********************************************ª**ˆMAGTAPEDRIVER“**ˆCHANNELDATABLOCK**ª*,*********************************************$******ƒFIRSTADAPTERBOARD(MVME435)* IFGT‚\NOMTA0H CDB 0,'MTA0',XTM435,0,MTA,0,\LMTA$00,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC*%******‚SECONDADAPTERBOARD(MVME435)* IFGT‚\NOMTA1H CDB 0,'MTA1',XTM435,0,MTA,0,\LMTA$01,1,\IOCVEC1,\IOCLVL1,$10,0,0,0,0,0, &„0,0,0,0,0,0 ENDC** ) DC.L 0 Link of 0 marks end of CDB chain.  ENDéééé PAGE*#*VALPAR VALIDATES SYSGEN PARAMETERSG*…FAILERRORISGENERATEDFOREACHPARAMETERTHATISNOTINVALIDRANGE:*ANY ERROR SHOULD MAKE OPERATOR ABORT SYSGEN SINCE FURTHER/*…SYSGENPROCESSINGASSUMESPARAMETERSAREGOOD*&*CAN'T HAVE MORE THAT 1 LOCAL TERMINAL IFGT \NOTERMKS-1 FAIL 100 ENDC+*CAN'T HAVE MORE THAN 4 MVME 400 TERMINALS. IFGT \NOTERM40-4 FAIL 100 ENDC9*CAN'T HAVE 0 OR MORE THAN 75 TASKS IN SYSTEM AT ONE TIME IFEQ \NOTASKS FAIL 100 ENDC IFGT \NOTASKS-75 FAIL 100 ENDC1*MAXIMUM LU CANNOT BE LESS THAN 8 OR MORE THAN 31 IFLT \MAXLU-8 FAIL 100 ENDC IFGT \MAXLU-31 FAIL 100 ENDC2*MAXIMUM LU CANNOT BE LESS THAN NO. OF DISK DRIVES IFLT \MAXLU-\TOTDSK FAIL 100 ENDC**IF NO MVME435, CAN'T HAVE ANY TAPE DRIVES IFEQ \TOTM435 ‚IFGT\NOMTAT ‚FAIL100‚ENDC ENDC/*CAN'T HAVE MORE THAN 8 TAPE DRIVES PER MVME435 IFGT \NOMTA0-8 FAIL 100 ENDC IFGT \NOMTA1-8 FAIL 100 ENDCC*MAXIMUM NO. OF PAGES FOR DCQ,UST,GST,IOV, AND TRACE CANNOT BE 0 OR*…MORETHAN10 IFEQ \DCQPGE FAIL 100 ENDC IFGT \DCQPGE-10 FAIL 100 ENDC IFEQ \GST FAIL 100 ENDC IFGT \GST-10 FAIL 100 ENDC IFEQ \UST FAIL 100 ENDC IFGT \UST-10 FAIL 100 ENDC IFNE \TRCFLAG IFEQ \TRACE FAIL 100 ENDC ENDC IFNE \TRCFLAG IFGT \TRACE-10 FAIL 100 ENDC ENDC IFEQ \IOV FAIL 100 ENDC IFGT \IOV-10 FAIL 100 ENDCG*MAXIMUM NO. OF DIFFERENT FILES MUST BE .LE. MAXIMUM NO. OF E TOTAL FILES IFGT \NODIFFIL-\NOFILES FAIL 100 ENDC2*MAXIMUM NO. OF FILES CANNOT BE 0 OR MORE THAN 200 IFEQ \NODIFFIL FAIL 100 ENDC IFGT \NODIFFIL-200 FAIL 100 ENDC IFEQ \NOFILES FAIL 100 ENDC IFGT \NOFILES-200 FAIL 100 ENDCG*MAXIMUM NO. OF DEFAULT VOLUMES CANNOT BE 0 OR MORE THAN NO. OF TASKS+3 IFEQ \NODEFVOL FAIL 100 ENDC IFGT \NODEFVOL-(\NOTASKS+3) FAIL 100 ENDC**DEFAULT FAB SIZE CANNOT BE 0 MORE THAN 20 IFEQ \DEFFAB FAIL 100 ENDC’n›  IFGT \DEFFAB-20 FAIL 100 ENDC7*DEFAULT DB SIZE CANNOT BE LESS THAN 4 OR MORE THAN 255 IFGT \DEFDAT-255 FAIL 100 ENDC IFLT \DEFDAT-4 FAIL 100 ENDC END ééééééé=/*I=/*‚TERMDRV.LF--SysgenchainfiletolinkVME/10keyboard/screendriver.=/*<=/*‚SysgenparameterLINKLS=\LINKLS=file/devicetowhich=/*‚tosendthelinkerlisting.=/*J=/*‚SysgenparameterTERMDRV=\TERMDRV=addressatwhichtolinkdriver.=/*'=LINK ,VMES10.TERMDRV.LO,\LINKLS;HAMIXSSEGMENT TERM:0-15 \TERMDRVIN VMES10.TERMDRV.ROIN VMES10.INCHAR.ROIN VMES10.KEYBOARD.ROIN VMES10.PAGEMODE.ROIN VMES10.EDITMODE.ROIN VMES10.FEEDER.ROIN VMES10.CRTINIT.ROIN VMES10.OUTCHS.ROIN VMES10.POUTCHS.ROEND=ENDééE ééé£=LINK ,IOI.LO,\LINKLS;HAMIXSSEGMENT IOSG:0 \IOCSTRSEGMENT .IOI:1INPUT VMES10.IOC.ROINPUT VMES10.IOI.ROINPUT VMES10.OSLIST.RO INPUT IXR.ROINPUT VMES10.ASR.ROEND=ENDééééééé¬ ‚********************‚*VMES10.SYSCMD.CD*M‚****************************************************************************‚*SYSGENCOMMANDFILE-´*‚*Ê*?‚*ƒUSEINCONJUNCTIONWITHSYSGEN.CFOREXECUTEDIRECTLYWITH*‚*†THEFOLLOWINGARGUMENTS:¬*‚*Ê*@‚*†ARG1-LISTINGFILEORDEVICEFORASSEMBLIESANDLINKEDITS‰*‚*Ê*-‚*†ARG2-SWITCH--0=ARG1ISAFILENAMEœ*‚*—1=ARG1ISADEVICENAMEš*‚*Ê*8‚*†ARG3-CONFIGURATIONSWITCH--1=SINGLE-USERHARD‘*‚*Ê*@‚*†ARG4-WORKINGFILEFORUSEWITHCOPY;ATOPRODUCELISTING‰*‚*Ê*M‚**************************************************************************** ‚MSG‰SYSGENCOMMANDFILE +‚MSG‰SETSYSGENPARAMETERSFROMPASSEDARGS *‚ASMLSW„=\2‹*ASSEMBLYLISTINGFILESWITCHF ‚*”0=ASMLSISAFILE‚*”1=ASMLSISADEVICE'‚LINKLSWƒ=\2‹*LINKLISTINGFILESWITCH‚*”0=LINKLSISAFILE‚*”1=LINKLSISADEVICE  ‚IFEQˆ\ASMLSW$…ASMLS…="\4"‰*ASMLISTINGWORKFILE‚ENDC ‚IFNEˆ\ASMLSW!…ASMLS…="\1"‰*ASMLISTINGDEVICE‚ENDC ‚IFEQˆ\LINKLSW&…LINKLS„="\4"‰*LINKLISTINGWORKFILE‚ENDC‚IFNEˆ\LINKLSW#…LINKLS„="\1"‰*LINKLISTINGDEVICE‚ENDC +‚WORKLS„="\1"‰*OVERALLLISTINGFILE/DEVICE6‚LINK1TFƒ="INIT1.TF"„*INTERMEDIATELINKFILEFORINIT6‚LINK2TFƒ="INIT2.TF"„*INTERMEDIATELINKFILEFORINIT C‚MSG‰**************************************************************C‚MSG‰**************************************************************?‚MSG‰**„Systemgeneration(SYSGEN)commandfileforusersof‚**/‚MSG‰**„VERSAdosonVME/10’Prepared4/28/83.**C‚MSG‰**************************************************************C‚MSG‰**************************************************************‚MSG‰‚MSG‰C‚MSG‰**************************************************************(‚MSG‰**ˆParametersdescribingdevices•**C‚MSG‰**************************************************************+‚*˜Total#ofterminals(localandMVME400)'‚TOTTERMƒ=\NOLTERM+\NOTERMKS+\NOTERM40 µ>¾=ÆFÎIÖ5Þ4æ2î,ö+þ/ 4 4 2 3 &W .B 6S >L F7+‚*˜Total#ofprinters(localandMVME410).)‚TOTPRT„=\NOLPRT+\NOPRT0+\NOPRT1+\NOPRT2‚*˜Totalnumberofdisks-+‚*˜floppydrivesandharddiskdrives.‚Each(‚*˜volumedefinedrequiresapproximately‚*˜2-1/4Kbytesofmemory.'‚TOTDSK„=\HDWIN+\FDWIN+\HDWIN2+\FDWIN2‚*‚*3‚NOTERMKS‚=1Œ#ofVME/10keyboard/screenterminals8‚NOTERM40‚=2Œ#ofterminalsusingMVME400serialports. ‚NOLPRT„=1Œ#oflocalprinters.‚*‚*-‚NOTNT…=0Œ#ofTransparentNetworkTerminals‚*‚*6‚WINSIZEƒ=15‹Harddisksize-usedtoconfiguredisks,‚*˜duringSysgen.‚15=15Megabyteharddisk‚*˜5=5Megabyteharddisk.,‚NOWIN…=1Œ#ofWinchestercontrollerboards:‚HDWIN…=1Œ#ofhardWinchesterdisksonfirstcontroller.<‚FDWIN…=1Œ#offloppydisksonfirstWinchestercontroller.<‚HDWIN2„=0Œ#ofhardWinchesterdisksonsecondcontroller.>‚FDWIN2„=0Œ#offloppydisksonsecondWinchestercontroller.‚*E‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NOGPIB„=0Œ#ofGPIBchannels‚*‚*†NOTICE!!!!!!‚*:‚*†IftheGPIBdriveristobeused,youmustmakeapatch:‚*†inyourVERSADOS.SYfilefortheVME/10.‚Thedirections=‚*†formakingthispatchwillbefoundin0.PRIV.NEWS.NW,the‚*†newsfileforthisrelease.‚*=‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRAD1…=0ŒNO.OFRADBOARDS‚NUSRRADƒ=0ŒNO.OFRADUSERS‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRADdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RADRV…=0‚*@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~‚NRIO†=0ŒNumberofRIOboards‚*‚*†NOTICE!!!!!!‚*3‚*†IftheRIOdriveristobeused,youmustDELETE%‚*†orcommentoutthefollowingline:‚* ‰RIODRVRƒ=0‚*I‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~@‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~#‚NDAC1…=0ŒNumberofMVME605boards;‚NUSRDACƒ=0ŒNumberofusers(total)fortheMVME605boards‚*"‚NACO†=0ŒNumberofMVME615boards;‚NUSRACOƒ=0ŒNumberofusers(total)fortheMVME615boards‚*‚*#‚NDCO1…=0ŒNumberofMVME625boards;‚NUSRDCOƒ=0ŒNumberofusers(total)fortheMVME625boards‚*‚*%‚NVME610=0ŽNumberofMVME610boards%‚NVME620=0ŽNumberofMVME620boards‚*‚*‚*>‚PCDRV…=0ŒIfnon-zeroincludespecialI/Ochannelinitializer2‚*˜forProcessControlDriversinusernumber9992>‚*ƒTheseparametersarF eusedtoverifytheassociatedVERSAbus,‚*ƒboardsarenotbeingusedbythissystem.‚* ‚NOLTERMƒ=0 ‚NOTERM0ƒ=0 ‚NOPRT0„=0 ‚NOTERM1ƒ=0 ‚NOPRT1„=0 ‚NOTERM2ƒ=0 ‚NOPRT2„=0‚*G‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~G‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~F‚*ˆIftheMAGTAPEdriverIStoBEusedYOUmustMERGEfileMTALDPNT.SA‚*ˆintoVMES10.INITIO1.AGG‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~F‚*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:‚*********************************************************‚*·*‚*ˆMAGTAPEDRIVER *‚*ˆNOTESONBOARDJUMPERING—*‚*·*:‚*********************************************************‚*‚*‚*ˆINTERRUPTLEVEL‚*7‚*ˆThechanneldatablockisconfiguredforI/Ochannel3‚*ˆinterruptlevel1inIOC.AG.‚Pleasebesurethat3‚*ˆyourboardisjumperedforthisinterruptlevel,4‚*ˆasdescribedintheMVME435magnetictapeadapter ‚*ˆmanual.‚*8‚*ˆAsdescribedintheMVME435manual,tohavea‚level18‚*ˆinterrupt,thejumperonJ2mustbeplacedtoconnect‚*ˆpins7-8asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+----+|‚8 ‚*’+--------+‚*‚*‚*ˆADDRESS‚ONI/OCHANNEL‚*7‚*ˆThechanneldatablockisconfiguredforI/Ochannel<‚*ˆaddressesLMTA$00=(I/Ochannel‚baseaddress)+$3E9and/‚*ˆLMTA$01=(I/Ochannelbaseaddress)+$3A9.5‚*ˆPleasebesurethatyourboard(s)is(are)jumpered‚*ˆforoneoftheseaddresses.‚*@‚*ˆTohaveaboardaddressof(I/Ochannelbaseaddress)+$3E9,)‚*ˆremovealljumpersfromJ3asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+„+|‚8 ‚*’+--------+‚*‚*‚*@‚*ˆTohaveaboardaddressof(I/Ochannel‚baseaddress)+$3A9,%‚*ˆconnect‚pins7-8onJ3asfollows:‚* ‚*’+--------+‚*1‚|+„+|‚2‚*’|ˆ|‚*3‚|+„+|‚4‚*’|ˆ|‚*5‚|+„+|‚6‚*’|ˆ|‚*7‚|+----+|‚8 ‚*’+--------+‚*‚*‚*‚*‚*‚*8‚TOTM435ƒ=0ŒTotal#ofmagtapeMVME435adapterboards.‚*3‚NOMTA0„=0Œ#oftapedrivesonfirstMVME435‚board4‚NOMTA1„=0Œ#oftapedrivesonsecondMVME435‚boardD‚NOMTAT„=\NOMTA0+\NOMTA1Totalnumberoftapedrivesforthesystem‚*‚MSG‰C‚MSG‰**************************************************************-‚MSG‰**ˆParametersabouttablesizes,etc.**C‚MSG‰**************************************************************‚*4‚DCQPGE„=2ŒNumberofpagesofmemoryforthedevice-‚*˜connectionqueue(DCQ).‚Minimumsizeis1,/‚*˜maximumsizeis10.‚Eachpagecanaccomodate.‚*˜approximately9entries.‚TheDCQisusedto/‚*˜saveconcurrentrequeststothesavefileor ‚*˜device.‚*5‚GST‡=2ŒNumberofpagesintheglobalsegmenttable..‚*˜Minimumsizeis1,maximumsizeis10.‚Each0‚*˜pagecanaccomodateapproximately14entries.‚*5‚UST‡=2ŒNumberofpagesintheusersemaphoretable..‚*˜Minumumsizeis1,maximumsizeis10.‚Each0‚*˜pagecanaccomodateapproximately11entries.‚*9‚TRACE…=0ŒNumberofpagesinthetracetable.‚TRACEmust1‚*˜benonzeroifTRCFLAGisnonzero.‚Minimumsize‚*˜is0,maximumsizeis20.‚*6‚UDR‡=1ŒNumberofpagesintheuser-defineddirective0‚*˜table.‚Minimumsizeis0,maximumsizeis10.‚*8‚IOV‡=1Œ#ofpagesinI/Ovectortable.‚Minimumsizeis2‚*˜1,maximumsizeis10.‚Eachpagecanaccomodate‚*˜approximately25entries.‚*@‚PAT‡=(\NOLOGONS*32*2+16+(\PAGESIZE-1))/\PAGESIZE#ofpagesin3‚*˜periodicactivationtable.‚Eachpageaccomodates.‚*˜approximately8entries.‚PATsizeis\PAT.‚*2‚NOTASKSƒ=20‹Maximum#oftasksallowedinsystem!‚*˜simultaneously.‚Maximumis75.‚*<‚MAXLU…=12‹Maximumlogicalunitnumberthatcanbeassigned/‚*˜foreachtaskinthesystem.‚Limitis31and.‚*˜minumumis8.‚MAXLUmustbegreaterthanor2‚*˜equaltoTOTDSK.‚MAXLUandNOTASKdeterminethe1‚*˜amountofmemoryrequiredfortG helogicalunit1‚*˜table(LUT).‚Thealgorithmfordeterminingthe!‚*˜sizeoftheLUTisasfollows:'‚*˜LUT=16*NOTASKS+8*NOTASKS*(MAXLU+1),‚*˜Theremustbea1LUforeachdiskvolume,‚*˜(FMSassignsadifferentlogicalunitfor,‚*˜eachdisk.)‚ThismeansthatMAXLUmustbe#‚*˜greaterthanorequaltoTOTDSK.‚*‚IFGTˆ\TOTDSK-\MAXLU!…MSG‰SYSGENparametersizeerror.3…MSG‰MAXLUmustbegreaterthanorequaltoTOTDSK.:…MSG‰Inthissysgen,MAXLU=\MAXLUandTOTDSK=\TOTDSK.5…MSG‰Pleaseadjustparametersandstartsysgenagain.…ABORT‡‚ENDC@‚NOFILESƒ=12‹Maximum#offileassignmentsallowedinsystemat ‚*˜onetime.‚*4‚NODIFFIL‚=12‹Maximum#ofDIFFERENTfilesassigned‚*˜simultaneously.‚*+‚NODEFVOL‚=4ŒMaximum#ofdefaultvolumes.‚*‚*=‚DEFFAB„=1ŒDefaultFABlengthinsectors.‚Minimumsizeis1,‚*˜maximumis20.‚*>‚DEFDAT„=4ŒDefaultdatablocklengthinsectors.‚Minimumsize‚*˜is4,maximumis255.‚*‚MSG‰C‚MSG‰**************************************************************‚MSG‰**ˆEETEQUvalues¥**C‚MSG‰**************************************************************>‚DEFAULTƒ="SYS:0.&"„*Systemdefaultvolume:usernumber.catalog<‚TERMOCNT‚=4Œ*No.ofterminaloutputtimeoutsbeforelogoff6‚SECURITY‚=1Œ*0/1->exclude/includesecuritypackage:‚SPCCMD„=1Œ*0/1->exclude/includenews,help,close,assign‚*˜cmds.5‚CHAINBAT‚=1Œ*0/1->exclude/includebatchandchainA‚CONBATCH‚=1ŒNumberofconcurrentbatchjobs.‚Maximum=NOTASKS.?‚BATCHPGE‚=2ŒNumberofpagesforbatchjobqueueing.‚Eachpage+‚*˜canaccomodateapproximately31entries.<‚BATDLY„=16000ˆDelayinmsinbatchbetweenreloadattempts)‚NOLOGONƒ=3ŒMaximumnumberoflogontrysB‚NOLOGONS‚=\TOTTERM…#ofterminalsallowedtologoninthesystem,‚LOGMSG1ƒ="VERSAdosV"Logonmessagepart1(‚LOGMSG2ƒ="ERSION"…Logonmessagepart2(‚REVNUMBR‚="4.3"†Logonmessagepart3‚*2‚*˜REVNUMBRisuseddynamicallyinCMDLISTaspart*‚*¡ofthelogonmessage.Ifthisvalueis'‚*¡changedthen'REVISION'inthisfile)‚*¡shouldbechangedtomatchthedynamic)‚*¡value.Theformatis'xx.xx'asshown.‚*B‚AUTOTERM‚='CNSL'‡TerminalIDofdeviceautologonistooccuron ‚AUTOLOGN‚=1 ‚*˜Bit0:‚*›0-->Autobreakinactive‚*›1-->Autobreakactive ‚*˜Bit1:‚*›0-->Autologoninactive‚*›1-->Autologonactive‚*‚MSG‰C‚MSG‰**************************************************************<‚MSG‰**ˆVectornumbers(Currentlyfordocumentationonly)**C‚MSG‰**************************************************************‚*.‚IOCVEC1ƒ=$41ŠI/Ochannelinterrupt1vector..‚IOCVEC2ƒ=$43ŠI/Ochannelinterrupt2vector..‚IOCVEC3ƒ=$44ŠI/Ochannelinterrupt3vector..‚IOCVEC4ƒ=$45ŠI/Ochannelinterrupt4vector.‚*+‚IOCLVL1ƒ=2ŒI/Ochannelinterrupt1level.+‚IOCLVL2ƒ=4ŒI/Ochannelinterrupt2level.+‚IOCLVL3ƒ=5ŒI/Ochannelinterrupt3level.+‚IOCLVL4ƒ=6ŒI/Ochannelinterrupt4level. 4‚RXRDY…=$42ŠReceiver-readyinterruptvectornumber.4‚TXRDY…=$4AŠTransmit-readyinterruptvectornumber./‚PTMVECTƒ=$4CŠTime-of-dayclockvectornumber.0‚FAIL†=$4DŠSystemfailinterruptvectornumber.+‚SWABRT„=$4EŠSoftwareabortvectornumber./‚BCLRV…=$40ŠBusclearinterruptvectornumber.#‚MMUINT„=$4BŠMMUinterruptvector.#‚DMAINT„=$49ŠDMAinterruptvector.0‚VMEAVL„=$48ŠVMEbusavailableinterruptvector.-‚ACFAIL„=$46ŠACFAILinterruptvectornumber.‚*‚MSG‰C‚MSG‰**************************************************************#‚MSG‰**ˆAddressesoftimer,etc.š**C‚MSG‰**************************************************************‚MMU‡=$F1A800†AddressofMMUA‚PAGESIZE‚=256ŠGranularity(bytes)formemorysegmentallocation#‚ASN‡=127ŠNumberofaddressspaces"‚TIMER…=$F1A081†Addressoftimer.;‚CLOCKFRQ‚=$00000000„Numberofclocktickspermillisecond)‚*˜(ThisparameterisnotusedonVME/10)#‚PANEL…=$0‹Addressoffrontpanel.@‚BUGTRACƒ=$F0000C†Addressoffirmwaredebugger'straceroutine.2‚TRCFLAGƒ=$0000ˆTG raceflag-0meansdon'ttrace.‚*šTracebitsasof8/12/82 ‚*šBit‡Event ‚*›15‡Trap#1"‚*›14‡I/OInterruptnotclaimedby ‚*¤usertask‚*›13‡Timerinterrupt‚*›12‡Usertrap(2-15)‚*›11‡Exception‚*›10‡Dispatch'‚*œ9‡I/Ointerruptclaimedbyusertask‚*œ8‡ReturnformLOADMMU‚*œ7‡Simulatedinterrupt‚*œ6‘SYSFAILinterrupt.‚*@‚SYSFAIL=0ŽDetermineswhetherornottheoperatingsystemwill6‚*˜beinterruptedwhenSYSFAILisassertedonthebus.3‚*˜SomeintelligentboardswillassertSYSFAILwhen1‚*˜theyexperienceafailureofsomekind.‚Ifyou6‚*˜havesuchboardsinthesystem,ANDTHEDRIVERSFOR4‚*˜THESEBOARDSHAVESYSFAILHANDLERS,thenyouwill3‚*˜probablywantSYSFAILinterruptsenabled.‚Ifthe5‚*˜appropriateSYSFAILhandlersarenotwritten,then6‚*˜takingaSYSFAILinterruptwillhangupthesystem,1‚*˜soyouwouldwantSYSFAILinterruptsdisabled."‚*š0=disableSYSFAILinterrupts.!‚*š1=‚enableSYSFAILinterrupts.‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**+‚MSG‰**ƒTERMINAL/PRINTERDEVICEADDRESESˆ** ‚MSG‰**«**0‚MSG‰**ƒBaseAddressJumpers:‚'.'=nojumper‚**‚MSG‰**š'J'=jumper…**4‚MSG‰***********************************************‚MSG‰C‚LTDA$02ƒ=$F1C1CD†MVME400withbaseaddressjumpers(...J)portAC‚LTDA$03ƒ=$F1C1CF†MVME400withbaseaddressjumpers(...J)portBC‚LTDA$04ƒ=$FFFFFF†MVME400withbaseaddressjumpers(????)portAC‚LTDA$05ƒ=$FFFFFF†MVME400withbaseaddressjumpers(????)portBC‚LPDA$00ƒ=$F1C1E1†MVME410withbaseaddressjumpers(....)portAC‚LPDA$01ƒ=$F1C1E9†MVME410withbaseaddressjumpers(....)portB ‚LWIN$00ƒ=$F1C0D3†RWIN1address'‚LWIN$01ƒ=$F1C0E3†SecondRWIN1address<‚LMTA$00ƒ=$F1C3E9†MVME435with‚baseaddressjumpers(....)<‚LMTA$01ƒ=$F1C3A9†MVME435with‚baseaddressjumpers(...J)"‚IOBASE„=$F1C000†I/ObaseaddressA‚GPIB$00ƒ=$FF0400†VME300withbaseaddressjumpers(JJJJJ.JJJJ)A‚GPIB$01ƒ=$FF0440†VME300withbaseaddressjumpers(JJJJJ.JJJ.)‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**)‚MSG‰**ƒSYSGENPARAMETERSFORTERMINALŠ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(TCP=TERMINALCONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEBELOW…**4‚MSG‰***********************************************‚MSG‰‚*2‚TCP$RECƒ=80‹Widthofterminal(characters/line).-‚TCP$RSZƒ=24‹Depthofterminal(lines/page).6‚TCP$WTOƒ=900000‡#ofmillisectoallowbeforetiming&‚*˜outawrite.(0=timeoutdisabled)6‚TCP$RTOƒ=900000‡#ofmillisectoallowbeforetiming%‚*˜outaread.‚(0=timeoutdisabled)>‚TCP$XOFƒ=$17ŠXOFFchar;whenreceived,suspendstransmission ‚*˜(0=none).?‚TCP$XONƒ=0ŒXONchar;whenreceived,cancelsapriorXOFFchar‚*˜(0=anychar).@‚TCP$BRCƒ=$03ŠChartobeinterpretedlikeabreakwhenreceived ‚*˜(0=none).<‚TCP$DOPƒ=$0FŠCharwhichcausesoutputtobediscardedwhen‚*˜received(0=none).:‚TCP$RLNƒ=$13ŠCharwhichcauseslinetobereprintedwhen‚*˜received(0=none).A‚TCP$CLCƒ=$18ŠCharwhichcauseslinetobedeletedwhenreceived ‚*˜(0=none)./‚TCP$RTVƒ=$0DDE0000„Readterminators(CR,$DE).0‚TCP$EOLƒ=$0D0A0000„Endoflinestring(CR,LF)..‚TCP$BRTƒ=$0EŠBaudratecode($0E=9600baud).?‚TCP$NLSƒ=0Œ#ofASCIINULchar'stosendaftereachCRorLF.+‚TCP$TRCƒ=$00ŠTerminatorclass($0X=none)..‚TCP$TTPƒ=$00ŠTerminaltype(0=EXORterm155).J‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.>‚TCP$HCPY‚=0Œ1meanstheterminalisahardcopydevice,nota‚*˜CRT.8‚TCP$XCTL‚=0Œ1meansuseXON/XOFFtocontrolterminal's‚*˜transmission,notCTS.@‚TCP$BITS‚=0Œ1meanstransmit&receive7bits/charratherthan‚*˜8.<‚TCP$STPB‚=0Œ1meansfolloweachcharsentwith2stopbits‚*˜ratherthan1.=‚TCP$USEP‚=0Œ1meansparityshouldbecheckedandgenerated.<‚TCP$PRTY‚=0Œ1meansparity(ifused)shouldbeevenrather ‚*˜thanodd.<‚TCP$ECHO‚=0Œ1meansthedrivershouldnotechocharaH cters.@‚TCP$TAHD‚=0Œ1meansthetype-aheadfeatureshouldnotbeused.9‚TCP$TFUL‚=1Œ1meansfillingthebufferonareadshould‚*˜terminatetheread.>‚TCP$PNUL‚=0Œ1meansNULchar'sshouldbeconsidereddatafor‚*˜imagereads.7‚TCP$MODM‚=0Œ1meanstheportisconnectedtoamodem.9‚TCP$OFFH‚=0Œ1meanstheport,ifconnectedtomodem,is ‚*˜offhook.‚*L‚***************************************************************************'‚*†NOTEonhowtomodifyasingleport:‚*<‚*†Firstduplicatealltheparametersthataretochangefor<‚*†thisparticularport(e.g.TCP$BRT).‚Modifytheduplicate=‚*†labelssothattheybecomeunique.‚Onetechniqueistoput9‚*†theportnumberattheendofthelabel(e.g.forCN02;‚*†TCP$BRTbecomesTCP$BRT2andTCP$BITSbecomesTCP$BIT2).8‚*†Rememberthatthelabelmustnotexceed8characters!;‚*†Changetheparametertothedesiredvalue(e.g.toseta5‚*†300baudrateforanon-EXORtermterminalonCN02,$‚*†TCP$BRT2=$05andTCP$TTP2=1).‚*4‚*†Nowsubstitutethesenewparametersintothefile8‚*†VMES10.IOC.AGfortheCRTDCBmacrodefiningtheport.+‚*†Tocontinuethebaudrateexampleabove:?‚*ˆTCP$ATWSET\TCP$HCPY+\TCP$XCTL<<1+\TCP$BITS<<2+\TCP$STPB<<3=‚*ˆTCP$ATWSETTCP$ATW+\TCP$USEP<<4+\TCP$PRTY<<5+\TCP$ECHO<<6=‚*ˆTCP$ATWSETTCP$ATW+\TCP$TAHD<<7+\TCP$TFUL<<8+\TCP$PNUL<<9$‚*ˆTCP$ATWSETTCP$ATW+\TCP$MODM<<10=‚*‰CRTDCB'CN02',IOSID,IOSESS,$133,36,1,'CMP3',0,$0FFF,$7FF3,‚*©~~:‚*ˆ&ƒTCP$ATW,\TCP$REC,\TCP$RSZ,\TCP$WTO,\TCP$RTO,\TCP$XOF,;‚*ˆ&ƒ\TCP$XON,\TCP$BRC,\TCP$DOP,\TCP$RLN,\TCP$CLC,\TCP$RTV,2‚*ˆ&„TCP$EQL,TCP$BRT2,\TCP$NLS,\TCP$TRC,TCP$TTP2‚*•~~~~~~~~~“~~~~~~~~~4‚*†where~~~~~~underlinestheCRTDCBmodifications.‚*>‚*†Thissametechniquemaybeusedwiththeprinterparameters<‚*†bymodifyingthePCP$xxxlabelsandsubstitutingintothe=‚*†PRTDCBmacro.‚Itmayalsobeusedwiththediskparameters@‚*†bymodifyingtheappropriatelabelsandsubstitutingintothe‚*†DSKDCBmacro.‚*L‚***************************************************************************‚*‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**(‚MSG‰**ƒSYSGENPARAMETERSFORPRINTER‹**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**-‚MSG‰**ƒ(PCP=PRINTER‚CONFIG.PARAMETERS)…**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE…**4‚MSG‰***********************************************‚MSG‰‚*A‚PCP$RECƒ=132ŠWidthofprinter‚(characters/physicalprintline).,‚PCP$RSZƒ=66‹Depthofprinter‚(lines/page).B‚PCP$WTOƒ=120000‡(2minutes)#ofmillisectoallowbeforetiming‚*˜outawrite.6‚PCP$LRLƒ=132ŠLogicallinelength<=widthofprinter<‚PCP$EOLƒ=$0A0D0000„Endoflinestring(LF,CR).(MCCMonly)$‚PCP$ELCƒ=$0DŠEndoflinecharacterJ‚*‚Eachofthefollowingisaflag--theonlyallowablevaluesare0and1.9‚PCP$LNFD‚=0Œ1meanstheprintersupportsautolinefeed5‚PCP$AFFƒ=0Œ1meanssupressauto-formfeedonassign9‚PCP$TLRL‚=0Œ0meanswrap-aroundprintiflog.linelen. ‚*˜exceeded0‚*˜1meanstruncateprintatlogicallinelength‚MSG‰4‚MSG‰*********************************************** ‚MSG‰**«**%‚MSG‰**ƒSYSGENPARAMETERSFORDISKŽ**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…***‚MSG‰**ƒ(DCP=DISKCONFIG.PARAMETERS)‰**2‚MSG‰**ƒ(WCP=Winchesterdiskconfig.params.)***‚MSG‰**ƒNotethatsomevaluesarezero.‰**1‚MSG‰**ƒZerovaluesfordisksare'don'tcare'‚**.‚MSG‰**ƒTOMODIFYPARAMETERSSEENOTEABOVE…**4‚MSG‰***********************************************‚MSG‰‚*&‚DCP$WTOƒ=0ŒWriteTimeout-alldisks%‚DCP$RTOƒ=0ŒRead‚Timeout-alldisks?‚DCP$HBPS‚=256Š#ofVERSAdosbytespersector-allharddisksA‚DCP$FBPS‚=256Š#ofVERSAdosbytespersector-allfloppydisks‚*;‚*configurationinformationforWinchesterDiskController%‚*handlesbothHardandfloppydisks;‚*Thefollowingparameterschangebasedonharddisksize:‚*:‚*<<<<<<<<<<<<<<<<<<<<<<<ƒ>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>H ‚*"‚*‹5mbdisk†15mbdisk„40mbdiskF‚*WCP$HTNS‚19584($4C80)‚58752($E580)159360($26E80)‚No.ofsectors‚*WCP$HHDS†2Ž6Ž6‹No.ofheads@‚*WCP$HTRK„306($132)…306($132)…830($33E)„Cylinderspermedia@‚*WCP$HTRD„306($132)…306($132)…830($33E)„Cylindersperdrive‚*:‚*<<<<<<<<<<<<<<<<<<<<<<<ƒ>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>D‚PAUSE‡HitreturnifWINSIZEparameter\WINSIZSmegabyteiscorrect.‚*‚IFEQˆ\WINSIZE-40…WINSIZSƒ="40"6…WCP$HTNS‚=159360‡total#ofsectors-40MBharddisk&…WCP$HHDS‚=6Œ#heads-40MBharddisk3…WCP$HTRK‚=830Š#ofcylindersonmedia-harddisk3…WCP$HTRD‚=830Š#ofcylindersondrive-harddisk‚ENDC‚IFEQˆ\WINSIZE-15…WINSIZSƒ="15"5…WCP$HTNS‚=58752ˆtotal#ofsectors-15MBharddisk&…WCP$HHDS‚=6Œ#heads-15MBharddisk3…WCP$HTRK‚=306Š#ofcylindersonmedia-harddisk3…WCP$HTRD‚=306Š#ofcylindersondrive-harddisk‚ENDC‚IFEQˆ\WINSIZE-5…WINSIZSƒ="05"5…WCP$HTNS‚=19584ˆtotal#ofsectors-5MBharddisk&…WCP$HHDS‚=2Œ#heads-5MBharddisk3…WCP$HTRK‚=306Š#ofcylindersonmedia-harddisk3…WCP$HTRD‚=306Š#ofcylindersondrive-harddisk‚ENDC1‚WCP$FTNS‚=2552‰total#ofsectors-floppydisk*‚WCP$HSPT‚=32‹#sectors/track-harddisk,‚WCP$FSPT‚=16‹#sectors/track-floppydisk#‚WCP$FHDS‚=2Œ#heads-floppydisk4‚WCP$FTRK‚=80‹#ofcylindersonmedia-floppydisk+‚WCP$HILV‚=1Œinterleavefactor-harddisk-‚WCP$FILV‚=1Œinterleavefactor-floppydisk'‚WCP$HSOF‚=0Œspiraloffset-harddisk)‚WCP$FSOF‚=0Œspiraloffset-floppydisk9‚WCP$HPSM‚=256Šphysicalsectorsizeofmedia-harddisk;‚WCP$FPSM‚=256Šphysicalsectorsizeofmedia-floppydisk7‚WCP$HSHD‚=0Œstartingheadnumberofdrive-harddisk9‚WCP$FSHD‚=0Œstartingheadnumberofdrive-floppydisk4‚WCP$FTRD‚=80‹#ofcylindersondrive-floppydisk2‚WCP$HCOM‚=153Špre-compensationvalue-harddisk3‚WCP$FCOM‚=40‹pre-compensationvalue-floppydisk?‚WCP$HPTD‚=0Œ#ofphys.sectorspertrackondrive-harddiskA‚WCP$FPTD‚=0Œ#ofphys.sectorspertrackondrive-floppydisk‚*I‚*‚Theattributesmaskandparametermaskdon'tforhardorfloppydisks.‚*‚TheattributeswordmayvaryF‚*‚forfloppydisks.‚Theattributeswordissethereforthefollowing‚*‚floppydiskconfiguration:‚*‚MFMencoding ‚*‚96TPI‚*‚doublesideddiskette ‚*‚IBMformat‚*‚floppydisk‚*-‚WCP$HATM‚=$0010ˆattributesmask-harddisk/‚WCP$FATM‚=$001Fˆattributesmask-floppydisk,‚WCP$PM„=$1AF3ˆparametersmask-bothkinds,‚WCP$HAWƒ=$0010ˆattributesword-harddisk.‚WCP$FAWƒ=$000Fˆattributesword-floppydisk‚*=‚*‚thefollowingflagsarefortheWinchestercontrollerdisk‚*‚attributesword‚*:‚WCP$FDEN‚=1Œbit0…MFM(1)/FM(0)encodingmethodonmedia-‚*˜floppydisk:‚WCP$FTDN‚=1Œbit1…96(1)/48(0)TPItrackdensity-media-‚*˜floppydisk9‚WCP$FSID‚=1Œbit2…double(1)/single(0)sidedfloppydisk<‚WCP$FFMT‚=1Œbit3…IBM(1)/Motorola(0)mediaformat-floppy‚*˜disk‚WCP$HDSC‚=1Œbit4…Harddisk‚WCP$FDSC‚=0Œbit4…Floppydisk‚MSG‰;‚MSG‰******************************************************‚MSG‰*&‚MSG‰*‹GPIBUSERCONFIGURATIONEQUATES‚MSG‰*;‚MSG‰******************************************************‚MSG‰2‚GB0$UCLƒ=0ŒBUS0USERCONFIGURATIONLENGTH(UCL)‚G0A$UCLƒ=0ŒBUS0DEVAUCL,‚G0B$UCLƒ=0ŒReservedforfutureenhancement,‚G0C$UCLƒ=0ŒReservedforfutureenhancement,‚G0D$UCLƒ=0ŒReservedforfutureenhancement,‚G0E$UCLƒ=0ŒReservedforfutureenhancement,‚G0F$UCLƒ=0ŒReservedforfutureenhancement,‚G0G$UCLƒ=0ŒReservedforfutureenhancement,‚G0H$UCLƒ=0ŒReservedforfutureenhancement,‚G0I$UCLƒ=0ŒReservedforfutureenhancement,‚G0J$UCLƒ=0ŒReservedforfutureenhancement,‚G0K$UCLƒ=0ŒReservedforfutureenhancement,‚G0L$UCLƒ=0ŒReservedforfutureenhancement,‚G0M$UCLƒ=0ŒReservedforfutureenhancement‚G0N$UCLƒ=0ŒBUS0DEVNUCL ,‚GB1$UCLƒ=0ŒBUS1USERCONFIGURATIONLENGTH‚G1A$UCLƒ=0ŒBUS1DEVAUCL,‚G1B$UCLƒ=0ŒReservedforfutureI enhancement,‚G1C$UCLƒ=0ŒReservedforfutureehnancement,‚G1D$UCLƒ=0ŒReservedforfutureehnancement,‚G1E$UCLƒ=0ŒReservedforfutureehnancement,‚G1F$UCLƒ=0ŒReservedforfutureehnancement,‚G1G$UCLƒ=0ŒReservedforfutureehnancement,‚G1H$UCLƒ=0ŒReservedforfutureehnancement,‚G1I$UCLƒ=0ŒReservedforfutureehnancement,‚G1J$UCLƒ=0ŒReservedforfutureehnancement,‚G1K$UCLƒ=0ŒReservedforfutureehnancement,‚G1L$UCLƒ=0ŒReservedforfutureehnancement,‚G1M$UCLƒ=0ŒReservedforfutureehnancement‚G1N$UCLƒ=0ŒBUS1DEVNUCL4‚MSG‰*********************************************** ‚MSG‰**«**/‚MSG‰**ƒSYSGENPARAMETERSFORMAGTAPEDRIVE„**.‚MSG‰**ƒCONFIGURATIONPARAMETERS/ATTRIBUTES…**.‚MSG‰**ƒ(MCP=MAGTAPECONFIG.PARAMETERS)…** ‚MSG‰**«**4‚MSG‰***********************************************‚MSG‰‚*;‚MCP$WTOƒ=5000‰WriteTimeout(5secondstowrite4Kbytes);‚MCP$RTOƒ=360000‡Read‚Timeout(6minutestoread4Kbytes,,‚*štosearchforafilemark,toreadablank&‚*štapetotheendoftape,torewind)6‚MCP$DENƒ=0ŒDensityselectedforwritefromloadpoint ‚*š0means1600bpi(PEdensity)!‚*š1means‚800bpi(NRZIdensity)6‚MCP$RDTƒ=3ŒNumberofreadtriesbeforeerrormessage1‚MCP$WRTƒ=3ŒNumberofwritetriesbeforeerasing:‚MCP$ERTƒ=1ŒNumberoftimestoerasebeforeerrormessage‚*<‚MCP$ATMƒ=$0002ˆBit1isrecognizedforaconfigurecommand9‚MCP$PM„=$00F0ˆDEN,RDT,WRT,ERTfieldsarerecognizedfor‚*šaconfigurecommand.‚*"‚MCP$AW„=$0000ˆBit0isRESERVED.4‚*˜Bit1=1meansuserrequestsadensityforwrite2‚*˜Bit1=0meansuserdoesnotrequestadensity‚*‚MSG‰A‚MSG‰************************************************************7‚MSG‰**…Descriptiveinfoaboutthisoperatingsystem‡**A‚MSG‰************************************************************5‚SYSNAMEƒ="VERSAdos"ƒNameforthisoperatingsystem.9‚REVISION‚="REV‚4.3"‚Revisionofthisoperatingsystem.7‚TIMSLICƒ=2ŒNumberoftimerinterruptspertimeslice.>‚TIMINTVƒ=16‹Numberofmillisecondsbetweentimerinterrupts./‚*˜(ThisparameterisnotusedonVME/10.‚Itis4‚*˜includedfordocumentationonly.‚Theactualvalue!‚*˜usedforVME/10is15.625ms.)2‚MEMEND1ƒ=$20200‡Ceilingaddressforpartition0.0‚MEMEND2ƒ=$20200‡Flooraddressforpartition1.2‚MEMEND3ƒ=$60000‡Ceilingaddressforpartition1.=‚DPRVAO„=$0‹Dualportedramversadosoffset(forVM02only).4‚CTRLREGƒ=$0‹baseaddressofVM02controlregisters@‚WHERLOAD‚=$0‹Addressatwhichtoloadintheoperatingsystem.‚MSG‰A‚MSG‰************************************************************;‚MSG‰**VALPAR--Validateparameterstokeepyouhonest‡**A‚MSG‰************************************************************‚SUBSˆVMES10.VALPAR.AG!‚ASM‰VMES10.VALPAR.AG,,\ASMLS;R-C ‚IFGTˆ\$RDD…PAUSE‡Abortsysgeniferrorsinassembly-elsehitcarriagereturn‚ENDC ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚MSG‰B‚MSG‰*************************************************************#‚MSG‰**…Generateexecprocess--œ**B‚MSG‰************************************************************* ‚*’EXECFOFB‚MSG‰*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*‚MSG‰*„PROCESSVMES10.RMS.LO¢*B‚MSG‰*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~* ‚PCˆ=$1000 ‚STACK…=$E00‚STARTRMS‚=$1100‚PROCESS…VMES10.RMS.LO ‚END‰EXEC‚IFEQˆ\LINKLSW…=COPY‡VMES10.RMS.LL,\WORKLS;A‚ENDC ‚TERMDRVƒ=*‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆScreen/keyboarddriver›**B‚MSG‰*************************************************************‚SUBSˆVMES10.TERMDRV.LG‚LINKˆVMES10.TERMDRV.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚PROCESS…VMES10.TERMDRV.LO ‚END‰TERMDRV‚*‚* ‚GPIBDRVƒ=* ‚IFEQˆ\NOGPIB…MSG‰GPIBDRIVERNOTREQUIRED‚ENDC ‚IFNEˆ\NOGPIB…MSG‰B…MSG‰*************************************************************…MSG‰**…ADDTHEGPIBDRIVER¢*B…MSG‰*******************************************************I ******…SUBSˆGPIBXTR.AG&…ASM‰GPIBXTR.AG,GPIBXTR.RO,\ASMLS;Z=85 …IFEQˆ\ASMLSWˆ=COPY‡\ASMLS,\WORKLS;A…ENDC…SUBSˆGPIBDRV.LG…LINKˆGPIBDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…PROCESS…GPIBDRV …END‰GPIBDRV‚ENDC‚MSG‰B‚MSG‰*************************************************************5‚MSG‰**‡MPSCDRV(7201)DRIVERFORVME400TERMINALSˆ**B‚MSG‰************************************************************* ‚MPSCSPRƒ=*‚IFGTˆ\NOTERM40…SUBSˆMPSCSPR.LG…LINKˆMPSCSPR.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…PROCESS…MPSCSPR …END‰MPSCSPR‚ENDC ‚MPSCDRVƒ=*‚IFGTˆ\NOTERM40…SUBSˆMPSCDRV.LG…LINKˆMPSCDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC…PROCESS…MPSCDRV.LO …END‰MPSCDRV‚ENDC ‚MSG‰B‚MSG‰*************************************************************6‚MSG‰**IFWEHAVEMVME410PRINTERS,ADDTHEDRIVER**B‚MSG‰*************************************************************‚MSG‰ ‚PRTDRVRƒ=* ‚IFEQˆ\NOLPRT4…MSG‰~~~~~~~~~PRINTERDRIVERNOTREQUIRED~~~~~~~~~‚ENDC ‚IFNEˆ\NOLPRT…SUBSˆPRTDRV.LG…LINKˆPRTDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …PROCESS…PRTD …END‰PRTD‚ENDCN‚*----------------------------------------------------------------------------‚MSGA‚MSG‰************************************************************/‚MSG‰**ƒCopyCAOE.SYSPAR.ROinto&.SYSPAR.RO‘**A‚MSG‰************************************************************‚MSG‚*#‚=COPY‚CAOE.SYSPAR.RO,&.SYSPAR.RO;Y‚*‚IFNE\NVME610+\NVME620‚MSGG‚MSG„******************************************************************‚MSG„*‰VME610/620DRIVER¥*G‚MSG„******************************************************************‚MSGG‚D610QSIZ=128ƒMinimunnumberofentriesinInterruptProcessingQueue A‚INCLUDE.&.D610GEN.CI„INCLUDEtheSYSGENcommandsforthedriver ‚ENDCN‚*---------------------------------------------------------------------------- ‚IFNEƒ\NDAC1‚MSGG‚MSG„******************************************************************‚MSG„*‰VME605DRIVER©*G‚MSG„******************************************************************‚MSG‰INCLUDEƒ.&.D605GEN.CI‚ENDC ‚IFNE‚\NACO‚MSGG‚MSG„******************************************************************‚MSG„*‰VME615DRIVER©*G‚MSG„******************************************************************‚MSG‰INCLUDEƒ.&.D615GEN.CI‚ENDC ‚IFNE‚\NDCO1‚MSGG‚MSG„******************************************************************‚MSG„*‰VME625DRIVER©*G‚MSG„******************************************************************‚MSG‰INCLUDEƒ.&.D625GEN.CI‚ENDCO*******************************************************************************N‚*----------------------------------------------------------------------------‚MSG‰B‚MSG‰*************************************************************0‚MSG‰**IFWEHAVEWINCHESTER,ADDTHEDRIVER“**B‚MSG‰*************************************************************‚MSG‰ ‚WINDRVRƒ=* ‚IFEQˆ\NOWIN6…MSG‰~~~~~~~~~WINCHESTERDRIVERNOTREQUIRED~~~~~~~~~‚ENDC ‚IFNEˆ\NOWIN…SUBSˆWINDRV.LG…LINKˆWINDRV.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …PROCESS…WIND …END‰WIND‚ENDC‚MSG‰ ‚MEMBEG„=* ‚SUBSˆIXR.AG‚ASM‰IXR.AG,IXR.RO,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚MSG‰B‚MSG‰*************************************************************/‚MSG‰**IFWEHAVEMAGTAPES,ADDTHEDRIVER**B‚MSG‰*************************************************************‚MSG‰ ‚MTADRVRƒ=* ‚IFNEˆ\NOMTAT…SUBSˆMTADRVR.LG…LINKˆMTADRVR.LG…IFEQˆ\LINKLSWˆ=COPY‡\LINKLS,\WORKLS;A…ENDC …PROCESS…MTAD …*’MTADFOF …END‰MTAD‚ENDC‚*‚MSG‰@‚MSG‰***********************************************************=‚MSG‰**‚IOS--Input/OutputServices(trap#2servertask)ƒ**@‚MSG‰***********************************************************‚TASKˆIOS,.IOS‚STATE…='DORM'‚PRIORITY‚=$D1 ‚SESSIONƒ=J 1‚IOSSTR„=*ŒIOSloadaddr.!‚IOSASR„=*+2ŠIOSASRentrypoint ‚SUBSˆIOS.LG ‚LINKˆIOS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰IOS‚MSG‰B‚MSG‰*************************************************************>‚MSG‰**ƒFHS--FileHandlingServices(trap#3servertask)ƒ**B‚MSG‰*************************************************************‚TASKˆFHS,.FHS‚STATE…='DORM' ‚SESSIONƒ=1‚PRIORITY‚=$D1‚FHSSTR„=*ŒFHS‚loadaddr.!‚FHSASR„=*+2ŠFHSASRentrypoint ‚SUBSˆFHS.LG ‚LINKˆFHS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FHS‚MSG‰B‚MSG‰*************************************************************(‚MSG‰**ˆFMS--FileManagementSystem”**B‚MSG‰*************************************************************‚TASKˆFMS,.FMS‚STATE…='DORM'‚PRIORITY‚=$D0‚FMSSTR„=*ŒFMSloadaddr.!‚FMSASR„=*+2ŠFMSASRentrypoint ‚SUBSˆFMS.LG ‚LINKˆFMS.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰FMS ‚IFEQˆ\NOTNT …TNTASR„=0‚ENDC ‚IFNEˆ\NOTNT…MSG‰B…MSG‰*************************************************************5…MSG‰**†TNT--TransparentNetworkTerminalDriver‰**B…MSG‰*************************************************************…TASKˆTNT,.TNT…STATE…='DORM'…PRIORITY‚=$D0…TNTSTR„=*ŒTNTLOADADDR.!…TNTASR„=*+2ŠTNTASRENTRYPOINT …SUBSˆTNTD.LG …LINKˆTNTD.LG…IFEQˆ\LINKLSWˆ=COPY‡TNTD.LL,\WORKLS;A…ENDC…END‰TNT‚ENDC‚MSG‰B‚MSG‰*************************************************************!‚MSG‰**ˆEET--EntryExitTask›**B‚MSG‰*************************************************************‚TASKˆEET,&EET‚STATE…='READ' ‚SESSIONƒ=2‚PRIORITY‚=$C8‚EETSTR„=*ŒEETloadaddr.%‚SUBSˆEET.LG,9995.&.EET.EQ,CMDLIST.AG)‚ASM‰&.EET.EQ/CMDLIST.AG,CMDLIST,\ASMLS;R ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC ‚LINKˆEET.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰EET‚MSG‰B‚MSG‰*************************************************************.‚MSG‰**ˆLDR--Loader(trap#4servertask)Ž**B‚MSG‰*************************************************************‚TASKˆLDR.LO,&LDR‚STATE…='READ'‚PRIORITY‚=$C8 ‚SESSIONƒ=4‚LDRSTR„=*ŒLDRloadaddr.‚SUBSˆMMU.LOADER.LG‚LINKˆMMU.LOADER.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰LDR‚MSG‰@‚MSG‰***********************************************************‚MSG‰**ˆIOCOM&IOI¤**@‚MSG‰***********************************************************‚TASKˆIOI.LO,.IOI‚STATE…='READ' ‚SESSIONƒ=1‚PRIORITY‚=$DA ‚IOCSTR„=*‚SUBSˆVMES10.IOC.AG6‚ASM‰IODM.AG/VMES10.IOC.AG,VMES10.IOC.RO,\ASMLS;RZ=090 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVMES10.ASR.AG'‚ASM‰VMES10.ASR.AG,VMES10.ASR.RO,\ASMLS ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVMES10.OSLIST.AG3‚ASM‰VMES10.OSLIST.AG,VMES10.OSLIST.RO,\ASMLS;Z=095 ‚IFEQˆ\ASMLSW…=COPY‡\ASMLS,\WORKLS;A‚ENDC‚SUBSˆVMES10.IOI.LG‚LINKˆVMES10.IOI.LG‚IFEQˆ\LINKLSW…=COPY‡\LINKLS,\WORKLS;A‚ENDC‚END‰IOIE‚MSG‰****************************************************************‚MSG‰*C‚MSG‰*‚SpecialI/OChannnelInitializerforProcessControlDrivers‚MSG‰*E‚MSG‰**************************************************************** ‚IFNEˆ\PCDRV…INCLUDE….&.IOCI.CI‚ENDC‚MSG‰@‚MSG‰***********************************************************%‚MSG‰**ˆINIT--SystemInitializer•**@‚MSG‰***********************************************************‚PROCESS…INIT.LO ‚INTSTR„=*)‚SUBS…VMES10.INITIO1.AG,VMES10.INITIO2.AG#‚SUBS…VMES10.INT1.LG,VMES10.INT2.LG1‚ASM†VMES10.INITIO1.AG,VMES10.INITIO1.RO,\ASMLS;R ‚IFEQ…\ASMLSW…=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VMES10.INT1.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC‚=COPY„\LINK2TF,\LINK1TF;Y ‚IFNE…\NDAC1‰INCLUDEƒ.&.D605MEM.CI‚ENDC ‚IFNE…\NACO‰INCLUDEƒ.&.D615MEM.CI‚ENDC ‚IFNE…\NDCO1‰INCLUDEƒ.&.D625MEM.CI‚ENDC ‚IFNE…\NVME610+\NVME620‰INCLUDEƒ.&.D610INT.CI‚ENDC1‚ASMVMES10.INITIOJ 2.AG,VMES10.INITIO2.RO,\ASMLS;R ‚IFEQ…\ASMLSW‹=COPY…\ASMLS,\WORKLS;A‚ENDC‚SUBS…M68XXX.INITDAT.AG1‚ASM†M68XXX.INITDAT.AG,M68XXX.INITDAT.RO,\ASMLS;R ‚IFEQ…\ASMLSW†=COPYŠ\ASMLS,\WORKLS;A‚ENDC‚LINK…VMES10.INT2.LG‚IFEQ…\LINKLSW†=COPYŠ\LINKLS,\WORKLS;A‚ENDC ‚END‰INIT@‚MSG‰***********************************************************9‚MSG‰*MakesubstitutionstoVMES10.PATCH.CF.‚Thiswill‡*>‚MSG‰*createafilecalledVMES10.XPATCH.CFwhichcanlaterƒ*<‚MSG‰*beruntoconfiguretheVERSADOS.SYfiletosupport…*5‚MSG‰*either5MB,15MB,or40MBharddisksystems.Œ*@‚MSG‰***********************************************************‚SUBSˆVMES10.PATCH.CF@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚MSG‰*¹*)‚MSG‰*‹MAKESUBSTITUTIONSINVERSAPT.CFŽ*‚MSG‰*¹*@‚MSG‰***********************************************************@‚MSG‰***********************************************************‚SUBSˆVMES10.VERSAPT.CFé=OPT -N=/**********************=/*VMES10.SYSGEN.CFƒ*=/**********************=OPT K,NM=/***************************************************************************"=/*Chainfiletoperformsysgen¬*=/*É*=/*Callingsequence:·*=/*É*)=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5£*=/*É*7=/*„Notalloftheargumentsneedtobeenteredsince”*$=/*†theyeachhaveadefaultvalue¥*=/*É*6=/*„arg1-commandfilename(defaultstoSYSCMD.CD)•*=/*É*,=/*„arg2-Tempvolanduserno./BootfileŸ*9=/*Temp.vol.anduserno.defaultstovolumenameand‰*)=/*usernumberofcommandfile(arg1).—**=/*Bootfiledefaultsto'VERSADOS.SY'.˜*=/*É*=/*É*9=/*„arg3-Listdeviceorfilenameforsysgenmessages’*=/*(defaultstoSYSLIST.LS)¤*;=/*‹Iffilename-sysgenuses'.LS'asdefaultextension‰*=/*É*9=/*‡NOTE:Thefirstthreeargumentsarethesameasthe*4=/*threecommandlinefieldsusedininvokingtheŽ*=/*sysgenutilitydirectly.¤*=/*É*E=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')†*=/*É*5=/*„arg5-Listingdeviceorfile(Defaultsto#PR)–*A=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.*:=/*Allassemblylistingsandlinkmapswillbedirectedˆ*<=/*Tothespecifieddeviceorfileusingthecopyutility†*>=/*withappendoption.‚SYSGEN.TFisusedasanintermediateƒ*7=/*filetocontaintheassemblyorlinklistoutput.‹*@=/*Duetorestrictionsinsysgenliteralsubstitutionprocess‚*8=/*thisfieldcannotcontainmorethan10characters.Š*M=/***************************************************************************=/*5=/* Insure that no more than 5 arguments are defined:=/*=/RX=\0 =/IF RX>5ƒ=OPT-N<ƒ=/*Error-chainfilestartedwithmorethan5arguments-5ƒ=/*ƒPleaserestart,theargumentdefinitionsfollow:ƒ=/*(ƒ=/*ƒ=SYSGEN.CFarg1,arg2,arg3,arg4,arg5ƒ=/*6ƒ=/*„Notalloftheargumentsneedtobeenteredsince$ƒ=/*†theyeachhaveadefaultvalue.ƒ=/* N8 WF _O g5ƒ=/*„arg1-commandfilename(defaultstoSYSCMD.CD)ƒ=/*+ƒ=/*„arg2-Tempvolanduserno./Bootfile8ƒ=/*Temp.vol.anduserno.defaultstovolumenameand(ƒ=/*usernumberofcommandfile(arg1).)ƒ=/*Bootfiledefaultsto'VERSADOS.SY'.ƒ=K /*Gƒ=/&**Typecarriagereturnormoreinformation,'break'toterminate.ƒ=/*8ƒ=/*„arg3-Listdeviceorfilenameforsysgenmessagesƒ=/*(defaultstoSYSLIST.LS):ƒ=/*‹Iffilename-sysgenuses'.LS'asdefaultextensionƒ=/*8ƒ=/*‡NOTE:Thefirstthreeargumentsarethesameasthe3ƒ=/*threecommandlinefieldsusedininvokingtheƒ=/*sysgenutilitydirectly.ƒ=/*Dƒ=/*„arg4-Typeofsystemconfiguration(defaultsto'SINGLE-HARD')ƒ=/*4ƒ=/*„arg5-Listingdeviceorfile(Defaultsto#PR)Aƒ=/*Legaldevicesare#,#PR,#PR1,#PR2,#PR3,#NULLorafilename.9ƒ=/*Allassemblylistingsandlinkmapswillbedirected;ƒ=/*Tothespecifieddeviceorfileusingthecopyutility=ƒ=/*withappendoption.‚SYSGEN.TFisusedasanintermediate6ƒ=/*filetocontaintheassemblyorlinklistoutput.?ƒ=/*Duetorestrictionsinsysgenliteralsubstitutionprocess7ƒ=/*thisfieldcannotcontainmorethan10characters.ƒ=/*ƒ=END=/ENDIF=/*2=/* Force the definition of 5 exactly 5 arguments.=/* =/IF RX=0+ƒ=ARGSYSCMD.CD,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=1$ƒ=ARG\1,,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=2&ƒ=ARG\1,\2,SYSLIST.LS,SINGLE-HARD,#PR=/ENDIF =/IF RX=3ƒ=ARG\1,\2,\3,SINGLE-HARD,#PR=/ENDIF =/IF RX=4ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*8=/* We have 5 arguments - now default any null arguments=/*=/IFC \1ƒ=ARGSYSCMD.CD,\2,\3,\4,\5=/ENDIF=/*=/IFC \3ƒ=ARG\1,\2,SYSLIST.LS,\4,\5=/ENDIF=/*=/IFC \4ƒ=ARG\1,\2,\3,SINGLE-HARD,\5=/ENDIF=/*=/IFC \5ƒ=ARG\1,\2,\3,\4,#PR=/ENDIF=/*N=/* If arg5 is not #PR,#PR1,#PR2,#PR3,# or #NULL then treat as file and delete:=/*ƒsetswitch(arg6)to1forprinterdevice,0forfile.=/*0=ARG \1,\2,\3,\4,\5,0,#PR,#PR1,#PR2,#PR3,#,#NULL =/FOR 7,\0ƒ=/IFEQ"\5"\(RX)1†=ARG\1,\2,\3,\4,\5,1,#PR,#PR1,#PR2,#PR3,#,#NULLƒ=/ENDIF=/ENDFOR=/RX=\6 =/IF RX=0ƒ=DEL\5=/ENDIF=/*=/* Set switch (arg7) TO:=/*„01--‚SINGLE-HARD=/*=ARG \1,\2,\3,\4,\5,\6,10=/IFEQ "\4"SINGLE-HARDƒ=ARG\1,\2,\3,\4,\5,\6,01=/ENDIF=/*9=/* Abort chain if an invalid configuration was requested=/*=/RX=\7 =/IF RX=10ƒ=OPT-N3ƒ=/*‚\4isaninvalidconfiguration-(argument#4)8ƒ=/*…Theonlyvalidconfigurationis'SINGLE-HARD'which3ƒ=/*…isthedefault.Pleaserestartchainfilewithƒ=/*…correctparameters.ƒ=END=/ENDIF#=ARG \1,\2,\3,\4,\5,\6,\7,SYSGEN.TF=/*3=/* The argument list now looks like the following:=/* =/*ƒarg1ƒ-ƒNameofcommandfile.=/*0=/*ƒarg2ƒ-ƒTemporaryvolume/bootfile(ornull).=/*3=/*ƒarg3ƒ-ƒListdeviceorfileforsysgenmessages.=/*(=/*ƒarg4ƒ-ƒSystemconfigurationmnemonic=/*'SINGLE-HARD'=/*(seearg7)=/*@=/*ƒarg5ƒ-ƒListingfileordeviceforassembliesandlink-edits.4=/*SYSGEN.TFisthetemporaryfilewhichisusedin1=/*conjunctionwith=COPY;Atoproduceasingle=/*listingfile.=/*(seearg6)=/*=/*ƒarg6ƒ-ƒSwitch-"=/*0=‚arg5specifiesafilename=/*1=‚arg5specifiesadevice=/*(seearg5)=/*%=/*ƒarg7ƒ-ƒNumberconfigurationkey-%=/*01=‚single-userharddisksystem=/*(seearg4)=/*8=/*ƒarg8ƒ-ƒSYSGEN.TFtemporaryfileforusewithcopyin+=/*creatinglistingfilespecifiedbyarg3=/*=/*9=/* Justify argument positions and invoke sysgen utility.=/*=ARG \5,\6,\7,\8,\1,\2,\3,\4=/*)=/* Turn off echo of sysgen command lines=OPT J=OPT -N=SYSGEN VMES10.\5,\6,\7;T=350 =OPT -J,-N8=/**‚ApplyingpatchesfromXVERSAPT.CFtothebootfile.=/@ VMES10.XVERSAPT.CFM=/***************************************************************************M=/***************************************************************************=/**=/**‚SysgenCompleted--=/**6=/**„Assemblyandlinklistingshavebeenoutputto\1=/**1=/**„Sysgencommandlistinghasbeenoutputto\7=/**M=/***************************************************************************M=/****************************************************K ***********************=OPT -K=/*?=/*‹***********************************************************?=/*‹***********************************************************=/*‹**ENDƒOFƒSYSGENŽ**=/*‹**•Haveaniceday.’**?=/*‹***********************************************************?=/*‹***********************************************************=ENDéééééd1IOI ASREL'VMES10 IOI SA# „VERSAdos I/O Initialization System Task V 4.1 - 09/13/82×2pFMSDLEN pNOTASKS pNOCDCB pNODCBS pNOFCBS pIOCOML pIOCOMS pCCSEG pOSMTBL pNODVS pNOFATS pOSMEND pFHSASR pFMSASQ  pFMSASR pNOLPRT pIOSASR pNOVDTS pNOLTERM !@F3`F3$ IOSG((K3´@€.|*B#ü()2"|(J‘gH |)N1i!iG3Lé? Hè? (g (f(p*ˆtoeachdriveritwantstomonitor.Theattachcallusesthe9*ˆsamedevicenameasthelevel4CCBallocatecallused.:*ˆThesedevicenamesareenteredinthistaskbytheuser.*;*ˆThistaskacceptseventsfromI/OChanneldevicedrivers.:*ˆAneventisqueuedtothistaskwheneveradevicedriver<*ˆexperiencesaboardfailinterrupt.‚Assupplied,thistask=*ˆonlyreadstheevent.‚Theusermayaddtooreliminatethis*ˆtaskaccordingtohisneeds.*N*-----------------------------------------------------------------------------* *ˆEQUATES*8NOFDEV„EQU„16‘maximumnumberofI/Ochanneldevicesthis%*§maybechangedtotheactualnumber&*§ofI/Ochanneldevicesonthesystem*"MSGLNG„EQU„10‘eventmessagelength*%QUELNG„EQU„MSGLNG*NOFDEV†queuelength*1ASQOPT„EQU„$D‘ASQoptions:don'tstackregisters,*§enableASQandASR*%GTASQ…EQU„31‘GetASQdirectivenumber-WTEVNT„EQU„36‘Waitforeventdirectivenumber)RDEVNT„EQU„34‘Readeventdirectivenumber0RTEVNT„EQU„37‘Returnfromeventdirectivenumber+TERM†EQU„15‘Terminatetaskdirectivenumber.CMR‡EQU„60‘Channelmanagementdirectivenumber**‰Eventlayout* ŠOFFSET0 EVTLNG„DS.Bƒ1’eventlength($0A)EVTCOD„DS.Bƒ1’eventcodeƒ($09) EVTDEV„DS.Lƒ1’faileddevicename5EVTADR„DS.Lƒ1’faileddevicememorymappedI/OaddressŠPAGE ŠSECTION0*+*‰TaskCreationDateandVersionIdentifier*D‰EQU„*’startofdataŠDC.Bƒ'0428821'‰identifier**‰DeviceNameTable*6*‰THISTABLETOBEMODIFIEDFOREACHDEVICETOMONITOR**‰tablestructure: |? …I 0*‰multiple4bytefieldscontainingdevicenames8*‰last4bytefieldsettozerotoindicateendoftable*-DEVTBL„DC.Lƒ'RA41'attachtolevel4RAD1CCB ŠDC.Lƒ'RA42'ŠDC.Lƒ0’endoftable**‰misc.dataarea*7TRP1PB„DS.Bƒ22‘Trap1parameterblockusedbyallcallsŠDS.Bƒ8’Stackarea STACK…EQU„* PAGE* *‰ENTRYPOINT* *‰getanASQ*'IOCFAILƒLEA„STACK(PC),A7‡loadthestack.ŠLEA„TRP1PB(PC),A1†getparameterblockaddress"ŠMOVE.LA1,A0ŽsaveitforthecallŠCLR.L‚(A1)+ŽtasknameŠCLR.L‚(A1)+Žsession%ŠMOVE.B#ASQOPT,(A1)+†settheoptions$ŠMOVE.B#MSGLNG,(A1)+†messagelength"ŠMOVE.L#QUELNG,(A1)+†queuelength"ŠLEA„IOCASR(PC),A2†GetASRaddressŠMOVE.LA2,(A1)+‹ASRaddressŠCLR.W‚(A1)notused*ŠMOVE.L#GTASQ,D0ŠgetASQL directivenumberŠTRAPƒ#1‘getanASQ(ŠBNE.S‚ERRORŽbranchifanerrorreturned*.*‰attachtoalldeviceslistedindevicetable"*‰thesearethedevicestomonitor*+ŠLEA„DEVTBL(PC),A2†getdevicetableaddress-IOCATT„TST.L‚(A2)adevicelefttoattachto?(ŠBEQ.S‚IOCWAITŒbranchifnodevicesleft-ŠMOVE.LA0,A1ŽrestoreparameterblockaddressŠMOVE.B#3,(A1)+‹attachcodeŠCLR.B‚(A1)+Žnotused'ŠMOVE.W#1,(A1)+‹setqueueeventoption9ŠMOVE.L(A2)+,(A1)+ˆsetdevicenamefromthedevicetable(ŠMOVE.W#MSGLNG,(A1)+†setmessagelengthŠCLR.L‚(A1)+ŽusedefaultASRŠCLR.L‚(A1)+Žnotused3ŠMOVE.L#CMR,D0ŒchannelmanagementdirectivenumberŠTRAPƒ#1‘dotheattach*ŠBRA„IOCATTgoseeifanotherattachtodo**‰waitforanevent*9IOCWAITƒMOVE.L#WTEVNT,D0‰waitforeventdirectivenumberŠTRAPƒ#1‘dothewait**‰USERCODEMAYBEADDEDHERE*#ŠBRA„IOCWAITŒgowaitfornexteventŠPAGE*"*‰IOCASR„readtheeventandreturn*“registersarenotstacked* IOCASR„EQU„*5ŠLEA„TRP1PB(PC),A0†Gettrap1parameterblockaddress.ŠMOVE.L#RDEVNT,D0‰readeventdirectivenumberŠTRAPƒ#1‘readtheevent(ŠBNE.S‚ERRORŽbranchifanerrorreturned**‰theeventisnowatTRP1PB*‰USERCODEMAYBEADDEDHERE*%ŠMOVE.L#1,A0ŽreturnwithASRenabled5ŠMOVE.L#RTEVNT,D0‰returnfromeventdirectivenumberŠTRAPƒ#1‘returnfromthisevent*2*‰terminatethistaskifreceiveanytrap1errors*5ERROR…MOVE.L#TERM,D0‹terminatetaskdirectivenumberŠTRAPƒ#1‘dothetermination ŠEND„IOCFAIL éééééé‰SPC10!*†---†---…STANDARDƒMACROS…---…---*H*Allocate macro allocates local storage as long words on the stack,(A7).,*Up to 6 variables may be allocated by name.C*These variables may then be referred to by name offset to stack orH*they may be stored to (by macro STORE) and loaded from (by macro LOAD).*O*Prior to exit, the variables must be de-allocated by invocation of DEALLOCATE. ALLOCATE MACRO*B*Allocate reserves storage on the stack for local named variables,8*‚whicharereferredtoasanoffsetfromstackpointer.\1 SET 2‰IFGT(NARG-1)\2 SET 6‰ENDC‰IFGT(NARG-2) \3 SET 10‰ENDC‰IFGT(NARG-3) \4 SET 14‰ENDC‰IFGT(NARG-4) \5 SET 18‰ENDC‰IFGT(NARG-5) \6 SET 22‰ENDC*ƒSUB.Lƒ#(NARG*4)+4,A7M *ƒENDM*B*DEALLOCATEMACRO‚hastobenamedDEALOCtoovercomeassemblerbug DEALOC‚MACRO*>* Deallocate removes storage for local variables on the stack.ƒADD.L‚#(NARG*4)+4,A7*ƒENDMI*LOAD macro allows loading a register from local storage named variables. *Thesyntaxis:‚LOADRn,VARNAME.9*The storage is DYNAMICALLY ALLOCATED by macro 'ALLOCATE'* LOAD‚MACRO*‰MOVE.L„\2(A7),\1‰ENDM*H*STORE macro allows storing a register to local storage named variables.!*Thesyntaxis:‚STORERn,VARNAME.?*The local storage is DYNAMICALLY ALLOCATED by macro 'ALLOCATE'* STORE MACRO*‰MOVE.L„\1,\2(A7)‰ENDM*‰SPC5PUSHPOINTŠMACRO‰MOVEM.LƒA0-A6,-(A7)‰ENDM*POP_POINTŠMACRO‰MOVEM.Lƒ(A7)+,A0-A6‰ENDM* PUSHALLŒMACRO‰MOVEM.LƒA0-A6/D0-D7,-(A7)‰ENDM* POPALLƒMACRO‰MOVEM.Lƒ(A7)+,A0-A6/D0-D7‰ENDM*4ALLREGS‚EQU‡68ˆSpaceforallthereg.'sinthestack** *NOW USE THEM *MACTEST:* *ˆPUSHPOINT *ˆPUSHALL&*ˆALLOCATECOUNT,POINT,CHAR,VAL,MURPHY*ˆMOVE.L„#12345,D1*ˆSTORE†D1,COUNT*ˆLOAD‡D2,COUNT(*ˆDEALLOCATECOUNT,POINT,CHAR,VAL,MURPHY*ˆPOPALL *ˆPOP_POINT*ˆRTS*ˆEND*‰PAGE •`5*This is TESTE the version that tests wait for event. ŠSECTION0TEST†LEASTACK,A7#ŠCLR.L„EVENTCNT‚cleareventcounter* *‚GETA.S.Q.!‰MOVE.L#31,D0‚stagecommandcode-‰MOVE.L‚#ASQBLOCK,A0Šstagecommandparameters‰TRAP†#1 ‰BNE‡FAULT2*‚OPENTHECHANNELS +ŠLEA„INITIO,A0pointtoCMRparameterblockŠMOVE.L#OPNCMD,CMDAŠMOVE.W#OPNLNG,CMDLŠMOVE.L#60,D0ŠTRAP#1 ŠBNE„FAULT1**** WAIT EQU **‚REQUESTWAITFOREVENT‰MOVE.L„#36,D0‰TRAP†#1 ‰BNE‡FAULT3**RUNTEST*‚readstatusofchannel‚10**‚stagecodeforreadcommandŠMOVE.Lƒ#STATCMD,CMDA%ŠMOVE.Wƒ#6,CMDLsetupcommandlengthŠMOVE.Lƒ#60,D0ŽsetupCMRcallŠTRAP…#1 ŠBNE†FAULT7‰SPC2*Pulse channel 7‰MOVE.L„#PLS7,CMDA‰MOVE.W„#12,CMDL‰MOVE.L„#60,D0‰TRAP†#1 ‰BNE‡FAULT10‰SPC2*Pulse channel 8‰MOVE.L„#PLS8,CMDA‰MOVE.W„#12,CMDL‰MOVE.L„#60,D0‰TRAP†#1 ‰BNE‡FAULT11*Pulse channel 9‰MOVE.L„#PLS9,CMDA‰MOVE.W„#12,CMDL‰MOVE.L„#60,D0‰TRAP†#1 ‰BNE‡FAULT12* *Inc EVENTCNT‰ADD.L…#1,EVENTCNT**If EVENTCNT = 10 THEN‰CMP.L…#10,EVENTCNT ‰BEQ‡TEST1*DO*‚disablechannel1interupts*‚waitforevent*END*IF EVENTCNT >= 20 THEN‰CMP.L…#20,EVENTCNT ‰BGE‡TEST2*DO*‚EVENTCNT=0*‚enablechannel1interrupts*‚waitforevent*END*ELSE*DO ‰BRA‡TEST3#*‚toggleoutputonsucessiveevents*END** TEST1„EQU‡*!*Stage code for disable channel 1‰LEA‡INITIO,A0‰MOVE.L„#DSA1,CMDA‰MOVE.W„#6,CMDL‰MOVE.L„#60,D0‰TRAP†#1 ‰BNE‡FAULT8 ‰BRA‡WAIT* TEST2„EQU‡*‰CLR.L…EVENTCNT"* Stage code for enable interrupts‰LEA‡INITIO,A0‰MOVE.L„#ENA1,CMDA‰MOVE.W„#6,CMDL‰MOVE.L„#60,D0‰TRAP†#1 ‰BNE‡FAULT9 ‰BRA‡WAIT* TEST3„EQU*-*toggle EVENTCNT & output on sucessive events:ŠBTST†#0,EVENTCNT+3†MickyMousewaytotestLSbyteinmem ŠBNE.S…LAMPON*Stage code for OFF%ŠLEA‡INITIO,A0Špointtocommandtable8ŠMOVE.L„#OFFCMD,CMDA‡passaddressofRIOparameterblock#ŠMOVE.W„#6,CMDLŒpasscommandlength žp §U ¯F)ŠMOVE.L„#60,D0setuptrap1servicecodeŠTRAP#1–callforservice ŠBNE‡FAULT6branchontraperror ŠBRA‡WAITŠSPC3#LAMPONEQU*‚turnoutput(lamp)on.**Stage code for ON%ŠLEA†INITIO,A0ƒpointtocommandtable7ŠMOVE.Lƒ#ONCMD,CMDApassaM ddressofRIOparameterblockŠMOVE.Wƒ#6,CMDLƒpasslength/ŠMOVE.Lƒ#60,D0„setuptrap1servicerequestcodeŠTRAP…#1 ŠBNE†FAULT5ŠBRA†WAIT†waitfornexteventŠSPC8*‚CLOSECHANNELSŠMOVE.L#60,D0ŠMOVE.L#CLSCMD,CMDAŠMOVE.W#CLSLNG,CMDLŠTRAP#1 FAULT1ƒNOP FAULT2ƒNOP FAULT3ƒNOP FAULT4ƒNOP FAULT5ƒNOP FAULT6ƒNOP FAULT7ƒNOP FAULT8ƒNOP FAULT9ƒNOP FAULT10‚NOP FAULT11‚NOP FAULT12‚NOP*‚DE-ACTIVATESELF TERM†MOVE.L#15,D0ŠTRAP#1ŠSPC10A*ƒ---ƒ---ƒ---MOVETHEASQMESSAGEFROMTHEASQTORCVBUF‚---‚---‰SPC18TESTIRQ‚EQU*‚entrypointmovingdatafromASQtoRCVBUF!‰MOVE.L„#34,D0„stagecommandcode‰MOVE.L„#RCVBUF,A0‰TRAP†#1 ‰BNE.S…FAULT4*‚RETURNFROMEVENT!‰MOVE.L„#37,D0„stagecommandcode ‰MOVE.W„#1,A0‰TRAP†#1‰RTSASQBLOCK EQU *‰DC.L†0‰taskname‰DC.L†0‰dummyfield1‰DC.B†5‰initialstatusofASQ=ASQ&ASRenabled"‰DC.B†16ˆlengthofmessageforASQ‰DC.L†64ˆstoragefor4events:‰DC.L†TESTIRQƒlogicaladdressoftargettaskasyncsvcrtn‰DC.L†0‰dummyfieldASQLNGƒEQU*-ASQBLOCK*%RCVBUFƒDS.L†64ˆdefinerecieverbufferEVENTCNTDS.L†1‰eventcounter**‚CMRPARAMETERBLOCK*INITIO„DC.Bƒ7,0,0,0ŠDC.Lƒ'RI01'†TASKNAME ŠDC.Lƒ0,0,0*CMDA†DC.Lƒ0‹addressofRIOparameterblockCMDL†DC.Wƒ0‹commandlength*&*‚RIOPARAMETERBLOCKtoopenchannels*OPNCMD„DC.Wƒ0,1ŠDC.Wƒ9‘open9channels1ŠDC.Wƒ0,$7F00‹CHAN0IRQonfall,512msdebounce1ŠDC.Wƒ1,$3F04‹CHAN1IRQonfall,255msdebounce)ŠDC.Wƒ2,4CHAN2interruptonrisingedge*ŠDC.Wƒ3,0CHAN3interruptonfallingedge&*¢CHAN4ˆ{{‚CH4ISNOGOODONHARDWAR0ŠDC.Wƒ5,1CHAN5output{{hardwarecheckedok}}ŠDC.Wƒ7,1CHAN7outputŠDC.Wƒ8,1CHAN8outputŠDC.Wƒ9,1CHAN9outputŠDC.Wƒ10,0CHAN10INPUTOPNLNG„EQU„*-OPNCMD„lengthCLSCMD„DC.Wƒ0,2‰closecommand(CLSLNG„EQU„*-CLSCMD„closecommandlength*$*ˆRIOparameterblockforONcommand ONCMD EQU *ŠDC.W…0‰returnedcommandstatusŠDC.W…3‰OUTPUTONcommandŠDC.W…$0020…turnonchannel#5‰SPC5%*ˆRioparameterblockforOFFcommand‰SPC1 OFFCMD EQU *&ŠDC.W…0‰returncommandstatuslocationŠDC.W…4‰offcommandŠDC.W…$0020…turnoffchannel5ŠSPC5 STATCMD EQU *ŠDC.W…0‰returnedcommandstatusŠDC.W…5‰readcommandŠDC.W…$0400…readchannel10*:*ƒRIOparameterblockforDISABLEINTERRUPTSonchannel1:* DSA1…EQU*‰DC.W†0‰returnedstatus‰DC.W†7‰disableinterruptcode$‰DC.W†2‰bitmaskselectingchannel1**8*‚RIOparameterblockforENABLEINTERRUPTSonchannel1* ENA1…EQU*‰DC.W†0‰returnedstatus‰DC.W†6‰enableinterruptcode$‰DC.W†2‰bitmaskselectingchannel1******†stack‚definition* ŠDS.Bƒ$400 STACK…EQU„**PLS7:2* RIO parameter block to do 200 ms pulse on chan 7‰DC.W†0‰returnedcmdstatus‰DC.W†8‰pulsecommandcode‰DC.W†1‰onechannels‰DC.W†7‰pulsechannel7‰DC.L†200ˆ200mspulse‰SPC2PLS8:1*RIO parameter block to do 300 ms pulse on chan 8‰DC.W†0‰returnedcmdstatus‰DC.W†8‰pulsecommandcode‰DC.W†1‰onechannels‰DC.W†8‰pulsechannel8‰DC.L†300ˆ300mspulsePLS9:1*RIO parameter block to do 550 ms pulse on chan 9‰DC.W†0‰returnedcmdstatus‰DC.W†8‰pulsecommandcode‰DC.W†1‰onechannels‰DC.W†9‰pulsechannel9‰DC.L†550‡550mspulse ŠENDTESTé,=/* CHAIN TO ASSEMBLE DEVICE-FAILURE ROUTINE,=/*†WHICHISCALLEDWHENALEVEL-4INTERRUPT=/*†OCCURSINTHERAD1DRIVER.=/*$=/*†DEFAULTARGUMENT1ISIOCFAIL.LS=/*=/IFC \1=ARG IOCFAIL.LS=/ENDIF=/*&=/*†PARAMETER01ˆ\1=OUTPUTFILE/DEVIN CE=/*=ASM IOCFAIL,IOCFAIL,\1;R=/*{ Included files are:=/*ƒ--none--=/*}=ENDéééééé ·=/* =/*†TESTE.AF=/*5=/* CHAIN TO ASSEMBLE RIO DRIVER TEST ROUTINE 'TESTE'=/*&=/*†DEFAULTOUTPUTLISTINGISTESTE.LS=/*=/IFC \1 =ARG TESTE.LS=/ENDIF=/*=ASM TESTE,TESTE,\1;MR-WZ=134=/*{ Included files are:=/*ƒ--none--=/*}=ENDééééééN  ÀO******************************************************************************* %„MSGSTARTOFI/OCHANNELINITIALIZER „TASKIOCI „STATE='READ' „SESSION=1 „PRIORITY=$DA „IOCISTR=*„SUBSIOCINT.AG-„ASM‚IODM.AG/IOCINT.AG,IOCINT.RO,\ASMLS;Z=100 †IFEQˆ\ASMLSW‰=COPY‡\ASMLS,\WORKLS;A†ENDC„SUBSLIOCINT.LG„LINKLIOCINT.LG†IFEQˆ\LINKLSW‰=COPY‡\LINKLS,\WORKLS;A†ENDC „ENDIOCIO*******************************************************************************éééééé ɉPAGEF***********************************************************************#*IOCINTI/OCHANNELCCBALLOCATION*$*COPYRIGHTED1982BYMOTOROLA,INC.*F************************************************************************PROGRAMNAME:‚IOCINT*D*REV.‚1.00‚6/14/82ƒ(RONIWOOD)-ALLOCATEALLCCB'SFORI/OCHANNEL*¥DEVICEDRIVERS.*SUPPORTTABLES:‚CHANNELCONTROLBLOCKS(CCB)*’DEVICECONTROLBLOCKS(DCB)*F**********************************************************************‡NOLIST‡INCLUDE9995.&.TR1.EQ‡INCLUDE9995.&.EXE.EQ‡LIST*†INCLUDE9995.&.TR1.EQ*†INCLUDE9995.&.EXE.EQ*!IOCINT‚IDNT‚1,0„I/OCHANNELCCB'S‰OPTƒMEX* ‰XDEF†IOSEG* *ˆEQUATES* ‰IFNE†\NRIORIO†EQU‡\RIODRVR‰ENDC ‰IFNE†\NRAD1RAD†EQU‡\RADRV‰ENDCINT1…EQU‡\IOCVEC1INT2…EQU‡\IOCVEC2INT3…EQU‡\IOCVEC3INT4…EQU‡\IOCVEC4*LVL1…EQU‡\IOCLVL1LVL2…EQU‡\IOCLVL2LVL3…EQU‡\IOCLVL3LVL4…EQU‡\IOCLVL4* SECTION 1*9*SET UP CHANNEL CONTROL BLOCKS FOR DEVICES ON I/O CHANNEL*K****************************************************************************-*ˆINTERRUPTVECTORSANDLEVELSONI/OCHANNEL*!*ˆVECTORSƒVM02†VM03†VME110„VMES10**‰INT1†$71‡$49‡$19‡$41*‰INT2†$72‡$4A‡$1A‡$43*‰INT3†$73‡$4B‡$1B‡$44*‰INT4†$74‡$4C‡$1C‡$45** *ˆLEVELS„VM02†VM03†VME110„VMES10**ˆLVL1ˆ2‰3‰1‰2*ˆLVL2ˆ3‰4‰2‰4*ˆLVL3ˆ4‰5‰3‰5*ˆLVL4ˆ5‰6‰4‰6**6*ˆINTERRUPTVECTOR1CORRESPONDSTOINTERRUPTLEVEL1,*ˆANDSOFORTH.5*ˆPLEASEBESURETHATYOO URBOARDISJUMPEREDPROPERLY6*ˆTOPRODUCETHEINTERRUPTVECTORANDLEVELCALLEDFOR*ˆINTHECDBMACRO.**ˆI/OCHANNELBASEADDRESSES**—VM02†VM03†VME110„VMES10*)*ˆIOBASE:‡$F80000ƒ$FA0000ƒ$FE6000ƒ$F1C000** IOSEG EQU * ‰IFNE\NRIO$*ˆADDNECESSARYCCBINFORMATIONHERE**ˆSETUPRIOCCB'S*DEVADD‚SET\IOBASE+$19 CDB XOPEXC,'RI01',$80,254,RIO,0,DEVADD,31,INT3,LVL3,$50,&0,0,0,0,0,0,0,0,0,0,0‰ENDC IFNE \NRAD1DEVAD1 SET \IOBASE+$1E01*ˆSETUPRADCCB'S Òa ÛH ã4*ƒ(MEMORYLENGTHIS511SINCEWESTARTATODDADDR.): CDB XOPEXC,'RA01',$80,254,RAD,0,DEVAD1,511,INT3,LVL3,$50,&0,0,0,0,0,0,0,0,0,0,0: CDB XOPEXC,'RA41',$80,254,RAD,0,DEVAD1,511,INT4,LVL4,$50,&0,0,0,0,0,0,0,0,0,0,0 ENDCH************************************************************************H************************************************************************* *ˆSetuptogenerateCCB's...**’"CDB"MACROCALLSGOHERE--%*œ(SeeIODM.SAformacrodefinition.)*H************************************************************************H************************************************************************‰PAGE*G*ƒIfanyVME610orVME620boardsarespecifiedinSYSCMD,includethe3* code to perform CCB allocations for those boards.* ‚IFNE\NVME610+\NVME620ŒINCLUDEƒ&.XD610IOC.AI‚ENDC‰PAGEH*************************************************************************<*ƒIfanyVME605boardsarespecifiedinSYSCMD,includethe3* code to perform CCB allocations for those boards.* ‚IFNE\NDAC1ŒINCLUDEƒ&.XD605IOC.AI‚ENDC‰PAGEG***********************************************************************H*************************************************************************<*ƒIfanyVME615boardsarespecifiedinSYSCMD,includethe3* code to perform CCB allocations for those boards.* ‚IFNE\NACOŒINCLUDEƒ&.XD615IOC.AI‚ENDC*‰PAGE<*************************************************************<*ƒIfanyVME625boardsarespecifiedinSYSCMD,includethe3* code to perform CCB allocations for those boards.* ‚IFNE‚\NDCO1‹INCLUDE„&.XD625IOC.AI‚ENDC*I***************************************************************************‰DC.L0ENDOFCCB'S‰DS.B†$10‡STACKAREA STACK„EQU‡***ˆALLOCATECHANNEL*ALLBLKƒDC.B…XDCALLCOMMANDCODE‰DC.B„0“COMMANDSUB-CODE‰DC.B„0“RESERVED'‰DC.B…XOPEXCOPTIONS(EXCLUSIVEACCESS)‰DC.L„0“CHANNELMNEMONIC)‰DS.B„XIOALN+(2*XIOXLN)-XIOPRM†PARAMETERS‰DC.L„0“PRECAUTION*5*ˆWALKCCBCHAINANDALLOCATEALLKNOWNI/OCHANNELS.**INIT…MOVE.L‚#STACK,A7‹SETUPSTACKPOINTER,‰MOVE.L‚#IOSEG,A1…SETUPPOINTERTOCCBLIST‰TST.Lƒ(A1)ˆANYTODO?‰BEQ.SINIT40ˆBRANCHIFNO0‰MOVE.L‚#ALLBLK,A0ŠSETUPPOINTERTOPARAMBLOCK2INIT10ƒMOVE.W‚XCDBOPT(A1),XIOOPT-1(A0)‚GETOPTIONS6‰MOVE.L‚XCDBAID(A1),XIOCID(A0)SETUPCHANNELMNEMONIC3‰MOVEM.LXCDBPRM(A1),D0-D5/A2-A4ƒPICKUPPARAMETERS=‰MOVEM.LD0-D5/A2-A4,XIOPRM(A0)„MOVEPARAMETERSTOPARAMBLOC/INIT15ƒMOVE.L‚#XCCMR,D0‹SETUPDIRECTIVENUMBER‰TRAPƒ#1“ALLOCATECHANNEL)INIT17ƒMOVE.L‚XCDBPTR(A1),A1†GETNEXTCCB ‰TST.L(A1)‰BNE.SƒINIT10ŽNOTFINISHEDINIT40ƒERQ.TERM**ˆABORT* KILL…EQU…*'‰MOVEM.LD0/A0,-(A7)‰SAVEREGD0ANDA0‰ERQ.ABORT‚#0ABORTSELF‰PAGE ‰END…INITéO ééé*G*======================================================================*@* THIS IS THE CODE NEEDED TO SET UP A CCB FOR ONE MVME605 BOARD.*@* Add a CCB definition for each additional board in your system.@* An address for a second MVME605 board can be offset $100 bytes* from the first.=* For example, another MVME605 board could have an address of* \IOBASE+$1D01.A* Note that the memory mapped I/O address must be unique for eachB* board, must not conflict with any other board in the system, andB*mustmatchtheon-boardjumperselections.‚SincethisboarddoesG* not generate interrupts it may be nice to choose the lowest interrupt5* level and software priority level for CCB chaining.*G*======================================================================*<*ˆSet"DAC"tostartaddressoftheMVME605driver(obtained*’intheSYSGENprocess):0‰IFNE‚\NDAC1ˆassembleifhaveanyMVME605boardsDAC†EQU‡\DR605R*?*ˆSet"DEVADD"tomemorymappedI/OaddressforthisDACboard:DEVADDƒSET‡\IOBASE+$1E01*=*ˆSetupDACCCB's(forjustoneDACboard,inthisexample).*@ CDB XOPINH+XOPEXC,'DAC1',$80,254,DAC,0,DEVADD,31,INT1,LVL1,$50,&0,0,0,0,0,0,0,0,0,0,0‰ENDC**I***************************************************************************éé ë$éééé