Emu41 - Printable Version +- HP Forums (https://archived.hpcalc.org/museumforum) +-- Forum: HP Museum Forums (https://archived.hpcalc.org/museumforum/forum-1.html) +--- Forum: Old HP Forum Archives (https://archived.hpcalc.org/museumforum/forum-2.html) +--- Thread: Emu41 (/thread-225859.html) |
Emu41 - Richard L. Taylor - 06-27-2012 Hi all, I was given this small program for the Emu41, by the creater of the Emu41 to read numbers from an ascii text file into the main memory of the Emu41. 34*LBL IMPORT 35 AUTOIO 36 "DOSLINK" 37 FINDID 38 SELECT 39 CLRDEV 40 0 41*LBL 04 42 INA 43 ALENG 44 X=0? 45 GTO 05 46 AVIEW 47 RDN 48 ANUM 49 STO IND Y 50 RDN 51 1 52 + 53 GTO 04 54*LBL 05 55 RTN 56 END
Does any one know how to change it to read the numbers from the ascii file directly into an extended memory file? Thank you in advance.
Rich
Re: Emu41 - J-F Garnier - 06-28-2012 You have to replace the line 49 STO IND Y with SAVEX, and create the extended memory file before or at the beginning of IMPORT, with something like that: "MYFILE"
Re: Emu41 - Richard L. Taylor - 06-28-2012 Thank you so much J-F for the help.
Thanks Re: Emu41 - J-F Garnier - 06-29-2012 Well, you can use the GETX function to get the numbers one by one in X register: LBL VNUM (view numbers)
Re: Emu41 - Richard L. Taylor - 06-29-2012 Thank you for the help.
Thanks again for your help. Re: Emu41 - Ángel Martin - 06-30-2012 Sounds like a nice project, make sure you post the maps when complete - I'm sure you'll enjoy the work.
Re: Emu41 - Richard L. Taylor - 06-30-2012 Thank you for your interest in the project. I have only had some experience in programing in 1977 Fortran. I must say I like programing the HP41cx. Some of my project data files are quite large. For example, highway I80 across northern Nevada has about 1,800 points to plot. I have to break it up into several files of 120 points. I also have to write the program in such a way that I use several subroutines in which I call them up and use them, then delete them form the main program to save memory.
Rich
|