Procédure Dessin et toile

`cible(t, cx, cy, rayon, anneaux)`

Dessine une cible de tir à l’arc : des anneaux rouges et blancs autour d’un centre.

Partagée par CoddyRun · CoddyRun 7 novembre 2026

Explication

anneaux est le nombre de cercles. Pour savoir si un clic touche la cible, testez distance(x, y, cx, cy) <= rayon (voir la fonction distance).

Code

procédure cible(t, cx, cy, rayon, anneaux)
    i est un nombre
    pour i de 0 à anneaux - 1
        si i mod 2 = 0 alors
            cercle(t, cx, cy, rayon * (anneaux - i) / anneaux, #E74C3C)
        sinon
            cercle(t, cx, cy, rayon * (anneaux - i) / anneaux, #FFFFFF)
        fin si
    fin pour
fin procédure

Exemple d'utilisation

ecran est une toile
dimension(ecran, 200, 200)
remplir(ecran, #DFF3E4)
appelle cible(ecran, 100, 100, 80, 5)
affiche ecran

Commentaires (0)

Pas encore de commentaire. Une question, une amélioration, un merci ? Lancez-vous.

Connectez-vous ou créez un compte pour commenter.

Du même auteur

distance(x1, y1, x2, y2)Renvoie la distance entre deux points (x1, y1) et (x2, y2), par exemple entre deux objets de la toile. est_premier(n)Vrai si le nombre est premier (divisible seulement par 1 et par lui-même). ppcm(n1, n2)Renvoie le plus petit commun multiple de deux nombres entiers. arrondir_a(x, multiple)Arrondit un nombre au multiple le plus proche : à la dizaine, au quart, à la case de la grille…