Text File Viewer and Manager Dialog

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	4.8
Scores Submitted	4
Date Added	Oct 16, 2007
Last Updated	Sep 21, 2008
Tags	.txt dialog file mircdir

Introduction

This little dialog can be used to view your .txt files , delete a .txt file or create a new .txt file.

Update 1: It will now allow you to view all .txt files. I had to fix the deleting part to work with the new way that had to be listed.

Update 2: hsbar added to the list box.

Update 3: If the .txt file name is in use it will not create it.

Update 4: The file name including .txt must be at least 5 characters in length.

Update 5 21Sep08: Removed the 'List' button , changed the way it list the .txt in the list box, changed to where it loads all the .txt files in your $mircdir upon opening, made the 'View , New and Delete' buttons show when opening and cleaned the code up a bit here and there.

Grab the Code

menu status,channel {
  [Text Files]: dialog $iif(!$dialog(textfiles), -m, -va) textfiles textfiles
}
dialog textfiles {
  title ".txt Files"
  size -1 -1 200 230
  list 2, 10 5 183 170, hsbar vsbar sort
  text "File", 3, 5 178 30 25, center
  edit "", 4, 35 175 158 20, read autohs center
  button "View", 5, 5 200 55 25
  button "New" 7, 72 200 55 25
  button "Delete", 6, 140 200 55 25
  text "New File", 8, 10 235 50 25
  edit "", 9, 60 232 133 20, autohs
  button "Create", 10, 5 260 90 25
  button "Cancel", 11, 105 260 90 25
}
on *:dialog:textfiles:*:*: {
  if ($devent = init) { 
    did -b $dname 5,6
    var %x = 1
    while ($findfile($mircdir,*.txt,%x)) {
      did -a $dname 2 $remove($findfile($mircdir,*.txt,%x,2),$mircdir)
      inc %x
    }
    did -z $dname 2 190 350
    dialog -t $dname $+($chr(91),$did(2).lines,$chr(93)) .txt files
  }
  if ($devent = sclick) {
    if ($did == 2) { 
      if ($did(2).seltext) {
        did -e $dname 5,6
        dialog -s $dname -1 -1 200 230
        did -ra $dname 4 $+($mircdir,$did(2).seltext)
      }
    }
    if ($did == 5) { run $did(2).seltext | did -b $dname 5,6 | did -u $dname 2 }
    if ($did == 6) { 
      if ($input(Continue with deletion of $str($crlf,2) $qt($+($mircdir,$did(2).seltext)) $+ ?,cy,Deletion of $qt($remove($did(2).seltext,$mircdir)))) {
        .remove $qt($+($mircdir,$did(2).seltext))
        did -d $dname 2 $did(2).sel
        dialog -t $dname $+($chr(91),$did(2).lines,$chr(93)) .txt files
        did -f $dname 9
        did -b $dname 5,6 
        did -u $dname 2
        did -r $dname 4
      }
      else { did -f $dname 9 | did -b $dname 5,6 | did -u $dname 2 | did -r $dname 4 }
    }
    if ($did == 7) {
      dialog -s $dname -1 -1 200 290
      did -f $dname 9
      did -b $dname 5,6 
      did -u $dname 2
      did -r $dname 4
    }
    if ($did == 10) {
      if (!$did(9).text) { 
        echo -ag No information given for a .txt file to be created. 
        dialog -s $dname -1 -1 200 230
        did -r $dname 9
      }
      if ($did(9).text) {
        if (($right($did(9),4) == .txt) && ($len($did(9)) < 5)) { 
          echo -ag The length including .txt must be at least 5 characters in length.
          dialog -s $dname -1 -1 200 230 
          did -r $dname 9
        }
        elseif ($right($did(9),4) != .txt) { 
          echo -ag Please use " .txt " at the end of the name for the new file. 
          dialog -s $dname -1 -1 200 230 
          did -r $dname 9
        }
        elseif ($exists($did(9))) { 
          echo -ag That .txt file name is already in use.
          dialog -s $dname -1 -1 200 230
          did -r $dname 9
        }
        else { 
          write $did(9) 
          did -a $dname 2 $did(9) 
          did -f $dname 9
          did -b $dname 5,6 
          did -u $dname 2
          did -r $dname 4
          dialog -s $dname -1 -1 200 230
          dialog -t $dname $+($chr(91),$did(2).lines,$chr(93)) .txt files
        }
      }
    }
    if ($did == 11) { dialog -s $dname -1 -1 200 230 | did -r $dname 9 }
  }
}

Comments

(26) RSS

Go to Bottom

Gummo

Comments: 137

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 9:02 am

Nice way to only open text files in your folder. :)
However, it wouldn't open channels.txt while it opened the others normally..
* /run: unable to open 'channels.txt' (line 37, viewtext.mrc)

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 9:10 am

For some reason it will not open all .txt files. I have not quite figured out how to get it to open those. Any suggestions?

Gummo

Comments: 137

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 9:16 am

I believe it's because channels.txt is in a subfolder. Your dialog does /run from what's selected, while it actually needs channels/channels.txt
You could solve this problem by doing a $findfile when you click run. :)

