La plupart des claviers d'ordinateur disposent d'un petit voyant à LED intégré, indiquant le mode d'entrée actuel, contrôlé par la touche CAPS LOCK.

Votre tâche est de le faire clignoter:

• Allume ça;
• Attendez 0,5 (+/- 0,1) seconde;
• Éteignez à nouveau.

Les séquences vidéo du clignotement de la LED sont très appréciées!

Règles

• Vous pouvez faire clignoter une autre LED (par exemple, Scroll Lock, Num Lock, statut Wi-Fi, etc.), si vous le souhaitez, mais elle doit être physiquement située sur votre clavier;

• S'il manque une sleepcommande d' une seconde à votre langue , votre programme peut utiliser un délai de 1 seconde, avec une pénalité de +2 octets (c'est pour 0.);

• Votre programme doit clignoter au moins une fois. Ce qui se passe ensuite, vous le souhaitez, c’est-à-dire qu’il peut continuer à clignoter (dans ce cas, vous devez attendre le même délai avant de le rallumer), ou arrêter, etc.

• Si le voyant choisi est allumé par défaut sur votre système, vous pouvez supposer qu'il a été explicitement désactivé (par exemple, manuellement) avant l'exécution du programme.

• C'est code-golf , la réponse la plus courte en octets gagne.

Classement

var QUESTION_ID=110974,OVERRIDE_USER=61904;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Befunge (BEF32), 390 334 305 octets

C'est vraiment idiot, mais tant que ce site accepte la notion que l'interprète définit le langage , je pourrais aussi bien abuser de la règle. Ce code ne fonctionne que dans Win32 Befunge-93 Implementation de Kevin Vigor, version 1.01 (je pense que la seule version disponible). Vous pouvez télécharger le binaire ici .

p55p99+5p65*5p")"5p"M"3*"I~q"+\3*3445"|"2*"lm"2v
v"y"*3\*2"e/n"4\5"nnIn"*833*2"mn"4\7"nnIn"*833*<
>2*"yO"4"DJG"3*\2*55*3"T"4"DLG"3*\2*55*3"/~M"+\3*4446"~A"+4v
>+00p9p:v:"l'"*2"^D"4"l3"*2"^D"4"l"*54*2"^D"4"l"*2+94*2"^D"<
^1:g00-4_5"u1"*-:1+:1+"@"\0p"%"5*\0p"P"\0p@
Sleep kernel32.dll keybd_event user32.dll

Normalement, vous ne vous attendriez pas à ce que ce type de défi soit possible dans un Befunge, mais BEF32 est un port Win32 d’une très ancienne version de l’implémentation de référence, et à l’époque, il n’y avait pas de limite à la vérification de la pcommande (put). Cela nous permet effectivement d’écrire dans n’importe quel emplacement de la mémoire, ce qui nous permet de forcer l’interprète à exécuter du code machine arbitraire.

Maintenant, nous ne pouvons pas réellement modifier le code existant, car la section .text de l'exécutable n'aura pas les droits d'écriture. Cependant, nous pouvons amener le système à exécuter une adresse dans la section .data en écrivant cette adresse dans la atexittable de la bibliothèque d'exécution (du moins, je suppose que c'est bien ce que c'est). Le résultat final est que notre code est automatiquement exécuté à la sortie de l'interpréteur.

Cela repose sur le fait que l'exécutable est chargé à une adresse fixe. Nous savons donc exactement où tout se trouve en mémoire. Cela ne fonctionnerait normalement pas si vous surchargiez les paramètres ASLR par défaut . Cela suppose également que la section .data soit exécutable, bien que l'attribut exécutable ne soit pas défini. Cela ne fonctionnera donc probablement pas si vous surchargez les paramètres DEP par défaut .

Le code lui-même est essentiellement une copie de la technique de Megokeybd_event traduite en code machine:

6823B84000         push "keybd_event"
682FB84000         push "user32.dll"
6810B84000         push "Sleep"
6816B84000         push "kernel32.dll"
BB02000000         mov  ebx,2
               initloop:
89C7               mov  edi,eax
FF1594D14000       call LoadLibraryA
50                 push eax
FF1590D14000       call GetProcAddressA
4B                 dec  ebx
75EE               jnz  initloop
89C6               mov  esi,eax
               flashloop:
6A00               push 0
6A01               push 1
6A45               push 69
6A14               push 20
FFD6               call esi
6A00               push 0
6A03               push 3
6A45               push 69
6A14               push 20
FFD6               call esi
68F4010000         push 500
FFD7               call edi
EBE3               jmp  flashloop

Cette version du code continue de clignoter pour toujours (ou du moins jusqu'à ce que vous mettiez fin au processus), car il s'est avéré qu'il était plus facile de jouer au golf qu'un seul flash.

Et comme tout le monde publie des animations, voici une approximation de ce à quoi cela ressemble sur mon clavier.

AutoHotkey, 29 à 26 octets

_{Merci à @Dane pour avoir économisé 3 octets}

Loop{
Send,{VK14}
Sleep,500
}

J'ai initialement choisi NumLockparce que c'est un caractère plus court que CapsLock. Le GIF ci-dessous reflète cette condition. C'est le même effet que le code modifié ci-dessus. J'aurais pu utiliser la méthode VK90ci-dessus pour que le GIF soit toujours précis, mais l'alignement sur le défi initial se sentait mieux.

En l'honneur du commentaire de mbomb007 , voici un message de code morse sur 239 octets :

s:=000090901009011091100110090111109111901090190110901109091000091001101909101191000911190190109100001090191010919111901091011
Loop,123{
StringMid,c,s,A_Index,1
IfEqual,c,9
{
Sleep,2000
Continue
}
Send,{NumLock}
Sleep,%c%500
Send,{NumLock}
Sleep,500
}

Voici les 30 premières secondes de ce message:

GFA-Basic 3.51 (Atari ST),  61 56 43  35 octets

Ce code fera clignoter à tout jamais le voyant du lecteur de disquette au rythme requis ( PAUSE 25= pause pendant 25/50 secondes).

Ce serait probablement plus court en montage, mais je n'ai pas les outils appropriés à portée de main. Il s'agit de la taille de la liste GFA-Basic une fois enregistrée au format .LST et modifiée manuellement pour supprimer les blancs inutiles, renommer les instructions en chaînes plus courtes et les remplacer CR+LFpar des simples CR. Notez qu'une finale CRest requise.

DO
i=i XOR2
SP &HFF8802,i
PA 25
LO

S'étendra automatiquement à:

DO
  i=i XOR 2
  SPOKE &HFF8802,i
  PAUSE 25
LOOP

SPOKEest un suralimenté POKEqui met d'abord le 68000 en mode superviseur , de sorte qu'il est autorisé à accéder aux zones de mémoire restreintes (ici: l' adresse d' écriture de registre de la puce audio YM2149, qui est également responsable de certaines autres E / S).

Et oui: la LED est physiquement située sur le clavier ... je suppose.

^{Je n'ai pas accès à une vraie ST pour le moment, alors ce n'est qu'une maquette.}

poisson + ckb , 56 54 octets

while cd;echo rgb (random)|tee /d*/*/*/c*;sleep .5;end

Clignote tout mon clavier en couleurs aléatoires, bien que le nombre de chiffres ne soit pas long de 6 chiffres, il est un peu limité.

Et oui, ce shell glob est potentiellement dangereux. Fonctionne sur ma machine ™

Bonus script, 8 mois plus tard: Cela passera par toutes les couleurs. Pas de golf.

#!/usr/bin/fish
while true
        echo rgb (printf '%06x' (random 0 16777215)) | tee /dev/input/ckb*/cmd > /dev/null
        sleep 0.5
end

Bash + Amixer, 45 Octets

a() { amixer set Master toggle
}
a;sleep .5;a

Clignote la lumière muette sur mon clavier.

C (Windows), 79 octets

#include<windows.h>
k(n){keybd_event(20,69,n,0);}f(){k(1);k(3);Sleep(500);f();}

Explication

keybd_eventest une fonction API Windows (obsolète) pour envoyer un événement de clavier (keyup ou keydown). 20est le code de la touche Caps Lock,69 le code de balayage matériel (je ne sais pas ce que cela signifie), ainsi 1que keydown et 3keyup. Une pression sur une touche est simulée en envoyant un événement keydown immédiatement suivi d'un événement keyup. Un appui sur la touche est envoyé pour activer le verrouillage majuscule, puis le programme dort pendant 500 millisecondes, puis un autre appui est envoyé pour désactiver le verrouillage majuscule.

Merci à Steadybox pour un tas d'octets sauvés

MATLAB, 146 136 70

Merci à @Poke d' avoir supprimé 66 octets!

r=java.awt.Robot;while 1
r.keyPress(20)
r.keyRelease(20)
pause(.5);end

Ceci utilise la capacité de Matlab à appeler des classes Java. Le voyant de verrouillage numérique clignote en boucle en appuyant et en relâchant par programmation Num Lock.

La vidéo ou ça ne s'est pas passé .

Code machine x86 pour PC (par exemple, fichier COM MS-DOS), 27 octets

Ce code machine (affiché ici avec un rendu Unicode du CP437 habituel du BIOS du PC) fera clignoter le voyant CAPS LOCK pour toujours sur un PC:

j@▼î▐j`Z░φεê╪εÇ≤♦╞♦◙Ç<☺t∩δ∙

Le code a été créé pour ne contenir aucun octet NULL et peut donc être saisi au clavier (en utilisant l'astuce Alt + XXX pour les caractères étendus) afin de créer un fichier COM (par exemple, en utilisant la COPY CON blink.comcommande sous MS-DOS, auquel cas le fichier de sortie devra contenir un 28 faux ^e octet, la^Z caractère (EOF) nécessaire pour arrêter l'opération de copie).

L’effet est obtenu en envoyant directement des commandes au contrôleur de clavier du PC (port 60h) pour définir l’état des voyants (en tant qu’effet secondaire, il est possible que les voyants Num Lock et Scroll Lock soient dans un état non clignotant aléatoire). Pour minimiser le nombre d’instructions, le minutage est obtenu en utilisant le compte à rebours géré par le BIOS à l’adresse 0040:0040(il décrémente toutes les 54,925 ms, le cycle de clignotement étant de 494,3 ms, ce qui correspond à la marge autorisée) - ce compteur est normalement utilisé par le BIOS pour arrêter le moteur de la disquette; étant donné que le programme n'utilise pas le lecteur de disquette et que le code est supposé s'exécuter dans un environnement à tâche unique (par exemple, DOS), la lecture avec le minuteur du moteur de disquette n'est pas un problème.

Le code fonctionne correctement sous MS-DOS (essayé avec VirtualBox, il devrait également fonctionner correctement sur du matériel réel, bien que je n’aie pas encore le temps de créer une clé USB amorçable MS-DOS à tester). Comme il ne repose sur aucune fonction du système d'exploitation, il peut même fonctionner sans le système d'exploitation (par exemple, en le plaçant dans le secteur de démarrage d'un disque). Il nécessite au moins un processeur 80186 pour s'exécuter, en raison des instructions "push immédiat" utilisées pour raccourcir le code de certains octets.

Code source de l'assemblage:

  PUSH 0x40               ; pushes 0x0040 (BIOS data segment) on the stack
  POP DS                  ; pops it into DS segment selector
  MOV SI, DS              ; copies DS to SI (timer counter is nicely placed at 40:40)
  PUSH 0x60               ; pushes 0x0060 (kbd controller port) on the stack
  POP DX                  ; pops it to DX
loop:
  MOV AL, 0xED            ; 8042 keyboard controller 'set mode indicators' command
  OUT DX, AL              ; outputs the command to the keyboard contr oller
  MOV AL, BL              ; copy BL register to AL
  OUT DX, AL              ; outputs LED state to keyboard controller
  XOR BL, 4               ; toggles bit 2 (CAPS LOCK) for next iteration
  MOV BYTE PTR[SI], 0x0A  ; sets floppy motor countdown timer to 10
wait:
  CMP BYTE PTR[SI], 0x01  ; checks if timer reached 1
  JE loop                 ; if yes, time for next iteration
  JMP wait                ; if not, checks again

Décharge hexadécimale du code assemblé:

6A 40 1F 8C DE 6A 60 5A B0 ED EE 88 D8 EE 80 F3 04 C6 04 0A 80 3C 01 74 EF EB F9

Voici le résultat de l'exécution sous MS-DOS dans VirtualBox (ne fonctionne pas avec DosBox, probablement parce que le contrôleur de clavier n'est pas complètement émulé):

(désolé pour la vidéo tremblante).

SmileBASIC, 36 23 octets

XON MIC
WAIT 30XOFF MIC

Clignote le voyant d'état du microphone. (vidéo à venir)

Python2 - 108 octets

Est-ce que la touche majuscule. Fait intéressant, cela allume en fait uniquement la DEL sans affecter le clavier ni appuyer sur la touche. Vous pouvez changer le 4à la fin 2pour faire numlock. 6fait les deux.

import fcntl,os,time;exec"fcntl.ioctl(os.open('/dev/console',os.O_NOCTTY),19250,%d);time.sleep(.5);"*2%(4,0)

shell + numlockx, 40 à 35 octets

[5 octets sauvés grâce à Ryan.]

Clignote continuellement le voyant NumLock sur les systèmes unix.

numlockx toggle;sleep .5;exec sh $0

Un clignotement, 33 octets

numlockx on;sleep .5;numlockx off

PowerShell , 71 octets

for(){(New-Object -c WScript.Shell).SendKeys('{NUMLOCK}');sleep -m 500}

Remarques

• Clignote pour toujours
• Utilise NUM LOCKpour sauvegarder un octet.

VBS, 75 octets

do
wscript.sleep 500
Createobject("wscript.shell").sendkeys"{numlock}"
loop

Clignote de manière répétée sur la touche Verr Num, tout comme numlockun octet plus court que capslock.

C #, 215 202 198 195 185 octets

Sans me rendre compte que j'ai fait le "même" code que cette réponse de @Mego , allez y faire un tour !.

[System.Runtime.InteropServices.DllImport("user32")]static extern void keybd_event(int v,int s,int f,int e);n=>{for(n=0;;System.Threading.Thread.Sleep(125))keybd_event(20,69,n++&2,0);};

Économisé 13 octets grâce à @Metoniem
Économisé 10 octets grâce à @VisualMelon

Voici une version complète formatée montrant son fonctionnement:

class P
{
    [System.Runtime.InteropServices.DllImport("user32")]
    static extern void keybd_event(int v, int s, int f, int e);

    static void Main()
    {
        System.Action<int> a = n =>
        {
            for (n = 0; ; System.Threading.Thread.Sleep(125))
                keybd_event(20, 69, n++ & 2, 0);
        };

        a(0);
    }
}

Pour le changement amusant bonus n++ & 2à n+=2 & 2et regarder le verrouillage numérique et verrouillage des majuscules clés alternatives en clignotant et hors tension. Je ne sais pas pourquoi cela se produit parce que cela ne devrait pas, mais ça a l'air "cool".

Java 7, 121 118 113 octets

void a()throws Exception{java.awt.Robot r=new java.awt.Robot();r.keyPress(20);r.delay(500);r.keyRelease(20);a();}

Un simple appui et relâchement ne fait que déclencher l'état; ça ne cligne pas des yeux. Ainsi, nous pouvons aussi bien le boucler et il semble que la récursivité soit la manière la moins chère de le faire.

JavaScript, 82 octets

Le crédit va à @FinW fait, je viens de changer l'ancienne fonction en nouvelle fonction de flèche ES6 afin d'économiser quelques octets. Et parce que je n'ai pas assez de points pour commenter, j'ai écrit une nouvelle réponse.

Modifier - Supprimez les crochets pour enregistrer 2 octets supplémentaires.

o=new ActiveXObject("WScript.Shell");setInterval(()=>o.SendKeys("{NUMLOCK}"),500);

Son code ressemblait à ceci

o=new ActiveXObject("WScript.Shell");setInterval(function(){o.SendKeys("{NUMLOCK}")},500);

Scala, 84 83 78 octets

Edit: 1 octet enregistré grâce à @TheLethalCoder,

Il a suggéré d'utiliser 1>0à la place de true.

Edit 2: 5 octets enregistrés grâce à @ Corvus_192,

Il a suggéré d'utiliser la notation infixe et de supprimer les parenthèses après le constructeur

while(1>0){val r=new java.awt.Robot;r keyPress 20;r keyRelease 20;r delay 500}

Ungolfed:

while(1>0) {
    val r=new java.awt.Robot()
    r.keyPress(20)
    r.keyRelease(20)
    r.delay(500)
}

Port Scala standard de la réponse Java de @Poke . Tapez-le directement dans l'invite de l'interprète Scala.

Une vidéo montre le clignotement de ma DEL Caps Lock et de mon OSD pour démarrer!

Terminal Linux, 8 + 11 = 19 octets

Fichier f=1B 5B 33 71 1B 5B 30 71

native@shell:~$ pv f -q -L8

WAT?

Selon ECMA-48 , 1Bcommence la séquence d'échappement de contrôle terminal.

Caps on = 1B 5B 33 71, alors off =1B 5B 30 71

pv vue d'avancement

f fichier

-q silencieux

-L8 8 octets / s = délai de 0,5 seconde

Usage

Préparer

#Create file
echo "1B 5B 33 71 1B 5B 30 71"|xxd -r -p > f 

#Install progress view utility
sudo apt install pv

Ctrl+ Alt+ F6passer à la console native

courir pv f -q -L8

Ctrl+ Alt+ F7revenir

Bash + Xdotool, 36 octets

for((;;)){ xdotool key 66;sleep .5;}

Il suffit de l'exécuter dans un shell bash. Il doit être dans un environnement graphique. Boucle infinie d' ici . Num_Lock changé à 66 pour économiser 6 octets, et grâce à @Michael Kjörling pour 2 octets.

xdotool , 20 octets

key -delay=500 66 66

Appuie deux fois sur la touche 66, également appelée Verrouillage majuscule , avec un délai de 500 ms entre les appuis.

Notez que xdotool est un langage de script. il peut être exécuté à partir d'un fichier et prend même en charge les shebangs. Depuis sesexec commande permet d’exécuter des programmes externes, il est capable de tester les additions et les primalités. Il est donc conforme à notre définition du langage de programmation.

Essai

$ cat blink.xdo; echo
key -delay=500 66 66
$ xdotool blink.xdo

Python utilisant pyautogui: 126 143 115 103 octets

Merci à @ nedla2004 pour avoir économisé 12 octets

from pyautogui import*
import time
while 1:keyDown('capslock');time.sleep(.5);keyUp('capslock')pslock')

Bash, 31 octets

xset led 1;sleep .5;xset -led 1

Fonctionne en X, sans accès root! (Si cela ne fonctionne pas pour vous, consultez la fonction init du code ci-dessous pour vous assurer que xkbcomp est configuré correctement)

Et un script bonus pour envoyer n'importe quel code Morse via majuscule (pas joué au golf):

unit=0.15
id=1
function init {
        file=/tmp/blink_tmp
        xkbcomp $DISPLAY $file
        sed -i 's/!allowExplicit/allowExplicit/' $file
        xkbcomp $file $DISPLAY &>/dev/null
        rm $file
}
if [[ -z $1 ]]; then
        echo "Usage : blink [message]"
        exit 1
fi
init
function finish {
        off
}

function on {
#su -c 'setleds -L +caps < /dev/console'
xset led $id
}
function off {
#su -c 'setleds -L -caps < /dev/console'
xset -led $id
}
function slp {
        sleep $(echo "$unit*$1" | bc)
}
function dot {
on
slp 1
off
slp 1
}
function dash {
on
slp 3
off
slp 1
}
function gap {
        slp 3
}
function morse {
        msg=$1
        for (( i=0; i<${#msg}; i++ )); do
                char=${msg:$i:1}
                if [[ $char == "-" ]]; then
                dash
                elif [[ $char == "." ]]; then
                dot
                elif [[ $char == "/" ]]; then
                gap
                fi
        done
}
while true; do
        morse $1
done

Exemple: blink "...././.-../.-../---//.--/---/.-./.-../-..///"

Bash + setleds , 43 bytes

setleds -D +caps;sleep 0.5;setleds -D -caps

Assez simple. Utilise setledspour basculer la lumière.

Bash, 103 octets

cd /sys/class/leds/asus\:\:kbd_backlight;while true;do echo 3;sleep .5;echo 0;sleep .5;done>brightness

Doit être exécuté en tant que root.

Le clignotement de tout le rétroéclairage du clavier fonctionne-t-il? (vidéo à venir quand je rentre à la maison)

JavaScript, 90 octets

o=new ActiveXObject("WScript.Shell");setInterval(function(){o.SendKeys("{NUMLOCK}")},500);

Cela ActiveXsignifie que cela ne fonctionnera que sur IE (Edge ne le prend pas en charge, cependant). La touche NUMLOCK clignote car, comme pour les autres réponses, elle est plus courte que CAPSLOCK ou SCROLLLOCK.

Ungolfed

shell = new ActiveXObject("WScript.Shell");
setInterval(
    function(){
        shell.SendKeys("{NUMLOCK}")
    }
,500);

Bash, 33 octets

Cela suppose que Num-Lock soit activé avant son exécution. Changer offet onautrement. Requiert le numlockxpaquet évidemment;)

numlockx off;sleep .5;numlockx on

Modifier:

Saw Alex Howansky a déjà posté cette solution, mais ne l’a pas marquée avec Bash et je viens de chercher le site pour "Bash".

Fichier de commandes (avec l'aide de vbs), 74 + 2 = 76 octets

echo Createobject("wscript.shell").sendkeys"{numlock}">z.vbs&z&timeout 1&z

Partiellement basé sur la réponse de Trelzevir .

.vbsest automatiquement inclus dans PATHEXT.

Script Kotlin, 72 octets

Bien que ce ne soit pas le plus petit, c'est quand même assez bon. J'adore la course de kotlin pour certaines choses, et c'est l'une d'entre elles (plus petite que val r = java.awt.Robot () car nous n'avons pas besoin à la fois de r. Et de val r =. Pourtant, c'est plus long que MathLab)

java.awt.Robot().run{while(1>0){keyPress(20);keyRelease(20);delay(500)}}

Ungolfed:

java.awt.Robot().run {
    while(1>0) {
        keyPress(20)
        keyRelease(20)
        delay(500)
    }
}

Python3, 55 à 49 octets

Merci @NoOneIsHere pour -4 octets!

Cela inclut les paquets: pyautogui et les timemodules
Code:

while(1):pag.press("capslock");time.sleep(0.5)  

Merci @NoOneIsHere pour -4 octets!
La clé en action:

VBA, 82 octets

VBE anonyme Fonction de fenêtre immédiate qui ne prend aucune entrée et gêne l'utilisateur indéfiniment. Dépendant de la fonction windows kernel32 qui est déclarée ci-dessous.

Déclaration de sommeil (Win-32)

Declare Sub Sleep Lib "kernel32" (ByVal M&)

Déclaration de veille (Win-64, + 8 octets)

Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal M&)

Fonction de fenêtre immédiate VBE anonyme

Do:SendKeys"{CAPSLOCK}":Sleep 500:DoEvents:Loop

Version légèrement plus amusante, 97 octets

Un ensemble de sous-programmes mutuellement récursifs qui dérangent indéfiniment l'utilisateur

Sub A
Application.OnTime Now+5.8E-6,"B"
End Sub

Sub B
DoEvents
SendKeys"{CAPSLOCK}"
A
End Sub

Version discutable, 66 + 2 octets

Je ne sais pas si le fait de devoir déclarer une fonction à partir d'une dll compte comme une fonction intégrée. Dans le cas contraire, voici une version de 66 + 2 octets qui attend 1 seconde

Do:DoEvents:Application.Wait Now+#0:0:1#:SendKeys"{CAPSLOCK}":Loop