Important Notice: Due to repeated WikiSPAM attacks it was nessesary to change the access policy! Only registered users can now edit.

Office/FX-602P/Test

From UIQ3 open-source software

Jump to: navigation, search
Main Page > Office > FX-602P > Office/FX-602P/Test

The following test programs are included inside the FX-602P-Prog-0.x.xx.zip file. They are used the functionality of the simulator. Some are also used for Speed Tests.

Contents

[edit]

Test Programs

[edit]

Test00 

***P0
       24 Min0F AC 2 × (((3 + 4 × ((5 + 4 ) ÷ 3 ) ) ÷ 5 ) + 9 ) = 
   x=F “# ok!“
       HLT AC 
***P1
       “Enter X“ HLT Min00 
LBL0 
       “X= AR00 “
    DSZ GOTO0        
***P2
       AC 1 + π = Min0F AC 1 + EXP = 
   x=F “# ok!“
       HLT AC 
***P3
       12 °'” 34 °'” 56.78 °'” °'”← HLT “w=#“
P0 
tests the formula on page 9 of the original manual as well as comparison and branch operating followed by an alpha string. The correct result is 24 and "ok!" should be displayed.
P1 
test the entry of a number after an alpha string and HLT operationg. Note that AC is intensionaly missing at the begin of the programm "1 P1 3 ENTER" should result in a count down from 13 downwards.
P2 
Test EXP works like π when no number has been entered.
P3 
°'” and °'”← inclusive ALPHA display.
[edit]

Test01

Optimized increment loop without display 

***P0
       AC 0 Min00 
LBL0 
   ISZ GOTO0 
       
***P1
       AC 100 Min00 ““
LBL0 
       “; AR00  → “
    DSZ GOTO0
P0 
increments until AC is called - which is done after 1 minute. The result is found in M00 and is used in speed test 1.
P1 
decrement counter from 100 with sliding alpha display.
[edit]

Test02

Simple increment loop with Display. 


***P0
       1 Min00 
LBL0 
       “X= AR00 “ M+00 GOTO0
P0 
Increments and displays intermediate results until AC is called - which is done after 1 minute. The result is found in M00 and is used in speed test 2.
[edit]

Test03

The The Museum of HP Calculators Calculator Benchmark. It calculates the Eight queens puzzle. 


***P0
       AC MAC 8 Min0F 
LBL0 
       MR00 
   x=F GOTO4         
   ISZ MR0F 
       IND Min00 
LBL1 
       1 M+1F MR00 Min09 
LBL2 
       1 M-09 MR09 
   x=0 GOTO0 
       IND MR00 - IND MR09 = 
   x=0 GOTO3 
       abs + MR09 - MR00 = 
   x=0 GOTO3 
       GOTO2 
LBL3 
   IND DSZ GOTO1         
   DSZ GOTO3 
       
LBL4 
       MR1F

The result is stored in M01 .. M08, the time to calculate is used in speed test 3.

Expected Result:
Register Value
L0 (x) 876
M00 8
M01 8
M02 4
M03 1
M04 3
M05 6
M06 2
M07 7
M08 5
M09 0
M0F 8
M1F 876
[edit]

Test04

The program is an implementation of the Γ function from Viktor T. Toth Calculator Page. 


***P0
       Min00 1 Min01 5 Min0F 
LBL1 
       MR00 
   x≥F GOTO2 
       MR00 × MR01 = Min01 1 M+00 
   GOTO1 
       
LBL2 
       MR00 × ln - MR00 + (2 × π ÷ MR00 ) √ ln + ((((99 1/x 
       ÷ MR00 x² - 140 1/x )
       ÷ MR00 x² + 105 1/x ) 
       ÷ MR00 x² - 30 1/x ) 
       ÷ MR00 x² + 1 ) 
       ÷ 12 ÷ MR00 - MR01 ln = 
***P1
       AC MAC 1
   GSBP0 
       e^x Min10 π
   GSBP0 
       e^x Min11 1 e^x 
   GSBP0 
       e^x Min12 5
   GSBP0 
       e^x Min13 - 4 x! = Min03 10
   GSBP0 
       e^x Min14 - 9 x! = Min04 50
   GSBP0 
       e^x Min15 - 49 x! = Min05


