Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
simple question for Qpro's...
#1
hi,

i am from germany and excuse me if i will make to much mistakes in my text. i cant speak english so well :oops: ...

so i've got a question but i am a real noob *g*
i want to program a simple 2d game.

this is the beginning of the code:

x = 310
y = 150

cls
screen 9
co
circle (x,y),20,1
a$ = inkey$
if a$ = "w" then
circle (x,y),20,0
y = y - 10
end if
if a$ = "s" then
circle (x,y),20,0
y = y + 10
end if
if a$ = "a" then
circle (x,y),20,0
x = x - 10
end if
if a$ = "d" then
circle (x,y),20,0
x = x + 10
end if

now to my question. i want to make a wall left right over and under.
and then i want to make some enemies when you touch them you
are game over...
can you read my text?
can you please help me??

thanks
Cronos
Kill Bill !
Reply
#2
Code:
x = 310
y = 150


screen 13
do
cls
circle (x,y),20,1
a$ = inkey$
if a$ = "w" then
circle (x,y),20,0
y = y - 10
if y < 0 then y = 0
end if
if a$ = "s" then
circle (x,y),20,0
y = y + 10
if y > 199 then y = 199
end if
if a$ = "a" then
circle (x,y),20,0
x = x - 10
if x < 0 then x = 0
end if
if a$ = "d" then
circle (x,y),20,0
x = x + 10
if x > 319 then x = 319
end if
line (0,0)-(319,199),15,b
circle(100,100),20,0

if x => 90 and y => 90 and x <= 110 and y <=110 then
  print "You died"
  end
end if

loop
that is for just one enemy and a bounding box for the player
url=http://www.smithcosoft.com]SmithcoSoft Creations[/url]
"If you make it idiot proof, someone will make a better idiot" - Murphy's Law
Reply
#3
shouldnt this

Code:
circle(100,100),20,0

if x => 90 and y => 90 and x <= 110 and y <=110 then

be replaced with this if the radius is 20 and the color should not be 0

Code:
circle(100,100),20,1 <- the 1 is blue

if x => 80 and y => 80 and x <= 120 and y <=120 then
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)