2 nouvelles applications intégrées TI-Nspire CX ?

[Bisam]

Aux USA et dans de nombreux pays anglophones, les "study cards" sont des cartes servant à réviser une matière. Elles sont simplement constituées d'une ou plusieurs questions d'un côté et de la ou les réponses de l'autre côté, comme au Trivial Pursuit.

On les voit utilisées dans de nombreux films et séries (ex : Harry Potter, Urgences, Seinfeld, Friends, etc...)

Sur calculette, avec l'application, tu pouvais créer ces fameuses "questions/réponses"... puis les utiliser pour "réviser".

[critor]

Vu les habitudes de TI dans ce domaine, je doute que ce soit tourné vers la programmation.

Je n'ai pas la réponse, mais je ne suis pas certain que ton raisonnement reste valable dans le contexte des évolutions récentes et du TI-Innovator.

Mais sinon, l'idée des StudyCards se tient parfaitement.

[Adriweb]

Lors du T3 dernier avait été mentionné un système de raccourcis vers des scripts Lua. Je n'en sais en gros pas plus, mais peut-être y a-t'il une sorte de rapport avec ce fameux "Widget".

[critor]

Normalement, ce menu c'est pour ajouter des choses nouvelles, n'existant pas dans le document courant.

Alors à moins qu'il ne devienne possible dans la prochaine version de coder en Lua des choses qui seront reconnues et en apparence gérées comme les applications intégrées, un peu comme ce qu'offre la HP Prime...

Mais cela fait des années que l'on demande la possibilité de créer des applications Nspire, notamment un évaluateur Python qui aurait peut-être permis aux calculatrices (ou à leurs émulateurs) d'être autorisés encore quelques années supplémentaires aux oraux de concours, et on ne l'a toujours pas... pas plus que sur TI-83 Premium CE d'ailleurs.
Donc évitons de trop rêver à l'impossible...

Quant aux oraux de concours :

NB : algobox et les émulateurs de calculatrices ne seront plus proposés à partir de la session 2018.

http://capes-math.org/index.php?id=epreuves-orales

Si l'on considère que les futurs profs n'auront plus besoin de savoir maîtriser les calculatrices dès la rentrée 2018... la fin à moyen terme est définitivement enclenchée.
Je m'y attendais, mais pas aussi tôt.
Au final, on se demande pourquoi on s'est dépêché de nous pondre une réforme du mode examen complètement bâclée ne résolvant aucun problème et en créant de nouveaux...
Les calculatrices conformes 2018+ vont à leur tour devenir invendables... particulièrement l'entrée et le milieu de gamme...

[Bisam]

Lors du T3 dernier avait été mentionné un système de raccourcis vers des scripts Lua. Je n'en sais en gros pas plus, mais peut-être y a-t'il une sorte de rapport avec ce fameux "Widget".

Cette idée ressemble effectivement un peu plus à l'idée que je me fais d'un "widget". On pourrait alors imaginer la création de boîtes de dialogue, de menus déroulants, voire de graphiques interactifs... à l'intérieur de programmes. Cela redonnerait enfin de l'attrait à la programmation "basique" sur Nspire.

[Adriweb]

Non, c'est pas ce qu'ils voulaient dire. "Widget" est deja le nom interne du conteneur d'une application en train de fonctionner (chaque appli occupe un "widget" - d'ailleurs en Lua "platform.window" est de type Widget si mes souvenirs sont bons).
Et en l'occurence, ils avaient idées de pouvoir se faire des raccourcis vers ses propres widgets/scripts Lua. Mais encore une fois, je sais pas si c'est ça, là. On verra bien

[critor]

Donc un widget serait une application générique (conteneur vide) qui pourrait ensuite être remplie par le script Lua de son choix.

Mais alors c'est juste pour le logiciel et pas pour la calculatrice dans ce cas ?

[Adriweb]

