Help for this page

Select Code to Download


  1. or download this
    #1 degree in rads is pi divided by 180 = .01745 
    $mw->bind('<Left>',sub{ &rotate(.01745) });
    ...
    $mw->bind('<Up>',sub{ &power(10) });
    $mw->bind('<Down>',sub{ &power(-10) });
    $mw->bind('<space>', sub{ &fire}  );
    
  2. or download this
    #1 degree in rads is pi divided by 180 = .01745 
    my ($kleft, $kright, $kup, $kdown);
    ...
    $mw->bind('<Down>',sub{ $kdown ||= $mw->repeat(50, sub { &power(-10) }
    +) });
    $mw->bind('<KeyRelease-Down>',sub{ $kdown->cancel; undef $kdown });
    $mw->bind('<space>', sub{ &fire}  );
    
  3. or download this
    ------------
    :Wq
    Not an editor command: Wq