Try to learn something about everything, and everything about somethingThomas Huxley “Darwin's bulldog” (1824-1895)

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision
Previous revision
public:calculator:guides:dm41_save_stats [10/02/26 17:41 GMT] – [Multiple Saved Files] johnpublic:calculator:guides:dm41_save_stats [10/02/26 18:01 GMT] (current) – [Multiple Saved Files] john
Line 118: Line 118:
  
 I've set up **two** data files : ''REGS'' and ''CHESS'' in extended memory and made **two** version of the simple program above, the only change is to alter the lines which put the name of the file in ''ALPHA'' I've set up **two** data files : ''REGS'' and ''CHESS'' in extended memory and made **two** version of the simple program above, the only change is to alter the lines which put the name of the file in ''ALPHA''
 +
 +
 +Then I thought of adding a 7th Register holding the ''DATE'' of the latest ''SAVE'' for the ''CHESS'' statistics, so I can keep track of whether I'm up to date in entering the scores.
 +
 +Delete the original ''CHESS'' Data File & make a new one with 7 registers 
 +
 +  * ''ALPHA'' -> ''CHESS''
 +  * execute ''PURFL''
 +  * ''X'' = ''7''
 +  * ''ALPHA'' still -> ''CHESS''
 +  * execute ''CRFLD'' to create the new 7-register data file
 +
 +
 +The date is automatically stored in the register just //after// the ''Stats'' - in general in ''R18'' when ''ΣREG'' is ''12'' - and automatically adapts the register used depending on ''ΣREG?''
 +
  
 Here is ''SAVEC'' and ''GETC'' for save''C''hess and get''C''hess Here is ''SAVEC'' and ''GETC'' for save''C''hess and get''C''hess
 +
  
 <code> <code>
Line 128: Line 144:
 SEEKPTA SEEKPTA
 ∑REG? ∑REG?
 +STO 01
 +6
 ++
 +STO 00
 +DATE
 +STO IND 00
 +RCL 01
 1.001 1.001
 * *
-.005+.006
 + +
 SAVERX SAVERX
Line 148: Line 171:
 SEEKPTA SEEKPTA
 ∑REG? ∑REG?
 +STO 01
 +6
 ++
 +STO 00
 +RCL 01
 1.001 1.001
 * *
-.005+.006
 + +
 GETRX GETRX
-¬CHESS OK+CLA 
 +RCL IND 00 
 +¬LAST  
 +ADATE
 AVIEW AVIEW
 PSE PSE

Navigation