Zova
Messages postés150Date d'inscriptionmardi 15 juin 2004StatutMembreDernière intervention24 août 2010
-
17 nov. 2004 à 02:25
pouet86
Messages postés3Date d'inscriptionvendredi 1 juin 2012StatutMembreDernière intervention 1 juin 2012
-
1 juin 2012 à 11:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
pouet86
Messages postés3Date d'inscriptionvendredi 1 juin 2012StatutMembreDernière intervention 1 juin 2012 1 juin 2012 à 11:31
bonjour je ne sais pas pour vous mais moi sa me donne que la date quand je tape !horo lion et un méssage d'érreur
Erreur synthaxe
sui qelqu'un a une idée
merci
cs_CeRvAL
Messages postés11Date d'inscriptionlundi 26 janvier 2004StatutMembreDernière intervention11 février 2006 13 mai 2011 à 13:30
Bonjour,
J'avais utilisé je crois cette source y a qq années pour mon salon.(je pense que c'est celle là)
J'ai essayé de la remettre en service pour les users de mon chan mais je me rend compte que la source n'est plus vraiment a jour.
Serait-il possible de voir comment je pourrais la refaire fonctionner.
Car ce type de source marche bien sur les caneaux IRC.
L'ideale serait un retour en pv et un anti-flood avec.
Merci d'avance
CeRVAL
Little93
Messages postés4Date d'inscriptiondimanche 3 août 2008StatutMembreDernière intervention 3 août 2008 3 août 2008 à 13:38
bonjours moi je tape !Horo cancer et !horo cancer aucun des 2 ne fonctin pourtant j'ai bien mit le scripte dans remote
#############
# HOROSCOPE #
#############
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ès !
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
}
NOMADYSTIC
Messages postés21Date d'inscriptiondimanche 1 juillet 2007StatutMembreDernière intervention10 juillet 2007 5 juil. 2007 à 13:16
moi je sais pas comment codé se que tu me dit tu pourrais me donner le code pour que je me base dessu? :P
cs_hunter38
Messages postés46Date d'inscriptionsamedi 12 mai 2007StatutMembreDernière intervention12 juin 2007 5 juil. 2007 à 09:56
sa me semble etre interressant tofu
je V essayer de l'appliquer.
cs_tofu
Messages postés1726Date d'inscriptionvendredi 12 septembre 2003StatutMembreDernière intervention13 juin 20091 5 juil. 2007 à 06:58
une variable %en.cours booléenne, à 1 pendant l'exécution d'une lecture d'horoscope et à 0 lorsque c'est fini. et un if dans l'aliase horoscope..
NOMADYSTIC
Messages postés21Date d'inscriptiondimanche 1 juillet 2007StatutMembreDernière intervention10 juillet 2007 4 juil. 2007 à 22:12
ouais chez moi les couleur background son en noir, et faut pas oublier que ses pas vraiment ma source ;) des idées pour l'anti flood?
cs_hunter38
Messages postés46Date d'inscriptionsamedi 12 mai 2007StatutMembreDernière intervention12 juin 2007 4 juil. 2007 à 19:41
mais tu as changer les couleurs mais en gris on voit rien
cs_hunter38
Messages postés46Date d'inscriptionsamedi 12 mai 2007StatutMembreDernière intervention12 juin 2007 4 juil. 2007 à 19:28
excélente source nomadystic.
boulet7612
Messages postés8Date d'inscriptionvendredi 1 juin 2007StatutMembreDernière intervention 6 octobre 2008 4 juil. 2007 à 16:25
source vraiment plus a jour.bon code quand meme je tapporte les modification que jai faite
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ès !
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
}
NOMADYSTIC
Messages postés21Date d'inscriptiondimanche 1 juillet 2007StatutMembreDernière intervention10 juillet 2007 4 juil. 2007 à 12:17
bon en regardent ici et la ds vos commentaire jai réusit a faire marcher le code, pour ceux qui bricole pas trop les code le voici, ps: jai changé les couleur, et aussi !!!!! GROS BUG !!!!! si quelque de malfaisent decide de faire !horo !horo !horo !horo signe !horo signe... on plante en ecess flood,, ya moyen de faire un anti flood genre maximum 2 !horo en 15sec
#############
# HOROSCOPE #
#############
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
}
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 14Vous Êtes15 %Horo.signe 14- Né(e) Du15 [ [ %date.signe ] ] 14
}
else { /Horo.404 }
}
cs_hunter38
Messages postés46Date d'inscriptionsamedi 12 mai 2007StatutMembreDernière intervention12 juin 2007 6 juin 2007 à 16:31
sa ne marche pas chez moi ^^
je fais !horo + signe n'importe où ou juste sur un salon sur lequel je suis !op?
XavSniper
Messages postés22Date d'inscriptiondimanche 3 octobre 2004StatutMembreDernière intervention17 juillet 2007 4 déc. 2006 à 06:39
En effet, ça n'affiche que "les humour" "santé" "travail", mais ça c'est parce que le site a subit des modifs... et donc le code devient:
ON *:SOCKREAD:horos:{
sockread %Horo.Read
set %Horo.Read $remove(%Horo.Read,<TD>,</td>,<TR>,</tr>,</table>,,,,
,,<center>,</center>,<HTML>,</html>)
set %Horo.Read $remove(%Horo.Read,</script>,<head>,</head>,<TITLE>,</TITLE>,
, ,<nobr>,</nobr>,<H1>,,
)
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 (vitalite.gif isin %Horo.Read) { /msg %Horo.Chan .:: 3VITALITE ::. }
if (<td colspan="2">
isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
}
Par conséquent l'alias Clear.horo change aussi et donne ceci:
alias -l Clear.horo {
set %Horo.Clear $1-
set %Horo.Clear $remove(%Horo.Clear,<td colspan="2">
)
return %Horo.Clear
}
C'est plus léger tout de suite hein :p
Sinon le code est pas mal (même si ça flood un peu quand même...)
Have Fun ;)
M3Merlin
Messages postés1Date d'inscriptionvendredi 24 mars 2006StatutMembreDernière intervention24 mars 2006 24 mars 2006 à 22:38
ba voila moi en faite ca me mais que la date de l'horoscope mais pas les autre "humour" "travail" etc
donc pourrai tu me dire comment faire car je debute niveau scripting merci ;)
Reload2
Messages postés2Date d'inscriptionsamedi 13 août 2005StatutMembreDernière intervention22 août 2005 15 août 2005 à 02:21
Je crois que ton truc a un ptit probleme :S. c'est que quand je tape pour voir un horoscope, ca me donne juste l'horroscope de l'humeur, et ca affiche les autres lignes vides :S. Je ne sais pas pk ca me fait ca, car je suis pas tres bon scripteur. Mais sinon, ton script est bien :)
cs_DeViL66
Messages postés152Date d'inscriptionlundi 28 février 2005StatutMembreDernière intervention 3 novembre 2006 3 mai 2005 à 21:19
bah moi ya toujours 1 truc sur 4 qui fonctionne, le 1er (Humeur) Pas normal je pense :)
Sinon j'ai du remettre les variables 1 par 1 parce qu'elle ne se sont pas bien mise au load enfin rien de grave...
Merci de résoudre mon pbm :)
tomaprice essaye de mettre $nick au lieu de %nick parce que %nick c'est pour les variables*
+
ronio7777
Messages postés1Date d'inscriptionjeudi 30 décembre 2004StatutMembreDernière intervention30 décembre 2004 30 déc. 2004 à 16:33
c chelou ca ne marche pas pour moi .....
ca n'affiche que:
Vous étes capricorne - né(e) du 23.12 au 19.01
et c tout
cs_tomaprice
Messages postés1Date d'inscriptionmercredi 24 novembre 2004StatutMembreDernière intervention20 décembre 2004 20 déc. 2004 à 11:11
comment faire pour que l'horoscope apparaisse en notice svp? pke jai essayé de modif les /msg par /notice ou encore /notice %nick mais ça envoie la notice a tous ceux qui sont présents sur le salon :$
cs_geraldo
Messages postés4Date d'inscriptionlundi 31 mars 2003StatutMembreDernière intervention12 décembre 2004 12 déc. 2004 à 18:53
merci
World_mIRC
Messages postés141Date d'inscriptionmercredi 10 novembre 2004StatutMembreDernière intervention25 juillet 2005 11 déc. 2004 à 22:45
oui tu copie/colle tout dans une remote :)
cs_geraldo
Messages postés4Date d'inscriptionlundi 31 mars 2003StatutMembreDernière intervention12 décembre 2004 11 déc. 2004 à 22:31
euh j'ai une question on le colle ou ton bout de script ??? dans un remote? merci
cs_tofu
Messages postés1726Date d'inscriptionvendredi 12 septembre 2003StatutMembreDernière intervention13 juin 20091 17 nov. 2004 à 18:36
t'as qu'à faire un dialog de configuration avec les mots à prendre en compte si l'orthographe est pas exacte.
World_mIRC
Messages postés141Date d'inscriptionmercredi 10 novembre 2004StatutMembreDernière intervention25 juillet 2005 17 nov. 2004 à 14:38
mouais ... remarque on est sensé le connaitre son signe :p
pi de toute façon y'a tjrs l'alias Horo.404 pour rappeler les signes en cas d'erreur :D
n'empeche que ... pk faire simple kan on peut faire compliqué ... héhé
il marche quand même bien mon truc hein :)
World_mIRC
Messages postés141Date d'inscriptionmercredi 10 novembre 2004StatutMembreDernière intervention25 juillet 2005 17 nov. 2004 à 14:24
oui moi je parle vraiment des fautes d'orthographe
-----------------
elseif (($2 Gemeau) || ($2 Gemeaux))
-----------------
pour $upper et $lower je connais ^^
si je change mon truc par ta ligne, ça va pas reagir aux 2 - 3 fautes que j'avais pu observer
c'est dommage :s
cs_SornDrixer
Messages postés2084Date d'inscriptionjeudi 12 décembre 2002StatutMembreDernière intervention30 janvier 20118 17 nov. 2004 à 13:16
World_mIRC : Belier, belier, beLier (ou autre) n'est pas une faute d'orthographe si c'est à ca que tu fais référence.
Si par exemple la personne tape bélier au lieu de belier, ou gemaux à la place de gemeaux, le code ne réagira pas. (Tout à fait normal vu que le nom du signe a été mal orthographié)
Dans le cas des majuscules/minuscule, on peut facilement faire un code pour mettre la 1ère lettre en majuscule et le reste en minuscule.
Je te le fais :
alias majmot return $+($upper($left($1,1)),$lower($right($1,$calc($len($1) - 1))))
$majmot(BELIER) va retourner Belier
$majmot(poiSSon) va retourner Poisson
etc.., je pense que tu as compris le principe.
Ca adapte la casse (majuscule/minuscule) comme tu le dsires.
World_mIRC
Messages postés141Date d'inscriptionmercredi 10 novembre 2004StatutMembreDernière intervention25 juillet 2005 17 nov. 2004 à 12:39
Salut a tous les deux :)
pour repondre a Zova, les hash tables je sais pas faire et je sais que les slash sont pas utiles mais je trouve ça plus jolie :p
SornDrixer j'ai reduit le $remove de la fin comme tu m'as suggeré, mais pour le
-----------------
var %a Belier Taureau Gemeaux Cancer Lion Vierge Balance Scorpion Sagittaire Capricorne Verseau Poisson
if $istok(%a,$2,32) { set %Horo.signe $2 }
-----------------
ça corrige pas les fautes d'orthographe des signes !?
cs_SornDrixer
Messages postés2084Date d'inscriptionjeudi 12 décembre 2002StatutMembreDernière intervention30 janvier 20118 17 nov. 2004 à 07:12
Il y a quelques lignes à optimiser comme :
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) { set %Horo.signe Verseau }
elseif (($2 Poisson) || ($2 Poissons)) { set %Horo.signe Poissons }
par :
var %a Belier Taureau Gemeaux Cancer Lion Vierge Balance Scorpion Sagittaire Capricorne Verseau Poisson
if $istok(%a,$2,32) { set %Horo.signe $2 }
Et là :
set %Horo.Clear $remove(%Horo.Clear,<td width="290" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="291" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="292" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="293" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="294" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="295" align="justify" valign="top">)
Je te conseille de mettre tout tes $remove en un seul, ca sera plus rapide (même si cela n'est pas très visible à l'oeil nu)
$remove(%Horo.chear,truc1 a supprimer,truc2 a supprimer,truc3 a supprimer,etc)
C'est un bon début, mais à améliorer.
Bonne continuation.
Zova
Messages postés150Date d'inscriptionmardi 15 juin 2004StatutMembreDernière intervention24 août 20102 17 nov. 2004 à 02:25
Bon alors je n'ai pas testé mais c'est pas superbe car tu mets plein de variable que tu set & unset par la suite pourquoi pas utiliser : "var %variable blabla" afin d'éviter de faire unset.
Sinon je suis plus pour scripter avec les hash tables donc je te conseil de les utiliser ce qui te fera un gain de temps considérable. Sinon les slash sont inutiles...
Je préfere pas noter :]
Bonne continuation et j'attend des améliorations..
1 juin 2012 à 11:31
Erreur synthaxe
sui qelqu'un a une idée
merci
13 mai 2011 à 13:30
J'avais utilisé je crois cette source y a qq années pour mon salon.(je pense que c'est celle là)
J'ai essayé de la remettre en service pour les users de mon chan mais je me rend compte que la source n'est plus vraiment a jour.
Serait-il possible de voir comment je pourrais la refaire fonctionner.
Car ce type de source marche bien sur les caneaux IRC.
L'ideale serait un retour en pv et un anti-flood avec.
Merci d'avance
CeRVAL
3 août 2008 à 13:38
#############
# HOROSCOPE #
#############
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ès !
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 %date.Belier 4 21.03 15au 7 20.04 | set %Horo.signe Belier }
elseif ($2 == Taureau) { set %date.Taureau 4 21.04 15au 7 20.05 | set %Horo.signe Taureau }
elseif (($2 Gemeau) || ($2 Gemeaux)) { set %date.Gemeaux 4 21.05 15au 7 20.06 | set %Horo.signe Gemeaux }
elseif ($2 == Cancer) { set %date.Cancer 4 21.06 15au 7 22.07 | set %Horo.signe Cancer }
elseif ($2 == Lion) { set %date.Lion 4 23.07 15au 7 22.08 | set %Horo.signe Lion }
elseif ($2 == Vierge) { set %date.Vierge 4 23.08 15au 7 22.09 | set %Horo.signe Vierge }
elseif ($2 == Balance) { set %date.Balance 4 23.09 15au 7 23.10 | set %Horo.signe Balance }
elseif ($2 == Scorpion) { set %date.Scorpion 4 24.10 15au 7 22.11 | set %Horo.signe Scorpion }
elseif (($2 Sagittaire) || ($2 Sagitaire)) { set %date.Sagittaire 4 23.11 15au 7 22.12 | set %Horo.signe Sagittaire }
elseif ($2 == Capricorne) { set %date.Capricorne 4 23.12 15au 7 19.01 | set %Horo.signe Capricorne }
elseif (($2 Verseau) || ($2 Versau)) { set %date.Verseau 4 20.01 15au 7 18.02 | set %Horo.signe Verseau }
elseif (($2 Poisson) || ($2 Poissons)) { set %date.Poissons 4 19.02 15au 7 20.03 | 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>,, , ,
,,<center>,</center>,<HTML>,</html>)
set %Horo.Read $remove(%Horo.Read,</script>,<head>,</head>,<TITLE>,</TITLE>,
, ,<nobr>,</nobr>,<H1>,,
)
if (humeur.gif isin %Horo.Read) { msg %Horo.Chan .:: 8HUMEUR ::. }
if (amour.gif isin %Horo.Read) { msg %Horo.Chan .:: 4AMOUR ::. }
if (travail.gif isin %Horo.Read) { msg %Horo.Chan .:: 12TRAVAIL ::. }
if (vitalite.gif isin %Horo.Read) { msg %Horo.Chan .:: 9VITALITE ::. }
if (<td colspan ="2">
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 colspan="2">
)
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 8Belier 9? 8Taureau 9? 8Gemeaux 9? 8ancer 9 8apricorne 9? 8ierge
notice $nick 8alance 9 8corpion 9 8agittaire 9 8ion 9 8erseau 9 8oissons
notice $nick 4[SYNTHAXE] 12!Horo Signe
HALT
}
5 juil. 2007 à 13:16
5 juil. 2007 à 09:56
je V essayer de l'appliquer.
5 juil. 2007 à 06:58
4 juil. 2007 à 22:12
4 juil. 2007 à 19:41
4 juil. 2007 à 19:28
4 juil. 2007 à 16:25
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ès !
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 %date.Belier 4 21.03 15au 7 20.04 | set %Horo.signe Belier }
elseif ($2 == Taureau) { set %date.Taureau 4 21.04 15au 7 20.05 | set %Horo.signe Taureau }
elseif (($2 Gemeau) || ($2 Gemeaux)) { set %date.Gemeaux 4 21.05 15au 7 20.06 | set %Horo.signe Gemeaux }
elseif ($2 == Cancer) { set %date.Cancer 4 21.06 15au 7 22.07 | set %Horo.signe Cancer }
elseif ($2 == Lion) { set %date.Lion 4 23.07 15au 7 22.08 | set %Horo.signe Lion }
elseif ($2 == Vierge) { set %date.Vierge 4 23.08 15au 7 22.09 | set %Horo.signe Vierge }
elseif ($2 == Balance) { set %date.Balance 4 23.09 15au 7 23.10 | set %Horo.signe Balance }
elseif ($2 == Scorpion) { set %date.Scorpion 4 24.10 15au 7 22.11 | set %Horo.signe Scorpion }
elseif (($2 Sagittaire) || ($2 Sagitaire)) { set %date.Sagittaire 4 23.11 15au 7 22.12 | set %Horo.signe Sagittaire }
elseif ($2 == Capricorne) { set %date.Capricorne 4 23.12 15au 7 19.01 | set %Horo.signe Capricorne }
elseif (($2 Verseau) || ($2 Versau)) { set %date.Verseau 4 20.01 15au 7 18.02 | set %Horo.signe Verseau }
elseif (($2 Poisson) || ($2 Poissons)) { set %date.Poissons 4 19.02 15au 7 20.03 | 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>,, , ,
,,<center>,</center>,<HTML>,</html>)
set %Horo.Read $remove(%Horo.Read,</script>,<head>,</head>,<TITLE>,</TITLE>,
, ,<nobr>,</nobr>,<H1>,,
)
if (humeur.gif isin %Horo.Read) { msg %Horo.Chan .:: 8HUMEUR ::. }
if (amour.gif isin %Horo.Read) { msg %Horo.Chan .:: 4AMOUR ::. }
if (travail.gif isin %Horo.Read) { msg %Horo.Chan .:: 12TRAVAIL ::. }
if (vitalite.gif isin %Horo.Read) { msg %Horo.Chan .:: 9VITALITE ::. }
if (<td colspan ="2">
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 colspan="2">
)
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 8Belier 9? 8Taureau 9? 8Gemeaux 9? 8ancer 9 8apricorne 9? 8ierge
notice $nick 8alance 9 8corpion 9 8agittaire 9 8ion 9 8erseau 9 8oissons
notice $nick 4[SYNTHAXE] 12!Horo Signe
HALT
}
4 juil. 2007 à 12:17
#############
# HOROSCOPE #
#############
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
}
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 14Vous Êtes15 %Horo.signe 14- Né(e) Du15 [ [ %date.signe ] ] 14
}
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>,, , ,
,,<center>,</center>,<HTML>,</html>)
set %Horo.Read $remove(%Horo.Read,</script>,<head>,</head>,<TITLE>,</TITLE>,
, ,<nobr>,</nobr>,<H1>,,
)
if (humeur.gif isin %Horo.Read) { /msg %Horo.Chan 15.14:: 6HUMEUR 14::15. }
if (amour.gif isin %Horo.Read) { /msg %Horo.Chan 15.14:: 13AMOURS 14::15. }
if (travail.gif isin %Horo.Read) { /msg %Horo.Chan 15.14:: 3TRAVAIL 14::15. }
if (vitalite.gif isin %Horo.Read) { /msg %Horo.Chan 15.14:: 9VITALITE 14::15. }
if (<td colspan ="2">
isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(15 %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 colspan="2">
)
return %Horo.Clear
}
alias -l Horo.404 {
notice $nick 4/0!4\ 0<<<< == Erreur de Synthaxe == >>>> 4/0!4\
notice $nick 14Voici Tous Les Signes Astrologique Disponibles ::
notice $nick 15Belier 14? 15Taureau 14? 15Gemeaux 14? 15Cancer 14? 15Capricorne 14? 15Vierge
notice $nick 15Balance 14? 15Scorpion 14? 15Sagittaire 14? 15Lion 14? 15Verseau 14? 15Poissons
notice $nick 4[SYNTHAXE] 14!Horo Signe
HALT
} }
6 juin 2007 à 16:31
je fais !horo + signe n'importe où ou juste sur un salon sur lequel je suis !op?
4 déc. 2006 à 06:39
ON *:SOCKREAD:horos:{
sockread %Horo.Read
set %Horo.Read $remove(%Horo.Read,<TD>,</td>,<TR>,</tr>,</table>,,,,
,,<center>,</center>,<HTML>,</html>)
set %Horo.Read $remove(%Horo.Read,</script>,<head>,</head>,<TITLE>,</TITLE>,
, ,<nobr>,</nobr>,<H1>,,
)
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 (vitalite.gif isin %Horo.Read) { /msg %Horo.Chan .:: 3VITALITE ::. }
if (<td colspan="2">
isin %Horo.Read) { /msg %Horo.Chan $Clear.horo(%Horo.Read) }
}
Par conséquent l'alias Clear.horo change aussi et donne ceci:
alias -l Clear.horo {
set %Horo.Clear $1-
set %Horo.Clear $remove(%Horo.Clear,<td colspan="2">
)
return %Horo.Clear
}
C'est plus léger tout de suite hein :p
Sinon le code est pas mal (même si ça flood un peu quand même...)
Have Fun ;)
24 mars 2006 à 22:38
donc pourrai tu me dire comment faire car je debute niveau scripting merci ;)
15 août 2005 à 02:21
3 mai 2005 à 21:19
Sinon j'ai du remettre les variables 1 par 1 parce qu'elle ne se sont pas bien mise au load enfin rien de grave...
Merci de résoudre mon pbm :)
tomaprice essaye de mettre $nick au lieu de %nick parce que %nick c'est pour les variables*
+
30 déc. 2004 à 16:33
ca n'affiche que:
Vous étes capricorne - né(e) du 23.12 au 19.01
et c tout
20 déc. 2004 à 11:11
12 déc. 2004 à 18:53
11 déc. 2004 à 22:45
11 déc. 2004 à 22:31
17 nov. 2004 à 18:36
17 nov. 2004 à 14:38
pi de toute façon y'a tjrs l'alias Horo.404 pour rappeler les signes en cas d'erreur :D
n'empeche que ... pk faire simple kan on peut faire compliqué ... héhé
il marche quand même bien mon truc hein :)
17 nov. 2004 à 14:24
-----------------
elseif (($2 Gemeau) || ($2 Gemeaux))
-----------------
pour $upper et $lower je connais ^^
si je change mon truc par ta ligne, ça va pas reagir aux 2 - 3 fautes que j'avais pu observer
c'est dommage :s
17 nov. 2004 à 13:16
Si par exemple la personne tape bélier au lieu de belier, ou gemaux à la place de gemeaux, le code ne réagira pas. (Tout à fait normal vu que le nom du signe a été mal orthographié)
Dans le cas des majuscules/minuscule, on peut facilement faire un code pour mettre la 1ère lettre en majuscule et le reste en minuscule.
Je te le fais :
alias majmot return $+($upper($left($1,1)),$lower($right($1,$calc($len($1) - 1))))
$majmot(BELIER) va retourner Belier
$majmot(poiSSon) va retourner Poisson
etc.., je pense que tu as compris le principe.
Ca adapte la casse (majuscule/minuscule) comme tu le dsires.
17 nov. 2004 à 12:39
pour repondre a Zova, les hash tables je sais pas faire et je sais que les slash sont pas utiles mais je trouve ça plus jolie :p
SornDrixer j'ai reduit le $remove de la fin comme tu m'as suggeré, mais pour le
-----------------
var %a Belier Taureau Gemeaux Cancer Lion Vierge Balance Scorpion Sagittaire Capricorne Verseau Poisson
if $istok(%a,$2,32) { set %Horo.signe $2 }
-----------------
ça corrige pas les fautes d'orthographe des signes !?
17 nov. 2004 à 07:12
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) { set %Horo.signe Verseau }
elseif (($2 Poisson) || ($2 Poissons)) { set %Horo.signe Poissons }
par :
var %a Belier Taureau Gemeaux Cancer Lion Vierge Balance Scorpion Sagittaire Capricorne Verseau Poisson
if $istok(%a,$2,32) { set %Horo.signe $2 }
Et là :
set %Horo.Clear $remove(%Horo.Clear,<td width="290" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="291" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="292" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="293" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="294" align="justify" valign="top">)
set %Horo.Clear $remove(%Horo.Clear,<td width="295" align="justify" valign="top">)
Je te conseille de mettre tout tes $remove en un seul, ca sera plus rapide (même si cela n'est pas très visible à l'oeil nu)
$remove(%Horo.chear,truc1 a supprimer,truc2 a supprimer,truc3 a supprimer,etc)
C'est un bon début, mais à améliorer.
Bonne continuation.
17 nov. 2004 à 02:25
Sinon je suis plus pour scripter avec les hash tables donc je te conseil de les utiliser ce qui te fera un gain de temps considérable. Sinon les slash sont inutiles...
Je préfere pas noter :]
Bonne continuation et j'attend des améliorations..