COMMANDES DOS DANS MIRC

---

Commentaire sur cette source (15)
Ajouter un commentaire et/ou une note

C'est pas nouveau, je sais ...
Mé voila, j'en avais besoin d'un qui faisait tout ce que je lui demandais... comme exécuter ipconfig /all , format, nmap, ... ce que je n'ai jamais réussi à faire avec les autres sources (suis-je trop bête? xD)

Enfin voila, une interraction avec cmd.exe & mIRC sans dll et sans comopen ...

J'ai pas trop commenté le code, parce qu'il n'est pas très ompliqué... & ça me saoule un peu les com, ça alourdis les sources, etc ...

Enfin voila.
N'hésitez pas à laisser des comentaires ...

; # doscmd ... <3 mIRC

on *:load: { mkdir cmd }
menu menubar {
  doscmd:window -e @cmd
}
on *:input:@cmd: {
  ; Verification: si c'est une commande mIRC: RETURN
  if ($left($1,1) == /) { return }

  ; Message a l'utilisateur (traitement de la commande)
  linesep -a | echo 9 -a $time 3*14 Traitement de la commande:15 $1-

  ; Creation de la variable %output : c'est le nom que les fichiers concernes vont avoir (%output.txt & %output.bat)
; Creation du fichier bat 
  %output = cmd\ $+ $_r(10) | write %output $+ .bat $1- > $mircdir $+ %output $+ .txt
  ; Execution du fichier bat (en minimize) 
;  redefinition de la variable pour lui associer l'extension TXT
;  incrementation : Defini la ligne que le script 'lit' dans le fichier %output.txt

  run -n %output $+ .bat | %output = %output $+ .txt | hinc -m cecho %output

  ; timer loop qui affiche les lignes retournees par cmd.exe (dans %output.txt)
  .timer $+ %output 0 0 cecho %output 

  linesep -a
}

alias -l cecho {
  if (!$1) { echo 4 -at -[cecho\ $+ $nopath($script) $+ ]- Erreur: pas d'argument | return }
  elseif ($isfile($1) != $true) { return }

  ; Si la variable est plus petite que le nombre de lignes contenues dans le fichier temporaire, le script affiche cette ligne...
  elseif ($hget(cecho,$1) < $lines($1)) { 
    if ($hget(loop,$1)) { hdel loop $1 }
    echo 14 @cmd => $read($1,$hget(cecho,$1)) | hinc -m cecho $1
  }
  ; Sinon, le script tourne dans le vide
  else {
    hinc -m loop $1 
    ; si le timer s'est execute moins de 500X dans le vide, on return
    if ($hget(loop,$1) < 500) { return }
    ; sinon on arrete tout (j'imagine que la comande doit etre finie...)
    hdel loop $1
    .remove $1 | .remove $replace($1,txt,bat)
    .timer $+ $1 off 
  }
  halt
}
; simple alias qui retourne une chaine de X ($1) caractères aléatoires...
alias -l _r {
  if (!$1) { return } | if (%return) { unset %return }
  %s = 1 | while (%s <= $1) { %return = %return $+ $r(a,z) | inc %s }
  return %return
}

Pas de maj prévue, pas de bug (enfin, j'ai corrigé ceux que j'ai rencontré...), donc je pense qu'il n'y en a plus\pas...

Y'a moyen d'optimiser la source, mais je n'ai pas l'intention de le faire (tout de suite, du moins)...

Voila a+...

06 juin 2007 14:44:21 :

Modification des commentaires -_-'

12 juin 2007 13:49:24 :

Voila, j'ai mis a jour les quelques commentaires du script... Note: pour executer des programmes 'externes' à cmd.exe (genre console winrar , nmap, etc ...), il faut copier les fichiers *.exe dans c:\windows\system32\

14 juin 2007 10:08:59 :

SCREENSHOT

14 juin 2007 10:15:31 :

screen

• TELNET DANS UN DIALOG

• ALIASES POUR FASCILITER L'USAGE DE MDX (FRAMEWORK)
• PACMAN ONLINE - 4 JOUEURS
• REPONDEUR ASSER SIMPLE BY W4X TAPER /REP POUR L'OUVRIR
• ALGORITHME A*
• FRACTALES EN PICWINS

• SYSTÈME DE COMMANDE EN MASSE AVEC DÉLAI
• DLL DOS