AMADEUS html plain
import java.util.*;
import java.awt.event.*;
class Item34iListener
class Item34iListener implements ActionListener
Edit + ?Paste
AmFrame frame;
Item34iListener(AmFrame fr)
konstruktor
public void actionPerformed(ActionEvent event)
String t1 = "", t2 = "", t3 = "";
AmCanvas c = frame.viewArea;
formeerida t1, t2, t3
? Am.clipboard.obj instanceof Sketch
skeem?
Sketch s = (Sketch)(Am.clipboard.obj);
t1 = AmLocale.Sketch()+". ";
t2 = tuu"p
??s.type
? Scheme.SIMPLE:
t2 = AmLocale.Simple()+". ";
<======
? Scheme.LOOP:
t2 = AmLocale.Loop()+". ";
<======
? Scheme.MODULE:
t2 = AmLocale.Module()+". ";
<======
? :
t2 = new Integer(s.type)+ ". ";
t3 = "\n" + AmLocale.Base() + ": "
+ BaseLanguage.items[s.baseLanguage.type]+ ". ";
<======
? Am.clipboard.obj instanceof Arrow
nool?
Arrow p = (Arrow)Am.clipboard.obj ;
t1 = AmLocale.Arrow() + ". ";
t2 = [otsatase]<- - -----
? p.type == Arrow.STRONG
t2 = "[" + new Integer(p.level) + "]" + "<---------";
<======
t2 = "[" + new Integer(p.level) + "]" + "<- - - - -";
<======
? Am.clipboard.obj instanceof PrimitiveMember
primitiiv?
PrimitiveMember p = (PrimitiveMember)Am.clipboard.obj ;
t1 = AmLocale.Primitive() + ". ";
t2 = tuu"p
??p.type
? Primitive.SIMPLE:
t2 = AmLocale.Simple()+". ";
<======
? Primitive.CONDITION:
t2 = AmLocale.Condition()+". ";
<======
? :
t2 = new Integer(p.type)+ ". ";
<======
? Am.clipboard.obj instanceof PrimitiveHead
primitiivpa"is?
PrimitiveHead p = (PrimitiveHead)Am.clipboard.obj ;
t1 = AmLocale.Head() + ". ";
t2 = tuu"p
??p.type
? PrimitiveHead.SIMPLE:
t2 = AmLocale.Simple()+". ";
<======
? PrimitiveHead.LOOP:
t2 = AmLocale.Loop()+". ";
<======
? PrimitiveHead.SWITCH:
<======
? PrimitiveHead.CASE:
<======
..case
? PrimitiveHead.DEFAULT:
<======;
..case
? PrimitiveHead.TRY:
<======
? PrimitiveHead.CATCH:
<======;
..case
? PrimitiveHead.FINALLY:
<======
? :
t2 = new Integer(p.type)+ ". ";
<======
? Am.clipboard.obj instanceof Branch
haru?
Branch br = (Branch)Am.clipboard.obj ;
t1 = AmLocale.Branch()+". ";
t2 = tuu"p
??br.type
? Scheme.SIMPLE:
t2 = AmLocale.Simple()+". ";
<======
? Scheme.LOOP:
t2 = AmLocale.Loop()+". ";
<======
? Scheme.MODULE:
t2 = AmLocale.Module()+". ";
<======
? :
t2 = new Integer(br.type)+ ". ";
t3 = "\n" + AmLocale.Base() + ": "
+ BaseLanguage.items[br.baseLanguage.type]
+ ". ";
<======
? Am.clipboard.obj instanceof Vector
Vector v = (Vector)Am.clipboard.obj;
String tag = (String)(v.elementAt(0));
t1 = liikmete grupp / päiste grupp / elementide grupp?
? tag.compareTo("members") == 0
liikmete grupp?
t1 = AmLocale.Group_of_members() + ". ";
<======
? tag.compareTo("heads") == 0
päiste grupp?
t1 = AmLocale.Group_of_heads() + ". ";
<======
? tag.compareTo("elements") == 0
elementide grupp?
t1 = AmLocale.Group_of_row_elements() + ". ";
<======
? tag.compareTo("rows") == 0
ridade grupp?
t1 = AmLocale.Group_of_rows() + ". ";
AmDialog d = new AmDialog(frame, AmLocale.Clipboard(),
AmDialog.B_OK, t1 + t2 + t3);