π
<-
Chat plein-écran
[^]

an program for ti84 to get ti84's ID (not work)

an program for ti84 to get ti84's ID (not work)

Unread postby 844288567 » 18 Sep 2019, 13:02

:'( HOW TO USE IT:'( HOW TO USE IT

The function of the program is to get the machine ID and store it in STR0.

Image
Preliminary feeling is that L6 calculates problematic ID and calculates 0 10 (A) 2D16C 7EA5. These bits are correct, but why does 10 not show A?

Attached to the program is the hope of expert answers, QQ contact me: 844288567

Code: Select all
log(ID)→Str8
DelVar XDelVar L₆"→L₆
1ᴇ12(fPart(Str8)1→L₁
1ᴇ12(fPart(Str8)/1→L₂
Str8
Ans+1-1=Ans
(1)Ans(1)
If Ans or sum(iPart(10Str8)≠4 or not(fPart(1ᴇ9Str8
“ID→Str8
Repeat not(L₁(1
not(X→X
If sum(fPart(L₁)=fPart(L₂
Then
10sum(fPart(L₁→L₆(1+dim(L₆
.1iPart(L₁→L₁
Else
10sum((1+fPart(L₁→L₆(1+dim(L₆
If X
L₂+1→L₂
.1iPart(L₁)-.1→L₁6
End
.1iPart(L₂→L₂
End
"0
For(X,dim(L₆),1,⁻1
Ans+sub("0123456789ABCDEF",L₆(X)+1,1
End
DelVar L₁DelVar L₂DelVar L₆DelVar XDelVar DDelVar IDelVar Str8sub(Ans,1,length(Ans)-4)+sub(Ans,length(Ans)-1,2)+sub(Ans,length(Ans)-3,2→Str0
Attachments
GETID.8xp
(399 Bytes) Downloaded 1 time
User avatar
844288567
Niveau 2: MI2 (Membre Initié)
Niveau 2: MI2 (Membre Initié)
Level up: 50%
 
Posts: 1
Joined: 18 Sep 2019, 12:51
Gender: Not specified
Calculator(s):

Return to TI-Basic

Who is online

Users browsing this forum: No registered users and 3 guests

-
Search
-
Featured topics
Concours TI-Planet-Casio de rentrée 2019. 3 défis pour plus d'une 15aine de calculatrices graphiques et nombre de goodies sortant de l'ordinaire ! :D
Comparaisons des meilleurs prix pour acheter sa calculatrice !
12
-
Donations / Premium
For more contests, prizes, reviews, helping us pay the server and domains...

Discover the the advantages of a donor account !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partner and ad
Notre partenaire Jarrety 
-
Stats.
676 utilisateurs:
>622 invités
>48 membres
>6 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Other interesting websites
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)