Publié : mer. 19/avr./2006 19:46
KarLKoX a écrit :Aaahhh Jester ... un des mes zikos préférés

Forums PureBasic - Français
https://www.purebasic.fr/french/
KarLKoX a écrit :Aaahhh Jester ... un des mes zikos préférés
Code : Tout sélectionner
Procedure.a Ror(valeur.a)
ProcedureReturn ((valeur >> 1) & %01111111) + ((valeur << 7) & %10000000)
EndProcedure