Worlddmt text color v 1.0

Télécharger le projet
Commenter

Description

Oui je sais ce n'est pas du nouveau mais le codage n'est pas pareil

Une fois l'addon est load le dialog s'ouvre pour la configuration

La couleur du texte sélectionné vous ne la trouvez pas dans la sélection du fond pour éviter de mettre la même couleur du texte et le fond

Si le chan là ou vous êtes est en mode +c le texte envoyé sera un texte standard pour ne pas a vous obliger a arrêté l'addon pour pouvoir écrire

Source / Exemple : 


on *:load:conf.wclr
menu status,nicklist,menubar {
  -
  WtextColor V1.0
  .Configurer:conf.wclr
  .Désinstaller:rem.wclr
}
alias conf.wclr dialog $iif($dialog(wclr),-v wclr,-m wclr wclr)
alias rem.wclr dialog $iif($dialog(dclr),-v dclr,-m dclr dclr)
dialog wclr {
  title "WorldDMT Text Color"
  size -1 -1 205 218
  option pixels
  combo 1, 92 110 100 70, drop
  combo 2, 92 133 100 69, drop
  check "Gras", 3, 93 157 40 17
  check "Souligné", 4, 136 157 60 17
  text "Couleur texte", 6, 7 112 80 13
  text "Fond de texte", 7, 7 135 80 13
  text "WorldDMT Text Color V1.0", 8, 60 194 130 13, disable
  text "Format du texte", 9, 7 158 80 13
  box "Configuration", 10, 2 95 201 85
  box "", 11, 2 180 200 36
  icon 12, 3 3 201 92, colorpic.jpg, 0 noborder
  check "OFF", 13, 9 193 39 17, push
}
dialog dclr {
  title Désinstaller WtextColor V 1.0
  size -1 -1 150 40
  option dbu
  box ATTENTION!!, 1, 1 2 148 37
  text Cette action supprime l'addon WtextColor V 1.0 voulez-vous désinstallé WtextColor?, 2, 12 9 125 24, Center
  button Oui, 3, 45 25 30 12, ok
  button Non, 4, 75 25 30 12, cancel
}
on *:dialog:dclr:sclick:3:{
  if ($dialog(wclr)) dialog -x wclr
  echo -ae  - Désinstallation de l'Addon terminé avec succes
  echo -ae  - merci d'avoir utilisé WtextColor V 1.0
  echo -ae  - WorldDMT
  unset %wclr %t.g %t.s %t.c %t.f
  .unload -rs $qt($scriptdirwcolor.data)
}
on *:dialog:wclr:*:*:{
  if ($devent == sclick) {
    set %wclr $did(13).state
    did -ra $dname 13 $iif(%wclr,ON,OFF)
    set %t.g $did(3).state
    set %t.s $did(4).state
    if ($did == 1) {
      set %t.c $did(1).sel
      did -er $dname 2
      loadbuf -o $dname 2 $qt($scriptdircouleur.data)
      did -d $dname 2 $did(1).sel
      if (%t.f == %t.c) {
        unset %t.f
      }
      else did -c $dname 2 $calc(%t.f $iif(%t.c >= %t.f,+ 1))
    }
    if ($did == 2) {
      set %t.f $did(2).sel $iif(%t.c >= $did(2).sel,- 1)
    }
  }
  if ($devent == init) {
    loadbuf -o $dname 1 $qt($scriptdircouleur.data)
    loadbuf -o $dname 2 $qt($scriptdircouleur.data)
    if (%t.c == $null) did -b $dname 2
    did -d $dname 2 $calc(%t.c + 1)
    if (%wclr) { did -c $dname 13 | did -ra $dname 13 ON }
    if (%t.g) did -c $dname 3
    if (%t.s) did -c $dname 4
    did -c $dname 1 $iif(%t.c != $null,$calc($ifmatch + 1))
    did -c $dname 2 $iif(%t.f != $null,$calc(%t.f $iif(%t.c >= %t.f,+ 1)))
  }
}
on *:input:*:{
  if (%wclr) {
    if (($active != Status Window) && ($left($1,1) !isin !./) && (c !isincs $gettok($chan($active).mode,1,32))) {
      var %C = $chr(3) $+ $iif(%t.c != $null,%t.c $+ $iif(%t.f != $null,$+($chr(44),%t.f))) $+ $iif(%t.g,$chr(2)) $+ $iif(%t.s,$chr(31))
      msg $active %C $+ $1-
      halt
    }
  }
}

Conclusion :


Pour installer loadez le fichier wcolor.data

Si c'est compliqué mettez le dossier WormdDMT Text Color V1.0 dans le dossier
de votre mirc et vous tapez

//load -rs $qt(WorldDMT Text Color V 1.0\wcolor.data)
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (WorldDMT)