Sick FF06 Game

Guest · **Posted:** Mon Jun 05, 2006 5:46 pm

Sick Graphics

Clayton · **Posted:** Mon Jun 05, 2006 8:26 pm

um a couple of things, first, neither character dies when their hp reaches 0, thats a problem, another thing that could be improved on is all damage dealt is the same at all times, randomize it a bit, make it a bit more interesting Very Happy

, oh and make it more obvious who is attacking whom, because i didnt know who was attacking who when i first played Sad

other than that not bad, however a word of advice, worry about how the game looks last, work on the actual engine first and get it working properly Very Happy

- IzAk - · **Posted:** Tue Jun 06, 2006 11:15 am

good point, but the circles above the heads are what tells you who's going.

Clayton · **Posted:** Tue Jun 06, 2006 4:36 pm

im just saying that you should make it more obvious who is going and when, i can just hold the enter button and the attacks happen without any kind of warning, make it so that the button has to be released before the other player can attack Very Happy

btw: plz change ur signature read [The Rules] on appropriate signatures

BlackDragon989 · **Posted:** Thu Jun 15, 2006 8:44 am

i got most bugs out.. but i cant get stats to show on character 3-4... its being gay... imma post it so ppl can change it.. if you get any info on how to change it so it shows plzzzz repost it for me... its pissing me off... lmao anyways i took your advice and make it so attacks are random.. magic is random.. more characters and looks... pretty much the same.. imma making arrows beside their names but i dont got the time right now im trying to rap this up so i can hand it in so i can pass this class but after that.. ill add world maps and what not

BlackDragon989 · **Posted:** Thu Jun 15, 2006 8:45 am

i got most bugs out.. but i cant get stats to show on character 3-4... its being gay... imma post it so ppl can change it.. if you get any info on how to change it so it shows plzzzz repost it for me... its pissing me off... lmao anyways i took your advice and make it so attacks are random.. magic is random.. more characters and looks... pretty much the same.. imma making arrows beside their names but i dont got the time right now im trying to rap this up so i can hand it in so i can pass this class but after that.. ill add world maps and what not

- IzAk - · **Posted:** Thu Jun 15, 2006 1:21 pm

aww never mind he fixed it, dont worri about it..

BlackDragon989 · **Posted:** Thu Jun 15, 2006 1:25 pm

posting pics if you want to change characters around

uqbauqba · **Posted:** Tue Jun 20, 2006 11:01 pm

can u pls chck if this wrks..im new to this sofware....i tried my best..all i cant do is to create a button so that i cud go back to the main page...pls help me with this..ciz this is rely urgent

Crying or Very sad

can u pls add the "backto main page" button

code:

%Project: Traffic Light
%Purpose - to create an interface between the computer and the (light) box
%Question 1 - 130 points

% VARIABLE TABLE
% x - int - the x coordinate that the user clicked on
% y - int - the y coordinate that the user clicked on
% bnum - int - the button that you select on the mouse
% bud - int - whether the button is pressed (1) or released (0)
setscreen ("graphics:vga")
%var for the button's coordinates
var x, y, bnum, bud : int
%var for the traffic buttons
var rb, yb, gb : int := 0
%var for the of the words. size and type
var font : int
%var for the number of flashs
var flash : int := 0
%var for the number of rotates
var rotate : int := 0
%var for the number of patterns
var pattern : int := 0
%var for the output of the parallel put for the on an off swtich
var swt : int := 0
var fp : int
%color of background
colorback (gray)
%font size and type
font := Font.New ("Arial:14")
Font.Draw ("WELCOME TO MY TRAFFIC LIGHT PROGRAM", 80, 305, font, 7)
%loop command, keeps the program going
loop
drawfillbox (390, 110, 560, 230, brown)
drawfillbox (100, 110, 270, 230, brown)
Font.Draw ("Test Mode", 141, 166, font, white)
Font.Draw ("Scenerio Mode", 413, 166, font, white)
drawfillbox (0, 35, 700, 0, 7)
drawfillbox (0, 800, 700, 355, 7)
locate (21, 25)
put "please slect a mode"
buttonwait ("down", x, y, bnum, bud)
if (x >= 50 and x <= 260) and (y >= 110 and y <= 240) then
%clears the program
cls
%loop command, keeps the program going
loop

