Dictionary lookup

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	8.5
Scores Submitted	2
Date Added	Apr 10, 2008
Last Updated	Apr 10, 2008
Tags	define dictionary lookup word

Introduction

Dictionary script by BloodHound

*** About ***

It looks up the definition of a word based on the first result from dictionary.reference.com. You can either use this alias or dialog based.

*** Syntax ***

/dict <word> : (Alias syntax mentioned above) Echoes the results of the lookup into the active window

/dictd or channel/menubar popups : (Dialog based mentioned above) Opens up a dialog in which you can type in the word to define and have the results dumped in an editbox. Some find this easier than the alias.

* Please please please comment! Happy chatting!

Best wishes,

BloodHound

Grab the Code

alias dict {
  if $1 {
    sockopen dt dictionary.reference.com 80
    set %dt.current $v1 
    set %dt.method echo -tc info2 $iif($active != Status window,$active)
  }
  else {
    echo -atc info *** Error in /dict: Provide correct syntax.
  }
}

alias -l dictd dialog $iif($dialog(dict),-v,-m) dict dict
menu channel,menubar { 
  Dictionary lookup:dictd
}

on *:sockopen:dt:{ 
  sockwrite -nt dt GET /browse/ $+ %dt.current HTTP/1.1
  sockwrite -nt dt Host: dictionary.reference.com 
  sockwrite -nt dt $crlf
}
on *:sockread:dt:{ 
  if $sockerr { 
    %dt.method ! Error in socket ! $sock(dt).wsmsg
  }
  else { 
    var %dtr, %a = unset %dt. $+ $chr(42) $chr(124) sockclose dt
    sockread %dtr
    if *No*found* iswm %dtr { 
      %dt.method *Dictionary Results* No results found.
      scon -at1 %a
    }
    if $regex(%dtr,/1.</td><td valign="top">(.+?)</td>/i) {  
      %dt.method $regsubex($regml(1),/<(.+?)>/g,$null)
      scon -at1 %a
    }
  }
}

dialog dict {
  title "Dictionary look up"
  size -1 -1 230 88
  option pixels
  edit "", 1, 7 9 148 20, autohs
  button "Define", 2, 158 6 65 25
  edit "", 3, 7 31 218 54, read autovs multi vsbar
}

on *:dialog:dict:sclick:2:{ 
  var %a = did -ra $dname 3 
  if !$did(dict,1).text { %a Enter a word to define! }
  else { 
    set %dt.method %a
    sockopen dt dictionary.reference.com 80
    set %dt.current $did(dict,1).text
  }
}

Comments

(10) RSS

Go to Bottom

PunkTuReD

Comments: 75

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 11:41 am

small and neat , awesome .

BloodHound

Comments: 5

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 2:32 pm

Thanks!

Comments: 22

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 3:41 pm

cool!
btw I think pple will like this. type this in /server 64.32.13.48

jonesy44

Comments: 920

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 3:54 pm

go away with you sodding server .. hmmkay ?

^Neptune

Comments: 242

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 3:57 pm

/server -m irc.deltaanime.net -j #jonesy44 YEAH

Eugenio

Comments: 926

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 5:35 pm

Very good.

jonesy44

Comments: 920

mIRC Snippet: Dictionary lookup
Posted on Apr 10, 2008 6:04 pm

GRREEAatt chan :P

Al_Bundy33

Comments: 13

mIRC Snippet: Dictionary lookup
Posted on Apr 20, 2008 5:46 pm

can you make a channel version of this script to where someone can type !dict and the word and it gives the results in the channel?

Lauranator

Comments: 5

mIRC Snippet: Dictionary lookup
Posted on Apr 21, 2008 11:12 pm

hmm yes, i was going to suggest the same thing Al Bundy33 did, to make the defination show in the channel for all to see and not just me. Other than that, nice script.

thx.

Al_Bundy33

Comments: 13

mIRC Snippet: Dictionary lookup
Posted on Apr 22, 2008 9:51 pm

yeah something like this...

<Skunk16> !dict Ghost

<Al_Bundy33> Ghost : the soul of a dead person, a disembodied spirit imagined, usually as a vague, shadowy or evanescent form, as wandering among or haunting living persons.

Dictionary lookup

Introduction

Grab the Code

Comments

BloodHound

My Snippet Tags

Contact

Sponsors


Last seen: Apr 10, 2008 Profile Snippets (1) Comments Received (10) Comments Submitted (5) Forum Posts (5)