Top

Oracle chat in a dialog


mIRC Code
+ 0 likes
Please Register to submit score.
Bookmark and Share
Average Score  3.0 (of 1 scores)
Date Added  Aug 04, 2008
Last Updated  Aug 04, 2008
Tags  dialog  oracle 

Introduction

This is a chat dialog with oracle, the oracle answers your questions.
At the moment the oracle can answer only in Finnish but i will make an edit so it will be able to answer atleast in English too.
The snippet is easy to use and I don't think there's other oracle script in hawkee (yet ;d).
Just type /oraakkeli to open the dialog. The snippet will ask you to set your nick.
Then you're ready to chat :)

I wish you enjoy the script.

Grab the Code

dialog oraakkeli {
  title "Lintukodon oraakkeli"
  size -1 -1 250 150
  option dbu
  edit "", 1, 10 10 230 120, read multi vsbar
  edit "", 2, 10 130 180 10
  button "Sano", 3, 200 130 37 9, default flat
}
 
on *:dialog:oraakkeli:init:*:{
  did -a oraakkeli 1 Tervetuloa oraakkeliin. Tämä on korjattu versio MSDB:ssä olevasta oraakkelista dialogissa.
  set %o.nick $input(Anna nick jolla chattailla oraakkelin kanssa.,e,Oraakkelissa käyttämäsi nimi)
}
on *:dialog:oraakkeli:sclick:*:{
  if ($did == 3 && $did(2) != $null) {
    sockopen oraakkeli lintukoto.net 80
    set %kysymys $did(2)
    did -r oraakkeli 2
    did -a oraakkeli 1 $time $+(<,%o.nick,>) %kysymys $crlf
  }
}
on *:sockopen:oraakkeli:{
  if ($sockerr > 0) did -a oraakkeli 1 Tapahtui virhe yhdistettäessä palvelimeen.
  else {
    sockwrite -n oraakkeli GET http://www.lintukoto.net/viihde/oraakkeli/index.php?html=0&kysymys= $+ $replacex(%kysymys,$chr(32),%20,$,$eval($,0))
    sockwrite -n oraakkeli Host: www.lintukoto.net
    sockwrite -n oraakkeli Connection: close
    sockwrite -n oraakkeli $crlf
  }
}
on *:sockread:oraakkeli:{
  sockread %o
  did -a oraakkeli 1 $time <Oraakkeli> %o $crlf
}
alias oraakkeli dialog -m oraakkeli oraakkeli
 

Comments

  (1)  RSS
juhapuha
Comments: 73
 
mIRC Snippet:  Oracle chat in a dialog
Posted on Aug 4, 2008 5:39 pm
Sorry for the Finnish language in the script. I made it for my own purposes and will post a English version of it too.

Commenting Options

Register or Login to Hawkee.com or use your Facebook or Twitter account by clicking the corresponding button below.

  
Bottom