π
<-
Chat plein-écran
[^]

TI Nspire CX II CAS Hat Program

Pour le TI-Basic sur Nspire

TI Nspire CX II CAS Hat Program

Message non lude TomL12953 » 29 Mai 2019, 10:11

Here's a little program that shows some of the new graphics commands in the new Nspire CX II CAS:

Code: Tout sélectionner
Define hat()=
Prgm
:SetWindow 0,319,0,199
:FillRect 0,0,320,200: © Clear the background to black
:p:=160: q:=100
:xp:=144: xr:=1.5*3.1415927
:yp:=56: yr:=1: zp:=64
:xf:=((xr)/(xp)): yf:=((yp)/(yr)): zf:=((xr)/(zp))
:For zi,−q,q-1
:  If zi≥−zp and zi≤zp Then
:    zt:=((zi*xp)/(zp)): zz:=zi
:    xl:=int(0.5+√(xp*xp-zt*zt))
:    For xi,−xl,xl
:      xt:=√(xi*xi+zt*zt)*xf: xx:=xi
:      yy:=(sin(xt)+0.4*sin(3*xt))*yf
:      x1:=xx+zz+p
:      y1:=yy-zz+q
:      SetColor 0,255,0: © Set color to green
:      PlotXY x1,y1,7
:      If y1≠0 Then
:        SetColor 0,0,0: © Set color to black
:        DrawLine x1,y1-1,x1,0
:      EndIf
:    EndFor
:  EndIf
:EndFor
:EndPrgm
Avatar de l’utilisateur
TomL12953
Niveau 2: MI2 (Membre Initié)
Niveau 2: MI2 (Membre Initié)
Prochain niv.: 40%
 
Messages: 4
Inscription: 29 Mai 2019, 10:03
Genre: Non spécifié
Calculatrice(s):
MyCalcs profile

Retourner vers Nspire-Basic

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 20 invités

-
Rechercher
-
Social TI-Planet
-
Sujets à la une
Comparaisons des meilleurs prix pour acheter sa calculatrice !
Aidez la communauté à documenter les révisions matérielles en listant vos calculatrices graphiques !
Phi NumWorks jailbreak
123
-
Faire un don / Premium
Pour plus de concours, de lots, de tests, nous aider à payer le serveur et les domaines...
Faire un don
Découvrez les avantages d'un compte donateur !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partenaires et pub
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
975 utilisateurs:
>962 invités
>8 membres
>5 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Autres sites intéressants
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)