Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - jknear

Pages: [1]
1
TI-BASIC / How to obtain the id of a calculator for program security?
« on: September 20, 2019, 02:09:29 am »
 :(How to access the unique id of a ti-84 from within ti-basic for use in program security

2
HOW TO USE IT:'( HOW TO USE IT ??? :'( :'( :'( :'(

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

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
before use it :2nd+LINK  -> sendID  then  run  GETID   

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



Pages: [1]