From 9a7fedabc22be7014bb802ff64f49d9f247b657b Mon Sep 17 00:00:00 2001 From: David Schmenk Date: Fri, 9 May 2025 08:48:00 -0700 Subject: [PATCH] Clean up Virtual ][ 80 column card mode set --- images/apple/DRAWL.po | Bin 143360 -> 143360 bytes images/apple/PLEIADES-2.20-INST.po | Bin 143360 -> 143360 bytes images/apple/PLEIADES-2.20.po | Bin 33553920 -> 33553920 bytes images/apple/PLFORTH.po | Bin 143360 -> 143360 bytes src/vmsrc/apple/cmd.pla | 1 + src/vmsrc/apple/cmdjit.pla | 1 + 6 files changed, 2 insertions(+) diff --git a/images/apple/DRAWL.po b/images/apple/DRAWL.po index 0f7b2fd888816c987c8c27b4fb0693e2e05a3061..1eb1a6d76dc1f4235f6d7ededbdb64b7df7a5e8c 100644 GIT binary patch delta 901 zcmZXSF-yZx5XbMus6j<-b*P2bQmB?Hty&NZB1jXZnE0d#I*Fw?ND&l75nVb|`~U%i zEuCD{LDYb*QU$+&IJ-(WaSUn_()7KWCHH^4-~I3IUGak}esH$}+m+w|o*{HKl~6J3 zn_lPxGqlg_fPvAp#K$M6X2AJ6lF$X${nRzJ$_6HznK%ZbE8?m|V86UcU3gq7WEs|7 z%JF&=GxAEq$o%)!fB|4#$_ms}d%&sMl6tPacO50wo%~p*vgP$D+g`n#-$0C5(3#Ck zkKYdkfB!geXLD$dJ+i{*qiOIdyI%cif0nsF42Drc9WIX$NmX2K^kaKV5J}_Z3~rY8 zvjyFt4bYWUTdBeM?4rCxPq{9#CP9;sU1n>-zn=#p>q-$cP z4VdY@c?O2Tl&&O3$0ou58pfdsu0leXStPxq)l3qG*rK+ibJ(xKsLOCbMO?vhK>1p4 zTH08w2(f=#2`~T&DAzEP^}T-8u50J&TUXGqxs@NXFY>F%4B6w`bLPzQM|Qpo~80W&AMC!%{>sI(JtH>*Qj z)l}U`q^P2LA`NE{28aX_ZkX*9qK_@y9q2Z~@8~g$`bLm!^&cUAWEMR_6%j8@2?mtR z?6Ssn{|Sw7&>V=khE@EBb+ZG=CaPCJzSz)SkcgH4VO?`6g`PDxzOlXHxsyWBllF-OpSq7J$r{{zOW#WMf^ diff --git a/images/apple/PLEIADES-2.20-INST.po b/images/apple/PLEIADES-2.20-INST.po index 056378a675033926838e7c10811e8d11bf145d23..7cc21645d656b43ecc95f89982ad5b0595532dfe 100644 GIT binary patch delta 977 zcmZXS%S!@L6voe;MjIqZrG*G;R8&?dYD7{5lBg-}%1t$b1Ny58*Dv8{7gw2|91QZW;5I zk#IYZu=cGMaL^Z+4Z1wuQBWVf4-AkuGQY_=-sbtQByi9l7w2aw>^DfL3sZyYtO}O3 z)N5iPQP-)y+vk7-;2Tsmko`KF>bjOLvuRdmYoqPFrw-%94-d-JSO|F|Q$xUVW4B%K4yN2uD z_!lzNJUdh+*Nja|Vswha-Uzm$!OBh8K!oM^cXH^T?5!()nVsh{$>|QCNr!uvN9gnq DT_e_W delta 973 zcmZXS&r1S96vy98TP_l$5D|eH6>U}oT0~M9<&Ts$N7f32AdBeGp}O>gPTlIJ9AHrVvw=akXB3RDVF;{nX%nu|wB&IASCTRG#?*yb4*Lx->cU>7I!b~C zGxZuz#49?bf73i*0I5oq0_v@I7_Q4{QcMr)9gVzyig4_%VPg>u(9MRKMJX6!93u-;}H06FDDK54%cKJ1S`{&9O8vwPCrUb_b=)S2z!HA%M8ZrR#A^n@a6 zFhZ){i#uR}E30TcZKk^YB$k+|LQp(n)VGN$n5ix;7>)82g*tFyQOlbXha{$lVtSJ^ zwbMMQO~-kOGeGbJf<*o&*O}smqW4ZAUQ;J5Hy(vCrPi?K2@!2BY_wd=u(EEkte&pH zl$gp>P|Sf7w#EcEdVyj5;?LRQzwQI5J&F|Fd5rk|>Eu|n_6#mRiAKoaaK)SS!iJg^ yhpMM*v1v_>OmWy7!L0Y6kdSpOG{D@4*j4a5CU}Qsf;wKbBVH8186hm>8KuMHBX_P@(ltXz`Kt)tSWmG{`R6}*tKuy#_ZPYCfiG(&T=KufejYqY`7Xp44ej}GXFPUws-=!$OWjvnZVUg(WJ=!;+QEBc{7 z24EltVK9bZD28D;MqngHVKl~IEXH9xCSW2aVKSy*DyCsNe#7sWfti?v*_ea5n1}gT zfQ49u#aM!+Scc_Tft6T=)mVeIScmo4fQ{IM&Desi*oN)cft}ce-PnV@2*p0^#{nF~ zAsogL9K|sl#|fOoDV)X`oW(hu#|2!(AGn0exPq&=hU>V2o4AGBxP!a+6Mx|z?&AR- z;&1$eM|g}Uc#3Cuju&`|S9py#c#AN+!+ZRT5BP{r_>3?3if?1M{RuGPO#~Cs{J)6o zD~bs;QB5=x-NZ28nV2S)iEZMTAQRVoZ{nHwCV@$45}Cv%iTS}KHOWkJlftAlsZ45< z#-ugrOnQ^SWHdjTOeV9*VzQcGlg(r|IZV!gP`-?SvoE3r2L^__7cSh2)xi^j!g2+W z+$N97Yx0>8liw6D1YiZR(i1rk<&98kmNrk!ft2n5L$gX>MAWmZp_yZQ7WhOv^O10N7Ko4 zHeF0t)6H}@Jxov2%k(yVOkeYh`PK9@{mlR~&gn)v&1Yl%gl1K!mKo_ z%xbg7tTpS*db7c7G@Hz3v&C#R+st;e!|XJ>%x<&C>@}fgpV@B?n1kk!Ic$!Yqvn`7 zZcdn!=9D>Y&X}|2oH=hUn2Y8QbIDvbSIkv&&0IG(%uRF4+%|X2UGt~;%iJ^f%>(n$ z{B8a*kIZB9#5^_6%yaX?yfm-OYxBmuHDTtRd2jwTAIwMd$$U0n%-4X>ps;TN&jbGh DtKvUN delta 2335 zcmW;MRg@4^6hKi%K!%1PrE};GDFNy3F6j;lNr3^RV`!zjyPH9}8>G8Iy3=#~*k`?U z@ArKnpTETn!RmYw1A+(Tk2o}c!~lGU@Q46s-y;$N5gAbs710nKF%T265F0^=gSd!? z_(*_+_yLKK7)g*6$&ef=kP@ko8flOg!AOVn$bgK5h1|%4y!a9M zkRJt55QXp)3Zn>$;%5{?ag;zwltO8gL0ObTc~n3}R6=D`K~+>kb<{vj)Ix34L0!~C zeKbHrG{P@vj3#J`W@wHUXo*&6jW%eDc4&_d=!j1E6`j!qUC|A{p*wn@Cwieb`rvo; zML+aM2nJvv2H_73#t;m}Fbu~CjKnC6#u$WREXH9xCSW2aVKV;2Uzmcan1<;hy6H!gE)l4ID(@%hT}MalQ@ObID@k|hx7Oc7jO}ma2Z!{71wYbH*gcTa2t1U z7x!=<5AYC=@EA|y^i6W=5-3C#~Ckx6Wln4~6|Np4b@lqQu) zZPJ*uCfKAi=}iWc(PT22O%{{YWHZ@K4wKX53JBxN2srU9N^oFcxZB~vEmMDcX=mD-4yL2& zWPUZBO&8PEbThx1?xu(7X?mI7rjPmE^fmoVe-mN`n1N=H`NIr0L(EV!%nUap%t$lJ zj5cFTs2OXvY9HkwUlv)N*{nr&vg*s z+%xyh1M|>4GLOv@^RIboo|)(7g?VXSnb+oxd28O8_vVB7Xg-CO2o^T>;R->xDqVyK{sX#k3~rdWyVbm9KkxhfzIj_}giDR^wM2VkVSsxW zy_k=gj1DcX^aDS3-gOQEn9VCmJ(rB?o4O(80NQZ~!G3S|vkq$0$Q+^`^|U7E4IMt8 z{w5HBK$rSBm@OLV6DgAfo~vK>wn*IE-<=5=e+Gt(zXP??-EC6+J^Yo#%#nkMPsg1G z>;TCo;M+z@NvdnEDmV(4T_;%9_ELiiQ!}f%yo)(1r^L7I zw0)E!t5WwmIdu*}I0_*vX3I-WW;2>0E0U|`RJqnI#Z;n=3>R=&#^qJp6UVn{b^oT- zUfW|860=4sMBE>XRS4=<1r@ z$k7HL&l4Vxm9U98pPPbB?tXrRse8iIahN8|ET`BnH7&Wm=nHoh>_OAFY>tV4VY5a8 KOXTbyDZB&s*zwo^ delta 1057 zcmZXTzfapx5XbMCmnK4pFtuF*C4NgZO$?4-Y8#|Vm6}GKi$vBAVTwdY z4_@%VLe&naN(Ll`F6IQ5$e*!2BQ9&IYTX5 zCXAnW7YKkfp@xCoqlp=jvWfJ+`Q+ala!D$1h7lS}Mp)G5Nx2)A4 zBu|O#Ebx~wDuWzP`^cJSz7v5RN4PymEQ?mm0k7J($STBUF^6`iq z?eOv3;qf?Wmx%MZthnUQ>tQqPKr?OJOc&PjS+=j|6yF!U=dL1CX!?%JG4T)VwutnW IoZpbjBQX{2od5s; diff --git a/src/vmsrc/apple/cmd.pla b/src/vmsrc/apple/cmd.pla index 70adaec..12c059a 100755 --- a/src/vmsrc/apple/cmd.pla +++ b/src/vmsrc/apple/cmd.pla @@ -1431,6 +1431,7 @@ if ^MACHID & MACHID_80COL wend systemflags = systemflags | vid80col | restxt1 *CSW = $C300 + crout; cout(12) fin prstr("PLEIADES 64K VM v2.20\n") // diff --git a/src/vmsrc/apple/cmdjit.pla b/src/vmsrc/apple/cmdjit.pla index bf6c077..6cc02e7 100755 --- a/src/vmsrc/apple/cmdjit.pla +++ b/src/vmsrc/apple/cmdjit.pla @@ -1512,6 +1512,7 @@ heap = @lastdef if ^MACHID & MACHID_80COL systemflags = systemflags | vid80col | restxt1 | resxtxt1 *CSW = $C300 + cout(12) fin prstr("PLEIADES 128K VM v2.20\n") //