FINDMESS |
|---|
|
|---|
| by Don Steffen |
|---|
| This is the 2nd of 2 programs on Hidemess and Findmess progroms for the TI 99 4/A computer.. Click below to read the other program |
|---|
|
|---|
| The Findmess program accepts up to 120 characters and stores them in Characters 128 to 143. Since the TI 99 4/A keeps those character patterns between programs, as long as it is powered up, they can be found by this program. See below on the information on how to hide items on the other program so that you can use this program. |
|---|
|
|---|
| 100 *FINDMESS* BY DON STEFFEN |
|---|
| 110 PRINT "I AM HUNTING FOR IT" :: FOR N=128 TO 143 :: CALL CHARPAT(N,H$) :: IF H$="0000000000000000" THEN 140 ! 16 ZEROS (Shorter messages) |
|---|
| 120 FOR X=1 TO 15 STEP 2 :: A=VAL(SEG$(H$,X,2)) :: W$=W$&CHR$(A) :: NEXT X |
|---|
| 130 M$=M$&W$ :: W$="" :: NEXT N |
|---|
| 140 PRINT "THE HIDDEN MESSAGE IS ": :M$ |
|---|
| 150 STOP |
|---|
|
|---|
| To be able to hide the items you need to use the Hidemess program. To read and use this program click here. |
|---|
|
|---|
|
|---|
| If you would like to go back to the technical index: click here |
|---|
| If yo care to go to the menu click here. |
|---|
|
|---|
|
|---|
any Comments, Questions, or Inquiries:  E-Mail w7wwg@jps.net
|
|---|