Author |
Message |
Blade
|
Posted: Wed May 07, 2003 7:39 pm Post subject: (No subject) |
|
|
well.... i say it looks great, but in the first attachment i changed something.... made it run faster... like tony said about goin to the washroom... or even goin out to go get six pack, drink it and he still be punchin or kickin....
this is your main program
code: | loop
if com = "" then
if hasch then
case getchar of
label "p" :
com := "punch1"
label "k" :
com := "kick1"
label :
end case
end if
end if
action (com, frame)
drawguy
View.Update
delay (10)
cls
end loop |
i know you changed it the second time to look like a fake, but you still had to hold the button to be able to do it.... so why not use Input.Keydown instead?
code: | loop
if com = "" then
Input.KeyDown (anykey)
if (anykey ('p')) then
com := "punch1"
elsif (anykey ('k')) then
com := "kick1"
end if
end if
action (com, frame)
drawguy
View.Update
delay (10)
cls
end loop |
but dont forget to add
code: | var anykey:array char of boolean |
|
|
|
|
|
|
Sponsor Sponsor
|
|
|
Homer_simpson
|
Posted: Wed May 07, 2003 9:29 pm Post subject: (No subject) |
|
|
Keydown always confuses me for some reason but i was gonna change it to keydown when i'm done with it... =) |
|
|
|
|
|
Blade
|
Posted: Wed May 07, 2003 9:45 pm Post subject: (No subject) |
|
|
hehe... its a good idea... you should do some practise with it because it is 100X more effiecient than getch()... try the code i gave you, and you'll see
oh, and dont forget that when you are using if's with the Input.KeyDown you cant use double quote (") you have to use single quote (') .... i got an error before because i thought they did the same thing.... wierd eh? |
|
|
|
|
|
Homer_simpson
|
Posted: Wed May 07, 2003 10:15 pm Post subject: (No subject) |
|
|
thx for the tips boobyman... =Þ |
|
|
|
|
|
Ancalagon The Black
|
Posted: Mon May 12, 2003 9:28 pm Post subject: (No subject) |
|
|
Aghh! Why is it whenever I try to view a submission, an error occurs on every line with View.Update in it?! Does this happen to anyone else cause it's really starting to piss me off! |
|
|
|
|
|
Dan
|
Posted: Mon May 12, 2003 9:30 pm Post subject: (No subject) |
|
|
Ancalagon The Black wrote:
do you have turing 3.x? becuse i blive that view.update is only for 4.x and up. |
Computer Science Canada
Help with programming in C, C++, Java, PHP, Ruby, Turing, VB and more! |
|
|
|
|
Ancalagon The Black
|
Posted: Mon May 12, 2003 9:31 pm Post subject: (No subject) |
|
|
I gots me the latest patch from de turing website! |
|
|
|
|
|
Tony
|
Posted: Mon May 12, 2003 9:38 pm Post subject: (No subject) |
|
|
i dont think there's a patch from v3 to v4...
go to help -> about
and see what version you have |
Tony's programming blog. DWITE - a programming contest. |
|
|
|
|
Sponsor Sponsor
|
|
|
Ancalagon The Black
|
Posted: Mon May 12, 2003 10:05 pm Post subject: (No subject) |
|
|
It sez 4.04c, the patch I got. So I dunno what's up with it but it should be the latest. I originally got it so I could create stand-alone programs but I also figured the latest update is better than the version I originally had, which was 3 point something or the other. |
|
|
|
|
|
Homer_simpson
|
Posted: Mon May 12, 2003 10:08 pm Post subject: (No subject) |
|
|
IF yer from thompson school u can download turing from here...http://www.compsci.ca/bbs/viewtopic.php?t=776
Mod: No need to doble post -Dan |
|
|
|
|
|
Corpy
|
Posted: Mon May 26, 2003 9:17 pm Post subject: (No subject) |
|
|
ya really good. That game is gunna be sick Tony? whats with the urge to kick the balls. no affence. |
|
|
|
|
|
|