Everything HP200LX: Knowledge, Products, Service

9 years, 100's of pages of HP Palmtop Paper, jammed with tips, reviews and how-to's

Most useful, up-to-date Web sites devoted to the HP 200LX

Direct link into 1000's of pieces of Palmtop software

Tips from Our Techs

2008 Catalog
(PDF, 2.6 MB)

Contact Us/About Us

Weekly Palmtop Paper Newsletter
(Palmtop tips, latest happenings, and HP Palmtop Paper Store information)



Privacy Policy

Sample TIPI code

Sample TIPI code

No self-respecting developer article would be complete without sample code, so I've included a brief listing here to show you a bit more what TIPI is all about. This simple application will display the character for any key you press along with its keycode in decimal and hex. If you subscribe to the disk version of this publication, you will find a ZIP file containing the full shareware release of TIPI 2.0 which includes many more programs and a full TIPI reference manual. Alternately, you can obtain TIPI and all the code from CompuServe's HP Handhelds forum. If you have any questions or comments about TIPI, drop me some E-mail. The odds are that I'm up, the coffee's on and I'm hacking on TIPI.

 #DEMO.TPI by Kent Peterson 11/17/94

 define hex$ ( n -- )

 ( -- h$ )

 # Returns hex equivalent of a number.

 "" begin

 dup 16 mod

 "0123456789ABCDEF" 1 + 1 mid$

 swap$ +$

 16 / dup not

 until drop


define showtime ( -- )

 ( -- )

 # Shows the current time

 # on the top row of the screen.

 0 5 locate

 time$ print$


define spaces ( -- )

 ( -- )

 # Print$ four spaces.

 " " print$

 enddef define asciiline ( c -- )

 ( -- )

 # Displays c as a character,

 # its hex code and its decimal code.

 dup chr$ print$ spaces

 dup hex$ print$ spaces

 print spaces


define wait_for_key ( -- c )

 ( -- )

 # Waits until a key is pressed

 # and then returns the keycode.

 # While it's waiting it shows

 # the current time.



 key dup

 if dup endif



#dow let's put all this stuff together.


 # Displays the column headings

 # and the instructions.



 | Char Hex Dec

 | ==============




 | Press any key to see its code.

 | [ESC] exits.

0 cursor # Hide the cursor.

# This is the main loop. It will

 # loop until the user presses

 # the [ESC] key.



 5 3 locate

 dup asciiline

 27 =


1 cursor # Set the cursor back to normal.

iPhone Life magazine

Notice about Palmtop.net
The Palmtop Network with its S.U.P.E.R. (Simply Unbeatable Palmtop Essentials Repository) software is now available under the domain name of hp200lx.net.  

We Buy
We buy used palmtops, working or broken: HP 200LX, HP 100LX and 1000CX.

Copyright 2010 Thaddeus Computing Inc