kerstt

Comments: 64

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 9:41 am

add a . for remove to hide the "blabla removed" notice in your status bar :)

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 10:02 am

Update: It will now allow you to view all .txt files. I had to fix the deleting part to work with the new way that had to be listed.

mountaindew

Comments: 1,640

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 2:10 pm

i would use $nopath, either that or put a hsbar, just loop it, and when everythings done, did -z $dname $did

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 2:58 pm

If you mean using $nopath when getting the list of .txt files then I tried that. Using $nopath and $nofile cause it to not allow you to open some of the .txt files it list in the dialog. Doing it as it is above you get the full list , you can open them all and you can delete any of them no matter how deep they are in the mIRC directory.

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:15 pm

To the person that rated it a "3". What was wrong with it? What does it need?

Anti

Comments: 305

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:34 pm

what! :P just live with you get or will ever get rofl

Anti

Comments: 305

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:36 pm

3 (Not useful) < ROFL! that answer you're question>!

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:37 pm

I only ask incase there is something needed , something wanted or possibly and error that needs to be fixed. The actual score of it does not matter to me. I just like it if people that decide to rate something with a low score they explain why they gave it a low not just rate and run so to speak.

Anti

Comments: 305

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:39 pm

Tell me scakk do you think you did a good job?

Kyousoukyoku

Comments: 45

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:49 pm

Well, I think the author of a snippet wouldn't post it here if they didn't think they didn't do a good hob on their snippet. :P Seems okay from the coding, will test it out soon and rate this snippet accordingly. As of now, nice job Scakk.

Anti

Comments: 305

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:50 pm

well dont complain :)

Anti

Comments: 305

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:51 pm

makes you feel better ill rate it :)

mountaindew

Comments: 1,640

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:57 pm

Quote:

then u shold at least add a hsbar and did -z, cuz all i currently see if the beginning of the $mircdir, and i cant even see the file

mountaindew

Comments: 1,640

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 3:57 pm

*is, not if

Kyousoukyoku

Comments: 45

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 4:01 pm

I must say this is a pretty useful snippet for filtering out those txt files that aren't needed. One thing that disappoints me is the appreciation this snippet receives. I would, well right now, rate this a 6. It makes me wonder how people rate snippets.

Anyway, it would be interesting if you could display the file's data in a new dialog or an expansion to the current dialog. I don't really see a use of resizing the dialog with a button when you can directly list them. ;) It would be great to have this support other file types, and just include it in one pack. But I'd have to say this is pretty nice, good work Scakk.

Anti

Comments: 305

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 4:05 pm

if i give it a 10 i might get yelled at from hawkee for such little coding :)

mountaindew

Comments: 1,640

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 4:09 pm

Code:

dialog -x textfiles

i believe ur forgetting a textfiles, dialog -x textfiles textfiles

mountaindew

Comments: 1,640

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 4:10 pm

nvm then, i guess it works with just one

Kyousoukyoku

Comments: 45

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 4:15 pm

Quote:

if i give it a 10 i might get yelled at from hawkee for such little coding :)

I'm not really saying you should give this a ten lol. But, it wouldn't hurt to review this snippet a bit and rate it based on what you find. =D On the contrary, your opinions are not my decision. So whatever you rate it is based on what you look for in a snippet. So eh, w/e. ;)

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Oct 16, 2007 4:18 pm

@mountaindew Added the hsbar to the list box.

Comments: 1,369

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Dec 16, 2007 5:39 pm

This is very handy.Theres no reason to load then look at scripts then delete from the editor and its better then opening your directory and having 785094732150 files open on your desk top.Only thin i had a problem with is freezing my comp for about 30 seconds thought it mite have been infinite but i waited so i didn't break, was just busy doing its thing.i did notice that when you delete a file the dialog goes back to the list button state to list the files again an you can close or list again from there.Is there any way after you delete a file that the dialog can auto list the .txt files again? not that it takes much effort to list again,just push the button.Think that just comes from me loading an unloading files,that whole fun tedious loop.Any way nice job on this very useful 8/10.`-.-�

Korvin

Comments: 238

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Dec 16, 2007 6:22 pm

while ($findfile($mircdir,*.txt,%x)) {
did -a $dname 2 $shortfn($findfile($mircdir,*.txt,%x))
inc %x
}

Scakk

Comments: 237

mIRC Snippet: Text File Viewer and Manager Dialog
Posted on Sep 21, 2008 6:17 pm

Update 5 21Sep08: Removed the 'List' button , changed the way it list the .txt in the list box, changed to where it loads all the .txt files in your $mircdir upon opening, made the 'View , New and Delete' buttons show when opening and cleaned the code up a bit here and there.

Text File Viewer and Manager Dialog

Introduction

Grab the Code

Comments

Scakk

My Snippet Tags

Contact

Friends (16)

Sponsors


Last seen: Oct 06, 2008 Profile Likes (3) Friends (16) Snippets (40) Images (22) Comments Received (309) Comments Submitted (237) Forum Posts (178)