Computer Science Canada

question: is there an easier way of doing this sorta thing?

Author:  Dylan-182 [ Fri May 13, 2005 1:09 pm ]
Post subject:  question: is there an easier way of doing this sorta thing?

ok so i made this small prg and i dont really know if theres an easier way 2 make these?Thinking and seeing as how im probly going 2 have 2 make more at some point it wuld b helpful 2 know Rolling Eyes sooo on that note heres the code
code:

var name : string
var f1 : int
var f2 : int
var f3 : int
var f4 : int
var f5 : int

colourback (black)
colour (brightred)
cls
locate (11, 20)
put "Hello and welcome to auto addition bot v.01"
delay (3000)
cls
locate (11, 20)
put "Please enter your name"
locate (12, 20)
get name
cls
locate (11, 20)
put "Thank You ", name, "."
delay (3000)
cls
locate (11, 20)
put "Please input a number"
locate (12, 20)
get f1
delay (2000)
cls
locate (11, 20)
put "Please input second number"
locate (12, 20)
get f2
delay (2000)
cls
locate (11, 20)
put "Please input third number"
locate (12, 20)
get f3
delay (2000)
cls
locate (11, 20)
put "Please input fourth number"
locate (12, 20)
get f4
delay (2000)
cls
locate (11, 20)
put "Please input fifth and final number"
locate (12, 20)
get f5
delay (2000)
cls
locate (11, 20)
put "Please Wait While I Process Your Data"
locate (11, 58)
delay (2000)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
delay (200)
locate (11, 58)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
locate (11, 58)
delay (200)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
delay (200)
locate (11, 58)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
delay (200)
locate (11, 58)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
delay (200)
locate (11, 58)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
locate (11, 58)
delay (200)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
delay (200)
locate (11, 58)
put "."
delay (200)
locate (11, 59)
put "."
delay (200)
locate (11, 60)
put "."
locate (11, 20)
put " THE SUM OF ALL YOUR NUMBERS IS..."
delay (2000)
locate (12, 35)
put (f1 + f2 + f3 + f4 + f5)
delay (3000)
cls
locate (11, 20)
put "THANK YOU FOR CHOOSING AUTO ADDITION BOT V.01"
delay (2000)
locate (12, 35)
put "HAVE A NICE DAY"

Author:  Tony [ Fri May 13, 2005 1:51 pm ]
Post subject: 

please post questions here [Turing Help]

I think you might be looking for something like
Turing:

for i:1..10
   put "."..
   delay(100)
end for

Author:  Dylan-182 [ Fri May 13, 2005 1:55 pm ]
Post subject: 

oo Doh! lol ty ty k ill remember 2 post questions there n ty for the help it works great lol my code is shorter now 2 yayy Very Happy


: