n242df (Korah Karivelithara) (07/24/90)
Once again I'm posting for Rick Grevelle ----------------------------------------------------------------------- >From n233dk Tue Jul 24 03:07:17 1990 Return-Path: <n233dk> Received: by tamuts.tamu.edu (/\../\ Smail3.1.14.4 #14.2) id <m0hfj5N-00001gC@tamuts.tamu.edu>; Tue, 24 Jul 90 03:07 CDT Message-Id: <m0hfj5N-00001gC@tamuts.tamu.edu> Date: Tue, 24 Jul 90 03:07 CDT From: n233dk (Rick Grevelle) To: n023el After a comprehensive review of the comp.sys.handhelds archive, which can be found at the anonymous ftp site csl.sri.com (192.12.33.2), I felt a need to post these programs. In the event that the hp28 has not gone completely by the way of the dinosaurs, there might possibly be someone who could use them. First up, it appears that there was never a posting for the SPEED or FAST program which does not have to be in the home directory, or that requires a POKE program to work. Either of which seems ridiculous to me because the code to poke the speed nibble is so short. This program will conveniently create FAST which can be stored at any location in the user memory. FAST works by changing the speed nibble at #FFF00h from #7h to #Fh. CFAST[D000] << #1FFF00F1F0302331h #C8084612411310D5h #3B82h SYSEVAL #7195h SYSEVAL #44A4h SYSEVAL >> Also, over the last 2.5 years, there has not been what could be considered a really good expanded plotting program posted to the net. The few which I have seen are too long and somewhat slower than need be. In any case, here is one that can be easily entered and quickly run. This program will plot multiple displays for any given expression, program, or equation that is stored in EQ. It works identically to the DRAW found in the PLOT menu which is activated from the interactive mode only. All that is needed for the program to run is to store the expression to be plotted in EQ of the current directory and enter the number of expansions desired in level 1. The program will pause after each display is plotted allowing for the digitize feature to be utilized. To resume plotting simply press the ON/ATTN key. If at any point during the plotting it becomes desirable to move on to the next screen, press ON/ATTN once to stop plotting, and once more to resume. To abort the program press ON/ATTN 3 times very quickly. SCROLLDRAW[658A] << #241AAh SYSEVAL 3 DROPN - IM ABS -> ppar height << 1 - -2 / DUP NEG FOR frame frame height * (0,1) * CENTR #249C9h SYSEVAL #1FF0Ah SYSEVAL ppar #242A2h SYSEVAL NEXT >> >> Note: To expand about the X-axis, change (0,1) to (1,0). To change the direction the program scrolls, negate the 1. ( i.e. (0,-1) ) Rick
n023el@tamuts.tamu.edu (Robert Ellis) (07/24/90)
From n242df Tue Jul 24 07:15:54 1990 Return-Path: <n242df> Received: by tamuts.tamu.edu (/\../\ Smail3.1.14.4 #14.2) id <m0huIYb-00006qC@tamuts.tamu.edu>; Tue, 24 Jul 90 07:15 CDT Message-Id: <m0huIYb-00006qC@tamuts.tamu.edu> Date: Tue, 24 Jul 90 07:15 CDT From: n242df (Korah Karivelithara) To: n023el Once again I'm posting for Rick Grevelle ----------------------------------------------------------------------- >From n233dk Tue Jul 24 03:07:17 1990 Return-Path: <n233dk> Received: by tamuts.tamu.edu (/\../\ Smail3.1.14.4 #14.2) id <m0hfj5N-00001gC@tamuts.tamu.edu>; Tue, 24 Jul 90 03:07 CDT Message-Id: <m0hfj5N-00001gC@tamuts.tamu.edu> Date: Tue, 24 Jul 90 03:07 CDT From: n233dk (Rick Grevelle) To: n023el After a comprehensive review of the comp.sys.handhelds archive, which can be found at the anonymous ftp site csl.sri.com (192.12.33.2), I felt a need to post these programs. In the event that the hp28 has not gone completely by the way of the dinosaurs, there might possibly be someone who could use them. First up, it appears that there was never a posting for the SPEED or FAST program which does not have to be in the home directory, or that requires a POKE program to work. Either of which seems ridiculous to me because the code to poke the speed nibble is so short. This program will conveniently create FAST which can be stored at any location in the user memory. FAST works by changing the speed nibble at #FFF00h from #7h to #Fh. CFAST[D000] << #1FFF00F1F0302331h #C8084612411310D5h #3B82h SYSEVAL #7195h SYSEVAL #44A4h SYSEVAL >> Also, over the last 2.5 years, there has not been what could be considered a really good expanded plotting program posted to the net. The few which I have seen are too long and somewhat slower than need be. In any case, here is one that can be easily entered and quickly run. This program will plot multiple displays for any given expression, program, or equation that is stored in EQ. It works identically to the DRAW found in the PLOT menu which is activated from the interactive mode only. All that is needed for the program to run is to store the expression to be plotted in EQ of the current directory and enter the number of expansions desired in level 1. The program will pause after each display is plotted allowing for the digitize feature to be utilized. To resume plotting simply press the ON/ATTN key. If at any point during the plotting it becomes desirable to move on to the next screen, press ON/ATTN once to stop plotting, and once more to resume. To abort the program press ON/ATTN 3 times very quickly. SCROLLDRAW[658A] << #241AAh SYSEVAL 3 DROPN - IM ABS -> ppar height << 1 - -2 / DUP NEG FOR frame frame height * (0,1) * CENTR #249C9h SYSEVAL #1FF0Ah SYSEVAL ppar #242A2h SYSEVAL NEXT >> >> Note: To expand about the X-axis, change (0,1) to (1,0). To change the direction the program scrolls, negate the 1. ( i.e. (0,-1) ) Rick