# BASIC and many input options…

Earlier this year, Jason Pittman shared a BASIC program with me that drew representations of all the letters of the alphabet. It was a cute program, and did some fancy drawing.

`130 PMODE3,1:A\$=INKEY\$140 IFA\$="A"THEN410150 IFA\$="B"THEN510160 IFA\$="C"THEN590170 IFA\$="D"THEN680180 IFA\$="E"THEN750190 IFA\$="F"THEN820200 IFA\$="G"THEN900210 IFA\$="H"THEN1020220 IFA\$="I"THEN1100230 IFA\$="J"THEN1130240 IFA\$="K"THEN1220250 IFA\$="L"THEN1340260 IFA\$="M"THEN1410270 IFA\$="N"THEN1490280 IFA\$="O"THEN1560290 IFA\$="P"THEN1680300 IFA\$="Q"THEN1780310 IFA\$="R"THEN1890320 IFA\$="S"THEN2020330 IFA\$="T"THEN2100340 IFA\$="U"THEN2190350 IFA\$="V"THEN2250360 IFA\$="W"THEN2360370 IFA\$="X"THEN2440380 IFA\$="Y"THEN2490390 IFA\$="Z"THEN2550400 GOTO130`

I thought it might be fun to ask you — in the comments — to tell me how YOU would have done this. I can think of one way, that uses an Extended BASIC keyword, and another way, that would work on Color BASIC.

For a series of options that are sequential (like “A to Z”) there are certainly some options.

As a part two … what if they were not sequential? What if it was for a menu that had options like “A, B, C, D, Q, Z” or whatever? That let me think of a third way to do it to work in Color BASIC.

Comment away!

## 4 thoughts on “BASIC and many input options…”

1. Jerry Stratton

In the process of typing in programs from Rainbow, I’ve seen a handful of ways of dealing with this. One of the more compact was Steve Kincade’s Blackjak from April 1984.

220 DIMO\$(26)
355 REM ALPHABET
360 DATA U4E4F4L8R8D4BR4,U8R6F2G2NL6F2G2NL6BR6,U8R8L8D8R8BR4,U8R7FD6GL7R7BR5,U8R8L8D4R6L6D4R8BR4,U8R8L8D4R6L6D4BR12,U8R8D2U2L8D8R8U4L4R4D4BR4,U8D4R8U4D8BR4,R4U8NL4NR4D8R4BR4,U2D2R8NU8BR4,U8D4R4E4G4F4BR4,NU8R6BR6,U8F4E4D8BR4,U8F8NU8BR4
370 DATA U8R8D8L8R8BR4,U8R8D4L8D4BR12,U8R8D8L8R6H2F4H2BR6,U8R8D4L8R4F4BR4,R8U4L8U4R8BD8BR4,BR4U8L4R8BD8BR4,NU8R8NU8BR4,BR4H4NU4F4E4U4BD8BR4,NU8E4F4NU8BR4,E8G4H4F8BR4,BR4U4NH4E4BD8BR4,E8L8BD8R8BR4