AMADEUS html plain
* import java.
class Item96Listener implements ActionListener
viia kursor vasakule kolleegile
AmFrame frame;
Item96Listener(AmFrame fr)
konstruktod
public void actionPerformed(ActionEvent event)
AmCanvas c = frame.viewArea;
Editor editor = frame.contents.editor;
Caret caret = editor.caret;
Scheme sourceParent = null;
skeemtipp, mille sees toimub liikumine
Scheme source = null;
sourceParent alampuu juur skeemtipu liiki
Primitive primitiveSource = null;
sourceParent alampuu juur primitiivi liiki
source = caret.scheme;
? caret.inPrimitive() && !caret.inHead()
kursor asus primitiivis
sourceParent = caret.scheme;
primitiveSource = caret.primitive;
<======
kursor asus skeemtipul
? source.level() == 0
skeempuu juurel kolleegi ei ole
caret.goTo(source);
viia kursori peremehe kommentaari
<==========
sourceParent = source.parent;
peremehe \"ulemskeem
int i;
? primitiveSource != null
kursor asus primitiivis
i = sourceParent.body.indexOf(primitiveSource)-1;
<======
kursor asus skeemtipul
i = sourceParent.body.indexOf(source) - 1;
? i < 0
kursor asus esimeses alampuus
<======
Primitive caretPrimitive = null;
boolean k = true;
* ;(i >= 0) && k;
otsida esimest sobiva vasakkolleegi
Object o = sourceParent.member(i);
? o instanceof Scheme
source =((Scheme)o);
? !source.icon
caret.goTo((Scheme)o);
k = false;
<======
? o instanceof Primitive
source = sourceParent;
caretPrimitive = (PrimitiveMember)o;
Cursor abiCaret = new Cursor(source, caretPrimitive);
caret.goTo(abiCaret);
k= false;
i = i-1;
c.own = true;
raami tahvli saab \"umberjoonistada
c.caretToScreen();
c.repaint();