%Traffic ligth buttons
drawfillbox (25, 25, 110, 65, 12)
drawbox (24, 24, 111, 66, black)

drawfillbox (25, 125, 110, 165, yellow)
drawbox (24, 124, 111, 166, black)

drawfillbox (25, 225, 110, 265, brightgreen)
drawbox (24, 224, 111, 266, black)

%traffic light body
drawfillbox (200, 25, 321, 275, 7)
drawbox (199, 24, 322, 276, black)

%traffic lights
drawfilloval (261, 75, 30, 30, 12)
drawfilloval (261, 75, 28, 28, white)
drawfilloval (261, 150, 30, 30, yellow)
drawfilloval (261, 150, 28, 28, white)
drawfilloval (261, 225, 30, 30, brightgreen)
drawfilloval (261, 225, 28, 28, white)

%Special switches
drawfillbox (25, 300, 100, 340, 7)
drawbox (24, 299, 101, 341, black)
drawfillbox (125, 300, 200, 340, 7)
drawbox (124, 299, 201, 341, black)
drawfillbox (225, 300, 300, 340, 7)
drawbox (224, 299, 301, 341, black)
drawfillbox (325, 300, 400, 340, 7)
drawbox (324, 299, 401, 341, black)
%the font infomation for the words inside my special buttons
Font.Draw ("Flash", 40, 315, font, white)
Font.Draw ("Rotate", 135, 315, font, white)
Font.Draw ("Pattern", 235, 315, font, white)
Font.Draw ("Stop", 344, 315, font, white)
drawfilloval (557, 360, 35, 35, blue)
colorback (0)
color (7)
locate (6, 66)
put " BACK " ..
% waits for the user to use the mouse and obtains the x,y location where the
%loop command, keeps the program going
loop
%tells the button when to activate: when the button is pressed "down"
buttonwait ("down", x, y, bnum, bud)
%red button
%the red button's coordinates
if x >= 25 and x <= 110 and y >= 25 and y <= 65 then
%this shows that the buttons is low
if rb = 0 then
%what will happen if user clicks inside the coordinates
drawfilloval (261, 75, 30, 30, 12)
%if the button is clicked the button is turns high (on)
rb := 1
%turns the red light high(on), while the other lights are high(on)
swt := swt + 4
%turns the command (on), and by showing it on the real lights
parallelput (swt)
else
%what will happen if user clicks inside the coordinates again
drawfilloval (261, 75, 28, 28, white)
%the red button is turned off again
rb := 0
%turns the red light low(off), while the of=ther buttons are high(on)
swt := swt - 4
parallelput (swt)
%end the if command for this button
end if
%yellow button
elsif x >= 25 and x <= 110 and y >= 125 and y <= 165 then
if yb = 0 then
drawfilloval (261, 150, 30, 30, yellow)
yb := 1
swt := swt + 2
parallelput (swt)
else
drawfilloval (261, 150, 28, 28, white)

yb := 0
swt := swt - 2
parallelput (swt)
end if
%green button
elsif x >= 25 and x <= 110 and y >= 225 and y <= 265 then
if gb = 0 then
drawfilloval (261, 225, 30, 30, brightgreen)
gb := 1
swt := swt + 1
parallelput (swt)
else

drawfilloval (261, 225, 28, 28, white)

gb := 0
swt := swt - 1
parallelput (swt)
end if

%Flash button
%flash button's coordinates
elsif x >= 25 and x <= 100 and y >= 300 and y <= 340 then
%this will keep the sentence in the same position, so it won't over lap the program
locate (1, 1)
put "Enter the number of times you would like the the lights to flash: " ..
%gets the flash var from the user
get flash
%for command. used to count from the number 1 to the flash var entered by the user
for num : 1 .. flash
%the pattern that the traffic lights are going to flash in
%parallel put: using binary codes it tells the box what light to show
%puts all the three real lights (LED) on
parallelput (7)
drawfilloval (261, 75, 30, 30, 12)
drawfilloval (261, 150, 30, 30, yellow)
drawfilloval (261, 225, 30, 30, brightgreen)
%the time it will take the program to wait until it shows the next pattern/light
delay (500)
%puts all three real lights off
parallelput (0)
drawfilloval (261, 75, 28, 28, white)
drawfilloval (261, 150, 28, 28, white)
drawfilloval (261, 225, 28, 28, white)
delay (500)
%ends the for command for this button
end for

