/horoscope

Commenter

Contenu du snippet

C'est un alias qui permet de connaitre son horoscope.
J'ai beaucoup détaillé le code pour ceux qui souhaite comprendre.
Normalement tout marche, utilisation : /horoscope <signe>

Source / Exemple : 


alias horoscope {
  if $horo($1) = ok {
    ; on vérifie que le mot est un signe 
    set %signe $1
    ; on "set" le signe
    sockopen astro www2.sympatico.ca 80
    ; on ouvre la socket pour obtenir les informations
}  } }
alias horo {
  ; c'est cet alias qui vérifie si le mot est un signe 
  if !$1 { echo -a 2*** /horoscope: paramètres insuffisants.  /horoscope <signe> | halt }
  ; on vérifie qu'il y a un signe
  if $1 = verseau ||  $1 = belier || $1 = taureau || $1 = gemeaux || $1 = cancer || $1 = lion || $1 = vierge || $1 = balance || $1 = scorpion  || $1 = sagittaire || $1 = poisson {
    ; si le mot est un signe on continue le code
    return ok
  }
  else { echo -a 2Veuillez vérifier votre signe. }
  ; si le code n'est pas un signe valable on le dit
}
on *:sockopen:astro:{
  sockwrite -n astro GET http://www2.sympatico.ca/cgi-bin/zodiaque_quotidien.pl?dateJour= $+ $date(yyyy) $+ $chr(45) $+ $date(mm) $+ $chr(45) $+ $date(dd) $+ &signeJour= $+ %signe
  on va chercher des informations sur cette adresse avec la date d'aujourdui
}
on *:sockread:astro:{
  if ($sockerr > 0) { return }
  ; si il y a une erreurn on arrete tout
  :nextread
  sockread %temp 
  ; on enregistre les informations 
  if ( <P><big> isin %temp) {  echo -a 2 Signe  $upper(%signe) $+  • $remove(%temp,<P><big>,</big>)  }
  ; on montres les informations en echo
  if ($sockbr == 0) { return }
  ; si il n'y a plus d'information, on s'arrete là
  else { goto nextread }
  ; si il reste des information, on les lit encore
  sockclose astro | unset %signe
  ; on ferme la socket et unset la variable utilisé
}

Conclusion :


Mettre le code ci-dessus dans les remotes.

A voir également

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_Naza)