Small Tutorial For Smilesview.dll:
First off, you will need to make a directory so that you can copy smilesview.dll to the directory you have created, and have the dll renamed to something else so that you can use it in multiple rooms. Here is how to do this.
on ^*:JOIN:#:{
if ($nick == $me) {
if (!$exists($mircdirdlls)) { mkdir dlls }
copy -o smilesview.dll dlls/Dll $+ $window($chan).hwnd $+ .dll
dll dlls/Dll $+ $window($chan).hwnd $+ .dll attach $window($chan).hwnd
dll dlls/Dll $+ $window($chan).hwnd $+ .dll navigate about:blank
}
This code will replace your channel window with a webpage window.
Now, you will need to set some specifics so that events can write to this webpage window. Normal mirc code willnot work. So, you have to use HTML to write to the window. Here is an example to write someones text to the window.
alias echo {
set %echo $switch($1-)
if ($chan) { dll DllTmp\Dll $+ $window(%chan $+ $chan).hwnd $+ .dll writeln <basefont color=" $+ %fontcolor $+ " size=2 face=Tahoma Border="5"><br> $+ %echo }
elseif ($window(@ $+ $nick)) { dll DllTmp\Dll $+ $window($active).hwnd $+ .dll writeln <basefont color="blue" size=2 face=Tahoma Border="5"><br> $+ %echo }
else { echo $1- }
}
Now, you can use regular mirc code to echo text to your window.
on ^*:TEXT:*:#: { echo $chan $nick $+ : %echo }
on ^*:INPUT:#:{ msg $chan $1- | echo $chan $me $+ : %echo }
Now, for kick messages, and such you will need to change the html color code, and then change it back to the color you had before. Here is what I have.
on ^*:KICK:#:{
set %fontcolor red
if ($knick != $me) { echo $chan $nick kicked $knick out of $comchan($nick,1) $2- }
set %fontcolor blue
}
Okay, onto creating smilies.
First, you will need pictures of smilies to use. I suggest putting these pictures into their own directory so that your script won't look cluttered.
Next, you will need to make a code to call on these pics to replace certain text such as
. Here is what I mean.
alias switch {
if (.com == $right($1-,4)) || (.net == $right($1-,4)) || (.org == $right($1-,4)) || (.uk == $right($1-,3)) {
var %switch = %echo
%switch = $replace(%switch, $+ %echo $+ ,$chr(32))
}
else {
var %switch = %echo
%switch = $replace(%switch,[Owner],<img SRC=" $+ $mircdir $+ images\owner.bmp">,[Host],<img SRC=" $+ $mircdir $+ images\host.bmp">,[Participant],<img SRC=" $+ $mircdir $+ images\Participant.bmp">,[Spectator],<img SRC=" $+ $mircdir $+ images\Spec.ico">)
%switch = $replace(%switch,<. $+ $nick $+ >,$chr(32),$nick $+ : -tmi2 < $+ $switch($nick) $+ > $1-,$chr(32),<@ $+ $nick $+ >,$chr(32),$nick $+ : -tmi2 < $+ $switch($nick) $+ > $1-,$chr(32),-ti2,$chr(32),$chan,$chr(32),nipple, ,fag, ,person, ,faggit, ,lesbian, ,sex, ,sexy, ,*, ,omfg, ,mfg, ,sux, ,suck, ,sperm, ,wtf, ,shl0ng, ,shlong, ,thingy, ,bich, ,dog, ,anal, ,anally, ,analy, ,slpoited, ,exploit, ,azz, ,cream, ,creaming, ,lmmafo, ,lmmfao, ,shexy, ,holy, )
%switch = $replace(%switch,rosygarden, ,flower, ,dog, ,bastard, ,very nice person, ,piss, ,fart, ,thingy, ,damn, ,phuck, ,starwars,<img SRC=" $+ $mircdir $+ images\starwars.gif">,lmao, ,lmfao, ,dammit, ,pist, ,ass, ,thingy, ,thingy, ,thingy, ,breast, )
%switch = $replace(%switch,//msnico,<img SRC=" $+ $mircdir $+ images\msn.ico">,f*ck, ,:f,<img SRC=" $+ $mircdir $+ images\flower.bmp"> )
%switch = $replace(%switch,:l,<img SRC=" $+ $mircdir $+ images\love.bmp">,:>,<img SRC=" $+ $mircdir $+ images\smile.bmp">,:'<,<img SRC=" $+ $mircdir $+ images\cry.bmp">,:??,<img SRC=" $+ $mircdir $+ images\owner1.bmp">,:?,<img SRC=" $+ $mircdir $+ images\host1.bmp">,:d,<img src=" $+ $mircdir $+ images/smileD.gif">,:'d,<img src=" $+ $mircdir $+ images/happy.bmp">,:],<img src=" $+ $mircdir $+ images/ninja.gif">,=],<img src=" $+ $mircdir $+ images/torch.gif">,God, )
%switch = $replace(%switch,//voi,<img SRC=" $+ $mircdir $+ images\Participant.bmp">,:' $+ $chr(40),<img SRC=" $+ $mircdir $+ images\cry.gif">,: $+ $chr(40),<img SRC=" $+ $mircdir $+ images\sad.gif">,:S,<img SRC=" $+ $mircdir $+ images\crooked.gif">,( $+ 6 $+ ),<img SRC=" $+ $mircdir $+ images\devil.gif">,o_o,<img SRC=" $+ $mircdir $+ images\shocked.gif">,: $+ $chr(41),<img SRC=" $+ $mircdir $+ images\smileN.gif">,:x,<img SRC=" $+ $mircdir $+ images\unsure.gif">,:o,<img SRC=" $+ $mircdir $+ images\SmileO.gif">,:|,<img SRC=" $+ $mircdir $+ images\dazed.gif">,:$,<img SRC=" $+ $mircdir $+ images\blush.gif">,//voice,<img SRC=" $+ $mircdir $+ images\voice.gif">,:P,<img SRC=" $+ $mircdir $+ images\smileP.gif">,:'P,<img SRC=" $+ $mircdir $+ images\childish.bmp">,8D,<img SRC=" $+ $mircdir $+ images\test1.gif">)
%switch = $replace(%switch,//half,<PARAM NAME=textColor VALUE="White"><p>Test</P> ,//owner,<img SRC=" $+ $mircdir $+ images\owner.bmp">,^^,<img SRC=" $+ $mircdir $+ images\smile2.gif">,o.o,<img SRC=" $+ $mircdir $+ images\Bounce.gif">,=/,<img SRC=" $+ $mircdir $+ images\NotSure.gif">,=/,<img SRC=" $+ $mircdir $+ images\NotSure.gif">,:[,<img SRC=" $+ $mircdir $+ images\vampire.gif">,( $+ N $+ ),<img SRC=" $+ $mircdir $+ images\no.gif">,( $+ S $+ ),<img SRC=" $+ $mircdir $+ images\sleep.gif">,( $+ i $+ ),<img SRC=" $+ $mircdir $+ images\idea.gif">,( $+ T $+ ),<img SRC=" $+ $mircdir $+ images\phone.gif">,x_x,<img SRC=" $+ $mircdir $+ images\nani.gif">,(|),<img SRC=" $+ $mircdir $+ images\slepy.gif">,^o,<img SRC=" $+ $mircdir $+ images\sarcasm.gif">,//op,<img SRC=" $+ $mircdir $+ images\owner.bmp">,( $+ h $+ ),<img SRC=" $+ $mircdir $+ images\test1.gif">,:'o,<img SRC=" $+ $mircdir $+ images\shocked.bmp">)
%switch = $replace(%switch,( $+ y $+ ),<img SRC=" $+ $mircdir $+ images\yes.gif">,:@,<img SRC=" $+ $mircdir $+ images\smileM.gif">,( $+ @ $+ ),<img SRC=" $+ $mircdir $+ images\anger.gif">,( $+ c $+ ),<img SRC=" $+ $mircdir $+ images\cauldron.gif">,( $+ a $+ ),<img SRC=" $+ $mircdir $+ images\angel.gif">,;p,<img SRC=" $+ $mircdir $+ images\WinP.gif">,8P,<img SRC=" $+ $mircdir $+ images\LunP.gif">,( $+ p $+ ),<img SRC=" $+ $mircdir $+ images\camera.gif">,( $+ f $+ ),<img SRC=" $+ $mircdir $+ images\rose.gif">,( $+ b $+ ),<img SRC=" $+ $mircdir $+ images\beer.gif">,; $+ $chr(41),<img SRC=" $+ $mircdir $+ images\wink.gif">,( $+ m $+ ),<img SRC=" $+ $mircdir $+ images\messenger.gif">,( $+ k $+ ),<img SRC=" $+ $mircdir $+ images\kiss.gif">,( $+ l $+ ),<img SRC=" $+ $mircdir $+ images\love.gif">,( $+ 8 $+ ),<img SRC=" $+ $mircdir $+ images\note.gif">,( $+ * $+ ),<img SRC=" $+ $mircdir $+ images\star.gif">)
%switch = $replace(%switch,$dname(Word_Kill,3).text,$chr(32))
%switch = $replace(%switch,á¼ ,n)
%switch = $replace(%switch,á½·,i)
%switch = $replace(%switch,Ž,z)
%switch = $replace(%switch,Å‚,l)
%switch = $replace(%switch,ï?¨,h)
%switch = $replace(%switch,ï€ ï€¡,!)
%switch = $replace(%switch,,")
%switch = $replace(%switch,,$)
%switch = $replace(%switch,Ã?,u)
%switch = $replace(%switch, ,$chr(37))
%switch = $replace(%switch,,%)
%switch = $replace(%switch,,&)
%switch = $replace(%switch,,')
%switch = $replace(%switch,Ã?Ã,v)
%switch = $replace(%switch,ï?§,g)
%switch = $replace(%switch,â,T)
%switch = $replace(%switch,È,J)
%switch = $replace(%switch,Å©,u)
%switch = $replace(%switch,Ö½,.)
%switch = $replace(%switch,ь,b)
%switch = $replace(%switch,‼,!!)
%switch = $replace(%switch,ÑŸ,u)
%switch = $replace(%switch,ĵ,j)
%switch = $replace(%switch,â·,$chr(183))
%switch = $replace(%switch,ÃÅ¡,K)
%switch = $replace(%switch,Χ,X)
%switch = $replace(%switch,â„¢,™)
%switch = $replace(%switch,ï?‹,k)
%switch = $replace(%switch,Ã?L,u)
%switch = $replace(%switch,ÃŽ,w)
%switch = $replace(%switch,ß,N)
%switch = $replace(%switch,ẃá,w)
%switch = $replace(%switch,ÑŠ,b)
%switch = $replace(%switch,Ã?r,u)
%switch = $replace(%switch,Ò“,?)
%switch = $replace(%switch,ı,i)
%switch = $replace(%switch,Ö¾,-)
%switch = $replace(%switch,Ρ,P)
%switch = $replace(%switch,Ã…,u)
%switch = $replace(%switch,ï?ˆ,H)
%switch = $replace(%switch,Ễ,E)
%switch = $replace(%switch,ï?¦,f)
%switch = $replace(%switch,Ã…Å ,N)
%switch = $replace(%switch,ш,W)
%switch = $replace(%switch,ï®’,S)
%switch = $replace(%switch,ẵ,a)
%switch = $replace(%switch,Å¢,T)
%switch = $replace(%switch,,!)
%switch = $replace(%switch,ï?’,R)
%switch = $replace(%switch,∑,E)
%switch = $replace(%switch,á»±,u)
%switch = $replace(%switch,
, )
%switch = $replace(%switch,à ¸¥,a)
%switch = $replace(%switch,ïº,c)
%switch = $replace(%switch,Ò¯,$chr(19))
%switch = $replace(%switch,♥,$chr(19))
%switch = $replace(%switch,õ,e)
%switch = $replace(%switch,†,†)
%switch = $replace(%switch,Ο,O)
%switch = $replace(%switch,,=)
%switch = $replace(%switch,Þ,Þ)
return %switch
}
}
Not only is this a good method for calling on your pics, but it is also good for censoring words as well that you just don't care to see.
End Of Tutorial.