Keyboard macros: Difference between revisions

=={{header|AutoHotkey}}==

{

TrayTip, counting, %A_Index% press alt-p to pause

TrayTip, resume, resuming, 2

Pause, off

See [http://www.autohotkey.com/forum/topic44290.html&highlight=vim ahk-viper-mode] for a context sensitive vi key bindings example.

 

=={{header|BBC BASIC}}==

===Native===

*KEY 2 |!|B

REPEAT

DEF PROCmethod2

PRINT "You pressed F2"

===Windows===

{{works with|BBC BASIC for Windows}}

VK_F1 = &70

VK_F2 = &71

DEF PROCmethod2

PRINT "You pressed F2"

 

=={{header|C}}==

 

The following example grabs Alt+F6 and Alt+F7 system-wide on a X server.

#include <stdlib.h>

#include <X11/Xlib.h>

}

return EXIT_SUCCESS;

 

=={{header|Clojure}}==

 

The following example is at application level, printing out what key was pressed:

(ns hello-seesaw.core

(:use seesaw.core))

pack!

show!)))

 

=={{header|EchoLisp}}==

The '''(meta-key "key-value" "bound-string")''' function binds a modifier+key keypress to a string or function call.

;; see initial bindings : GREEK DICTIONARY

(meta-keys) → (("0" "❌") ("1" "❗️") ("2" "❓") ("3" "✔️") ("4" "⛔️") ("5" "✅") ("6" "🚩") ("7" "⌚️")

(meta-key "A" "Antoinette") ; string

(meta-key "H" "(begin (writeln 'HELLO) (date 'today))") ; function call

 

=={{header|HicEst}}==

CALL F2

! ...

! Fn is suspended if m > n AND n <= 5, else Fm is queued

! ...

 

=={{header|Icon}} and {{header|Unicon}}==

 

This is application-specific and works in both languages:

global kMap

 

procedure italicsOff()

return "<\\i>"

 

Sample run:

 

=={{header|Java}}==

package keybord.macro.demo;

 

}

}

 

=={{header|JavaScript}}==

The example below captures the F7 key when pressed, if the document (that is, the web page) has focus. If the function returns ''false'', the event processing is halted. If it returns any other value, including ''undefined'', the event continues up the DOM tree ('bubbling').

 

if (evt.keyCode === 118) {

alert("You pressed F7!");

return false;

}

 

See [http://www.quirksmode.org/js/keys.html quirksmode] for more information about key detection in JavaScript.

 

=={{header|Kotlin}}==

{{trans|Java}}

 

import javax.swing.JFrame

isVisible = true

}

 

Map the keystroke t to a simple script

 

=={{header|Oz}}==

Window-specific key bindings:

[QTk] = {Module.link ['x-oz://system/wp/QTk.ozf']}

Label

action:toplevel#close

)}

 

 

 

 

 

 

}

}

 

=={{header|Phix}}==

===application===

Shows how to link a specific key (C) to a specific function, and

a general key handler.

Obviously K_C and K_F2 could be swapped without any problem.

 

===system===

A low-level (windows 32-bit only) demo for system-wide keyboard macros,

of "keyboard macros" - though of course you could easily replace that

SendInput call with any routine of your choosing.

 

=={{header|PicoLisp}}==

global variable, 'Up' and 'Down' arrows to increment or decrement that value,

and 'Home' to print the current value to the console.

 

(fkey *XtF1

 

(fkey *XtHome

Output when hitting 'F1', 'Down', 'Up', 'Up' and 'Home':

<pre>Initialized value to 1

PureBasic has support for shortcut/macro creation in any window that supports events. This allows for creation of both single and combinations as shown in the code below.

For full set of combinations on PC, Mac & Linux please see the official manual, [http://www.purebasic.com/documentation/window/addkeyboardshortcut.html here].

#Demo1 = 0

#Demo2 = 1

EndSelect

ForEver

 

=={{header|Python}}==

Works on Unix platforms.

 

import curses

 

curses.echo()

curses.endwin()

 

=={{header|Racket}}==

 

#lang racket

 

macros '())]

[else (write-byte b) (flush-output) (loop inps v '())])))))

 

=={{header|REBOL}}==

Title: "Keyboard Macros"

URL: http://rosettacode.org/wiki/Keyboard_macros

pad 1x100 return

text "(c) 1977 G. Beker"

 

=={{header|REXX}}==

<br><br>REXX programs not included are '''$T''' which is only used when specific options are used (used when TOPS is specified),

<br>the '''$ERR''' program which issues errors, and '''$H''' which shows '''help''' and other documentation.

trace off

parse arg !

syntax: !sigl=sigl; call er 13,!FID(2) !FID(3) !sigl !cal() condition('D') sourceline(!sigl)

whenstamp: arg whenFID; call lineout whenFID,strip(left(date('U'),6)left(date("S"),4) time() arg(2)); call lineout whenFID,' '; call lineout whenFID; return

 

=={{header|Ring}}==

load "guilib.ring"

 

on 16777265 see "You pressed F2 " + nl

off

Output:

<pre>

Here's a sample from the Shoes manual showing how to capture key sequences. This is application specific.

 

@info = para "NO KEY is PRESSED."

keypress do |k|

@info.replace "#{k.inspect} was PRESSED."

end

 

A more specific example, using some emacs bindings

 

keypress do |key|

case key

end

end

 

=={{header|Scala}}==

===Java Swing Interoperability===

 

import javax.swing.{JFrame, JLabel, WindowConstants}

}

 

=={{header|Tcl}}==

{{libheader|Tk}}

All Tk bindings are bound to a context that is no wider than a particular application and is frequently smaller (e.g., a single dialog box or an individual widget).

# Show off some emacs-like bindings...

pack [label .l -text "C-x C-s to save, C-x C-c to quit"]

tk_messageBox -message "We would save here"

}

===Key-to-key mapping macros===

A more direct macro-like facility (substituting one key sequence for another) would be:

foreach c [split "Macro demo!" {}] {

event generate %W $c

}

This can then be wrapped up like this:

proc sendMacro {w string} {

foreach c [split $string {}] {

macro F2 "You pressed the F2 key"

macro F3 "I'm getting bored here..."

 

=={{header|Vedit macro language}}==

// The menu item may then contain the commands directly, or it may call a macro from disk.

// This has the advantage that the key binding is shown in the menu.

 

// Remove a key assignment. If INSERT option was used when the key was assigned, the old assignment will come in effect again.

 

 

 

{{omit from|ACL2}}