Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 problem makeing chart
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
RYAN191




PostPosted: Fri Apr 10, 2009 12:30 pm   Post subject: problem makeing chart

Im making this program for school and i have the program so it rolls the dice but how do i get whatever it rolls i need it to showit in a table


Turing:
colour(blue)
put "Welcome to the game Dice"
colour(black)
procedure die1
drawbox(300,50,200,150,7)
drawfilloval(250,100,10,10,7)
end die1

procedure die2
drawbox(300,50,200,150,7)
drawfilloval(285,135,10,10,7)
drawfilloval(215,65,10,10,7)
end die2


procedure die3
drawbox(300,50,200,150,7)
drawfilloval(285,135,10,10,7)
drawfilloval(215,65,10,10,7)
drawfilloval(250,100,10,10,7)
end die3

procedure die4
drawbox(300,50,200,150,7)
drawfilloval(285,135,10,10,7)
drawfilloval(215,65,10,10,7)
drawfilloval(285,65,10,10,7)
drawfilloval(215,135,10,10,7)
end die4

procedure die5
drawbox(300,50,200,150,7)
drawfilloval(285,135,10,10,7)
drawfilloval(215,65,10,10,7)
drawfilloval(285,65,10,10,7)
drawfilloval(215,135,10,10,7)
drawfilloval(250,100,10,10,7)
end die5

procedure die6
drawbox(300,50,200,150,7)
drawfilloval(285,135,10,10,7)
drawfilloval(215,65,10,10,7)
drawfilloval(285,65,10,10,7)
drawfilloval(215,135,10,10,7)
drawfilloval(215,100,10,10,7)
drawfilloval(285,100,10,10,7)
end die6

procedure d1
drawbox(480,50,380,150,7)
drawfilloval(430,100,10,10,7)
end d1

procedure d2
drawbox(480,50,380,150,7)
drawfilloval(465,135,10,10,7)
drawfilloval(395,65,10,10,7)
end d2

procedure d3
drawbox(480,50,380,150,7)
drawfilloval(465,135,10,10,7)
drawfilloval(395,65,10,10,7)
drawfilloval(430,100,10,10,7)
end d3

procedure d4
drawbox(480,50,380,150,7)
drawfilloval(465,135,10,10,7)
drawfilloval(395,65,10,10,7)
drawfilloval(465,65,10,10,7)
drawfilloval(395,135,10,10,7)
end d4

procedure d5
drawbox(480,50,380,150,7)
drawfilloval(465,135,10,10,7)
drawfilloval(395,65,10,10,7)
drawfilloval(465,65,10,10,7)
drawfilloval(395,135,10,10,7)
drawfilloval(430,100,10,10,7)
end d5

procedure d6
drawbox(480,50,380,150,7)
drawfilloval(465,135,10,10,7)
drawfilloval(395,65,10,10,7)
drawfilloval(465,65,10,10,7)
drawfilloval(395,135,10,10,7)
drawfilloval(395,100,10,10,7)
drawfilloval(465,100,10,10,7)
end d6

var answer:string

put "Would you like to roll the dice?(y/n)"
get answer
if answer="y" then
var die : array 1 .. 6 of procedure dice

die (1) := die1
die (2) := die2
die (3) := die3
die (4) := die4
die (5) := die5
die (6) := die6

die (Rand.Int (1, 6))


var d : array 1..6 of procedure dice
d(1):= d1
d(2):= d2
d(3):= d3
d(4):= d4
d(5):= d5
d(6):= d6
d (Rand.Int (1, 6))

var diee,dce,di2,total,num1,num2:int

put"Enter the number of the first die you have rolled:"
get diee
case diee of
label 1 : put "You have rolled a 1"
label 2: put " You have rolled a 2"
label 3 :put "You have rolled a 3"
label 4 : put "You have rolled a 4"
label 5: put "You have rolled a 5"
label 6 :put "You have rolled a 6"
end case

put "Enter the number of the second die you rolled:"
get dce
case dce of
label 1 : put "You have rolled a 1"
label 2: put " You have rolled a 2"
label 3 :put "You have rolled a 3"
label 4 : put "You have rolled a 4"
label 5: put "You have rolled a 5"
label 6 :put "You have rolled a 6"
end case



if diee=1 then
num1:=1
elsif
diee=2 then
num1:=2
elsif
diee=3 then
num1:=3
elsif
diee=2 then
num1:=2
elsif
diee=3 then
num1:=3
elsif
diee=4 then
num1:=4
elsif
diee=5 then
num1:=5
elsif
diee=6 then
num1:=6
end if

if dce=1 then
num2:=1
elsif
dce=2 then
num2:=2
elsif
dce=3 then
num2:=3
elsif
dce=2 then
num2:=2
elsif
dce=3 then
num2:=3
elsif
dce=4 then
num2:=4
elsif
dce=5 then
num2:=5
elsif
dce=6 then
num2:=6
end if
end if



Mod Edit: Remember to use syntax tags! Thanks Smile
code:
[syntax="turing"]Code Here[/syntax]
Sponsor
Sponsor
Sponsor
sponsor
RYAN191




PostPosted: Fri Apr 10, 2009 12:31 pm   Post subject: RE:problem makeing chart

i can't figure it out
Ava.Gabe.182




PostPosted: Fri Apr 10, 2009 3:08 pm   Post subject: Re: problem makeing chart

what do you mean you want to make a chart? like how do yu want the chart to look?
DanielG




PostPosted: Fri Apr 10, 2009 7:34 pm   Post subject: RE:problem makeing chart

wait.. so you supposed to draw the dice.. and then you ask the user what the dice show... why not just tell them???
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 4 Posts ]
Jump to:   


Style:  
Search: