Id: 10053; Nick: ThLoser; Timestamp: 2008-05-05 07:30:57; Pasted as: mIRC
Description: n/a 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

on *:OPEN:?:{
  if ($comchan($nick,0) == 0) { 
    set %comchan N/A
  } 
  else { 
    var %x = 1 
    while (%x <= $comchan($nick,0)) { 
      set %comchan $addtok(%comchan,$comchan($nick,%x),32) 
      inc %x
    }
  }
  if ($readini(info/pm.ini,PM,$address($nick,5)) == $null) { 
    writeini info/pm.ini PM $address($nick,5) 1 
  }
  else {
    set %f $readini(info/pm.ini,PM,$address($nick,5)) 
    inc %f 
    writeini info/pm.ini PM $address($nick,5) %f
    unset %f 
  }
  echo -lmt $nick 4[0Query with: $nick $+ 4]0 $chr(172) 4[0Address: $address($nick,5) $+ 4]0 
  echo -lmt $nick 4[0Messages with this user: $readini(info/pm.ini,PM,$address($nick,5)) $+ 4]0 $chr(172) 4[0Common Channels: %comchan $+ 4]0 
  unset %comchan 
}
Parsed for bracket errors and indented: 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

on *:OPEN:?:{
  if ($comchan($nick,0) == 0) {
    set %comchan N/A
  }
  else {
    var %x = 1
    while (%x <= $comchan($nick,0)) {
      set %comchan $addtok(%comchan,$comchan($nick,%x),32)
      inc %x
    }
  }
  if ($readini(info/pm.ini,PM,$address($nick,5)) == $null) {
    writeini info/pm.ini PM $address($nick,5) 1
  }
  else {
    set %f $readini(info/pm.ini,PM,$address($nick,5))
    inc %f
    writeini info/pm.ini PM $address($nick,5) %f
    unset %f
  }
  echo -lmt $nick 4[0Query with: $nick $+ 4]0 $chr(172) 4[0Address: $address($nick,5) $+ 4]0
  echo -lmt $nick 4[0Messages with this user: $readini(info/pm.ini,PM,$address($nick,5)) $+ 4]0 $chr(172) 4[0Common Channels: %comchan $+ 4]0
  unset %comchan
}
Options: New, Download,
, mIRC Parser;
Copyright © 2006 by Zyberdog - Some rights reserved. (Browse/Disclaimer/Stats/About)
Nothing to see here.