|
-
Aug 19th, 2002, 08:21 AM
#1
Thread Starter
Fanatic Member
Tutorials
Good tutorials for pragramming in QBasic and in TI-80 (scientific calculator programming(gotta find something to do during math class))?
"A RESPECTED scientist has put forward the stunning - if unsavoury - possibility that humans are descended from sewage dumped overboard by aliens."
"First we read that we are the creation of God, then scientists say we are descended from apes. Now they say we're some sort of alien poo. How much further can we sink?"
- Robert Matthews, Science Correspondent
-
Aug 19th, 2002, 08:26 AM
#2
Hyperactive Member
Re: Tutorials
Originally posted by Alien_poo
Good tutorials for pragramming in QBasic and in TI-80 (scientific calculator programming(gotta find something to do during math class))?
T1-80?? what grade are u in?
-
Aug 19th, 2002, 08:29 AM
#3
Thread Starter
Fanatic Member
secondary 4, in the USA that would be.... grade10 or something like that. Why?
"A RESPECTED scientist has put forward the stunning - if unsavoury - possibility that humans are descended from sewage dumped overboard by aliens."
"First we read that we are the creation of God, then scientists say we are descended from apes. Now they say we're some sort of alien poo. How much further can we sink?"
- Robert Matthews, Science Correspondent
-
Aug 19th, 2002, 08:56 AM
#4
Thread Starter
Fanatic Member
how the hell am I suppose to understand this?
:FNOFF
:PLOTTSOFF
:1->XMIN
:63->XMAX
:0->XSCL
:1->YMIN
:47->YMAX
:0->YSCL
:LBL A
:CLRHOME
ISP "COURSE CHEVAUX",---------------","1:COURSE","2:RECORD","3:REPRENDRE","4:ARRET",""
:INPUT "1-4:",A
:CLRHOME
:IF A=>5
:GOTO A
:IF A<=0
:GOTO A
:IF A=1
:THEN
:20->M
:GOTO B
:END
:IF A=2
:GOTO C
:IF A=3
:GOTO B
:IF A=4
:STOP
:LBL B
:CLRDRAW
:CLRHOME
:RANDINT(3,5->B
:RANDINT(0,10->C
:IF A=3
:THEN
:IF M<=20
:20->M
:END
ISP "ARGENT:",M,"","DOLLARS 1-3.","(0=ARGENT)"
:INPUT "1-3:",S
:CLRHOME
:IF S=>3.1
:GOTO D
:IF S<=-1
:GOTO D
:IF S=0
:GOTO V
:LBL I
:B+(C/10)->Z
:FIX 1
ISP "COTE CHEVAL:",Z
:FLOAT
ISP "ARGENT:",M,""
:INPUT "MISE:",P
:CLRHOME
:IF P>M
:GOTO I
:IF P<1
:GOTO I
ISP " A VOS MARQUES"
:FOR(A,1,35
:END
ISP " PRETS"
:FOR(A,1,35
:END
ISP " PARTEZ!"
:FOR(A,1,35
:END
:CLRHOME
:CLRDRAW
:LINE(63,19,60,19
:LINE(62,21,59,21
:LINE(61,23,58,23
:LINE(60,25,57,25
:LINE(59,27,55,27
:PT-ON(54,28
:PT-ON(55,29
:LINE(56,30,53,30
:PT-ON(52,29
:PT-ON(51,28
:LINE(50,27,47,27
:LINE(46,26,43,26
:PT-ON(42,25
:PT-ON(41,24
:PT-ON(41,23
:PT-ON(42,22
:LINE(43,21,46,21
:PT-ON(47,20
:LINE(48,19,50,19
:PT-ON(51,20
:PT-ON(52,21
:VERTICAL 25
:LINE(28,38,28,34
:LINE(27,34,29,34
:PT-ON(27,37
:LINE(29,22,27,22
:LINE(27,23,29,25
:LINE(28,26,27,26
:LINE(27,10,28,10
:PT-ON(29,11
:PT-ON(28,12
:PT-ON(29,13
:LINE(27,14,28,14
:1->A
:1->B
:1->C
:IF S=1
:36->L
:IF S=2
:24->L
:IF S=3
:12->L
:LINE(32,L,38,L
:LINE(33,L+1,33,L-1
:LINE(34,L+2,34,L-2
:LBL Q
:A+RAND*RANDINT(1,3->A
:B+RAND*RANDINT(1,3->B
:C+RAND*RANDINT(1,3->C
:PT-ON(A,36
:PT-ON(B,24
:PT-ON(C,12
:IF A=>24
:GOTO 1
:IF B=>24
:GOTO 2
:IF C=>24
:GOTO 3
:GOTO Q
:LBL 1
ISP "CHEVAL 1 GAGNE!"
:1->B
:GOTO L
:LBL 2
ISP "CHEVAL 2 GAGNE!"
:2->B
:GOTO L
:LBL 3
ISP "CHEVAL 3 GAGNE!"
:3->B
:LBL L
:IF S<>B
:GOTO S
ISP "TU AS",INT (PZ)
:INT (PZ+M-P)->M
:PAUSE
:IF M>@
:M->@ ***Theta***
:GOTO B
:LBL S
ISP "MAUVAIS PARI!",INT (PZ)
:INT (M-P)->M
:PAUSE
:IF M=0
:GOTO T
:GOTO B
:LBL T
:CLRHOME
ISP " PLUS D'ARGENT!",""," G A M E"," O V E R"
:PAUSE
:GOTO A
:LBL V
ISP "DU FICK:",M
:LBL C
ISP "RECORD BATTU:",@
:PAUSE
:IF A=2
:GOTO A
:CLRHOME
"A RESPECTED scientist has put forward the stunning - if unsavoury - possibility that humans are descended from sewage dumped overboard by aliens."
"First we read that we are the creation of God, then scientists say we are descended from apes. Now they say we're some sort of alien poo. How much further can we sink?"
- Robert Matthews, Science Correspondent
-
Aug 19th, 2002, 09:06 AM
#5
Addicted Member
re-write it logically with tabs and stuff or convert it too a flowchart or something...
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|