mIRCpad

By R1cochet on Feb 12, 2008

Really a modified version of Gemster's IRC Notepad. Type your thoughts in the editbox (top box). To go to next line in editbox, press "ctrl + enter." Each line in the editbox will be written to its own line in the txt file.

Add: click "Add" to add the line/lines in the editbox to the end of the file.

!For Edit/Insert/Delete buttons you must FIRST click on a line in the listbox (bottom box)!

Edit: click on the line you wish to edit, change the text to your choosing in the editbox, and click "Edit".

Insert: click on the line in the listbox 1 line ABOVE where you wish to insert text, enter in text to be added into the editbox and click "Insert".

Delete: click on the line you wish to delete, then click "Delete".

To insert a blank line between lines of text enter a " " (space) as the first character of the line then cntrl enter and continue typing. ie:

< > without the "< and >" ```mirc dialog MeridianPad { title "Midi@Notepad" size -1 -1 275 300 option dbu button "Ok", 1, 103 281 30 12, ok button "Cancel", 2, 143 281 30 12, cancel edit , 3, 5 5 265 70, multi, vsbar button "Add", 4, 40 80 30 12 button "Edit", 5, 95 80 30 12 button "Insert", 6, 150 80 30 12 button "Delete", 7, 205 80 30 12 list 8, 5 97 266 179 } menu channel,status,nicklist,query { mIRCpad: dialog -md meridianpad meridianpad } alias pad { var %x = 1 did -r meridianpad 3,8 while %x <= $lines(mIRCpad.txt) { did -a meridianpad 8 $read(mIRCpad.txt,%x) inc %x } did -f meridianpad 3 } on *:dialog:meridianpad:*:*: { if ($devent == init) { pad } if ($devent == sclick) { if ($did == 8) { set %line $did(8).sel did -ra meridianpad 3 $did(8).seltext } if ($did == 4) { var %y = 1 while ($did(3,%y) != $null) { if ($did(3,%y).text == $chr(32)) { write -i mIRCpad.txt inc %y } else { write mIRCpad.txt $did(3,%y).text inc %y } } unset %y pad } if ($did == 5) { write -l $+ %line mIRCpad.txt $did(3).text pad did -c meridianpad 8 %line } if ($did == 6) { write -il $+ $calc(1 + %line) mIRCpad.txt $did(3).text pad did -c meridianpad 8 $calc(1 + %line) } if ($did == 7) { write -dl $+ %line mIRCpad.txt pad did -c meridianpad 8 %line } } } ```

Comments

Sign in to comment.
R1cochet   -  Feb 12, 2008

I am terribly sorry Gemster. I thought your project was done, since you had posted it. Will not happen again.

Again, I am sorry Gemster.

 Respond  
Gemster   -  Feb 12, 2008

thanks R1cochet you have left me no room to update :/

it was a work in progress post

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.