salut
bon voilà pour une lecture vite fait

"Mettez le dossier "pendu" dans le dossier d'installation de mIRC ( C:\Users\<votre user>\AppData\Roaming\mIRC )"
en utilisant $scriptdir je pense que tu n'aura plus besoin de le faire

en effet j'avais fais un truc de pendule mais different que je n'ai jamais posté d'ailleur :p mais bon

voilà une idée j'espere qu'elle sera utile
alias choose peut etre comme ça

alias choose {
  var %m $2
  tokenize 44 %x
  var %file $iif($findtok($1-, [ %m ] $+ .txt,32),$($+($,$v1),2),$($+($,$r(1,$0)),2))
  if (!$findtok($1-, [ %m ] $+ .txt,32)) && %m  { msg # $1 n'existe pas, vous avez eus un type aléatoire }

a mon propre avis j'evite trop de condition (lignes 29-36) en faisan ça

msg $$1 le mot cherché est en raport avec: $remove(%file,.txt)


on *:TEXT:*:#:{
if (($strip($1) == !pstop) && ($nick isop #)) {

remplace && ($nick isop #) par "@" sur le level

on @*:TEXT:*:#:{
if $strip($1) == !pstop {

je sais pas mais mais je pense qu'avec un fichier .ini sera moin compliqué

bon dans ce cas (le cas des caractères accolé comme tu l'a dis) tu utilise une regex

if $regex($1-,/(\s\Q $+ $me $+ \E\b/iS)) { ... }

oui mais if %var { cmd } si "%var" n'existe pas, a une valeur $null, ou $false ça ne derrange pas

a propos des variables inutile tu peux utilisé $iif()

$iif($did(12).state,set,unset) %play.son 1

de rien :)
mais je vois quelques complication (si je peux bien le dire) comme:
if $var(%play.son) met juste if %play.son t'as pas besoin de l'identifieur

if $devent == close {
  if $did(12).state == 1 { set %play.son 1 }
  else unset %play.son
}

peux etre ecrit comme ça aussi si tu veux

if $devent == close { set %play.son $did(12).state }

dans $devent == init tu peux enlevé le did -a et mettre la variable directement dans le dialog

did -a $dname 2 %txthlpv
did -a $dname 6 %txthlps

devient dans le dialog

edit %txthlpv, 2, 9 87 93 10, autohs center

edit %txthlps, 6, 123 87 73 10, autohs center

pareil pour tt ce qui les resemblent

au lieu de cette partie
while %a <= %w {
  did -a $dname 2 $gettok($hget(hl,pseudo),%a,44)
  inc %a
}

tu peut utilisé /didtok si je ne me trompe pas

didtok $dname 2 44 $hget(hl,pseudo)

pareil pour la loop des salons

l'utilisation de "isin" n'est pas une tres bonne idée
si on a 3 peudo:
pseudo1 = BaM
pseudo2 = Bamboo
pseudo3 = Ambo

il y aura des confusions dans ce cas donc a mon avis, mieux d'utiliser des identifieur comme $istok

et il y a quelques petites truc comme les = dans /var et les else { halt } etc. tt celà peuvent etre retirer

oups un oublie dans le code

if $did == 11 {
  if (!$did(1).sel) noop $input(Aucune ligne selectionnée,wo,Erreur)
  else {
    write -dl $({,$did(1).sel) correction.txt
    didcor
  }
}

if (%gras == on) { set %out  $+ %coul.ecri $+ , $+ %coul.fond %out $+ $str($chr(160),1) }

ça sert a quoi ce "$str($chr(160),1)"

en utilisant $input au lieu d'utilisé la commande /var utilise /noop
donc ton did == 11 devient
if $did == 11 {
  if (!$did(1).sel) noop $input(Aucune ligne selectionnée,wo,Erreur)
  else {
    write -dl ${,$did(1).sel) correction.txt
    didcor
  }
}
et je t'avais dejà dis depuis a propos de if (c isin $chan($active).mode) il faut utilisé "isncs" donc ça devient if (c isincs $chan($active).mode) car il existe c et C

exact :)

ok pas de brobleme bro :D

lol tu me suis avec le raccourci :D et voilà rien que 1 chr de moin regarde
$regex($address($1,0),[0-1]\d{2}(F|H|Z))
$regex($address($1,0),[01]\d{2}([FHZ]))
mais c'est quand meme bien de faire plus simple non?