Notepad pour mirc

Commenter

Contenu du snippet

Ben c un notepad ke jai fé ya pa tro lontem, kom tout note pad on peu sauvegarder, ouvrir et modifier un fichier .

Source / Exemple : 


alias notepad { dialog -dm notepad notepad }

menu * { 
  NotePad:/notepad 
}
dialog notepad {
  title "NotePad v1.4 by SamsungMan"
  size -1 -1 132 178
  option dbu
  icon C:\WINDOWS\notepad.exe, 0
  edit "", 2, 2 2 128 173, multi autovs vsbar
  menu "Fichier", 5
  item "Nouveau", 11, 5
  item "Ouvrir", 6, 5
  item "Sauvegarder", 7, 5
  item "Quittez", 8, 5, cancel
  menu "Crédit", 9
  item "Crédit", 10, 9
}

On *:dialog:notepad:*:*: {
  if $devent == menu {
    if $did == 10 { dialog -dm credit credit }
    if $did == 6 { var %a $shortfn($sfile(*.txt,Ouvrir,Ouvrir)) | loadbuf -ro notepad 2 %a | dialog -t notepad $nopath(%a).txt - NotePad By SamsungMan | var %f new_doc }
    if $did == 11 { did -ra notepad 2 | dialog -t notepad Nouveau.txt - NotePad by SamsungMan }
    if $did == 7 {
      var %a = $shortfn($sdir($mircdir,Selectionnez le répertoire où le document sera sauvé))
      if (%a == $null) { return }
      var %b = $?="Nom du document (.txt)"
      if (%b == $null) { return }
      var %f %a $+ %b
      sauve %f
      dialog -t notepad %b - NotePad by SamsungMan    
    }
  }
}

alias sauve { savebuf -o notepad 2 $$1 }

dialog credit {
  title "Crédit"
  size -1 -1 78 30
  option dbu
  icon C:\WINDOWS\notepad.exe, 0
  icon 1, 3 2 12 12, C:\WINDOWS\notepad.exe, 0
  button "FERMER", 2, 2 18 71 10, ok
  text "NotePad pour Mirc :", 3, 18 1 46 6
  link "by SamsungMan", 4, 18 9 46 6
}

on *:dialog:credit:sclick:4: { run mailto:samsungman@hotmail.com }

Conclusion :


Have fun :)

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.