TG007 Posted January 18, 2005 Report Posted January 18, 2005 How to use Smilesview.dll ( by Warrior124 ) 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 } 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. 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 will not work. So, you have to use HTML to write to the window. Here is an example to write someone's 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 } 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,ïEUR ïEUR¡,!) %switch = $replace(%switch,ïEUR¢,") %switch = $replace(%switch,ïEUR¤,$) %switch = $replace(%switch,Ã?,u) %switch = $replace(%switch, ïEUR£,$chr(37)) %switch = $replace(%switch,ïEURÂ¥,%) %switch = $replace(%switch,ïEUR¦,&) %switch = $replace(%switch,ïEUR§,') %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,ÑOE,b) %switch = $replace(%switch,âEUR¼,!!) %switch = $replace(%switch,ÑY,u) %switch = $replace(%switch,ĵ,j) %switch = $replace(%switch,â·,$chr(183)) %switch = $replace(%switch,Ãs,K) %switch = $replace(%switch,Χ,X) %switch = $replace(%switch,â"¢,(tm)) %switch = $replace(%switch,ï?<,k) %switch = $replace(%switch,Ã?L,u) %switch = $replace(%switch,ÃZ,w) %switch = $replace(%switch,ÃY,N) %switch = $replace(%switch,áºfá,w) %switch = $replace(%switch,ÑS,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,Ã…S,N) %switch = $replace(%switch,Ñ^,W) %switch = $replace(%switch,ï®',S) %switch = $replace(%switch,ẵ,a) %switch = $replace(%switch,Å¢,T) %switch = $replace(%switch,ïEUR¡,!) %switch = $replace(%switch,ï?',R) %switch = $replace(%switch,â^',E) %switch = $replace(%switch,á»±,u) %switch = $replace(%switch,âEUR©, ) %switch = $replace(%switch,à ¸¥,a) %switch = $replace(%switch,ïº,c) %switch = $replace(%switch,Ò¯,$chr(19)) %switch = $replace(%switch,â(tm)Â¥,$chr(19)) %switch = $replace(%switch,õ,e) %switch = $replace(%switch,âEUR ,?) %switch = $replace(%switch,ÃŽY,O) %switch = $replace(%switch,ïEUR½,=) %switch = $replace(%switch,Ãz,Þ) 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.
Recommended Posts