AMADEUS html plain
* import java.
class Item92Listener implements ActionListener
viia kursor skeemtipu viimasele elemendile
AmFrame frame;
Item92Listener(AmFrame fr)
konstruktor
public void actionPerformed(ActionEvent event)
AmCanvas c = frame.viewArea;
Editor editor = frame.contents.editor;
Caret caret = editor.caret;
kursor
Scheme source = caret.scheme;
kursori peremees
leida viimase elemendi skeemtipp
Scheme kuhu = (Scheme)goLast(source);
caret.goTo(kuhu);
teha skeemtipp 'kuhu' kursori peremeheks
caret.moveToParentEnd();
viia kursorit peremehe viimasele elemendile
c.caretToScreen();
c.own = true;
c.repaint();
public Object goLast(Scheme sour)
leiab skeemtipu sour viimase mitteikoniseeritud alam-skeemtipu
kui sellist ei leidu, tagastab sour
int bodySize = sour.body.size()-1;
? sour instanceof Sketch
sour on skeem ja ?he haru omab kindlasti
* int i = bodySize; i>= 0; i--
? (!((Scheme)((Sketch)sour).branch(i)).icon)
sour-i mitteikoniseeritud alamharu leitud
<==============goLast(((Sketch)sour).branch(i))
<======
sour on haru
? (((Sketch)sour.parent).containsSubsketch(1))
* int i = bodySize; i>=0; i--
? (sour.body.elementAt(i) instanceof Primitive)
sour-i viimane mitteikoniseeritud element on primitiiv
<==============sour
? (!((Scheme)(sour.body.elementAt(i))).icon)
sour-i mitteikoniseeritud alamskeem leitud
<==============goLast((Scheme)sour.body.elementAt(i))
<======sour