Gamme TI-82
Partager sur Facebook Fil RSS Imprimer la page
Cacher les résultats

Résultat de la recherche



Poster un nouveau sujet Poster une réponse
problème avec recallpix
Auteur Message
shinai56
Invité
Posté le : Ven 18 Sep 2009, 21:14   Citer 

Donc j'ai fini de taper un programme seulement il y a une erreur qui apparait quand je veux aller dans tableau (voir programme si dessous) l'erreur se met au premier recallpix pix 1 . Avant de poster j'ai fouiller un peu le forum pour voir s'il y avait des erreur similaire j'ai essayer de mettre recallpix 1 sa ne marche pas . J'ai une TI 82 stats.fr


Citer
:
:ClrHome
:Menu(" TBL PERIODIQUE ","TABLEAU",N,"RECHERCHE",O,"ANION",P,"CATION",Q,"QUITTE",R)
:Lbl R
:ClrHome
:Stop
:Lbl P
:ClrDraw
:1üXmin
:95üXmax
:0üXscl
:1üYmin
:63üYmax
:0üYscl
:Text(2,2,"IONS CHLORURE: CL-"
:Text(10,18,"HYDROXYDE: HO-"
:Text(20,18,"SULFATE: SO"
:Text(17,60,"2-"
:Text(23,60,"4"
:Text(33,18,"NITRATE: NO"
:Text(30,59,"-"
:Text(36,59,"3"
:Text(46,1,"HYDROGENOCARBONATE: "
:Text(53,70,"HCO"
:Text(56,82,"3"
:Text(50,82,"-"
:Pause
:prgmAPERIO
:Lbl Q
:ClrDraw
:1üXmin
:95üXmax
:0üXscl
:1üYmin
:63üYmax
:0üYscl
:Text(1,18,"ARGENT: AG+"
:Text(7,18,"ALLUMINIUM: AL3+"
:Text(15,2,"IONS SODIUM: NA+"
:Text(22,18,"HYDROGENE: H+"
:Text(29,18,"OXONIUM: H3O+"
:Text(37,18,"CUIVRE 2: CU2+"
:Text(45,18,"FER 2: Fe2+"
:Text(53,18,"FER 3: Fe3+"
:Text(53,18,"ZINC: ZN2+"
:
:Pause
:prgmAPERIO
:Lbl O
:9üA:18üB:27üC:9*4üD:9*5üE:9*6üF:9*7üG:9*8üH:9*10üI:9*11üJ:9*12üK:9*13üL:9*14üM:9*15üN:9*16üO:9*17üO:9*18üP:9*19üQ:9*20üR:9*21üS:9*22üT:9*23üU:9*24üV:9*25üW:9*26üX:9*27üY:9*28üZ
:Input "MOT ?",Á
:If Á=HYDROGENE:Then:2üA:2üB:Goto M:End
:If Á=HELIUM:Then:2üA:87üB:Goto M:End
:If Á=LITHIUM:Then:9üA:2üB:Goto M:End
:
:
:
:
:Lbl N
:2üA:2üB
:Lbl M
:AxesOff
:ClrDraw
:RecallPic Pic1
:Goto 2
:Lbl 1
:If B=12 and A=37:Then:Text(10,15,"LANTHANIDES":
:End
:If B=12 and A=44:Then:Text(10,20,"ACTINIDES":End
:If A=2 and B=2
:Then
:Text(5,35,"H"
:Text(1,30,"1"
:Text(8,30,"1"
:Text(55,5,"HYDROGENE"
:End
:If A=2 and B=87:Then:Text(5,35,"He":Text(1,30,"4":Text(8,30,"2":Text(55,10,"HELIUM"
:End
:
:If A=9 and B=2
:Then:Text(5,35,"LI":Text(1,30,"7":Text(8,30,"3":Text(55,10,"LITHIUM":Text(55,50,"M.M=6.9":End
:
:If A=9 and B=7
:Then:Text(5,35,"Be":Text(1,30,"9":Text(8,30,"4":Text(55,5,"BERYLLIUM":End
:
:If A=9 and B=62:Then:Text(5,35,"B":Text(1,25,"11":Text(8,30,"5":Text(55,10,"BORE":Text(55,50,"M.M=10.8":End
:
:If B=67 and A=9:Then:Text(5,35,"C":Text(1,25,"12":Text(8,30,"6":Text(55,5,"CARBONE":End
:If B=72 and A=9:Then:Text(5,35,"N":Text(1,25,"14":Text(8,25,"7":Text(55,10,"AZOTE":End
:If B=77 and A=9:Then:Text(5,35,"O":Text(1,25,"16":Text(8,30,"8":Text(55,5,"OXYGENE":End
:If B=82 and A=9:Then:Text(5,35,"F":Text(1,25,"19":Text(8,30,"9":Text(55,10,"FLUOR":End
:If B=87 and A=9:Then:Text(5,35,"Ne":Text(1,25,"20":Text(8,25,"10":Text(55,10,"NEON":End
:If A=16 and B=2:Then:Text(5,35,"Na":Text(1,25,"23":Text(8,25,"11":Text(55,10,"SODIUM":End
:If A=16 and B=7:Then:Text(5,35,"MG":Text(1,25,"24":Text(8,25,"12":Text(55,5,"MAGNESIUM"):End
:If A=16 and B=62:Then:Text(5,35,"AL":Text(1,25,"27":Text(8,25,"13":Text(55,5,"ALUMINIUM":End
:If A=16 and B=67:Then:Text(5,35,"SI":Text(1,25,"28":Text(8,25,"14":Text(55,5,"SILICIUM":Text(55,55,"M.M=28,1":End
:If A=16 and B=72:Then:Text(5,35,"P":Text(1,25,"31":Text(8,25,"15":Text(55,5,"PHOSPHORE":End
:If A=16 and B=77:Then:Text(5,35,"S":Text(1,25,"32":Text(8,25,"16":Text(55,10,"SOUFRE":Text(55,50,"M.M=32,1":End
:If A=16 and B=82:Then:Text(5,35,"CL":Text(1,25,"35":Text(8,25,"17":Text(55,10,"CHLORE":Text(55,50,"M.M=35.5":End
:If A=16 and B=87:Then:Text(5,35,"Ar":Text(1,25,"40":Text(8,25,"18":Text(55,5,"ARAGON":Text(55,50,"M.M=39,9":End
:If B=2 and A=23:Then:Text(5,35,"K":Text(1,25,"39":Text(8,25,"19":Text(55,5,"POTASSIUM":Text(55,50,"M.M=39,1":End
:If B=7 and A=23:Then:Text(5,35,"Ca":Text(1,25,"40":Text(8,25,"20":Text(55,2,"CALCIUM":Text(55,50,"M.M=40,1":End
:If B=12 and A=23:Then:Text(5,35,"Se":Text(1,25,"45":Text(8,25,"21":Text(55,10,"SCANDIUM":End
:If B=17 and A=23:Then:Text(5,35,"TI":Text(1,25,"48":Text(8,25,"22":Text(55,2,"TITANE":Text(55,50,"M.M=47,9":End
:If B=22 and A=23:Then:Text(5,35,"V":Text(1,25,"51":Text(8,25,"23":Text(55,2,"VANADIUM":Text(55,50,"M.M=50.9":End
:If A=23 and B=27:Then:Text(5,35,"Cr":Text(1,25,"52":Text(8,25,"24":Text(55,5,"CHROME":End
:If A=23 and B=32:Then:Text(5,35,"MÖ":Text(1,25,"55":Text(8,25,"25":Text(55,2,"MANGANESE":Text(55,55,"M.M=54.9":End
:If A=23 and B=37:Then:Text(5,35,"Fe":Text(1,25,"56":Text(8,25,"26":Text(55,5,"FER":Text(55,55,"M.M=55.8":End
:
:If A=23 and B=42:Then:Text(5,35,"CO":Text(1,25,"59":Text(8,25,"27":Text(55,5,"COBALT":Text(55,50,"M.M=58.9":End
:
:
:
:
:
:
:
:For(Z,0,1û9
:getKeyüY
:If Y=23
:Then
:ClrHome
:Stop
:End
:If Y=105 and A=37 and B=12:Goto F
:If Y=105 and A=44 and B=12:Goto F
:
:
:
:
:If Y=24
:Then:B-5üB:Goto 2:End
:If Y=25:Then:A-7üA:Goto 2:End
:If Y=26
:Then
:B+5üB:Goto 2:End
:If Y=34
:Then
:A+7üA:Goto 2:End
:End
:Goto 2
:Lbl 2
:ClrDraw
:RecallPic Pic1
:If A<2:2üA
:If B<2:87üB
:If A>50:44üA
:If B>90:2üB
:If A<23 and B=12:62üB
:If A<23 and B=57:7üB
:If A=2 and B=7:87üB
:If A=2 and B=82:2üB
:If A=2 and B>60 and B<80:44üA
:If A=16 and B>10 and B<60:44üA
:
:Pxl-Change(A,B)
:Pxl-Change(A+1,B)
:Pxl-Change(A+2,B)
:Pxl-Change(A+3,B)
:Pxl-Change(A+4,B)
:Pxl-Change(A+5,B)
:Pxl-Change(A,B+1)
:Pxl-Change(A+1,B+1)
:Pxl-Change(A+2,B+1)
:Pxl-Change(A+3,B+1)
:Pxl-Change(A+4,B+1)
:Pxl-Change(A+5,B+1)
:Pxl-Change(A,B+2)
:Pxl-Change(A+1,B+2)
:Pxl-Change(A+2,B+2)
:Pxl-Change(A+3,B+2)
:Pxl-Change(A+4,B+2)
:Pxl-Change(A+5,B+2)
:Pxl-Change(A,B+3)
:Pxl-Change(A+1,B+3)
:Pxl-Change(A+2,B+3)
:Pxl-Change(A+3,B+3)
:Pxl-Change(A+4,B+3)
:Pxl-Change(A+5,B+3)
:Goto 1
:
:
:
:
:Lbl F
:ClrDraw
:AxesOff
:1üXmin
:95üXmax
:0üXscl
:1üYmin
:63üYmax
:0üYscl
:10üB:32üA
:
:Lbl H
:ClrDraw
:Line(10,32,85,32)
:Line(10,25,85,25)
:Line(10,18,85,1glasses.gif
:For(X,10,80,10
:Line(X,32,X,18
:Line(X+5,32,X+5,1glasses.gif
:End
:Goto G
:Lbl I
:If A=32:Text(55,5,"LANTHANIDES"
:If A=39:Text(55,5,"ACTINIDES"
:
:If A=32 and B=10:Then:Text(5,75,"La":Text(1,60,"139":Text(8,65,"57":Text(5,5,"LANTHANE":End
:
:
:
:
:For(X,0,1û9
:getKeyüY
:If Y=23:Then:37üA:12üB:Goto 2:End
:If Y=24:Then:B-5üB:Goto H:End
:If Y=25:Then:A-7üA:Goto H:End
:If Y=26:Then:B+5üB:Goto H:End
:If Y=34:Then:A+7üA:Goto H:End
:End
:Lbl G
:For(E,0,3
:For(D,0,5
:Pxl-On(A+D,B+E)
:End
:End
:Goto I
:



  Haut de page Bas de page 
 
shinai56
Invité
Posté le : Ven 18 Sep 2009, 21:34   Citer 

Desolé du double post' mais j'ai reussi a corriger l'erreur du
recallpix sauf que lorsque je vais dans tableau il n'y a que hydrogene
qui s'affiche par contre le menu cation et anion et
recherche fontionne bien.

  Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2016 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink
 

Site hébergé par Free Page sous licence creative commons Page validée par le W3C (XHTML 1.0 Transitional) Feuille de style validée par le W3C Flux RSS 2.0 valide Page étiquetée par l'ICRA Page testée par Ocawa