AMADEUS html plain
import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
class Item51sListener
class Item51sListener implements ActionListener
Insert+HeadedLoop
Item51Listener analoog
AmFrame frame;
Item51sListener(AmFrame fr)
konstruktor
public void actionPerformed(ActionEvent event)
uus lihtskeem:
Sketch sk = Item50Listener.makeSimpleSketchAtCaret(frame, false);
sk.type = Scheme.LOOP;
muuta skeemi tüüp
lisada päis:
sk.insert(new PrimitiveHead(PrimitiveHead.LOOP,
new Text(Default.sketchHeadColor)), 0);
Item50Listener.insertSketchAtCaret(frame, sk);
lisada