True dat.
|
Yay! the original is finally uploaded now I just have to wait for the updates.
"Always code as if the person who will maintain your code is a maniac serial killer that knows where you live" -Unknown
"If you've done something right no one will know that you've done anything at all" -Futurama
<Michael_V> or create a Borg collective and call it The 83+
<Michael_V> Lower your slide cases and prepare to be silent linked. Memory clears are futile.
If anybody cares my newest version is almost ready to come out. here is the code
Code:
P.S. ignore this `_´ it is three symbols source coder didn't understand.
Code:
::DCS6
:"FFFFA021B58BB52B802BFFEFC7DFD7DF45DFABEFC7F7EFF7EFF7EFEFD7ABBBC7
::A
:INVERT
::
:" 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz.?!→Str1
:SetUpEditorLHS
:33→dim(∟LHS
:If not(∟LHS(1
:{3,31,19,16,30,31,26,29,24,1,66,2,31,19,16,30,31,26,29,24,1,66,1,31,19,16,30,31,26,29,24,1,66→∟LHS
:StoreGDB 1
:ClrDraw
:AxesOff
:ZStandard
:104→Xmax
:72→YMax
:ZInteger
:Asm(prgmINVERT
:"
:For(A,0,7
:Text({-}1,A8,0,Ans+Ans+Ans+Ans
:End
:StorePic 1
:Lbl C
:DelVar SDelVar DRecallPic 1
:Asm(prgmINVERT
:Text({-}1,8,6,"LIGHTNING v2.6
:Line(6,46,88,46,0
:Text(17,25,"BY THESTORM
:For(A,0,3
:Text({-}1,27+8A,6,A+1,"-",sub(" PLAY WATCH SCORES EXIT ",1+7A,7
:End
:{83,82,81,81,81,81,82,83,83,83,83,83,83,82,81,80,79,78,78,78,78,79,80,81,82,83,83,83,83,82,81,80,81,82,83,82,81,80,79,78,77,78,79,80,79,78,77,78,79,80,81,82,83,82,81,80,80,80,80,79,78,77→{L1}
:For(N,0,61
:Pxl-Off(N,{L1}(N+1
:End
:DelVar {L1}
:Lbl Z
:Repeat max(Ans={92,93,94,82,45,22
:getKey
:End
:Ans→K
:If max(Ans={82,45,22
:Goto 3
:If max(Ans={92,93
:Then
:(K=92→D
:DelVar L47→P
:Repeat getKey=45 or L
:Asm(prgmINVERT
:RecallPic 1
:(P-8(S>6))D+randInt(12,82)not(D→G
:(P+8(S>6))D+randInt(12,82)not(D→F
:randInt(0,2→O
:2+iPart((S/2.5)D→E
:If not(L
:Then
:For(V,62,0,{-}E
:randInt({-}1,1→A
:G+EA(G+EA>0 and G+EA<95→W
:Line(G,V+E,W,V,0
:W→G
:If (S>6)D or not(D)(O=2
:Then
:randInt({-}1,1→A
:F+EA(F+EA>0 and F+EA<95→U
:Line(F,V+E,U,V,0
:U→F
:End
:If D
:Then
:getKey→K
:If K=26 or K=24 or V≥60
:Then
:Text({-}1,50,P-3,"
:Text({-}1,56,P-3,"
:P+2(K=26 and P<91)-2(K=24 and P>3→P
:Text({-}1,56,P-2,"X
:Text(54,P-3,"`_´
:Pt-Off(P,9,2
:End
:End
:V→Z
:If D(V≤13 and (abs(P-G)≤5 or (S>6 and abs(P-F)≤5))) or K=45
:Then
:1→L
:{-}1→V
:End
:End
:End
:1+((6<S)D or not(D)(O=2))→B
:For(A,1,B
:Line(G+1,Z+1,G+3,Z+3,0:Line(G-1,Z+1,G-3,Z+3,0:Line(G-3,Z,G-4,Z+1,0:Line(G+3,Z,G+4,Z+1,0
:F→G
:End
:StorePic 2
:ClrDraw
:RecallPic 2
:If not(L
:Then
:S+1→S
:ClrDraw
:End
:End
:If D
:Then
:If S>∟LHS(23
:Then
:ClrHome
:DispGraph
:Disp
:Disp ""," High Score"," Enter Name
:Input " ",Str2
:augment({S},seq(inString(Str1,sub(Str2,A,1),A,1,length(Str2)))→{L1}
:seq(∟LHS(A),A,1,11→{L2}
:seq(∟LHS(A),A,12,22→{L3}
:If S>{L2}(1
:Then
:augment({L1},{L2}
:augment(Ans,{L3}→∟LHS
:Else
:If S>{L3}(1
:Then
:augment({L2},{L1}
:augment(Ans,{L3}→∟LHS
:Else
:If S>∟LHS(23
:Then
:augment({L2},{L3}
:augment(Ans,{L1}→∟LHS
:End
:End
:End
:ClrHome
:DelVar {L1}DelVar {L2}DelVar {L3}
:Else
:Text(17,25,"Ha Ha You Lose
:Text(23,25," Your Score= ",S
:Pause
:End
:End
:End
:If K=94 or L
:Then
:Asm(prgmINVERT
:RecallPic 1
:Text({-}1,8,10,"LIGHTNIN v2.6
:Text({-}1,16,16,"HIGH SCORES
:Line(6,38,88,38,0
:" →Str2:Ans→Str3:Ans→Str4
:For(A,2,11
:∟LHS(A→B
:B+not(B→B
:Str2+(sub(Str1,B,1→Str2
:∟LHS(A+11)→B
:B+not(B→B
:Str3+sub(Str1,B,1→Str3
:∟LHS(A+22→B
:B+not(B→B
:Str4+sub(Str1,B,1→Str4
:End
:Text({-}1,28,4,Str2," ",∟LHS(1
:Text({-}1,38,4,Str3," ",∟LHS(12
:Text({-}1,48,4,Str4," ",∟LHS(23
:DelVar Str2DelVar Str3DelVar Str4Pause
:End
:Goto C
:Lbl 3
:ClrDraw
:RecallGDB 1
:DelVar Pic1DelVar Pic2DelVar Str1DelVar GDB1Archive∟LHS
P.S. ignore this `_´ it is three symbols source coder didn't understand.
"Always code as if the person who will maintain your code is a maniac serial killer that knows where you live" -Unknown
"If you've done something right no one will know that you've done anything at all" -Futurama
<Michael_V> or create a Borg collective and call it The 83+
<Michael_V> Lower your slide cases and prepare to be silent linked. Memory clears are futile.
"Always code as if the person who will maintain your code is a maniac serial killer that knows where you live" -Unknown
"If you've done something right no one will know that you've done anything at all" -Futurama
<Michael_V> or create a Borg collective and call it The 83+
<Michael_V> Lower your slide cases and prepare to be silent linked. Memory clears are futile.
If any one wants it I have a new version with a harder, the AI(lighting) favors following you and people at UTI seemed to like it.
"Always code as if the person who will maintain your code is a maniac serial killer that knows where you live" -Unknown
"If you've done something right no one will know that you've done anything at all" -Futurama
<Michael_V> or create a Borg collective and call it The 83+
<Michael_V> Lower your slide cases and prepare to be silent linked. Memory clears are futile.
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.
» Go to Registration page
» Go to Registration page
» Goto page Previous 1, 2, 3, 4, 5, 6
» View previous topic :: View next topic
» View previous topic :: View next topic
Page 6 of 6
» All times are UTC - 5 Hours
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
Advertisement