Bah voila un petit add-on pour lire votre Horoscope sur un BoT. j'ai vu qu'il y'en avait 1 a tout casser alors voila. Laisser vos commentaires :)
Source / Exemple :
;##################################
; Horoscope pour BoT
; (By Folken)
; http://www.pub-line.com/world.mirc/
;##################################
ON 1:LOAD:{
set %date.Belier 21.03 au 20.04 | set %date.Taureau 21.04 au 20.05
set %date.Gemeaux 21.05 au 20.06 | set %date.Cancer 21.06 au 22.07
set %date.Lion 23.07 au 22.08 | set %date.Vierge 23.08 au 22.09
set %date.Balance 23.09 au 23.10 | set %date.Scorpion 24.10 au 22.11
set %date.Sagittaire 23.11 au 22.12 | set %date.Capricorne 23.12 au 19.01
set %date.Verseau 20.01 au 18.02 | set %date.Poissons 19.02 au 20.03
/echo 1 -a 12(¯`'·.(¯`'·. _______________ .·'¯).·'¯)
/echo 1 -a 4» Add-on Horoscope pour BoT 4Loaded avec Succé !
/Horo.PuB
}
ON 1:UNLOAD:{
unset %date.* | unset %Horo.*
/echo 1 -a 12(¯`'·.(¯`'·. _______________ .·'¯).·'¯)
/echo 1 -a 4» Add-on Horoscope pour BoT 4Unloaded avec Succé !
/Horo.PuB
}
alias -l Horo.PuB {
/echo 1 -a 4» 6URL de Référance 3:: http://www.horoscope.fr/
/echo 1 -a 4» 7Auteur 3:: Folken
/echo 1 -a 4» 10Site 3:: http://www.pub-line.com/world.mirc/
/echo 1 -a 12 (_.·'(_.·' ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ `'·._)`'·._)
}
ON *:TEXT:!Horo*:#:{
if ($2 != $null ) {
if ($2 == Belier) { set %Horo.signe Belier }
elseif ($2 == Taureau) { set %Horo.signe Taureau }
elseif (($2 == Gemeau) || ($2 == Gemeaux)) { set %Horo.signe Gemeaux }
elseif ($2 == Cancer) { set %Horo.signe Cancer }
elseif ($2 == Lion) { set %Horo.signe Lion }
elseif ($2 == Vierge) { set %Horo.signe Vierge }
elseif ($2 == Balance) { set %Horo.signe Balance }
elseif ($2 == Scorpion) { set %Horo.signe Scorpion }
elseif (($2 == Sagittaire) || ($2 == Sagitaire)) { set %Horo.signe Sagittaire }
elseif ($2 == Capricorne) { set %Horo.signe Capricorne }
elseif (($2 == Verseau) || ($2 == Versau)) { set %Horo.signe Verseau }
elseif (($2 == Poisson) || ($2 == Poissons)) { set %Horo.signe Poissons }
else { /Horo.404 }
set %Horo.Chan $chan | set %Horo.Nick $nick | /horoscope
var %date.signe = % $+ date. $+ %Horo.signe
/msg %Horo.Chan Vous étes %Horo.signe - né(e) du6 [ [ %date.signe ] ]
}
else { /Horo.404 }
}
ON *:SOCKOPEN:horos:{ sockwrite -n horos GET http://www.horoscope.fr/horoscopes/horoscopes.php?Signe= $+ %Horo.signe }
ON *:SOCKREAD:horos:{
sockread %Horo.Read
set %Horo.Read $remove(%Horo.Read,<TD>,</td>,<TR>,</tr>,</table>,</font>,<b>,</b>,<br>,</a>,<center>,</center>,<HTML>,</html>)
set %Horo.Read $remove(%Horo.Read,</script>,<head>,</head>,<TITLE>,</TITLE>,</div>, ,<nobr>,</nobr>,<H1>,</body>,<br />)
if (humeur.gif isin %Horo.Read) { /msg %Horo.Chan .:: 10HUMEUR ::. }
if (amour.gif isin %Horo.Read) { /msg %Horo.Chan .:: 13AMOUR ::. }
if (travail.gif isin %Horo.Read) { /msg %Horo.Chan .:: 12TRAVAIL ::. }
if (vital.gif isin %Horo.Read) { /msg %Horo.Chan .:: 3VITALITE ::. }
if (<td width="290" align="justify" valign="top" class="typo1"> isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
if (<td width="291" align="justify" valign="top" class="typo1"> isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
if (<td width="292" align="justify" valign="top" class="typo1"> isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
if (<td width="293" align="justify" valign="top" class="typo1"> isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
if (<td width="294" align="justify" valign="top" class="typo1"> isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
if (<td width="295" align="justify" valign="top" class="typo1"> isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
}
alias -l horoscope { sockclose horos | sockopen horos www.horoscope.fr 80 }
alias -l Clear.horo {
set %Horo.Clear $1-
set %Horo.Clear $remove(%Horo.Clear,<td width="290" align="justify" valign="top" class="typo1">,<td width="291" align="justify" valign="top" class="typo1">,<td width="292" align="justify" valign="top" class="typo1">,<td width="293" align="justify" valign="top" class="typo1">,<td width="294" align="justify" valign="top" class="typo1">,<td width="295" align="justify" valign="top" class="typo1">)
return %Horo.Clear
}
alias -l Horo.404 {
notice $nick 4/1!4\ 4,8<<<< == Erreur de Synthaxe == >>>> 4/1!4\
notice $nick voici tous les signes Astrologique disponibles ::
notice $nick 10Belier 6 10Taureau 6 10Gemeaux 6 10Cancer 6 10Capricorne 6 10Vierge
notice $nick 10Balance 6 10Scorpion 6 10Sagittaire 6 10Lion 6 10Verseau 6 10Poissons
notice $nick 3[SYNTHAXE] 12!Horo Signe
HALT
}
Conclusion :
simple à utiliser, il suffit de taper !horo et d'y ajouter votre signe astrologique.
Vous obtiendrez votre horoscope [ HUMEUR ; AMOUR ; TRAVAIL ; VITALITE ]
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.