Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!mnetor!seismo!gatech!akgua!mcnc!ncsu!uvacs!edison!steinmetz!davidsen From: davidsen@steinmetz.UUCP (Davidsen) Newsgroups: net.micro.pc Subject: EGA programs - archive Message-ID: <884@kbsvax.steinmetz.UUCP> Date: Mon, 11-Aug-86 15:18:08 EDT Article-I.D.: kbsvax.884 Posted: Mon Aug 11 15:18:08 1986 Date-Received: Thu, 14-Aug-86 22:08:09 EDT Organization: General Electric CRD, Schenectady, NY Lines: 148 Keywords: ega, pc, archive Attached is the uuencoded .ARC file for the programs to switch from CGA mode to EGA mode and back on an EGA card. The source and exe's are here, along with source for a 43line mode program (get back with "mode co80"). This would have been a week later if I moved the source to a PC, compiled, arced, etc, so here it is. If anyone can't get this assembled, drop me a note and look for a reply in September, after my world gets less complicated. -bill davidsen ihnp4!seismo!rochester!steinmetz!--\ \ unirot ------------->---> crdos1!davidsen chinet ------/ sixhub ---------------------/ (davidsen@ge-crd.ARPA) "Stupidity, like virtue, is its own reward" begin 644 ega.arc M&@A#1T$N05-- , 34W08 L-,6IB&N\1 ,.QZ 0#&$BA0F+9X@20$" MTH D0IJ @#)DHI0D3J@4D0)BR!,G1(HXF5*$"(@F3T(V4- 0 9PP9\HT), B MQ@P9*UO224.'C4R'8]ZP$?/F#1T78>:T62FE")4O1IR %$F3IV&!6@,0=*P MP@X13-'! @S==R,V?G&[)@P;-CD7+E#!:0B?/DV/,#D MR96315!*R0*"Y)$F(JD$5M#W[UZ6*YF\N3.ES)FI.&#H@PIF' 0--0 MP@XA29Y, 6&GS-PW2D"2/&YYR 9IQY-E41;I!A( B75>;$9#L,1D005.SG&&094>C7A)B% M2$1HS!% XFBE@?"2'&&H6$=Q:8P!P@EDH!;&"2LU,<41,5B''20&G)#??BWX MT)%0N.'71AULH)8D;U*40911)]0$0TTS6(DE"R>0< ((.\Q!1W!CP0%"&W.< ML=(5021!A8Y'J/5CD%"$-8=N8;B1!PAKE+$G6O^)U9%^9[Y!1ADZ@.!E0P_L M<$<8/)U9X!PPE;'2$/K!.55Z0'[IUP"#[H=22" X81@(&.%GA!%%% 3"IU7& M<*5-6M+:)8X*"/'$$V_N*&=V)]0Y*7X9;01"&F: D,<;5P4X!VN 3FE:BV:P M\08<<.SIQF:)>GGI04;(JM 4T\-8=*O0,+04 @[E"&''+CY M5!L;((0U5ED@!'4H<&S48:F(),[$H(.704C9AQ0.YA&I&T;F(20@.NSP$ E# M8J)HI)FV8HMPO,A&C#,*7 :N+24U1QVC337&'#K,[!D+=^H@9AACK-'2#GB% M%089>X9FFAA[KJ6;M4/;>QF#=,!AFD-PX"NCQV8$UU6]I?;Z2]-E8.LN!V0Q-4 M2 >!:MD8Z!DHTL&=RS#+I!;-<:O)4G)JL]V0(&&XX&XXHQ;>\?CD4]^9^53%:B#Z)Y%"#%E@YF.NAE)8KI?&4LV M29<;?!VO,>>#-T?&VV^888;I9DMY9:>QMH\$"##FP M!HEK58MMFIC"N:%Y2TE(47-D$ /Q7 \!; <(@/QC,P'ZN$1H9 D:6.20) M;'/@21KJPAW]8456!DQ.R9XU$S'8#A(6"%,8:J.B2H' #3 3@],VYY(ZD-!C MVVM("BG%0GS=@05!*5@;J!>BEB10=GAA 7EF,+D&M8T-\S/#:AI"-]/I[H5Y M$$-Q9 (H'' G24!*(@S"PYTC8F6)AN,7)"!0-],L+TE!3!+TF(2:#1+1B H$ MG6IP( /[L=%TVY)#&_!REC+@P30)'!@*X& OY@E2-XL[6$L\V!P0;FTJ/!L+ M(1,I$P )" TI:%ARS/BY!O:Q-6VD8&XNR!8-O>X3%#=8 MT"?'$]B. VTZ:TI4B%%SB@D0"B-H_TXCK M+L)QH;_(XE6@-K!^W&$K2=T*2V!^#@_<&4,;9+E *,* #$,-RF2#P\6T1&8C MW%&#&_2 E2+@@2>)=68,- H)KQ"!+>0LBFGT9Z^[28Z&:IAL:4][6X?%$WGS M9%<5I" 5*E3'-U, :,:>QMM$.82@&&475*0"B6R*A;!G28O2WA*7N=@Q8'B! M(C[) %0H2M==C-J!'?!BL.R2\Y@N*\,$ 64O?,E!7PY-[4@)R)76$O.Z .4 MTE8"-:F=9V&RY$"%4%";W'Q7!BY0#0B2)#U[O9-C$3 $2#N000UL M ((K/$$*)MFQB$]((6_8O)$#HDB;.FS"T-D+P@0(*67$O'E#1T$#QR2@ MR"DS9PZ(,&[R@%A31O-@$'/*T+DK%T2;-V3*Z !! H0*A:3G-GE"I @()T^N M@$CBI*\1(T6&4'&MT#%DR90M%W%"I8@4$&G,@,CSI@Z(.VGFH 'Q63'CRR#, MZ(4#1[.;-W=6DS#>@$3" E.H!!FR!(3"^//KWY=/W_X _/WMEY]_ .KW'W\& M%D@@@@L.*&" !SH8(80*/I@@@Q8V2"&&$UXH884=:NCAAA]R".*))J98XHHD MMCCBBR+&F.&,(=*((HLPVJBBBS+6Z..-/.J(8X] &@@:"$5'02Y!4TT P M!-2I!0 "PTR:ILT< X P['H! ,82*%"8MGB!) 0+2@"1"FH" ,F2BE"1. MJ!21 F+($R=$BCB94H0(B"9/0C90T! !G#!GRC0DP"+&#!DK6]))0X>-3(=C MWK 1\^8-'1=AYK19*:4(E2]&G( 429.G88%: Q!TK#"#A%RRM"I(\<-"#IO M0)!Y,T<$"#-UW(S9^<;LF#!LV.1&&'D3*HR$F(5(1&C,$4#B:*6!\)(< M8:A81W%IC '""62@%L8)*S4QQ1$Q6(<=) :VHUH]!@N#7 $?NAU)( M(#AA& @8X6>$$444Y*9#3L8 I4U57GG>#J21D88;GXTVQY@Q,>74%T.8M&9V M,#04 J)RR(&;3[6Q 4)88Y4%0E!, L=&'66*2.),##IX&824?4CA8![1N6%D M'D("(JVT#O$J)":*1III*[8(QXMLQ#@CJDURE]0<=8PVU1ASZ("M9RP\J@.7 M88RQ1DL[X!56&&3D\9]8((BA[EJZL?$&NF7(<1F#=,!AFD-P>"HCL68$UQ6B MIG_ ;16!7X,AXQSURSO'?@K#//U%I+5;9)>Q:AK90-%IK3 M8)J!6YQ)+MFJA+,F)W'1!9!Q\1MFF/'V23OV" EE_;YQ!HL.@RO'EV&2'"E+ M>K-L-!HLP) #:Y"XUJ_"_]$A'*/<)9%BW[!R<$R &UY!8L&48M:E()@AN5"M&O=P=G[S? M#3D_9O2>WL%"4*NVX4;>"+A>,1LLD#>#M VNG[D9JS7$\>!@4Y^'&,7)A!8( M.>#.W("$E\QMCCOJ:X[[7B8J2$"@:2!XFMSD0!4WH"$,$&BY AQ--3B0 ><>.#@WX*8->#E+&?!@&B6E"@5PJ-<$VZ ;FK6J)<(K M /$&-I5PC26&-I0)@ 3$FA90+RUC8,,<7) "]"70A+%386L@.(;<[8XMO@,> MY5SR!C UAWO-V\'(T!*646UF?$*IUOG&B# S%F!YW5-C@=@HDY?$A'K6P]X8 M@T@\^-U.@4Z@3N9N8 ;.,6UD['+AJ7PBL#F,(2RD:1=/!F*&-'!-#'4XPP^J M&**6[*UE?PO3D.4.IAF2'5+E0OO@+7+&9!V._AV50@2!V@*%:H@!:E0H3J^F4(U?45- M!423)SHXSRE]J4VH2 42CQ0+6*\&7OLX3*S-R MH$(HJ$UN] D"&;A -2"86PAC*0=2"DMC!! )$<09HBED: A+.,^N,C*1($A! M0S\-Z@E\&@2@XD@!1!!"=FQ @]Y4 0HH$ %3@7H>$3 $2#N000UL ((K/$$* M)MEJ4(U:A""L1*TD!0E/=8J5R$!!,@K0 !H(14=!+D5810 # $U/\ + M#2MIAC60! #$VT0 ( 8 " ! ( TX-^_! 0%]$JVD("'A0,0(H3T;Z$X M7 4 .,*&BZ C8+H(TDK0+ 2M O7CRYM"S2[]>?3KV[:$!&@A%1T$T M,RY!4TT 34I0( L--&JTX H% ,2,K(*0,BS1P084#,"=,&#AN"<.2\ M.2.'(0@Z;T# J4/G(AJ"18X$*>@&!(T9(-BD<4.PS1LR95R 2-+1($(V*$"HC&)F$@J0H)P1,I1ZP6P(%CLX*[;-V"("+$JH$?BQL_ M)D"9R)3$/8>T[0I9,F7+6J6,A%)%"),D0T" 0,:"+Q$T M!X .0@A) 1*:!I]\]-D7 R0#R+!A9_U-$5498W2$ QXXB/A&'6(\)&1'9NQ$ MQW,PKFC;50GT-P0:8;AQAHEP\)A&&&S8)1((8N1! M!T&!C1G@@#G)4>65!=B6(1;/13===:MEQYAC=XJ&VF[W&5&:5SD">%%&:+(! M(@@_!BF@''46BJ5],$BX'XX@Z#@GIF\D14<>96I:P!"<@G7#C0@T^E"/",$1 MT1L1G?DF")=FJ@!\#TK)XH2_=M9D 8>ZE6@.-Q+0:$=BA#'&&L\1-T6SV%GE MP+.!LBGM&H]>=UNQ"$#Q!!2BV=:G=-1U%>AW;JF:90PRZ >KK#QVA.:;Z"@8QDX:,G/*N%$PI8X8-67&T!DYYDP8%V7PE $1Q@T9$&5LXM2I@$@8 M.F5&*F3H$*)$BA8QRJC!T:,"2 .2G/@I9N>8.G+2O*DS!P2=-R#0E&F:9^Q# M.67@O)%#!\0;-VG?W %QYR!"%'-!N'E3MR\;-BG,JDUI]LX;!7 $GI$3IDU9 M.77PW@4Q9^!.,6\4 &>6<'FTCME!VE?&L24.\ZM-]%N=?TVQ&S?79$$$TS0 MAU<:VK55!X&J<08@'0+^II\";;QA$$\^J8877"D5J!9U'I[G''NEI5%69^.5 M!U=M(&A%4!IN7(<<4C_AJ, :@P'HQAD@0%AD87.M419JA?EEEV;X/:1?"W3D M <=GH?"T%, /T02(/QU(6YY-N*" AH end -- -bill davidsen ihnp4!seismo!rochester!steinmetz!--\ \ unirot ------------->---> crdos1!davidsen chinet ------/ sixhub ---------------------/ (davidsen@ge-crd.ARPA) "Stupidity, like virtue, is its own reward"