Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!ub!acsu.buffalo.edu From: cloos@acsu.buffalo.edu (James H. Cloos) Newsgroups: comp.sys.handhelds Subject: (HP48SX) CONVERT Replacement, Standalone Version (LONG) Keywords: HP48SX, hp48sx, CNVRT, CONVERT Message-ID: <69288@eerie.acsu.Buffalo.EDU> Date: 5 Apr 91 23:44:47 GMT Sender: news@acsu.Buffalo.EDU Organization: State University of New York @ Buffalo Lines: 349 Nntp-Posting-Host: lictor.acsu.buffalo.edu Please find enclosed the standalone version of my replacement for the buitlin CONVERT command. This is version A. I have included both ASC and uuencoded listings. A rplc style srs file will be posted next week, after I can get it into the SPARCstation here. (I wrote this on paper and hand compiled it.) It is Copyright (C) James H. Cloos, Jr. 1991, and is covered by the provisions of the GNU General Public License. Please refer to the GPL for the preceise restrictions; I have included a copy at the end of this article. You can use this command anywhere you would use CONVERT. Additionally, either or both of the arguments may be a list of unit objects, all of which must coexist dimentionally. An example of such use will be more informative than a description, so..... INPUT_STACKS OUTPUT_STACKS ---------------------- ---------------------- 2: 2.5_ft 2: 1: 1_in 1: 30_in ---------------------- ---------------------- 2: 2.5_ft 2: 1: { 1_ft 1_in } 1: { 2_ft 6_in } ---------------------- ---------------------- 2: { 2_ft 6_in } 2: 1: 1_ft 1: 2.5_ft ---------------------- ---------------------- 2:{ 2_yd 1_ft 4.5_in } 2: 1: { 1_ft 1_in } 1: { 7_ft 4.5_in } ---------------------- ---------------------- Please note that as written, this program is 670 bytes long on the stack (crc is #DBB1h, btw). The version that will be included in my soon to be posted library of interesting and useful utilities will be smaller as a significant amount of code is repeated thrice in this version. Please also noe that the error messages are not nice I hope that it is found to be useful. ========================---Start CNVRT.ASC---=========================== %%HP: T(3)A(R)F(.); "D9D20C2A207500034F4E46554254502255607C6163656D656E647C202374716E 64616C6F6E656026756273796F6E60214C2A20B100034F607972796768647029 AC2A2053000A416D656370284E20234C6F6F637C202A427E20213939313C2A20 32000355656024786560274E455027405C4E7F06FDE8199040442301C040D9D2 08813088130B76506B6504423047A20D6E2050726627F6D6D6E20307247F6D6E 20807247F67226163756B21300D470D6E20307247F6B7650EC370D6E20507266 27F6D6D6E20307247F6122706B65044230173F0AFCF088130D6E20807247F672 26163756173F0AFCF079E60D6E2050726627F6D6322301A50243370D6E205072 6627F6D6D6E20307247F6B76509545079470B2130B1140173F0E3C46D9D20322 30FA450EC3702A6F04337032230173F0B213066C46D9D2032230FA450EC3702A 6F043370322308813088130B76506B6504423047A20D6E2050726627F6D6D6E2 0307247F6D6E20807247F67226163756B21300D470D6E20307247F6B7650EC37 0D6E2050726627F6D6D6E20307247F6122706B65044230173F0AFCF088130D6E 20807247F67226163756173F0AFCF079E60D6E2050726627F6D6322301A50243 370D6E2050726627F6D6D6E20307247F6B76509545079470B213011920E5000D 9D2032230FA450EC3702A6F04337032230173F0B21306FD46173F0119205E000 D9D208813088130B76506B6504423047A20D6E2050726627F6D6D6E20307247F 6D6E20807247F67226163756B21300D470D6E20307247F6B7650EC370D6E2050 726627F6D6D6E20307247F6122706B65044230173F0AFCF088130D6E20807247 F67226163756173F0AFCF079E60D6E2050726627F6D6322301A50243370D6E20 50726627F6D6D6E20307247F6B76509545079470B2130A0E46173F0B21301BBD" ========================++++End CNVRT.ASC++++=========================== ========================---Start CNVRT.UUE---=========================== begin 666 cnvrt.bin M2%!(4#0X+4&=+<"B E< ,/3D9%4D104B50;'%C96UE;F1L<",D<7YD86QO;F M5@9B5R8WE_;F!A+$H@(; ##T!I2RJ("-0"@%-96-@>"Y (RQ/;V M-L<"HB3G A*3DQ/#H@(C #!55@9"AU8&3W8-^.D0D$1#(0# 2= M+8 8 X@QL&<%ME9 ) -T*M#F @4G9G)O;6TN,'!"]];F @@G=&\G8F%S92LQ M $T';2XP<$+WMF<%SG/0Y@(%)V9R;VUM+C!P0O<6(@>V5D D W'SH,\/B#'0 MY@(()W1O)V)AB]D S!R,R$#V5D D W'SH,\/B#'0Y@(()W1O)V)A -#9 B,R\$H% MSG,@:@\TV9P7.<]#F @4G M9G)O;6TN,'!"]Q8B![960"0# Copyright (C) 19yy This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) 19xx name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (a program to direct compilers to make passes at assemblers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice That's all there is to it! ========================++++End COPYING++++============================ -JimC -- James H. Cloos, Jr. Phone: +1 716 673-1250 cloos@ACSU.Buffalo.EDU Snail: PersonalZipCode: 14048-0772, USA cloos@ub.UUCP Quote: <>