Afficher un graphique a partir d'un programme

→ **MyCalcs** profile · by **Mixmax123** » 08 Jan 2019, 14:26

Je veux afficher des points dont les coordonnées sont récupérées par un input

→ **MyCalcs** profile · by **samourai3745** » 11 Jan 2019, 11:54

ok je vais te mettre 2 exemples un pour des stats l'autre pour l'affichage de points

→ **MyCalcs** profile · by **samourai3745** » 11 Jan 2019, 11:55

Voici un petit programme pour faire des stats par exemple en utilisant la fonction scatter ou xyline

Code: Select all: :FnOff :PlotsOff :AxesOn :GridOff :ClrHome :Disp "ENTREZ LES","DONNEES DU","GRAPHIQUE POUR","QU'IL SOIT CREE","AUTOMATIQUEMENT :Pause :ClrHome :Disp "NB DE DONNEES :Input "PAR AXE:",N :N->dim(L1 :N->dim(L2 :ClrHome :Disp "ABSCISSES :Input "DEPART:",D :Input "INTERVALLE:",I :D->L1(1) :For(Z,2,N :D+I(Z-1->L1(Z) :End :For(Z,1,N :ClrHome :Disp "ORDONNEES :","VALEUR N° :Output(2,10,Z :Input P :P->L2(Z :End :Menu(" TYPE GRAPHIQUE ","NUAGE POINTS",A,"COURBE",B,"HISTOGRAMME",C,"QUITTER",Q :Lbl Q :ClrHome :Output(1,1," :Return :Lbl A :Plot1(Scatter,L1,L2,*marque* :ZoomStat :Trace :Pause :Goto Q :Lbl B :Plot1(xyLine,L1,L2,*marque* :ZoomStat :Trace :Pause :Goto Q :Lbl C :Plot1(Histogram,L1,L2 :min(L1)->Xmin :max(L1)+I->Xmax :I->Xscl :max(L2)->Ymax :0->Ymin :iPart(Ymax/10)->Yscl :1->Xres :DispGraph :Trace :Pause :Goto Q

→ **MyCalcs** profile · by **samourai3745** » 11 Jan 2019, 12:28

l'autre solution consiste à utiliser la fonction pxlon

la syntaxe est pxlon x,y

pour tracer un axe vertical, linevert 119
pour tracer un axe horizontal : linehorz 51

Si tu veux afficher un pixel de valeur 0,0 ce sera alors pxlon 51,119
pour une valeur x=1 et y =1 par exemple alors il faudra utiliser pxlon x+51,y+119

Garde à l'esprit la taille de l'écran qui est de
0..102 pour les lignes et 0..238 pour les colonnes

n'hésite pas à consulter le site http://tibasicdev.wikidot.com/68k:command-index pour les commandes

J'espère que tout cela pourra t'aider