Article View: comp.os.msdos.programmer
Article #1853Re: 25 vs. 43 lines, 80 vs 40 columns
From: Joe Huffman
Date: Sat, 11 Aug 1990 19:04
Date: Sat, 11 Aug 1990 19:04
115 lines
7004 bytes
7004 bytes
In article <475@demott.COM>, kdq@demott.COM (Kevin D. Quitt) writes:
>
> Ok, folks, I need help. I've got a system where I'm switching back and
> forth between graphics mode, 80x25, 80x43, and 40x25. I have yet to
> find a completely reliable way of changing from each of these to any of the
Here is what I use for the 80 column text modes. It's easy to adapt to
the other modes if you know the mode numbers. It's assembly code for
stand alone .com files (included) you should be able to easily adapt it
to be callable from your 'C' program...
-----
uuencoded self extracting archive
-----
begin 644 video.com
MZV 7 2 D3$AA<F,G<R!31E@@,2XQ,F)3("AC*5EO<VAI(#$Y.#D-"@HD) $$
M#!@P3W9E<G=R:71E("1;62].72 D365M;W)Y)%=R:71E)$AE861E<B1#4D,@
M17)R;W(-"B3\O !NP8!Z%0"C,@N P8" 8[8CL %5@(N.P8" '8&NT(!Z5P!
MOR@3,]*+PKD( -'H<P,U :#B]ZO^PG7MOBL!OR@1N $ NB +CHD=07^P$;1
MZHO*B*4 :KB^?[$@/Q ?.:,#BHEQP8H)>P%Z>P ,NU1ORPEK:LRP ($I.+[
M61^)-B@E.L1T!KM/ >GR (M%_J-2);M")8O3 E__@-< *_N)/E@EORXE@3TM
M;'7:BT4"AL0M,&B+Z#T! '?+@'T$+77%N $ @3Y!)0$A=#/'!R DM G-(<8'
M +@ 0\TA<A>[, 'H=P'HI0!T#*$S)8L6-27H$P'K7K$@M#S-(7,"ZW:C4"4S
MP*-4)0OM= 7HQP+K ^@4 8 N624(? ;_#B@EZ_/HX "+%CTEBPX[)8L>4"6#
M^P%T&K@!5\TAZ+< @#Y8)0)U":%4)3L&4B5U(>L%Z#L =16[7P'H @$>Q38H
M)8H,"LET ^D&_Q^X $S-(>B+ +M6 >L/Z'L Z( NTD!Z-H NUD!Z-0 N %,
MS2&[.P'HR0"T",TA)-\\670$/$YU\KL# 2Z(!^BR #Q9P[HH%8O/BQY0);1
MS2%RNBO!= 6#^P%UL5:+\N,9H50E,@1&BM@R_XK$,N31XS.'*!/B[:-4)>@>
M %Z#/E E 705M *R+NL-BQY0);0^ZP6Z0B6T0<TAPS/ F;XH)8,$$/], @,$
M@]( B\B#X0^)#"O!"\*Q!-/( 40"PS/_NS<E*3^#7P( N0 0=0R+!PO =!T[
MP7,"B\A1OR@5Q38H)?.D!A]?Z%G_B\?HK?_KS\,>4%(.'XO3M G-(5I8'\-6
M,_:+_HN<0@RM.]UR"$#1Z(F=0@RK._5RZS/V5JT#!(D%B]]+2SL'<OI#0U!7
M_>L,BT7^BXU #(F-0@RK._MW\/Q?CP>/AT(,K:\[_7+-,_:+O$(,B;7H!#O]
M<P2)M>H$K3OU<NM>PX,.Y 0 >0/HCO\^B[+H!(O^BP6OKW4NN?__\Z^#[P2+
MG$(,B;_H!#O=<P2)O^H$AYU"#(FWZ 0[W7,$B;?J!(F<0@R+]_\$B[3H! OV
M=<##5;WF!(LV)A&+%E8EB@Y9)3+MXR71[M'B@]8 T>:+M$(,23OU<NR)%E8E
MB Y9)2OU5NA\_UC1Z%W#Z L BO#H!@"*T+$0Z\T&Q!XH)2:*!_\&*"4RY ?#
M48L65B6 /EDE"'\2Z.'_L0@J#EDET^ +T( &624(68O"T^*)%E8E* Y9);K_
M_]/J]](CPL.Y" #HQ?^&Q(OPBI0H$K8 L0;3XE**C"@1Z*__"\;3P"4_ %H#
MPL.^-R6M"P1U ^FF +@! +DZ 5$S__.KN.8$,])9OT(,N\X)JT! B1=#0T)"
MXO4S]K]T KDY 8FU0@R)O.@$K0,$B;SH!*NMXNTSP*-6):/,"4B)!; @N3P
MO^PD\ZHS_[W_#U?HY_X*Y'4'7[D! %'K&5#H9/]97XOW*_!.(_6!Z?T 48J$
M*!5&(_6(A2@51SO]=@51Z$#]62/]XN=9NS<E*0^<@U\" %B?(N">?[3H)OW#
M'.8M;&@Q+90" #H!@ ^EX+%0 !C(U+D%33<=( /KB_CXYG+8.![_W\,*-
M"'_M?/\W?U9L6)$0^VYK -O'!J/!]_6XUX*]Q>U('HCNO#5]_KBJ&6]WE%]*
M87]T4O$MJC!A^3, I)) E+P<0(L$27'[\=K6-T,;S7178DQ&X_C>>N'!-5>[
MJ9'<1Q!1";=DU4B2H]]5"3D>\K^U:DSM*1?R8[^1M).,,<B]<R11F;08:EV2
MC=24JT@EI08;161M52+G^1>!G&5BX30!#U1QB6^5< BBP9T/!*1TE1X-&)5/
MTGY(X7P@D0]CEA&9R5#"V).,:U?"%$>I\V)="%%&(Y AAEODHW_]>IZ]N1OX
MBHC$<$^=\&V)^5/DH,%\8]A-SZ^%BK?07W=5: +O=#J[\&A)C5Q$(Q L\39J
M0U>A/SS<>\Y#._F^XC-MRR$M_9>K0RS!*R0MJ9"/<A&@>7(($M#Z$&:L?R=9
M$^.VMAOSMMY^JJP<TDYUHM4Z)1(37=<%:XYA 4QDI;_HRT[$9)UI #N:EN"%
MKI:]3+X^>^\M^>C&./6W?25ADMU*?&_>N8<WRPUJQHA2[I:+GT,"K?\G/!#[
MQX3MGU',.)X0DD]?+P9>$93>(ERA#0J)_#*7/#?YX*0^;93L[A2Q\QN%F
M2+)P'?]2)MF++PC#GXZU^F.,7,%N6QC"2AGB#;='@VAW =#I]5-+UL,JGE4X
MJ(KZG"_$$TB15/P>ULLG?19E8RW[I;343$A(#*;9:E5<=1ML[9737KM47IFS
MBT;%W)81[8N5*W=,:TK?MA*]Z5RV[A@TKGUYKI>ZP(MM>CF+[=!R\K94&:+L
M1)^39?GP^ES(HL-"!UJ(TSU7,V >IQHP5J'XU$GLC,;!,B!-QF%Y A$DH+3%
MI$.'^0XR -?8K/<0,\TX'*0M;&@Q+44 !' ^EX+%0 !C(U+D-/36]8
M1,9D5G.8N)GC_!WZKA7,O=@&\O[BWCL",">3L9:+ ;4\Q]6\?:Q HU=;6Y2E
MS6^KXXY=')&+7B^C6[.21NWO;Z/.Q+2 '&(M;&@Q+>H" #]!P ^UX+%0
M!C0S+D%334'= /KB_CXYG+8.![_W\,*-"'_M?/\W?U9L6)$0^VYK -O'!J/!
M]_6XUX*]Q>U('HCNO#5]_KBJ&6]WE%]*87]T4O$MJC!A^3, I)) E+P<0(L$
M27'[\=K6-T,;S7178DQ&X_C>>N'!-5>[J9'<1Q!1";=DU4B2H]]5"3D>\K^U
M:DSM*1?R8[^1M).,,<B]<R11F;08:EV2C=24JT@EI08;161M52+G^1>!G&5B
MX30!#U1QB6^5< BBP9T/!*1TE1X-&)5/TGY(X7P@D0]CEA&9R5#"V).,:U?"
M%$>I\V)="%%&(Y AAEODHW_]>IZ]N1OXBHC$<$^=\&V)^5/DH,%\8]A-SZ^%
MBK?07W=5: +O^SJ[\&A?64U"$8@6>)LU(:O0GYYN/><AG?W?<1FVY9"7%LJU
MH99@,9(6U,A'N0C0/+FCA+0 "#-6/Y.LB?';6PWA]MY^JJP8T@YMHM4=-M(3
M7M9]:XY9 4QD04*)N3.F0H&'=UBKD,P2OZS2-F!YH\+*;@;R["W?*1FC;;A5
MI*L]D8_*3NSEE7EFX$9\PK7M,X=YIL@S'YJ4,%Q=38\CZ/:KNI?C+;NV)01H
MO"0[B]O[Z7MT1V-@@+CC"!*9JC*:VL[^"Z$="+70X=WTS"K0?&BNQ"%_2]%2
M4C-"&4VOZ=>WI+-^5V_&[GY-*F=4P,TY6'+KF)M6ZRK#)/*M:B;*;X?$L0UB
MO;!6:_KF^7C'<\KUX7IAZ$JVV.?%ED[S_"_W5BRZ/*N3CB6\QG"I=\CQ>CME
MUIL&*1!EF4OQ#I5J6@356)':X8"*R:2OSP/#E81WJJ58]@WL$OH-I&\/Q **
M)1FY; ;9&4+^/S;66RTFO86Z"E$0!A$W <2/&?'+$_=H -_U6Z<^^,Q!T?H2
MNKGFO5%JZ\[^$<@(%<,W'7P164HX2?V%280^G/(HP9"#3'D.?O#:LCB=4]E
M6/QCI/4Z \^ H$V_CO%/OO9-YSDO^P2>W&"#5F<&',MS5X </BUL:#$M2P
M $X #[7@L5 &-#,N0T]-?]1$QF16<YBXF>/\'?JN%<R]V <._WEO&X$8
M$\G8RT6 XX\Q]F"J.=IV*5X^UB!64M;5Y2@S6^KHXI4]'$+7B^A6X,DC=O>X
M4@^Q'/@<\"UL:#$MZ0( /T' #Z7@L5 &-3 N05--BR4 ^N+^/CF<M@X'
MO_?PPHT(?^U\_S=_5FQ8D1#[;FL V\<&H\'W];C7@KW%[4@>B.Z\-7W^N*H9
M;W>47TIA?W12\2VJ,&'Y,P"DDD"4O!Q BP1)<?OQVM8W0QO-=%=B3$;C^-YZ
MX<$U5[NID=Q'$%$)MV352)*CWU4).1[RO[5J3.TI%_)COY&TDXPQR+US)%&9
MM!AJ79*-U)2K2"6E!AM%9&U5(N?Y%X&<96+A- $/5'&);Y5P"*+!G0\$I'25
M'@T8E4_2?DCA?""1#V.6$9G)4,+8DXQK5\(41ZGS8ET(448CD"&&6^2C?_UZ
MGKVY&_B*B,1P3YWP;8GY4^2@P7QCV$W/KX6*M]!?=U5H N]T.KOP:$F-7$0C
M$"SQ-FI#5Z$_/-Q[SD,[^;[B,VW+(2W]EZM#+,$K)"VID(]R$:!Y<@@2T/H0
M9JQ_)UD3X[:V&_.VWGZJK!S23G6BU3HE$A-=UP5KCF$!3&1!0H_I=*N$IW=,
MJY)<%K\\T]8F>:'.NG &[N3N'RD9HWZY5;^5GLS'Z2=V=,J[LX C/F%8]IG#
MN] D&9752A@VKJ;'D?1[5=U,<9:=Y1*"-%X2'<7M_7,]N0.QL$!<<80/YFJE
MIK:SOY+MQT(M=#EX9S,*U!\1^ZL(7]+T6)2>T(9#:^YU[VDXWYK4D;O?CTL9
MUC S3E8<NP8FV;K$KM64JUV%LIN?\-PAK%?1QDU_7%YNV.X]7KRO5!R95ML;
MA+*B'?\7^ZL67*X%S<LS8&,XU+NL>,P>LNM-@Q2(-LRAZH=+W2T":JQ)+7#
M16'/5^:AX<S".\52Y'L'(@E]!M&WI^(!11*4W*\#;)"A?Q^;:RV6*U[)70>X
MB ,(FX#B1XSXWX'[M !H"+=.?1&8@Z7R975[S8*BTT\;^0P7RRN'KC;((K*4
M<)/W"I,(?3GD48,A!IKR'/WAL61R/J>R@+'XQTGJY >C 4";?SYBGWXLFGYR
M7_;).3C!!JS.##F6ZJ\ '#<M;&@Q+4L !. ^EX+%0 !C4P+D-/33X1
M1,9D5G.8N)GC_!WZKA7,O=@'#O]Y;QV!&!/)V,M%@-H>8^S!57.T[%*\?:Q
MG4M;692?S6^KHXI4['$+7B^CVX,DC=O>X4@^Q'/ (@HM;&@Q+2H! "? @
M^UX+%0 #$%04E130U).+D%336MS /KB_CXZSOX5_!]N'?O?[]7=EZY_+K$M
M[+G_]]:FFE19_8#7.L4[K,Y:BF;2K^%-Q&EK#Y_F#]<N5?2%>QI55,W(-7,'
MPW>-/BO<4$D!W@[F T]:GI,9;W>1'TC!?W,;5((^9A]=% EA) D=$[Z?"-84
M7'[S/ZK:P=AL*6PDQ\D%X)ATT67DV+6.H9,B1F$X]2-]53?FJ19R$M43MXY_
MD<K:;0+\5C\B"?YHE@>M9Q1;N _H+)-'J0]GJH/2!0S$)>U$R.!ODF?^R?CD
M?E!1*D^-/+A0;U6 9*!C'H0B?[L'18_TB4DNU(7_&2056;9DTMC-%2:JWQ(*
MK2"4<F=LF..#[^:!U#?K9%)BA+C;B_7O1/<()[G'KDTCT\G/Q?0LN48&[G@A
MN6G30")U+6QH,2T8 &0 /M>"Q4 Q!4%)44T-23BY#3TW/%T3&9X_S
5F_55G!R]^ 9.-!FLOK>+B=BSK0
end
--
joe@proto.com
uunet!proto!joe
FAX: 208-263-8772
Technical Details
Message-ID:
<1389@proto.COM>Path:
arc1-ca.pugleaf.net!utzoo!attcan!utgpu!news-server.csri.toronto.edu!mailrus!wuarchive!uunet!proto!joeReferences:
<475@demott.COM>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!attcan!utgpu!news-server.csri.toronto.edu!mailrus!wuarchive!uunet!proto!joe From: joe@proto.COM (Joe Huffman) Newsgroups: comp.os.msdos.programmer Subject: Re: 25 vs. 43 lines, 80 vs 40 columns Summary: Here's code that does the 25, 43, and 50 lines. Message-ID: <1389@proto.COM> Date: 11 Aug 90 19:04:03 GMT References: <475@demott.COM> Organization: Prototronics; Sandpoint, Idaho Lines: 115