home *** CD-ROM | disk | FTP | other *** search
/ napalm.napnet.hu / 2015-02-12.napalm.napnet.hu.tar / napalm.napnet.hu / programok / kommunikacio / mpp700.exe / popup-query.mrc < prev    next >
Text File  |  2004-04-18  |  16KB  |  390 lines
  1. User Menu
  2. .User Info
  3. ..Whois:/whois $$1
  4. ..UCentral:/uwho $1
  5. ..User Specs: {
  6.   set -u %val_1 $rand(3,15)
  7.   set -u %val_2 $rand(3,15)
  8.   set -u %val_3 $rand(3,15)
  9.   /echo -a *
  10.   /echo -a Nickname:  $+ %val_1 $+ $$1
  11.   /echo -a Address:  $+ %val_2 $+ $address($$1,5) 
  12.   /echo -a User Mask:  $+ %val_3 $+ $address($$1,%mpp.masklevel) 
  13.   /echo -a *
  14. }
  15. ..-
  16. ..Common Channels:comchan $$1
  17. ..-
  18. ..Finger:/finger $$1
  19. ..-
  20. ..My .plan:/msg $$1 To view my .plan update, type: /finger $me
  21. .-
  22. .User Levels
  23. ..$iif($level($address($$1,%mpp.masklevel)) == 90,$style(1)) DCC Trust (90):.guser 90 $1 %mpp.masklevel | echo -a Added9 $1 to9 DCC Trust 0(Level 90)
  24. ..$iif($level($address($$1,%mpp.masklevel)) == 100,$style(1)) File Server (100):.guser 100 $1 %mpp.masklevel | echo -a Added9 $1 to9 File Server 0(Level 100)
  25. ..$iif($level($address($$1,%mpp.masklevel)) == 300,$style(1)) Q3 Messenger (300):.guser 300 $1 %mpp.masklevel | echo -a Added9 $1 to9 Remote Control 0(Level 300)
  26. ..$iif($level($address($$1,%mpp.masklevel)) == 500,$style(1)) Remote Control (500):.guser 500 $1 %mpp.masklevel | echo -a Added9 $1 to9 Remote Control 0(Level 500)
  27. ..$iif($level($address($$1,%mpp.masklevel)) == 700,$style(1)) OGX Scanner (700):.guser 700 $1 %mpp.masklevel | echo -a Added9 $1 to9 OGX Scanner 0(Level 700)
  28. ..$iif($level($address($$1,%mpp.masklevel)) == 900,$style(1)) Administrator (900):.guser 900 $1 %mpp.masklevel | echo -a Added 9 $1 to9 Administrator 0(Level 900)
  29. ..-
  30. ..Remove User:.ruser $address($$1,%mpp.masklevel) | echo -a Removed9 $1 from all User Access Levels
  31. ;..Selected User: {
  32. ;  /set -u %ulev $level($address($$1,%mpp.masklevel))
  33. ;  if (%ulev == 1) /set -u %ulev 9Anonymous (1)
  34. ;  if (%ulev == 3) /set -u %ulev 8Public (3)
  35. ;  if (%ulev == 5) /set -u %ulev 4Private (5)
  36. ;  if (%ulev == 7) /set -u %ulev 13Secure (7)
  37. ;  if (%ulev == 9) /set -u %ulev 11Administrator (9)
  38. ;  /echo $1 $+ : %ulev
  39. ;}
  40. ;..-
  41. ;..Anonymous (1):/echo 13 Anonymous (1) | /ulist 1
  42. ;..Public (3):/echo 13 Public (3) | /ulist 3
  43. ;..Private (5):/echo 13 Private (5) | /ulist 5
  44. ;..Secure (7):/echo 13 Secure (7) | /ulist 7
  45. ;..Administrator (9):/echo 13 Administrator (9) | /ulist 9
  46. ..-
  47. ..Show All Users:{
  48.   echo 4 File Server (Level 100)
  49.   .ulist 100
  50.   echo 8 Q3 Messenger (Level 300)
  51.   .ulist 300
  52.   echo 13 Remote Control (Level 500)
  53.   .ulist 500
  54.   echo 11 OGX Scanner (Level 700)
  55.   .ulist 700
  56.   echo 9 Administrator (Level 900)
  57.   .ulist 900
  58. }
  59. .-
  60. .DCC && CTCP
  61. ..$iif($network != enterthegame,$style(2)) DCC Allow (ETG)
  62. ...DCC Allow:/dccallow + $+ $$1
  63. ...DCC Deny:/dccallow - $+ $$1
  64. ...-
  65. ...Allow List:/dccallow list
  66. ..-
  67. ..DCC Send:/dcc send $$1
  68. ..DCC Chat:/dcc chat $$1
  69. ..-
  70. ..CTCP Ping:/ctcp $$1 ping
  71. ..CTCP Finger:/ctcp $$1 finger
  72. ..CTCP Version:/ctcp $$1 version
  73. ..CTCP Time:/ctcp $$1 time
  74. ..CTCP Userinfo:/ctcp $$1 userinfo
  75. ..CTCP ClientInfo:/ctcp $$1 clientinfo
  76. ..CTCP Trout:/ctcp $$1 trout
  77. .-
  78. $iif($1 != $me,Nickname Color) 
  79. ..$iif($cnick($1).color == 0,$style(1)) (0) White:.cnick $address($$1,%mpp.masklevel) 0
  80. ..$iif($cnick($1).color == 1,$style(1)) (1) Black:.cnick $address($$1,%mpp.masklevel) 1
  81. ..$iif($cnick($1).color == 2,$style(1)) (2) Navy:.cnick $address($$1,%mpp.masklevel) 2
  82. ..$iif($cnick($1).color == 3,$style(1)) (3) Green:.cnick $address($$1,%mpp.masklevel) 3
  83. ..$iif($cnick($1).color == 4,$style(1)) (4) Red:.cnick $address($$1,%mpp.masklevel) 4
  84. ..$iif($cnick($1).color == 5,$style(1)) (5) Maroon:.cnick $address($$1,%mpp.masklevel) 5
  85. ..$iif($cnick($1).color == 6,$style(1)) (6) Purple:.cnick $address($$1,%mpp.masklevel) 6
  86. ..$iif($cnick($1).color == 7,$style(1)) (7) Orange:.cnick $address($$1,%mpp.masklevel) 7
  87. ..$iif($cnick($1).color == 8,$style(1)) (8) Yellow:.cnick $address($$1,%mpp.masklevel) 8
  88. ..$iif($cnick($1).color == 9,$style(1)) (9) Lime:.cnick $address($$1,%mpp.masklevel) 9
  89. ..$iif($cnick($1).color == 10,$style(1)) (10) Teal:.cnick $address($$1,%mpp.masklevel) 10
  90. ..$iif($cnick($1).color == 11,$style(1)) (11) Aqua:.cnick $address($$1,%mpp.masklevel) 11
  91. ..$iif($cnick($1).color == 12,$style(1)) (12) Blue:.cnick $address($$1,%mpp.masklevel) 12
  92. ..$iif($cnick($1).color == 13,$style(1)) (13) Pink:.cnick $address($$1,%mpp.masklevel) 13
  93. ..$iif($cnick($1).color == 14,$style(1)) (14) Grey:.cnick $address($$1,%mpp.masklevel) 14
  94. ..$iif($cnick($1).color == 15,$style(1)) (15) Silver:.cnick $address($$1,%mpp.masklevel) 15
  95. ..-
  96. ..Reset Single:.cnick -r $address($$1,%mpp.masklevel) 14
  97. ..-
  98. ..Reset All:{ if ($input(Are you sure you want to reset all nickname colors?,yq,Reset All Nickname Colors) == $true) {
  99.   .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 | .cnick -r 1 }
  100. }
  101. ..-
  102. ..Address Book:/abook /nick
  103. $iif($1 == $me,My Nickname Color)
  104. ..$iif($cnick($1).color == 0,$style(1)) (0) White:.cnick $chr(36) $+ me 0
  105. ..$iif($cnick($1).color == 1,$style(1)) (1) Black:.cnick $chr(36) $+ me 1
  106. ..$iif($cnick($1).color == 2,$style(1)) (2) Navy:.cnick $chr(36) $+ me 2
  107. ..$iif($cnick($1).color == 3,$style(1)) (3) Green:.cnick $chr(36) $+ me 3
  108. ..$iif($cnick($1).color == 4,$style(1)) (4) Red:.cnick $chr(36) $+ me 4
  109. ..$iif($cnick($1).color == 5,$style(1)) (5) Maroon:.cnick $chr(36) $+ me 5
  110. ..$iif($cnick($1).color == 6,$style(1)) (6) Purple:.cnick $chr(36) $+ me 6
  111. ..$iif($cnick($1).color == 7,$style(1)) (7) Orange:.cnick $chr(36) $+ me 7
  112. ..$iif($cnick($1).color == 8,$style(1)) (8) Yellow:.cnick $chr(36) $+ me 8
  113. ..$iif($cnick($1).color == 9,$style(1)) (9) Lime:.cnick $chr(36) $+ me 9
  114. ..$iif($cnick($1).color == 10,$style(1)) (10) Teal:.cnick $chr(36) $+ me 10
  115. ..$iif($cnick($1).color == 11,$style(1)) (11) Aqua:.cnick $chr(36) $+ me 11
  116. ..$iif($cnick($1).color == 12,$style(1)) (12) Blue:.cnick $chr(36) $+ me 12
  117. ..$iif($cnick($1).color == 13,$style(1)) (13) Pink:.cnick $chr(36) $+ me 13
  118. ..$iif($cnick($1).color == 14,$style(1)) (14) Grey:.cnick $chr(36) $+ me 14
  119. ..$iif($cnick($1).color == 15,$style(1)) (15) Silver:.cnick $chr(36) $+ me 15
  120. ..-
  121. ..Reset My Color:.cnick -r $chr(36) $+ me 14
  122. ..-
  123. ..Address Book:/abook /nick
  124. .-
  125. .Invite User:invite $1 $?="Channel:"
  126. .-
  127. -
  128. Ignore User
  129. .Ignore (Silent)
  130. ..Ignore for 5 Minutes (+):.ignore -u300 $$1
  131. ..Ignore for 10 Minutes (+):.ignore -u600 $$1
  132. ..-
  133. ..Ignore (+):.ignore $$1
  134. ..Ignore (--):.ignore -r $$1
  135. .-
  136. .Ignore (Notify)
  137. ..Ignore for 5 Minutes (+):.ignore -u300 $$1 | notice $$1 Added $address($$1,%mpp.masklevel) to Ignore list for 5 minutes.
  138. ..Ignore for 10 Minutes (+):.ignore -u600 $$1 | notice $$1 Added $address($$1,%mpp.masklevel) to Ignore list for 10 minutes.
  139. ..-
  140. ..Ignore (+):.ignore $$1 | notice $$1 Added $address($$1,%mpp.masklevel) to Ignore list
  141. ..Ignore (--):.ignore -r $$1 | notice $$1 Removed $address($$1,%mpp.masklevel) from Ignore list
  142. ..-
  143. -
  144. mIRC Power Pack
  145. .Security Levels
  146. ..$style(%mppsec1) High Security:mppsec1
  147. ..$style(%mppsec2) Medium Security:mppsec2
  148. ..$style(%mppsec3) Low Security:mppsec3
  149. .-
  150. .MPP Control Center
  151. ..Main Settings:mcc
  152. ..Connections:mccconnections
  153. ..Function Keys (F1-12):mcc /fkeys
  154. ..-
  155. ..Color Themes:mcccol
  156. ..Image Themes:mccimg
  157. ..Timestamp:mcctimestamp
  158. ..Resolution:mccres
  159. ..MQP Settings:mccgames
  160. ..-
  161. ..TeamSpeak:mccts
  162. ..Ventrilo:mccvent
  163. ..Roger Wilco:mccrw
  164. ..-
  165. ..Resources:mccsodpit
  166. ..Help:mcchelp
  167. .-
  168. .Main Functions (F1-F12)
  169. ..%mppf1 (F1):f1
  170. ..%mppf2 (F2):f2
  171. ..%mppf3 (F3):f3
  172. ..%mppf4 (F4):f4
  173. ..%mppf5 (F5):f5
  174. ..%mppf6 (F6):f6
  175. ..%mppf7 (F7):f7
  176. ..%mppf8 (F8):f8
  177. ..%mppf9 (F9):f9
  178. ..%mppf10 (F10):f10
  179. ..%mppf11 (F11):f11
  180. ..%mppf12 (F12):f12
  181. ..-
  182. ..MPP Function Keys:/mhs
  183. .-
  184. .Atma File Server
  185. .-
  186. .xServ File Server
  187. .-
  188. .Basic File Server
  189. ..Serve Default Folder:/notice $1 /ctcp $me fserve | /ctcp $1 xfiles
  190. ;.Serve Specific Folder:{
  191. ;/set -u %woo ""
  192. ;/set -u %woo $sdir "\"
  193. ;if ( %woo != $null ) {
  194. ;  /notice $1 File Server: %woo
  195. ;  /write -c $mircdir $+ fserve\cst.txt 15Welcome to my 8CUSTOM15 mIRC File Server! :)
  196. ;  /write $mircdir $+ fserve\cst.txt 15Type HELP for a list of commands
  197. ;  /write $mircdir $+ fserve\cst.txt 11[ $+ %woo $+ ]
  198. ;  /fserve $1 20 %woo $mircdir $+ fserve\cst.txt | /sound $1 link.wav
  199. ;}
  200. ;Public File Server:/fserve $$1 20 $mircdir $+ pub $mircdir $+ pub.txt
  201. ;Private File Server:/fserve $$1 20 $mircdir $+ pvt $mircdir $+ pvt.txt
  202. ..-
  203. ..Request File Server:/ctcp $1 fserve
  204. ..-
  205. ;.File Server Manager
  206. ;..Anonymous Folder:/many
  207. ;..Public Folder:/mpub
  208. ;..Private Folder:/mpvt
  209. ;..Secure Folder:/msec
  210. ;..Administrator Folder:/madm
  211. ;..-
  212. ;..Complete View:/mall
  213. ;..-
  214. ;..%mwe1:/mwe1
  215. ;..%mwe2:/mwe2
  216. .-
  217. .Protection Pro (Edit User):{
  218.   set %unick $active
  219.   dialog -m pp-addrem pp-addrem
  220.   did -ra pp-addrem 14 %unick
  221.   if ($len($address(%unick,0)) == 0) {
  222.     did -ra pp-addrem 8 $mask($ppaddress(%unick),0)
  223.     did -a pp-addrem 8 $mask($ppaddress(%unick),1)
  224.     did -a pp-addrem 8 $mask($ppaddress(%unick),2) 
  225.     did -a pp-addrem 8 $mask($ppaddress(%unick),3)
  226.     did -a pp-addrem 8 $mask($ppaddress(%unick),4)
  227.     did -c pp-addrem 8 3
  228.     return
  229.   }
  230.   did -ra pp-addrem 8 $address(%unick,0)
  231.   did -a pp-addrem 8 $address(%unick,1)
  232.   did -a pp-addrem 8 $address(%unick,2)
  233.   did -a pp-addrem 8 $address(%unick,3)
  234.   did -a pp-addrem 8 $address(%unick,4)
  235.   did -c pp-addrem 8 3
  236. }
  237. .-
  238. .Protection Pro (Open):{
  239.   if ($dialog(pp) == $null) { dialog -mdie pp pp }
  240.   else { dialog -v pp }
  241. }
  242. .-
  243. .mIRC Pager
  244. ..Normal - Priority [3]: { set %pmsg $?="Pager Message (leave blank for none):" | if (%pmsg != $null) { set %pmsg 0* %pmsg } | msg $1 Priority [3] %pmsg | splay $mircdirsystem\mpp\page3.wav }
  245. ..Medium - Priority [2]: { set %pmsg $?="Pager Message (leave blank for none):" | if (%pmsg != $null) { set %pmsg 0* %pmsg } | msg $1 Priority [2] %pmsg | splay $mircdirsystem\mpp\page2.wav }
  246. ..Urgent - Priority [1]: { set %pmsg $?="Pager Message (leave blank for none):" | if (%pmsg != $null) { set %pmsg 0* %pmsg } | msg $1 Priority [1] %pmsg | splay $mircdirsystem\mpp\page1.wav }
  247. .-
  248. .Check User's MPP Version:/say ~ $+ $1
  249. .-
  250. .Offer MPP to $1:/msg $1 13,1m0,1IRC 4,1P0,1ower 8,1P0,1ack 00,01 $+ %mpp.version3 0,1(12,1 $+ %mpp.website $+ 0,1) by 14,1sod4,1/0,1sgt-d 0,1(12,1 $+ %mpp.email $+ 0,1)
  251. .-
  252. .TightVNC
  253. ..Best Compression (Fastest): { set %vncmode 1 | set %dnsnick $1 | dns %dnsnick }
  254. ..Fast Compression (Medium): { set %vncmode 2 | set %dnsnick $1 | dns %dnsnick }
  255. ..No Compression (Slowest): { set %vncmode 3 | set %dnsnick $1 | dns %dnsnick }
  256. ..-
  257. ..Use Existing Config...:/run $sfile(%mydocs $+ \*.vnc, - VNC Config File)
  258. -
  259. Extra Tools
  260. .SystemInfo
  261. .-
  262. .Cryptic Writings
  263. ..Blowfish Messages
  264. ...Public 1 ( $me ):set %tempb $$?="Public 1 Message" | bq %tempb
  265. ;...Public 2 ( $chan ):set %tempb $$?="Public 2 Message" | b %tempb
  266. ...-
  267. ...Private 1 ( %bfk1 ):set %tempb $$?="Private 1 Message" | b1 %tempb
  268. ...Private 2 ( %bfk2 ):set %tempb $$?="Private 2 Message" | b2 %tempb
  269. ...Private 3 ( %bfk3 ):set %tempb $$?="Private 3 Message" | b3 %tempb
  270. ...Private 4 ( %bfk4 ):set %tempb $$?="Private 4 Message" | b4 %tempb
  271. ...Private 5 ( %bfk5 ):set %tempb $$?="Private 5 Message" | b5 %tempb
  272. ...Private 6 ( %bfk6 ):set %tempb $$?="Private 6 Message" | b6 %tempb
  273. ...Private 7 ( %bfk7 ):set %tempb $$?="Private 7 Message" | b7 %tempb
  274. ...Private 8 ( %bfk8 ):set %tempb $$?="Private 8 Message" | b8 %tempb
  275. ...Private 9 ( %bfk9 ):set %tempb $$?="Private 9 Message" | b9 %tempb
  276. ...Private 10 ( %bfk0 ):set %tempb $$?="Private 10 Message" | b0 %tempb
  277. ..-
  278. ..Blowfish Settings
  279. ...$style(%_mblowfish) Auto Decode:/bftoggle
  280. ...$style(%_mblowmode) Blowfish Mode:/bmtoggle
  281. ...-
  282. ...Blowfish Mode Type
  283. ....$style(%_bpa) Public 1 ( $me ):/setbm bq | _boff | set %_bpa 1
  284. ....$style(%_bpb) Public 2 ( $chan ):/setbm b | _boff | set %_bpb 1
  285. ....-
  286. ....$style(%_bp1) Private 1 ( %bfk1 ):/setbm b1 | _boff | set %_bp1 1
  287. ....$style(%_bp2) Private 2 ( %bfk2 ):/setbm b2 | _boff | set %_bp2 1
  288. ....$style(%_bp3) Private 3 ( %bfk3 ):/setbm b3 | _boff | set %_bp3 1
  289. ....$style(%_bp4) Private 4 ( %bfk4 ):/setbm b4 | _boff | set %_bp4 1
  290. ....$style(%_bp5) Private 5 ( %bfk5 ):/setbm b5 | _boff | set %_bp5 1
  291. ....$style(%_bp6) Private 6 ( %bfk6 ):/setbm b6 | _boff | set %_bp6 1
  292. ....$style(%_bp7) Private 7 ( %bfk7 ):/setbm b7 | _boff | set %_bp7 1
  293. ....$style(%_bp8) Private 8 ( %bfk8 ):/setbm b8 | _boff | set %_bp8 1
  294. ....$style(%_bp9) Private 9 ( %bfk9 ):/setbm b9 | _boff | set %_bp9 1
  295. ....$style(%_bp0) Private 10 ( %bfk0 ):/setbm b0 | _boff | set %_bp0 1
  296. ...-
  297. ...Set Blowfish Keys
  298. ....Public 1 Key ( $me ):echo -a 4Public 1 Key is your nickname, $me - if you change your nickname, the key is automatcially updated.
  299. ;  ..Public 2 Key ( %blowkey ):set %tempb $$?="Public 2 Key" | bfkey %tempb
  300. ....Public 2 Key ( $chan ):echo -a 4Public 2 Key is the name of the current channel, $chan - if you change channels, the key is automatcially updated.;
  301. ....-
  302. ....Private 1 Key ( %bfk1 ):set %tempb $$?="Private 1 Key" | bfk1 %tempb
  303. ....Private 2 Key ( %bfk2 ):set %tempb $$?="Private 2 Key" | bfk2 %tempb
  304. ....Private 3 Key ( %bfk3 ):set %tempb $$?="Private 3 Key" | bfk3 %tempb
  305. ....Private 4 Key ( %bfk4 ):set %tempb $$?="Private 4 Key" | bfk4 %tempb
  306. ....Private 5 Key ( %bfk5 ):set %tempb $$?="Private 5 Key" | bfk5 %tempb
  307. ....Private 6 Key ( %bfk6 ):set %tempb $$?="Private 6 Key" | bfk6 %tempb
  308. ....Private 7 Key ( %bfk7 ):set %tempb $$?="Private 7 Key" | bfk7 %tempb
  309. ....Private 8 Key ( %bfk8 ):set %tempb $$?="Private 8 Key" | bfk8 %tempb
  310. ....Private 9 Key ( %bfk9 ):set %tempb $$?="Private 9 Key" | bfk9 %tempb
  311. ....Private 10 Key ( %bfk0 ):set %tempb $$?="Private-10 Key" | bfk0 %tempb
  312. ..-
  313. ..1337 Messages
  314. ...Send 1337 Message:set %lmsg1 $$?="wh4t j00 w4nn4 s4y 1337?" | l2 %lmsg1
  315. ...-
  316. ...Private Decoder (Highlight text with mouse first!):leet3
  317. ...Decode In Chan (Highlight text with mouse first!):leet2
  318. ..-
  319. ..Reverse Messages
  320. ...Send Reverse Message:set %lmsg1 $$?="What to say in Reverse?" | reverse2 %lmsg1
  321. ...-
  322. ...Decode Reverse Message:revd
  323. ..-
  324. ..Beeker's Revenge
  325. ...One Liners (/1liner): /say $read $mircdirsystem\beeker\1liners.txt
  326. ...Yomama (/yomama): /say $read $mircdirsystem\beeker\yomama.txt
  327. ...-
  328. ...Hello:/say "14¿¿░║⌐o┐,0,┐o⌐║░¿¿░║⌐13  $?  0⌐║░¿¿░║⌐o┐,14,┐o⌐║░"
  329. ...Arrows:/me 12`╖.,╕╕,.╖3┤»`╖.,╕╕,9╗╗╗0  $?  9½½½3,╕╕,.╖┤»`12╖.,╕╕,.╖┤»
  330. ...Balloons: /me throws  *MAGIC DUST* & BALLOONS  in the air... | /me ;~'O  ~~~*`;.  'O~~~~*`;  .'O~~~~*  $!  `~;`~  `O~~~~*`;.  'O~~~*`;  .' ~~** * 
  331. ...Hearts: /me 4 (»`'╖.╕13(»`'╖.12(»`'╖..  0 $?   12╕.╖'┤»)13.╖'┤»)4╕.╖'┤»)             1 | /me 4 (_╕.╖'┤13(_╕.╖'12(_╕.╖'┤  1 $!  12`'╖.╕_)13'╖.╕_)4`'╖.╕_)
  332. ...Fish: /say 12╕.╖┤»`╖.╕3 ><((((║> 0  $?  3 <║))))><12.╖┤»`╖.╕
  333. ..-
  334. ..Send Rainbow Message:set %lmsg1 $$?="What to say in Rainbow?" | set %tempnick $1 | rainbow2 %lmsg1
  335. .-
  336. .GTSDLL
  337. -
  338. Media Overkill
  339. .Open Sound Folder
  340. ..Open WMA Folder:/wmadir
  341. ..Open MP3 Folder:/mp3dir
  342. ..Open OGG Folder:/oggdir
  343. ..Open WAV Folder:/wavdir
  344. ..Open MID Folder:/middir
  345. .-
  346. .Play Sound
  347. ..Play WMA Sound:/wma
  348. ..Play MP3 Sound:/xmp3
  349. ..Play OGG Sound:/ogg
  350. ..Play WAV Sound:/wav
  351. ..Play MID Sound:/mid
  352. .-
  353. .Stop All Sounds:/stop
  354. .-
  355. .Downloads Folder:/dndir
  356. .-
  357. .mIRCster
  358. ..Play MP3 Sound:{
  359.   /set -u %mp3file $$dir mp3\*.mp3
  360.   /sound $1 %mp3file
  361.   /msg $1 8! $+ $me $nopath(%mp3file)
  362. }
  363. ..List All MP3's:/msg $$1 @list
  364. ..Find Specific MP3:/set %fspec $$?="Search Information:" | /msg $$1 @list %fspec
  365. ..-
  366. ..Repeat Last Results:/remx
  367. ..Stop Results Playback:/play stop
  368. ..-
  369. ..Download MP3:/set %mp3nick $1 | /mp3get
  370. .-
  371. -
  372. Voice Comm
  373. -
  374. MPP Away System
  375. -
  376. Game Tools
  377. -
  378. %mppuwhodesc {
  379.   if (%mppuwho = 0) {
  380.     set %mppuwho 1
  381.     set %mppuwhodesc Double Click = /UWHO
  382.     echo 0 -a Double Click = mIRC Address Book (/uwho)
  383.   }
  384.   else {
  385.     set %mppuwho 0
  386.     set %mppuwhodesc Double Click = /WHOIS
  387.     echo 0 -a Double Click = WHOIS Information (/whois)
  388.   }
  389. }
  390.