.TITLE CCLCMD - COMMAND LINE PROCESSING LOGIN FOR TECOIO .IDENT "X0206" .ENABL LC ; ; COPYRIGHT (C) 1976 BY DIGITAL EQUIPMENT CORPORATION, ; MAYNARD, MASSACHUSETTS ; ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A ; SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE IN- ; CLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ; ANY OTHER COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE ; MADE AVAILABLE TO ANY OTHER PERSON EXCEPT FOR USE ON SUCH ; SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE TERMS. TITLE ; TO AND OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN ; IN DIGITAL. ; ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITH- ; OUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY ; DIGITAL EQUIPMENT CORPORATION. ; ; DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR ; THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT WHICH IS ; NOT SUPPLIED BY DIGITAL. ; ; ANDREW C. GOLDSTEIN 5-APR-77 15:28 ; Bruce M. Bernstein 16-Sep-80 10:39:20 ; ;+ ; ; THIS MODULE CONTAINS THE MACRO THAT PROCESSES THE CCL COMMAND LINE INTO ; THE EQUIVALENT TECO COMMANDS AND EXECUTES IT. THE MACRO IS LOADED INTO ; QY AT INITIALIZATION AND IS EXECUTED AFTER THE USER'S STARTUP FILE HAS ; BEEN EXECUTED. ; ;- .PSECT PURE,RO,D .NLIST BEX CCLCMD:: .ASCII *EI*<33>*[9[8[7@*<25>*7\0,9ET<15><12> .ASCII <1><174>*0U1'*<1>*File? *<1>*<*<24>*U7Q7-127"EZ"NET&2"E-1A*<24><174><15><12> .ASCII *8*<24>*32*<24>*8*<24>*'-D'F>'Q7-13"E*<24><33>*13*<24>*0;'Q7-26"EHK*<15><12> .ASCII <1>*^Z*<1>*EX'Q7-18"EZ"NET&2"E*<1>*^R*<15><12> .ASCII *File? *<1>*HT''F>'Q7-21"EZ"NET&2"E*<1>*^U*<15><12> .ASCII *File? *<1><174>*Z<8*<24>*32*<24>*8*<24>*>'HK'F>'Q7-31"GQ7*<24><15><12> .ASCII *Q7I*<33>*'>BJ::@FS%*<5>*S%%*<33>*Z-1;>10*<24>*9,0ETBJ\Z"E*<15><12> .ASCII *GZ':ERteco.ini*<33>*"SZJ.U8AQ8,ZX0Q8,ZKER*<33>*M0*<15><12> .ASCII *0,0X0'BJ::S*<5>*S*<33>*0KZ"N0U9BJ1<::STE*<33>*"S1U90;'*<15><12> .ASCII *::SMA*<33>*"S2U90;'::SMU*<33>*"S3U90;'::SOL*<33>*"S4U9*<15><12> .ASCII *0;'::SNE*<33>*"S5U90;'::SED*<33>*"S6U90;'::SDI*<33>*"S*<15><12> .ASCII *7U90;'>Q9"E:@FS%*<16><5>*C%%"SRK'*<1><15><12> .ASCII *Unrecognized command name "*<1>*HT*<1>*"*<15><12> .ASCII <1><3>*'1<:S*<16><5>*C*<33>*"SR::S*<5>*s*<33><174>*ZJ'0KQ9-6"E<-1U8*<15><12> .ASCII *::S/*<33>*"F0U8ET&2"E*<25>*8edl*<33><174>*4U9'*<174>*::Sedi*<33>*"S*<15><12> .ASCII <25>*8edl*<33>*0;'::Sedt*<33>*"S*<25>*8edt*<33>*0;'::Scr*<33>*"S5U9*<15><12> .ASCII *0;'::Ste*<33>*"S1U90;'::Sma*<33>*"S2U90;'::Smu*<33>*"S*<15><12> .ASCII *3U90;'::Ssl*<33>*"S*<25>*8slp*<33>*0;'::Sdi*<33>*"S7U90;'*<15><12> .ASCII *::Sus*<33>*"S:S:*<33>*"S.U0:S*<5>*s*<33>*"FZJ*<174>*R'Q0,.X80;''*<15><12> .ASCII <1><15><12> .ASCII *Unrecognized EDIT command qualifier "*<1>*HT*<15><12> .ASCII <1>*"*<15><12> .ASCII <1>*HKEX'0;>Q8"S:S*<5>*s*<33>*"FZJ'0K''Q9-1"NQ9-7"N*<15><12> .ASCII *Z"EM7'''Z"N<::S*<5>*s*<33>* *<33>*::S/*<33>*;:S*<16><5>*c*<33>*"FZJ'>*<15><12> .ASCII *B,.X1B,.K::@FS%*<52>*%%U0Q0"F:S*<16><5>*c*<33>*"S-C*<174>*ZJ'*<15><12> .ASCII *B,.X0B,.K'::@FS%*<5>*s%%*<33>*HX9HKQ0"T*<15><12> .ASCII *ERdeffil.tec;1*<33>*YBJ<:@FS%*<15><12> .ASCII *%%;>*<174>*G0BJQ9-2"NQ9-3"NQ9-5"N:S.*<33>*"UBJ*<15><12> .ASCII *:S;*<33>*"UZJ*<174>*-C'I.*<52><33>*HX0EN*<5>*q0*<33>*1*"UG0BJ*<15><12> .ASCII *@FS%.*<52>*%%0;'G*<52>*BJ:S.obj*<33>*"SF<':S.tsk*<33>*"SF<'*<15><12> .ASCII *>'''''HX0Q9-3"NEWdeffil.tec;1*<33>*EC*<174>*HK'G1G0*<15><12> .ASCII *G9BJ'Q9-1"E::@FS%@%%"S3U9*<174>*:S=*<33>*"S0,.-1X8*<15><12> .ASCII *.,ZX9HKER*<5>*q9*<33>*EW*<5>*q8*<33>*Y*<174>*Z"NHX8HKEB*<5>*q8*<33>*Y''*<15><12> .ASCII *0;''Q9-2"EZ"EM7'::Slove*<33>*"S.-Z"E*<15><12> .ASCII <1>*Not war??*<15><12> .ASCII <1>*''HX8HKEW*<5>*q8*<33>*0;'Q9-3"EZ"EM7'<.-Z;*<15><12> .ASCII *0A-*<36>*,"ED0;'0A-*<36>*["ES]*<33><174>*C'>0X80KEI*<5>*q8*<33>*0;'*<15><12> .ASCII *Q9-6"EHX0HKEG*<5>*q8 *<5>*q0*<33>*'Q9-7"E*<15><12> .ASCII *EIlb:[1,2]dir*<33>*0;'Q9-4"E0U0'Q9-5"E-1U0'*<15><12> .ASCII *Q9-3"GZ"EM7'EILB:[1,2]SCOPE*<33>*'>'0,0XZ]7]8*<15><12> .ASCII *]90,0XY*<33><33><15><12> CCLCML == .-CCLCMD .EVEN .END