From 34bc475d16f96e77943dc6854960d2ea73c23f56 Mon Sep 17 00:00:00 2001 From: David Schmenk Date: Sat, 20 Dec 2025 09:18:41 -0800 Subject: [PATCH] Add TXTMODE word --- images/apple/PLEIADES-2.20.po | Bin 33553920 -> 33553920 bytes images/apple/PLFORTH.po | Bin 143360 -> 143360 bytes src/scripts/hgrlib.4th | 2 +- 3 files changed, 1 insertion(+), 1 deletion(-) diff --git a/images/apple/PLEIADES-2.20.po b/images/apple/PLEIADES-2.20.po index f7c6f75526731c5021e513712aa7f873c3de302f..bac8def15c2681d1263670be8590af05f9e4d9c6 100644 GIT binary patch delta 2105 zcmW;MWq8N|6vbhGHYSD{8%IrdcXv0_-QC?YoG~#m(nQxtXm8(Qf^zj@;4Y8J3N318pi3nl?v60wBY$mo4TZwJNc47w+N$ezc5xa>!#9m?_ zv7d+{4iE>4L&Ra?2yv7+MjR(j5GRRK#A)ITah5nooF^_27l}*6W#S5PmAFP+CvFfo ziCe^N;tp|_xJTS49uNWL^Sc5ctgA;-VyJK55z~}6Y-h& zLVP8@5#Na)#82WE@tcSt{t$ly;Y^2P#kS&DE|#km*NSJkS@Ep|RzfS0iGm_POcIktpqL`2ifLlH2of{IOfgH$ z7QteU2oZC|JTYG^5DUd3u~;k-p<=06CYFm8Vx?Fm!o+H^MywU<#Cj1fBE$xM z#TKzuY!lnX4iPDKid|y2*dz9eePX|e5(mUVaY!5%N5oNaOdJ;{#7S{VoEB%qS#eIB z7Z=1uaYtD!z&D;)nPteu>{AM*MN2JVXCFZ`%9=2$A(> delta 2095 zcmW;FRa6!V6ogTK1jRs5Ky>Ux?C$PP?C$PPum;7z#>T_~MNzS_ySuxwyU=^)K74zf zmsuz9&p-D-E2_AQb4X+gujtY)zOGL00il)r{HIKea|?=db68GRLd)55u@YH{Emtdv zmDEaRCAYLmVYyo#R!S?C93J8AM5HEsh%`i60z^6@ zJ&}RPNMs^16IqC?L^dKjk%P!d_!7AYKO#4ghsaChBk~gkh=N2RqA*c}C`uF~iW4P> zl0+$@G*N~qOOzwZ6BUSxL?xm!QH7{VR3oYrHHex-EuuD2hp0=`BkB_kh=xQXqA}5g z@F$uQ&4}hi3!){_ifB!=A=(n{i1tJWq9f6X=uC7Wx)R-p?nDowC((=OP4pr968(t& z!~kL-F^CvU3?YUR!-(O;2x25LiWp6dA;uEphyWsx7*9+fCK8i~$pncYVhS;p2qvZx z(}@|xOd^DsMa(AV5Oaxn#C&1_5lSp177>eyCB#x<8L^xQBUTVAiB-gEVhypD2q)GN z>xm7-Mq(2YK|~Upi7iAFv6a|HL=)SI9mGx|hS){yCiW0}iG9R=;s6m#93&1AhlwM^ zQQ{bJoH#+8Bu){hi8I7m;v8|FxIkPaE)kcBE5ude8gZStLEI#65x0pu#9iVZai4fV zJR}|wkBKM5Q{ox%oOnUJBwi7(i8$g7@s@Z;yeB>oABj)IXW|R-mH0+{Cw>q=iC@HT z;tvr|{3ZSc!!Z*M%gIV;Ia@APA}g`wY9+CfTFI>BmYbEra<@FJlvXOs)AF*st<;u} zmBvbI=}$TG-ekjFCT1i_Ks?yd=*B>4Xb@eC{KFp7!dqJ$_ZN{P~DyoUuMLW@6bPydyC(&7S5nV+$(OvWqJw-3kTl5iqML*GB3=jjwATd}B5kti=FyYSK}-~r#AHDcB&LX|B3Mil)5Q!iQ-p|FVz!tg=8Ab@zE~ha z#X_-2EEY?|Qn5@d7hz(BSSePC)nbiUE5gM(v0iKt8^tCOAtJ?Qu|-6Qtzw&q7Td)R zu~Wo|U1GP`Ble1YV!t>bV#PsmNE{YN#8Gif92Y0VNpVV?7H7m+aZa2U7sN$zNn93J z#8q)kTo*UQO>s-y7I(y5aZlVA55z<9NIVu##8dH1JQpv-OYus)7IET@cq`tC_u_;2 kC_ahL;*0nyzKQSRhxjReiQnRnh!=kyv7TZ79BH_*;QhaTFjTcT+alWZt>>1~Q2tRD2_5JZq2 zgbo8kf+rCX6c;LZ5{91aQN)9=KcFY?i~g4N#pb0sJzn1D{l4Gd@B3D_3#;3O4=O*n zUO7AtY(d#wbZlOl5j)sjX&bCXE_*Oe3{_ z$m3QaUDFRnkds6jdR>5s-e4SmiW1o;@=_`fRb+w`jtJ6oip|&V1S`+Sx$%`{CI!d0 zmt{X8&Z?HFThlXQlKeAu;;r0?fXGKFRYb;ihR82Owj?sdxjoy-Ile{HeZ|wZL!21& zRh;AB$m7~@p2p}k`m?v0lqkPNTj`F4D0z#HXEelR;NR)C7t(tOsbhBc4tuQRZ+J~> zuJP%~GxmUW*I2nY=;21ThZ}MadpNH-b!*X7MLqt5Eas&E`vH+@ojsH_C#97CBAve_ PoxM$#JHlSSWb6L`JG=R3 delta 1204 zcmZvbPiPZC6vn?v#ux?DgQBtqx>QsYTd;|T6g?y{ZB{qC>+V(*yyR9z5E>79vUpMa zgF?iGqI(n(MX^f@o`j+&a}@C)6ujo-J!{{l*_fH_o`%`^&HLW>zFFGHE^TB#R{5SM zh3Ooy4mDb|Ev^*f9Yl*1CM~_}G|E%X700bLfPV$-#LeCPzyCph6ny%AY+njLovN)_ zu7klh)&T=jL$JSSce#=iE4Epx`ze#Z!TXBT#lu65TZFYJX)Iy?rHWoQF2t1(>Qw3? zlS=tX@PKX_bLSgYOoj%5_aTAZZNR!cYuavo2-*amlEImlB8hLd65@|&hFh49F9O0_ z;OOm;G<-;c6SZ@rO(VR6gE%`Wf-Ak&_&af?B^-4$qiPN(gU~}7XQa`1mdcc3G|Mdh z0MVj^WA!;|+;C&Lp^pr%X2qJGACbaTsV0%SR*6A`Z?Fr0a}wDl^0Y)If)s2Mq-PYH zud5R*KikiZr!FulIG(j2s|s+uY8sk3Rg5ReKa&%0WhZ?3H*jz{>EN>LU$aei|00#YC6%2OmfFi+zhuuh0joO%&Hw-a diff --git a/src/scripts/hgrlib.4th b/src/scripts/hgrlib.4th index 499f0c3..cf6866a 100644 --- a/src/scripts/hgrlib.4th +++ b/src/scripts/hgrlib.4th @@ -29,4 +29,4 @@ LOOKUP LINESPANS PLASMA HGRLINE : SETORLINE [ LOOKUP HGRORHLIN ] LITERAL [ LOOKUP HGRORVLIN ] LITERAL SETLINESPANS ; SETLINE ' TEXT 0= ?ENDSRC -: TEXT -1 HGRMODE DROP TEXT ; +: TXTMODE -1 HGRMODE DROP TEXT ;