TI-85
[Prev][Next][Index][Thread]
TI-85
Why do you call it porn movie for the 85?
And another question
I hope you know how to do TI-85 basic programing because i have a
problem. I can't get this thing to work, it is supposed to be a small
game you play over a link but the link won't work.
a funny box is really a \ ->\ (the stor arrow thing)
0ÍX
0ÍY
A=X
B=Y
Lbl Main
ClDrw
Input"CBLGET",S
Input"CBLGET",D
Input"CBLGET",F
Input"CBLGET",G
"SND"ÍX
"SND"ÍY
"SND"ÍA
"SND"ÍB
PtOn(F,G)
PtOn(S,D)
PtOn(S+.1,D+.1)
PtOn(S+.2,D)
PtOn(S+.1,D-.1)
PtOn(A,B)
PtOn(X,Y)
PtOn(X+.1,Y)
PtOn(X+.1,Y+.1)
PtOn(X,Y+.1)
0ÍZ
While Z==0
getKyÍZ
If Z==24
X-.2ÍX
If Z==25
Y+.2ÍY
If Z==26
X+.2ÍX
If Z==34
Y-.2ÍY
If Z==22
B+.3ÍB
If Z==42
B-.3ÍB
If Z==31
A-.3ÍA
If Z==33
A+.3ÍA
Goto Main
===========================================================
0ÍS
0ÍD
A=F
B=G
Lbl Main
ClDrw
Input"CBLGET",X
Input"CBLGET",Y
Input"CBLGET",A
Input"CBLGET",B
"SND"ÍS
"SND"ÍD
"SND"ÍF
"SND"ÍG
PtOn(F,G)
PtOn(S,D)
PtOn(S+.1,D+.1)
PtOn(S+.2,D)
PtOn(S+.1,D-.1)
PtOn(A,B)
PtOn(X,Y)
PtOn(X+.1,Y)
PtOn(X+.1,Y+.1)
PtOn(X,Y+.1)
0ÍZ
While Z==0
getKyÍZ
If Z==24
S-.2ÍS
If Z==25
D+.2ÍD
If Z==26
S+.2ÍS
If Z==34
D-.2ÍD
If Z==22
G+.3ÍG
If Z==42
G-.3ÍG
If Z==31
F-.3ÍF
If Z==33
F+.3ÍF
Goto Main