%Rotate button
%rotate button's coordinates
elsif x >= 125 and x <= 200 and y >= 300 and y <= 340 then
%leaves a line of space on top of the pervious lines so that they won'y overlap each other
locate (1, 1)
put " "
put "Enter the number of time you would like the lights to rotate: " ..
%get the rotate var from the user
get rotate
%for command for the rotate button
for num1 : 1 .. rotate
%puts the red light on
parallelput (1)
drawfilloval (261, 75, 30, 30, 12)
delay (500)
%turns the red light off and the yellow light on
parallelput (2)
drawfilloval (261, 75, 28, 28, white)
drawfilloval (261, 150, 30, 30, yellow)
delay (500)
%turns the red and yellow lights off and the green light on
parallelput (4)
drawfilloval (261, 150, 28, 28, white)
drawfilloval (261, 225, 30, 30, brightgreen)
delay (500)
%turns all three lights off
parallelput (0)
drawfilloval (261, 225, 28, 28, white)
delay (500)
%ends the for command for this button
end for
%pattern button
%the pattern button's coordintate
elsif x >= 225 and x <= 300 and y >= 300 and y <= 340 then
locate (1, 1)
%leaves two lines of space so that it won't over lap the pervious two line on top
locate (1, 1)
put " "
put " "
put "Enter the number of time you would like the lights to run the pattern: " ..
get pattern
for num2 : 1 .. pattern
parallelput (1)
drawfilloval (261, 75, 30, 30, 12)
delay (500)
parallelput (4)
drawfilloval (261, 225, 30, 30, brightgreen)
delay (500)
parallelput (2)
drawfilloval (261, 150, 30, 30, yellow)
delay (500)
parallelput (0)
drawfilloval (261, 75, 28, 28, white)
drawfilloval (261, 150, 28, 28, white)
drawfilloval (261, 225, 28, 28, white)
delay (500)
end for
%ends the if
elsif (x >= 325 and x <= 400) and (y >= 300 and y <= 340) then
exit
end if
exit when (x >= 325 and x <= 400) and (y >= 300 and y <= 340)
end loop
exit when (x >= 325 and x <= 400) and (y >= 300 and y <= 340)
end loop
end if
loop
exit when fp = 1
end loop
exit when fp = 1
end loop

% Senerio Mode
buttonwait ("down", x, y, bnum, bud)
if (x >= 370 and x <= 580) and (y >= 110 and y <= 240) then
cls
loop
%traffic lights
drawfillbox (200, 25, 321, 275, 7)
drawbox (199, 24, 322, 276, black)
Font.Draw ("THE CAR IS AT REST", 160, 350, font, 7)
drawfilloval (261, 225, 30, 30, 12)
parallelput (9)
delay (5000)
cls

drawfillbox (200, 25, 321, 275, 7)
drawbox (199, 24, 322, 276, black)
Font.Draw ("THE CAR IS ABOUT TO MOVE", 135, 350, font, 7)
drawfilloval (261, 225, 30, 30, 12)
parallelput (0)
delay (2000)
cls

drawfillbox (200, 25, 321, 275, 7)
drawbox (199, 24, 322, 276, black)
Font.Draw ("THE CAR IS MOVING", 172, 350, font, 7)
drawfilloval (261, 75, 30, 30, brightgreen)
parallelput (12)
delay (5000)
cls

parallelput (2)

drawfillbox (200, 25, 321, 275, 7)
drawbox (199, 24, 322, 276, black)
Font.Draw ("THE CAR IS GOING TO STOP", 130, 350, font, 7)
drawfilloval (261, 150, 30, 30, yellow)
drawfilloval (261, 75, 30, 30, brightgreen)
parallelput (12)
parallelput (1)
delay (5000)
cls

drawfillbox (200, 25, 321, 275, 7)
drawbox (199, 24, 322, 276, black)
Font.Draw ("THE CAR HAS STOPPED", 150, 350, font, 7)
drawfilloval (261, 225, 30, 30, 12)
parallelput (9)
%loop command, keeps the program going
loop
%ends loop
end loop
end loop
%ends if statement
end if
%ends loop

	Computer Science Canada Programming C, C++, Java, PHP, Ruby, Turing, VB Username: Password: Register
Wiki Blog Search Turing Chat Room Members