File: TestCalc.jss

package info (click to toggle)
libbsf-java 1%3A2.3.0%2Bcvs20050308-2
  • links: PTS
  • area: contrib
  • in suites: sarge
  • size: 1,444 kB
  • ctags: 1,264
  • sloc: java: 7,643; cpp: 2,514; xml: 1,786; jsp: 463; ansic: 182; makefile: 59; python: 45; sh: 29
file content (63 lines) | stat: -rw-r--r-- 1,735 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
/*********************************************************
'* A simple four function calculator, written in JScript *
'*********************************************************/

// *** create a result window
var result = CreateBean("java.awt.TextField", "0")

// *** create a panel of buttons
var panel = CreateBean("java.awt.Panel");
panel.setLayout( CreateBean("java.awt.GridLayout", 4, 4));

buttons = new String("789*456/123-C0.+");
for(  i= 0 ; i< buttons.length; ++i)
{
   label = buttons.substring(i,i+1);
   var button = CreateBean("java.awt.Button", label);
   panel.add( button);

   if(-1 != "*/-+".indexOf(label))
     button.onaction="op(\"" + label + "\")";
   else if (label=="C") 
     button.onaction="mem=0 ; nextOp=\"+\" ; result.text=\"0\";"
   else 
     button.onaction="press(\"" + label + "\");"
} 

// *** Place everything in the frame
frame.title = "JScript Calc";
frame.resize( 130, 200);
frame.add( "North", result );
frame.add( "Center", panel );
frame.validate()

// *** Initialize the state of the calculator
mem = 0
nextOp = "+"
autoClear = true

// *** handle data entry keys
function press (key)
{
   if( autoClear ) result.text="0";
   if(result.text=="0" &&  key!= "." ) result.text = "";
   if( key=="." && (-1 != result.text.indexOf(".")))  key="";
   result.text = result.text + key;
   autoClear=false;
}

//  *** handle arithmetic keys
function op(key)
{
   err=0;
   num = parseFloat(result.text); //+0;
   if( nextOp == "+" ) mem = mem + num;
   if( nextOp == "-" )  mem = mem - num;
   if( nextOp == "*" )  mem = mem * num;
   if( nextOp == "/" )  mem = mem / num;
   nextOp = key

   result.text = "" + mem;
//   If err>0 then result.text="ERROR" : mem=0 : nextOp="+"
   autoClear=true;
}