Connaître son horoscope

Soyez le premier à donner votre avis sur cette source.

Snippet vu 14 660 fois - Téléchargée 26 fois

Commenter

Contenu du snippet

Comme le dit le titre, c'est un addon en socket pour connaître son horoscope :)

Source / Exemple : 


;--------------------------
;
;    -=- Horoscope -=-
;      By Re[M]i_34
;
;---------------------------

dialog horos {
  title "-=- Horoscope -=- By Re[M]i_34"
  size -1 -1 136 173
  option dbu
  box "Résultats :", 6, 5 38 127 120
  text "Entrez votre signe zodiacal :", 1, 25 3 79 8, center
  edit "", 2, 27 13 77 10, center autohs
  button "Voir l'Horoscope", 3, 24 26 81 11, default flat
  edit "", 4, 8 46 119 10, center read
  edit "", 5, 8 57 119 96, multi autohs autovs hsbar vsbar
  button "Effacer", 7, 17 161 37 10
  button "Fermer", 8, 86 161 37 10, ok
}
menu * {
  -
  Horoscope:dialog -m horos horos
  -
}

on *:dialog:horos:*:*: {
  if $devent == sclick {
    if $did == 3 {
      set %signe $did(2)
      did -ra horos 4 Connexion en Cours...
      sockopen horos www.euroavenir.com 80
    }
    if $did == 7 {
      did -r horos 2,4,5
      sockclose horos
    }
  }
  if $devent == init {
    dll mdx.dll SetMircVersion $version 
    dll mdx.dll MarkDialog $dname
    dll mdx.dll SetColor $dname 4 text $rgb(255,0,0)
    dll mdx.dll SetColor $dname 5 text $rgb(0,0,255)
    dll mdx.dll SetColor $dname 4,5 textbg $rgb(255,255,255)
    dll mdx.dll SetColor $dname 4 background $rgb(255,255,255)
  }
}

on *:sockopen:horos: {
  sockwrite -n horos GET http://www.euroavenir.com/horoscope/horoscope.php?textcolorin=000000&bgcolor=FFFFFF&titlecolor=FF0000&signe= $+ %signe
  did -ra horos 4 Connexion Effectuée
}
alias reg { var %oo,%gg = $1-,%bb = $regsub(%gg,/<[^>]+>/gg,,%oo) | return $remove(%oo,$chr(59),$chr(38)) }
on *:sockread:horos: {
  sockread %hr
  if (<font size="2"> isin %hr) { did -a horos 5 $reg(%hr) $CRLF }
}

Conclusion :


Je précise que j'ai réalisé cet addon tout seul :)

Voilà ;)

A voir également

Ajouter un commentaire Commentaires
cs_Eiffel Messages postés 121 Date d'inscription jeudi 16 octobre 2003 Statut Membre Dernière intervention 26 août 2004
28 janv. 2004 à 22:37
J'aurais mis les signes astros dans un combo , tu pense pas ? :)
cs_ReMi34 Messages postés 1025 Date d'inscription vendredi 29 août 2003 Statut Membre Dernière intervention 28 mars 2005 2
29 janv. 2004 à 06:38
Ok Bon je vais essayer de faire ça mais je ne garantie rien :/
J'ai ma petite idée en tête ...
cs_SornDrixer Messages postés 2084 Date d'inscription jeudi 12 décembre 2002 Statut Membre Dernière intervention 30 janvier 2011 8
29 janv. 2004 à 07:04
Bonne source !
Par contre, comme l'a dit Eiffel, dans un combo, (ou une list), sa serait une bonne idée.
cs_ReMi34 Messages postés 1025 Date d'inscription vendredi 29 août 2003 Statut Membre Dernière intervention 28 mars 2005 2
29 janv. 2004 à 07:14
Ah ! Je pensais pas que tu allais me dire ça SornDrixer :)

Je suis entrain de le faire dans un combo mais je sais pas comment on fait pour que quand un texte est selectionné dans un combo, ben que ça retourne un truc. Enfin c'est compliqué. ($did(2).seltext ... ) Un truc comme ça, je sais pas lequel que c'est, si qqn pouvez m'aider :)
cs_ReMi34 Messages postés 1025 Date d'inscription vendredi 29 août 2003 Statut Membre Dernière intervention 28 mars 2005 2
29 janv. 2004 à 07:32
Y a pas quelqu'un pour m'aider ?

J'explique mieux:

J'ai un combo, avec du texte dedans. Je veux que quand on clique sur le bouton "Voir l'Horoscope", ça affiche l'horoscope du signe choisi dans le combo dans la liste.

Voilà, j'espère que vous avez compris et que vous pourrez m'aider ;)
S'inscrire maintenant

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.

Du même auteur (cs_ReMi34)