The test is started with P1 which calculates a few samples and stores the result in memory register. The time to calculate is used in speed test 4.

Expected Result
Register Real FX-602P Simulator
M03 0 8.353467E-10
M04 0 6.69E-09
M05 -1.39E54 -3.47696E-50
M10 1 1
M11 2.288037796 2.288037807
M12 1.567468256 1.567468291
M13 24 24
M14 362880 362880
M15 6.082818626E62 6.08281864E62
[edit]

Test05

The percentage calculations from page 19 and 20 of original manual enhanced by some alpha output so that one can easily see if the test was successful. 

***P0
       AC 255 Min0F AC 1500 × 17 % 
   x=F “# ok!“
       HLT AC 713 Min0F AC 620 × 15 % + 
   x=F “# ok!“
       HLT AC 7.2288 Min0F AC 7.53 × 4 % - 
   x=F “# ok!“
       HLT AC 
***P1
       AC 81.25 Min0F AC 7.8 ÷ 9.6 % 
   x=F “# ok!“
       HLT AC 
***P2
       AC 160 Min0F AC 300 + 500 % 
   x=F “# ok!“
       HLT AC 
***P3
       AC 15 Min0F AC 46 - 40 % 
   x=F “# ok!“
       HLT AC 20 ± Min0F AC 400 - 500 % 
   x=F “# ok!“
       HLT AC 
***P5
       1500 × × 15 % “225=#?“ HLT 23 % “345=#?“ HLT 25 % “375=#?“ HLT AC 
***P6
       AC 192 ÷ ÷ 30 % “15.625=#?“ HLT 156 % “81.25=#?“ HLT AC 
***P7
       AC 1200 + + 600 % “150=#?“ HLT 510 % “142.5=#?“ HLT AC
***P8
       AC 150 - - 138 % “-8=#?“ HLT 156 % “4=#?“ HLT AC
P0 
× % (1 samples) × % + (1 samples) × % - (1 samples)
P1 
÷ % (1 sample)
P2 
+ %
P3 
- %
P5 
× × % (3 samples)
P6 
÷ ÷ % (2 samples)
P7 
+ + % (2 samples)
P8 
- - % (2 samples)
[edit]

Test06

Test RND, FIX and ENG display from 20 of original manual enhanced by some alpha output so that one can easily see if the test was successful. 

***P0
       AC 100 ÷ 6 = RND4 “1.667E 01=#?“ HLT FIX5 “16.66667=#?“ HLT AC 
***P1
       AC 200 ÷ 7 = FIX3 “28.571=#?“ HLT × 14 = “399.994=#?“ HLT AC 
***P2
       AC 123 × 456 = ENG ENG “56.088E 03=#?“ HLT AC 7.8 ÷ 96 = ENG ENG “81.25E-03=#?“ HLT AC
[edit]

Program Library

[edit]

Mathematic

[edit]

M-01 

***P0
       Min01 AC “Start”
   GOTO2 
       
LBL1 
       MR01 ÷ 2 “;×#” HLT = Min01 - 1 = 
   x=0 GOTO0 
       
LBL2 
       MR01 ÷ 2 = FRAC 
   x=0 GOTO1 
       
LBL3 
       3 Min02 
LBL4 
       MR01 √ Min0F 1 M+0F 
LBL5 
       MR01 ÷ MR02 
   x≥F GOTO7 
       = FRAC 
   x=0 GOTO8 
       
LBL6 
       2 M+02 
   GOTO5 
       
LBL8 
       MR01 ÷ MR02 × MR02 - MR01 = 
   x=0 GOTO9 
       
   GOTO6 
       
LBL9 
       MR01 ÷ MR02 “;×#” HLT = Min01 
   GOTO4 
       
LBL7 
       MR01 “;×#” HLT 
LBL0 
       “;×END”
Retrieved from "http://uiq3.sourceforge.net/wiki/index.php/Office/FX-602P/Test"
Personal tools