Dark Castle 2000 — File Browser

DarkCastle2000v1.0 / DarkCastle2000v1.0 / unmasker.mrc

unmasker.mrc — 8.35 KB — Download this file

on 1:DNS  {
  if (%unmask.status == on) {
    if ($raddress == $null) {
      .disable #UnmaskRaws
      .timerum off
      unset %um.*      
      um $nick $address
      .timerum off
      .timerum2 off    
    }
  }
  if ($raddress != $null) set %unmask.status off
}
#UnmaskRaws on
on 1:nick: if ($nick == %um.nick) { set %um.nick $newnick }
raw 315:*: {
  if (%unmask.status == on) { 
    inc %um.num
    if (%um.num == 255) {
      dialog -t ipu Couldnt Unmask the Ip    
      unset %um.*
      .disable #dns1 | .disable #UnmaskRaws | halt 
    }
    if ($2 == $chr(42)) { halt }
    if ($2 != $chr(42)) {
      set %um.ipnow $replace($2,?,$chr(44)) | halt 
    }
  }
  if (%unmask.status == off) halt
}
raw 352:*: {
  if (%unmask.status == on) {
    if ($6 == %um.nick) { 
      .disable #asdf      
      set %um.doneip %ipnow  
      if (%um.num < 182) && (%um.xcount == 3) goto asdfg
      inc %um.num 
      :asdfg      
      did -a ipu 4 $replace(%um.ip,?,.) $+ %um.num
      did -a ipu 6 $duration($calc($ctime - %um.time)) 
      did -a ipu 2 %um.nick 
      dialog -t ipu Unmasking Process Finished 
      .timerum 1 20 .disable #unmaskRaws 
      .timerum2 1 30 set %unmask.status off      
      unset %um.*
      .enable #asdf
      .disable #dns1 | halt 
    }
    if ($6 != %um.nick) halt    
  }
}
#UnmaskRaws end
alias um {
  if ($1 == $null) halt
  unset um.*  
  dialog -t ipu Unmasking Process Started
  set %um.time $ctime
  set %um.num 1  
  set %um.nick $1
  set %um.ip $remove($replace($2,.,?),X)
  set %um.xcount $count($2,X)
  set %unmask.status on
  .enable #UnmaskRaws
  getip
}
alias getip {
  set %um.set1 %um.ip $+ 1 $+ , $+ %um.ip $+ 2 $+ , $+ %um.ip $+ 3 $+ , $+ %um.ip $+ 4 $+ , $+ %um.ip $+ 5 $+ , $+ %um.ip $+ 6 $+ , $+ %um.ip $+ 7 $+ , $+ %um.ip $+ 8 $+ , $+ %um.ip $+ 9 $+ , $+ %um.ip $+ 10 $+ , $+ %um.ip $+ 11 $+ , $+ %um.ip $+ 12 $+ , $+ %um.ip $+ 13 $+ , $+ %um.ip $+ 14 $+ , $+ %um.ip $+ 15 $+ , $+ %um.ip $+ 16 $+ , $+ %um.ip $+ 17 $+ , $+ %um.ip $+ 18 $+ , $+ %um.ip $+ 19 $+ , $+ %um.ip $+ 20 $+ , $+ %um.ip $+ 21 $+ , $+ %um.ip $+ 22 $+ , $+ %um.ip $+ 23 $+ , $+ %um.ip $+ 24 $+ , $+ %um.ip $+ 25
  set %um.set2 %um.ip $+ 26 $+ , $+ %um.ip $+ 27 $+ , $+ %um.ip $+ 28 $+ , $+ %um.ip $+ 29 $+ , $+ %um.ip $+ 30 $+ , $+ %um.ip $+ 31 $+ , $+ %um.ip $+ 32 $+ , $+ %um.ip $+ 33 $+ , $+ %um.ip $+ 34 $+ , $+ %um.ip $+ 35 $+ , $+ %um.ip $+ 36 $+ , $+ %um.ip $+ 37 $+ , $+ %um.ip $+ 38 $+ , $+ %um.ip $+ 39 $+ , $+ %um.ip $+ 40 $+ , $+ %um.ip $+ 41 $+ , $+ %um.ip $+ 42 $+ , $+ %um.ip $+ 43 $+ , $+ %um.ip $+ 44 $+ , $+ %um.ip $+ 45 $+ , $+ %um.ip $+ 46 $+ , $+ %um.ip $+ 48 $+ , $+ %um.ip $+ 49 $+ , $+ %um.ip $+ 50 $+ , $+ %um.ip $+ 51
  set %um.set3 %um.ip $+ 52 $+ , $+ %um.ip $+ 53 $+ , $+ %um.ip $+ 54 $+ , $+ %um.ip $+ 55 $+ , $+ %um.ip $+ 56 $+ , $+ %um.ip $+ 57 $+ , $+ %um.ip $+ 58 $+ , $+ %um.ip $+ 59 $+ , $+ %um.ip $+ 60 $+ , $+ %um.ip $+ 61 $+ , $+ %um.ip $+ 62 $+ , $+ %um.ip $+ 63 $+ , $+ %um.ip $+ 64 $+ , $+ %um.ip $+ 65 $+ , $+ %um.ip $+ 66 $+ , $+ %um.ip $+ 67 $+ , $+ %um.ip $+ 68 $+ , $+ %um.ip $+ 69 $+ , $+ %um.ip $+ 70 $+ , $+ %um.ip $+ 71 $+ , $+ %um.ip $+ 72 $+ , $+ %um.ip $+ 73 $+ , $+ %um.ip $+ 74 $+ , $+ %um.ip $+ 75 $+ , $+ %um.ip $+ 76
  set %um.set4 %um.ip $+ 77 $+ , $+ %um.ip $+ 78 $+ , $+ %um.ip $+ 79 $+ , $+ %um.ip $+ 80 $+ , $+ %um.ip $+ 81 $+ , $+ %um.ip $+ 82 $+ , $+ %um.ip $+ 83 $+ , $+ %um.ip $+ 84 $+ , $+ %um.ip $+ 85 $+ , $+ %um.ip $+ 86 $+ , $+ %um.ip $+ 87 $+ , $+ %um.ip $+ 88 $+ , $+ %um.ip $+ 89 $+ , $+ %um.ip $+ 90 $+ , $+ %um.ip $+ 91 $+ , $+ %um.ip $+ 92 $+ , $+ %um.ip $+ 93 $+ , $+ %um.ip $+ 94 $+ , $+ %um.ip $+ 95 $+ , $+ %um.ip $+ 96 $+ , $+ %um.ip $+ 97 $+ , $+ %um.ip $+ 98 $+ , $+ %um.ip $+ 99 $+ , $+ %um.ip $+ 100 $+ , $+ %um.ip $+ 101
  set %um.set5 %um.ip $+ 102 $+ , $+ %um.ip $+ 103 $+ , $+ %um.ip $+ 104 $+ , $+ %um.ip $+ 105 $+ , $+ %um.ip $+ 106 $+ , $+ %um.ip $+ 107 $+ , $+ %um.ip $+ 108 $+ , $+ %um.ip $+ 109 $+ , $+ %um.ip $+ 110 $+ , $+ %um.ip $+ 111 $+ , $+ %um.ip $+ 112 $+ , $+ %um.ip $+ 113 $+ , $+ %um.ip $+ 114 $+ , $+ %um.ip $+ 115 $+ , $+ %um.ip $+ 116 $+ , $+ %um.ip $+ 117 $+ , $+ %um.ip $+ 118 $+ , $+ %um.ip $+ 119 $+ , $+ %um.ip $+ 120 $+ , $+ %um.ip $+ 121 $+ , $+ %um.ip $+ 122 $+ , $+ %um.ip $+ 123 $+ , $+ %um.ip $+ 124 $+ , $+ %um.ip $+ 125 $+ , $+ %um.ip $+ 126
  set %um.set6 %um.ip $+ 127 $+ , $+ %um.ip $+ 128 $+ , $+ %um.ip $+ 129 $+ , $+ %um.ip $+ 130 $+ , $+ %um.ip $+ 131 $+ , $+ %um.ip $+ 132 $+ , $+ %um.ip $+ 133 $+ , $+ %um.ip $+ 134 $+ , $+ %um.ip $+ 135 $+ , $+ %um.ip $+ 136 $+ , $+ %um.ip $+ 137 $+ , $+ %um.ip $+ 138 $+ , $+ %um.ip $+ 139 $+ , $+ %um.ip $+ 140 $+ , $+ %um.ip $+ 141 $+ , $+ %um.ip $+ 142 $+ , $+ %um.ip $+ 143 $+ , $+ %um.ip $+ 144 $+ , $+ %um.ip $+ 145 $+ , $+ %um.ip $+ 146 $+ , $+ %um.ip $+ 147 $+ , $+ %um.ip $+ 148 $+ , $+ %um.ip $+ 149 $+ , $+ %um.ip $+ 150 $+ , $+ %um.ip $+ 151
  set %um.set7 %um.ip $+ 152 $+ , $+ %um.ip $+ 153 $+ , $+ %um.ip $+ 154 $+ , $+ %um.ip $+ 155 $+ , $+ %um.ip $+ 156 $+ , $+ %um.ip $+ 157 $+ , $+ %um.ip $+ 158 $+ , $+ %um.ip $+ 159 $+ , $+ %um.ip $+ 160 $+ , $+ %um.ip $+ 161 $+ , $+ %um.ip $+ 162 $+ , $+ %um.ip $+ 163 $+ , $+ %um.ip $+ 164 $+ , $+ %um.ip $+ 165 $+ , $+ %um.ip $+ 166 $+ , $+ %um.ip $+ 167 $+ , $+ %um.ip $+ 168 $+ , $+ %um.ip $+ 169 $+ , $+ %um.ip $+ 170 $+ , $+ %um.ip $+ 171 $+ , $+ %um.ip $+ 172 $+ , $+ %um.ip $+ 173 $+ , $+ %um.ip $+ 174 $+ , $+ %um.ip $+ 175 $+ , $+ %um.ip $+ 176
  set %um.set8 %um.ip $+ 177 $+ , $+ %um.ip $+ 178 $+ , $+ %um.ip $+ 179 $+ , $+ %um.ip $+ 180 $+ , $+ %um.ip $+ 181 $+ , $+ %um.ip $+ 182 $+ , $+ %um.ip $+ 183 $+ , $+ %um.ip $+ 184 $+ , $+ %um.ip $+ 185 $+ , $+ %um.ip $+ 186 $+ , $+ %um.ip $+ 187 $+ , $+ %um.ip $+ 188 $+ , $+ %um.ip $+ 189 $+ , $+ %um.ip $+ 190 $+ , $+ %um.ip $+ 191 $+ , $+ %um.ip $+ 192 $+ , $+ %um.ip $+ 193 $+ , $+ %um.ip $+ 194 $+ , $+ %um.ip $+ 195 $+ , $+ %um.ip $+ 196 $+ , $+ %um.ip $+ 197 $+ , $+ %um.ip $+ 198 $+ , $+ %um.ip $+ 199 $+ , $+ %um.ip $+ 200 $+ , $+ %um.ip $+ 201
  set %um.set9 %um.ip $+ 202 $+ , $+ %um.ip $+ 203 $+ , $+ %um.ip $+ 204 $+ , $+ %um.ip $+ 205 $+ , $+ %um.ip $+ 206 $+ , $+ %um.ip $+ 207 $+ , $+ %um.ip $+ 208 $+ , $+ %um.ip $+ 209 $+ , $+ %um.ip $+ 210 $+ , $+ %um.ip $+ 211 $+ , $+ %um.ip $+ 212 $+ , $+ %um.ip $+ 213 $+ , $+ %um.ip $+ 214 $+ , $+ %um.ip $+ 215 $+ , $+ %um.ip $+ 216 $+ , $+ %um.ip $+ 217 $+ , $+ %um.ip $+ 218 $+ , $+ %um.ip $+ 219 $+ , $+ %um.ip $+ 220 $+ , $+ %um.ip $+ 221 $+ , $+ %um.ip $+ 222 $+ , $+ %um.ip $+ 223 $+ , $+ %um.ip $+ 224 $+ , $+ %um.ip $+ 225 $+ , $+ %um.ip $+ 226
  set %um.set10 %um.ip $+ 227 $+ , $+ %um.ip $+ 228 $+ , $+ %um.ip $+ 229 $+ , $+ %um.ip $+ 230 $+ , $+ %um.ip $+ 231 $+ , $+ %um.ip $+ 232 $+ , $+ %um.ip $+ 233 $+ , $+ %um.ip $+ 234 $+ , $+ %um.ip $+ 235 $+ , $+ %um.ip $+ 236 $+ , $+ %um.ip $+ 237 $+ , $+ %um.ip $+ 238 $+ , $+ %um.ip $+ 239 $+ , $+ %um.ip $+ 240 $+ , $+ %um.ip $+ 241 $+ , $+ %um.ip $+ 242 $+ , $+ %um.ip $+ 243 $+ , $+ %um.ip $+ 244 $+ , $+ %um.ip $+ 245 $+ , $+ %um.ip $+ 246 $+ , $+ %um.ip $+ 247 $+ , $+ %um.ip $+ 248 $+ , $+ %um.ip $+ 249 $+ , $+ %um.ip $+ 250 $+ , $+ %um.ip $+ 251 $+ , $+ %um.ip $+ 252 $+ , $+ %um.ip $+ 252 $+ , $+ %um.ip $+ 254 $+ , $+ %um.ip $+ 255

  if (%um.xcount == 1) {
    if (%unmask.status == on) { raw -q who %um.set1 }
    goto endthis
  }
  if (%um.xcount == 2) {
    set %um.num 1  
    .timer 1 1 if (%unmask.status == on) { raw -q who %um.set1 }
    .timer 1 2 if (%unmask.status == on) { raw -q who %um.set2 }
    .timer 1 3 if (%unmask.status == on) { raw -q who %um.set3 }
    .timer 1 4 if (%unmask.status == on) { raw -q who %um.set4 }
    goto endthis
  }

  if (%um.xcount == 3) {
    set %um.num 77
    .timer 1 1 if (%unmask.status == on) { raw -q who %um.set4 }
    .timer 1 2 if (%unmask.status == on) { raw -q who %um.set5 }
    .timer 1 3  if (%unmask.status == on) { raw -q who %um.set6 }
    .timer 1 4  if (%unmask.status == on) { raw -q who %um.set7 }
    .timer 1 6  if (%unmask.status == on) { raw -q who %um.set8 }
    .timer 1 7  if (%unmask.status == on) { raw -q who %um.set9 }
    .timer 1 8  if (%unmask.status == on) { raw -q who %um.set10 }
    goto endthis
  }
  :endthis
}
dialog ipu {
  title  "Ip Unmasker"
  size   -1 -1 292 103
  text   "Nick:",1,42 10 28 12
  edit   "",2,71 8 191 19, read
  text   "UnMasked Ip:",3,2 31 70 14
  edit   "",4,71 30 191 19, read
  text   "Time:",5,44 52 26 13
  edit   "",6,71 51 191 19, read
  button "Ok",7,110 78 79 20, ok
}