I programmed my HP42S back in the 1990's as a text editor. I bypassed the clunky 42S alpha entry menu mode and redefined the keyboard. Output to a personal computer was via the "HookUp", a IR to serial converter. The text was stored on the HP42S in a matrix since the 42S accepts alpha characters as matrix data. Have not used this program for many years, but maybe it has a future with the Swiss Micros 42S which MIGHT have direct alpha key entry.

PHP Code:

`00 { 577-Byte Prgm }`

01>LBL "TEXT"

02 1

03 STO 08

04 STO 09

05 FIX 03

06 0.888

07 STO 00

08 CF 81

09>LBL A

10 38

11 ALENG

12 X=Y?

13 GTO 75

14 AVIEW

15 GETKEY

16 XEQ IND ST X

17 GTO A

18>LBL 01

19 "A"

20 RTN

21>LBL 02

22 "B"

23 RTN

24>LBL 03

25 "C"

26 RTN

27>LBL 04

28 "D"

29 RTN

30>LBL 05

31 "E"

32 RTN

33>LBL 06

34 "F"

35 RTN

36>LBL 07

37 "G"

38 RTN

39>LBL 08

40 "H"

41 RTN

42>LBL 09

43 "I"

44 RTN

45>LBL 10

46 "J"

47 RTN

48>LBL 11

49 "K"

50 RTN

51>LBL 12

52 "L"

53 RTN

54>LBL 13

55 " "

56 RTN

57>LBL 14

58 "M"

59 RTN

60>LBL 15

61 "N"

62 RTN

63>LBL 16

64 "O"

65 RTN

66>LBL 17

67 ARCL 00

68 AOFF

69 ALENG

70 6

71 -

72 AROT

73 ASHF

74 RTN

75>LBL 18

76 "P"

77 RTN

78>LBL 19

79 "Q"

80 RTN

81>LBL 20

82 "R"

83 RTN

84>LBL 21

85 "S"

86 RTN

87>LBL 22

88 "T"

89 RTN

90>LBL 23

91 "U"

92 RTN

93>LBL 24

94 "V"

95 RTN

96>LBL 25

97 "W"

98 RTN

99>LBL 26

100 "X"

101 RTN

102>LBL 27

103 "Y"

104 RTN

105>LBL 28

106 RTN

107>LBL 29

108 "Z"

109 RTN

110>LBL 30

111>LBL 31

112 RTN

113>LBL 32

114 "-"

115 RTN

116>LBL 34

117 SF 81

118 ALENG

119 X#0?

120 GTO 75

121 CF 81

122 TONE 9

123 RTN

124>LBL 35

125 "."

126 RTN

127>LBL 37

128 1.007

129 STO 03

130 INDEX "TXTM"

131>LBL a

132 RCL "TXTM"

133 DIM?

134 RCL 09

135 X#Y?

136 GTO b

137 1

138 STO 09

139>LBL b

140 RCL 08

141 RCL 09

142 STOIJ

143 RCLEL

144 ARCL ST X

145 1

146 STO+ 09

147 ISG 03

148 GTO a

149 RTN

150>LBL 38

151 "'"

152 RTN

153>LBL 40

154 RTN

155>LBL 42

156 "!"

157 RTN

158>LBL 43

159 "?"

160 RTN

161>LBL 49

162 FS? 13

163 CF 13

164 FC? 13

165 SF 13

166 RTN

167>LBL 50

168 "�"

169 XEQ 34

170 RTN

171>LBL 54

172 CLA

173 RTN

174>LBL 55

175 CLA

176 PRON

177 1

178 STO 09

179>LBL e

180 1.007

181 STO 03

182 INDEX "TXTM"

183>LBL c

184 RCL "TXTM"

185 DIM?

186 1

187 +

188 RCL 09

189 X#Y?

190 GTO d

191 PRA

192 CLA

193 PROFF

194 RTN

195>LBL d

196 RCL 08

197 RCL 09

198 STOIJ

199 RCLEL

200 ARCL ST X

201 1

202 STO+ 09

203 ISG 03

204 GTO c

205 PRA

206 CLA

207 GTO e

208>LBL 56

209 "7"

210 RTN

211>LBL 57

212 "8"

213 RTN

214>LBL 58

215 "9"

216 RTN

217>LBL 59

218 "*"

219 RTN

220>LBL 61

221 "4"

222 RTN

223>LBL 62

224 "5"

225 RTN

226>LBL 63

227 "6"

228 RTN

229>LBL 64

230 "/"

231 RTN

232>LBL 66

233 "1"

234 RTN

235>LBL 67

236 "2"

237 RTN

238>LBL 68

239 "3"

240 RTN

241>LBL 69

242 1

243 ENTER

244 DIM "TXTM"

245 BEEP

246 RTN

247>LBL 71

248 "0"

249 RTN

250>LBL 72

251 ","

252 RTN

253>LBL 74

254 AOFF

255 EXITALL

256 RCL "TXTM"

257 PSE

258 RTN

259>LBL 75

260 ASTO 05

261 ASHF

262 RCL "TXTM"

263 DIM?

264 1

265 +

266 DIM "TXTM"

267 INDEX "TXTM"

268 STOIJ

269 RCL 05

270 STOEL

271 FC? 81

272 GTO A

273 GTO 34

274>LBL 39

275>LBL 41

276>LBL 44

277>LBL 45

278>LBL 46

279>LBL 47

280>LBL 48

281>LBL 51

282>LBL 52

283>LBL 53

284>LBL 60

285 RTN

286 END