Non c'est déjà le cas, pour ce conteneur. Le nom "widget" était déjà probablement la depuis les OS 1.0, rien de spécial à ce niveau la, c'est juste un nom générique pour le conteneur d'une appli / zone sur l'écran.
(Et du coup peut être que ce qu'on voit est juste un placeholder...)

Sinon, ce qu'on voit sur la photo c'est bien un OS de calculatrice, via le live présenter du navigator

[Ti64CLi++]

Et ils n'ont pas montrer ce que cela faisait lorsque l'on ouvrait les nouvelles apps?

[compsystems]

Cette idée ressemble effectivement un peu plus à l'idée que je me fais d'un "widget". On pourrait alors imaginer la création de boîtes de dialogue, de menus déroulants, voire de graphiques interactifs... à l'intérieur de programmes. Cela redonnerait enfin de l'attrait à la programmation "basique" sur Nspire.

Sorry for my bad English

One of my wishes is that the TI-Nspire development team to regain the terminal view (Program I/O window) hundreds of programs in ti68kbasic, never be ported by elimination of PRGI/O, I hope in the next version is incorporate again, This implies, dialog boxes, toolbar etc.

for example a code using dialogue boxes, also without GOTO

Code: Select all

aniintro()
Prgm
  ©aniintro(): Introduction of the animations./Introducción de las animaciones.
kernel2\printtxt({"***** Animation of Polyhedrons ******","with overlapping images","only for TI92 models","By Compsystems","Version 1.0.4 March 11, 2015","www.eonicasys.com.co","Coded with tiedit","Thanks to Peter Engels ","http://home.arcor.de/p-engels"},0,1,1,1)
  ©kernel2\delay(0.1)
  If ok_getp=­1 Then
    checkgid()
    wparamts()
    Loop
      If modifpfl=0 Then
        wparamts()
      Else
        Exit
      EndIf
    EndLoop
  EndIf
EndPrgm

animtbar()
Prgm
  ©animtbar(): Toolbar animations./barra de herramientas de las Animaciones.
  Loop
    Toolbar
      Title "Polyhedron"
        Item "Parallelepiped",paralllb
        Item "Pyramid",pyramlb
        Item "Triangular Prism",triprilb
        Item "Tetrahedron",tetrahlb
      Title "Paramts"
        Item "Set parameters page1/2",wparamlb
        Item "Parameters page2/2",wparm2lb
        Item "Parameters 3",wparm3lb
        Item "Default values",dftparlb
      Title "MakeImag",makeimlb
      Title "Animation",startalb
      Title "Delete Images"
        Item "All",delalllb
        Item "Current",delcrrlb
      Title "Quit"
        Item "Exit without del images",quit2lb
        Item "Delete All Images",quit1lb
        Item "Stop",haltlb
      Title "About",aboutlb
    EndTBar
    Cycle

    Lbl paralllb:poltype(1)
    Cycle ©Loop

    Lbl pyramlb:poltype(2)
    Cycle ©Loop

    Lbl triprilb:poltype(3)
    Cycle ©Loop

    Lbl tetrahlb:poltype(4)
    Cycle ©Loop

    ©Lbl tpyramlb:poltype(5)
    ©Cycle ©Loop

    Lbl wparamlb:wparamts()
    Cycle ©Loop

    Lbl wparm2lb:wparamt2()
    wparm2lb
    Cycle ©Loop

    Lbl wparm3lb:wparamt3()
    wparm3lb
    Cycle ©Loop

    Lbl dftparlb:dftvalue()
    Cycle

    Lbl makeimlb:makepict(nimages,highpoly,hidedgvl,rotatnvl,polytype)
    Cycle ©Loop

    Lbl startalb:exeanimt(nimages,anidelay,maxcycle,rotatnvl)
    Cycle ©Loop

    Lbl delalllb:delpics(nimages,1)
    Cycle ©Loop

    Lbl delcrrlb:delpics(nimages,2)
    Cycle ©Loop

    Lbl aboutlb:aniintro()
    Cycle ©Loop

    Lbl quit1lb:exitprgm(nimages,1)
    Exit ©EndLoop

    Lbl quit2lb:exitprgm(nimages,0)
    Exit ©EndLoop

    Lbl haltlb:Stop
    Exit ©EndLoop

  EndLoop
EndPrgm

parallel()(nimages,highpoly,hidedgvl,rotatnvl)
Prgm

Local cnt,angleid,xoo,yoo,xaa,yaa,xbb,ybb
Local xcc,ycc,xdd,ydd,xee,yee,xff,yff,xgg,ygg
Local shiftflg,decryval,highpcpy
Local tempstr

kernel2\no→modifpfl © reverses the flag
highpoly→highpcpy
approx(nimages/2)→shiftflg

If dcrhigvl=kernel2\yes1 Then
  highpoly/nimages→decryval
Else
  0→decryval
EndIf

© new images are created and deleted surplus
For cnt,0,nimages-1
  "#"&string(cnt+1)&"/"&string(nimages)→tempstr
  kernel2\printtxt({"Creating image",tempstr},0,1,1,1)

  ©// math algorithm for drawing each image
  approx(cnt*π/(2*nimages))→angleid

  If rotatnvl=1 Then
    sin(angleid)→xoo
    cos(angleid)→yoo
  Else
    cos(angleid)→xoo © cos [0, cnt*π/2*#imag]
    sin(angleid)→yoo
  EndIf

  © the lower base vertices
  ­xoo→xaa © -(xoo,yoo) negative coordinate origin 0, opposite vertex
  ­yoo→yaa

  ­yoo→xbb © (-yoo,xoo)
  xoo→ybb

  ­xbb→xcc © -(xbb,ybb)  Cordenada negative point b. opposite vertex
  ­ybb→ycc

  © The upper base vertices.
  xoo→xdd
  yoo+highpoly→ydd

  xaa→xee
  yaa+highpoly→yee

  xbb→xff
  ybb+highpoly→yff

  xcc→xgg
  ycc+highpoly→ygg

  ©"O="&Format(xoo,"f1")&","&Format(yoo,"f1")&" A="&Format(xaa,"f1")&","&Format(yaa,"f1")&" B="&Format(xbb,"f1")&","&Format(ybb,"f1")&" C="&Format(xcc,"f1")&","&Format(ycc,"f1")→tempstr

  ClrDraw ©// removes the current picture
  If vertexfl=kernel2\no2 Then
    PtOn xoo,yoo: PtText " 0",xoo,yoo
    PtOn xaa,yaa: PtText "A",xaa,yaa
    PtOn xbb,ybb: PtText "B",xbb,ybb
    PtOn xcc,ycc: PtText "C",xcc,ycc
    PtOn xdd,ydd: PtText "D",xdd,ydd
    PtOn xee,yee: PtText "E",xee,yee
    PtOn xff,yff: PtText "F",xff,yff
    PtOn xgg,ygg:PtText "G",xgg,ygg
  EndIf


  ©­          D
  ©­          ^
  ©­         /|\
  ©­        / | \
  ©­       /  |  \G
  ©­    F /   |  /|
  ©­     |\  /0\/ |
  ©­     | \/  /\ |
  ©­     | /\E/  \|C
  ©­    B|/  |   /
  ©­      \  |  /
  ©­       \ | /
  ©­        \|/
  ©­         A

  If axesflag=1 Then
    showaxes()
  EndIf

  Line xaa,yaa,xcc,ycc © base A-C siempre visible
  Line xaa,yaa,xee,yee © lat A-E siempre visible
  Line xcc,ycc,xgg,ygg © lat C-G siempre visible

  If hidedgvl=kernel2\no2 Then
    Line xbb,ybb,xoo,yoo © B-O
  EndIf

  ©PxlText tempstr,96,0
  ©PtText string(shiftflg),xbb-.8,ybb-.8
  If rotatnvl=1 and cnt<ceiling(shiftflg) or rotatnvl>=2 and cnt>floor(shiftflg) Then
    ©PtText "LEFT",xbb-.3,ybb-.3
    Line xbb,ybb,xaa,yaa © base B-A
    Line xbb,ybb,xff,yff © lat  B-F
    If hidedgvl=kernel2\no2 Then
      Line xoo,yoo,xcc,ycc © base O-C
      Line xoo,yoo,xdd,ydd © lat  O-B
    EndIf
  Else

    ©PtText "RIGHT",xbb+.3,ybb+.3
    Line xoo,yoo,xcc,ycc © base O-C
    Line xoo,yoo,xdd,ydd © lat  O-B
    If hidedgvl=kernel2\no2 Then
      Line xbb,ybb,xaa,yaa © base B-A
      Line xbb,ybb,xff,yff © lat  B-F
    EndIf
  EndIf

  ©PxlText "upper base",0,0
  ©PxlText tempstr,0,0
  Line xff,yff,xdd,ydd
  Line xff,yff,xee,yee

  Line xgg,ygg,xee,yee
  Line xgg,ygg,xdd,ydd

  If dcrhigvl=kernel2\yes1 Then
    highpoly-decryval→highpoly © reajuste de la altura
  EndIf

  StoPic #("im"&string(cnt+1)) ©// stores the generated image
  If tempflg=1 Then
    ©kernel2\delaysec(1)
    Pause
  EndIf
EndFor


kernel2\printtxt({"Done"},0,0,1,1)
©delpics(nimages,3) © Deletes surplus.

EndPrgm


wparamts()
Prgm
  Local nimagstr,highpstr,adelayst,mxcycstr,dcrhigst

  © Convierte a cadena para ser utilizado en Dialog Block
  string(nimages)→nimagstr
  string(highpoly-offsetvl)→highpstr
  string(dcrhigvl)→dcrhigst
  string(anidelay)→adelayst
  string(maxcycle)→mxcycstr

  ©GUI
  Dialog
    Title "Parameters"
    Request "Frames",nimagstr
    Request "Hight",highpstr
    DropDown "Decr Hight",{"Yes","No"},dcrhigvl
    DropDown "Hidden Edges:",{"Yes","No"},hidedgvl
    Request "Persistence (seg)",adelayst
    Request "Repetitions",mxcycstr
    DropDown "Rotation:",{"Forward","Backward","Both"},rotatnvl
  EndDlog
  ok→ok_getp

   If ok_getp=1 Then
   © If I was pressed enter there reassignment or update of parameters.
    1→modifpfl
    0→mkimagfl
    0→aniokflg
    ©kernel2\checkobj("nimagstr")
    ©If valobjfl>0 Then
      ©50→nimages
      ©string(nimages)→nimagstr
    ©EndIf
    int(expr(nimagstr))→nimages
    kernel2\checkvar("nimages","NUM",50)
    If nimages>50 or nimages<2 Then
      50→nimages
      string(nimages)→nimagstr
    EndIf

    expr(highpstr)+offsetvl→highpoly
    kernel2\checkvar("highpoly","NUM",1)

    expr(adelayst)→anidelay
    kernel2\checkvar("anidelay","NUM",.01)

    expr(mxcycstr)→maxcycle
    kernel2\checkvar("maxcycle","NUM",3)

    kernel2\printtxt(prtparm(),0,1,1,1)
    ©Else
    ©printtxt({"Current values are preserved."},0,0,0,1)
  EndIf
    cfngraph(highpoly)
EndPrgm

makepict(nimages,highpoly,hidegval,rotatnvl,polytype)
Prgm
Local clrwin, resetcoo

If modifpfl=kernel2\yes Then
© parameters were modified
  If polytype=1 Then
    parallel(nimages,highpoly,hidegval,rotatnvl)
  Else
    If polytype=2 Then
      pyramid(nimages,highpoly,hidegval,rotatnvl)
    Else
      If polytype=3 Then
        triprism(nimages,highpoly,hidegval,rotatnvl)
      Else
        If polytype=4 Then
          tetrahed(nimages,highpoly,hidegval,rotatnvl)
        Else

        EndIf
      EndIf
    EndIf

  EndIf
  kernel2\yes→mkimagfl © Flag to indicate that the images were created.
Else
  If mkimagfl=1 or aniokflg=1 Then
    1→clrwin
    1→resetcoo
  Else
    0→clrwin
    0→resetcoo
  EndIf

  kernel2\printtxt({"* The images were not created by that","parameters are still the same"},0,clrwin,resetcoo,1)
  kernel2\no→aniokflg
EndIf
EndPrgm

exeanimt(nimages,anidelay,maxcycle,rotatnvl)
Prgm
©jaimeza
Local cyccnt,directn,cnt,key
Local clrwin, resetcoo

If mkimagfl=1 Then
© Flag to indicate that the images were created.
  If anitypfl=1 Then
    If rotatnvl=3 Then
      ­1→directn
    Else
      1→directn
    EndIf
    1→cyccnt
    While getKey()=0 and cyccnt≤maxcycle ©// While a key is not pressed
      PxlText "Animation #"&string(cyccnt)&"/"&string(maxcycle),1,0
      CyclePic "im",nimages,anidelay,1,directn
      ©If Key≠0 Then
      ©EndIf
      PxlText "Animation #"&string(cyccnt)&"/"&string(maxcycle),1,0
      PxlText "Done",9,0
      cyccnt+1→cyccnt
    EndWhile
    1→ycooprt


  Else
    1→cyccnt
    While getKey()=0 and cyccnt≤maxcycle ©// While a key is not pressed

      PxlText "Animation #"&string(cyccnt)&"/"&string(maxcycle),1,0
      ClrDraw
      For cont,1,nimages
        RclPic #("im"&string(cont)),0,0
        kernel2\delay(anidelay)
        XorPic #("im"&string(cont)),0,0
      EndFor

      RclPic #("im"&string(cont-1)),0,0
      PxlText "Animation #"&string(cyccnt)&"/"&string(maxcycle),1,0
      PxlText "Done",9,0
      cyccnt+1→cyccnt
      ©If cyccnt > maxcycle Then
        ©ClrDraw
      ©Else
      ©EndIf
    EndWhile
    ©1→ycooprt

  EndIf
  1→aniokflg
Else
  If mkimagfl=1 or aniokflg=1 Then
    1→clrwin
    1→resetcoo
  Else
    0→clrwin
    0→resetcoo
  EndIf
  kernel2\printtxt({"* Picture animation","even have NOT been created"},0,clrwin,resetcoo,1)

  0→aniokflg
EndIf
EndPrgm