akcs.joehorn@hpcvbbs.UUCP (Joseph K. Horn) (06/05/91)
HP 48 BYTES/TYPE Utility Here's a little program I keep assigned to a key. I call it BTYPE, because it's a cross between the BYTES and TYPE commands. It identifies IN ENGLISH the object type of whatever's in level 1, unless it's a defined global name, in which case it identifies the object type of ITS CONTENTS. (If not defined, it just says "Global Name"). This is tagged onto its BYTE COUNT. To make it useful for quick keyboard use, it doesn't eat the argument, but lifts it to level 2, so that you can just press backarrow to resume whatever you were doing before pressing BTYPE. This is another example of how sweet "system RPL" can be. Checksum of BTYPE: # 3D96h; 42.5 bytes. ASC-> the following: -------------------------- %%HP:T(1); "D9D202BA819BC2653026CB916D9D20B7970CB916B9F0688130B2130CF1A1B9F0 632230BBC5118E50B213069D3" -------------------------- Or UUdecode the following: ************************** begin 600 btype M2%!(4#0X+46=+2"K&+DL5@-BO!G6V0)[><";89L/AA@#*S'`'QJ;#S8B`[M< &$>@%*S$` ` end ************************** -- Joseph K Horn -- Peripheral Vision, Ltd. --