DNS Script Fehler?

#1
Hallo leute,

Ich weiß nicht was an diesem Script falsch ist... vielleicht kann mir jemand ein besseres geben (Es ist übrigens für einen Bot gedacht!)

<Kn0p3XX> .dns coding-board.de
<Yukari`> IP: 213.133.104.158 Hostmaske: 213.133.104.158
mIRC Script:
Code:
on 10:TEXT:.dns *:#: {
  set %dnstest $2
  set %dnschan $chan
  dns $2-
}
on *:DNS:{ haltdef
  if ($iaddress == $null) {
    msg %dnschan Unable to resolve: $naddress
  }
  else {
    msg %dnschan IP: $iaddress Hostmaske: $raddress
    haltdef 
  }
}
Ich danke euch :D

MfG
 

DJFelipe

Well-Known Member
c-b Experte
#2
Ich habe mir so etwas für eigene Auflösungen gebaut... Die Variablen könntest aber denk ich mal übernehmen...
Code:
on 1:DNS:{
  var %n = $dns(0)
  var %d = $dns(0)
  var %resolv = $dns(%n)
  echo -a 15-14-15-14-15-14-15-14-15-14- 0DNS Resolve for %resolv 15-14-15-14-15-14-15-14-15-14-
  echo -a 0[4Total Found0]9 %d
  echo -a 15-14-15-14-15-14-15-14-15-14- 0Starting Output for DNS Resolve 15-14-15-14-15-14-15-14-15-14-
  while (%n > 0) {
    echo -a 0[4Address0]9 $dns(%n).addr
    echo -a 0[4IP0]9 $dns(%n).ip
    dec %n
  }
  echo -a 15-14-15-14-15-14-15-14-15-14- 0End DNS Resolve for %resolv 15-14-15-14-15-14-15-14-15-14-
}
Bedenke bitte, das du mehrere Rückgabewerte für z.B. IP bekommen kannst ;) deswegen auch die while
 

DJFelipe

Well-Known Member
c-b Experte
#4
Du kannst es ja umbauen, das es als 'Bot' funktioniert... Generell würde ich aber für einen IRCBot eher Eggdrop vorschlagen ;)

Code:
on *:DNS:{ 
  var %n = $dns(0)
  var %d = $dns(0)
  var %resolv = $dns(%n)
  if (%d == 0) {
    msg %dnschan IP: Unable to resolve: $naddress
  } else {
    while (%n > 0) {
      msg %dnschan IP: $dns(%n).ip Hostmaske: $dns(%n).addr
      dec %n
    }
  }
}
Code ist nicht getestet, müsste aber eigendlich funktionieren...
 
Oben