Red Death Screen... - GameCreators Forum

Author

Message

Dark Flame

19

Years of Service

User Offline

Joined: 15th Feb 2005

Location: England

Posted: 23rd Apr 2005 03:24

Link

On my fps i want a similar effect as halflife in which when an enemy gets close or hits you, a red screen flashes up to give the effect of you being hurt.

How could i do this?

Thanks in advance!

[href]http://forum.thegamecreators.com/m=forum_view&t=51573&b=8

[/href]

Back to top

Profile PM

DBAlex

19

Years of Service

User Offline

Joined: 4th Oct 2004

Location: United Kingdom

Posted: 23rd Apr 2005 05:07

Link

make a plain...color it red...lock it to the camera...ghost it...then only show it when you get hit:

maybe something like:

+ Code Snippet

make object plain 1,1024,768
color object 1,rgb(255,0,0)
ghost object on 1
lock object on 1

then just use show object and hide object...

easy

AMD 64 3000 + 512mb RAM + 80GB HD + Radeon 9600se 128mb

Back to top

Profile PM

HowDo

21

Years of Service

User Offline

Joined: 28th Nov 2002

Location: United Kingdom

Posted: 23rd Apr 2005 05:18 Edited at: 23rd Apr 2005 05:21

Link

seen somthing like that on here think it was call flash had something to do with using the aphal command.

if I find it will post link might have code will have look.
written by Lee Bamber
found it

+ Code Snippet

Rem Project: flahimage
Rem Created: 4/11/2005 7:44:33 PM

Rem ***** Main Source File *****
rem quick and fast flash

rem your flash image
cls RGB(255,0,0)
get image 2,0,0,screen width(),screen Height(),1

rem your screen
cls 0
ink rgb(128,0,128),0
for p=0 to 99
 center text rnd(640),rnd(480),"HELLO"
next p
ink rgb(255,255,0),0
center text 320,220,"HIT SPACE TO FLASH SCREEN"
center text 320,260,"(courtesy of Lee Bamber in his spare time)"
get image 1,0,0,640,480
set sprite 1,0,1

rem main loop
sync rate 0
sync on
do
 paste image 1,0,0
 sprite 1,0,0,2 : set sprite alpha 1,flashme
 if spacekey()=1
  flashme=255
 endif
 if flashme>0
  dec flashme
 endif
 sync
loop

In Space No One can Hear You Scream! (When your comm Line is cut?)

Back to top

Profile PM

Dark Flame

19

Years of Service

User Offline

Joined: 15th Feb 2005

Location: England

Posted: 23rd Apr 2005 06:55 Edited at: 23rd Apr 2005 07:03

Link

Quote: "show object and hide object"

Ive tried:

show object 1
wait 2000
hide object 1

but this just creates major lag!

What could i do?

Also

I'm using a cube which is fixed to the camera to detect the collision between the camera and the zombie...but the cube just appears at the edge of my matrix..this is the code im using!

+ Code Snippet

X2# = Camera position X()
Z2# = Camera position Z()
y2# = Camera position Y()

Make object cube 6,100
Position object 6,X2#,y2#,Z2#

[href]

http://forum.thegamecreators.com/m=forum_view&t=51573&b=8[/href]

Back to top

Profile PM

DBAlex

19

Years of Service

User Offline

Joined: 4th Oct 2004

Location: United Kingdom

Posted: 23rd Apr 2005 07:09

Link

why cant you just do something like:

2 being you and 3 being the zombie...

+ Code Snippet

if object collision (2,3)=1
show object 1
endif
if object collision (2,3)=0
hide object 1
endif

?

AMD 64 3000 + 512mb RAM + 80GB HD + Radeon 9600se 128mb

Back to top

Profile PM

Dark Flame

19

Years of Service

User Offline

Joined: 15th Feb 2005

Location: England

Posted: 23rd Apr 2005 07:22

Link

Ill give it ago!

Back to top

Profile PM

CornStalks

20

Years of Service

User Offline

Joined: 12th Feb 2004

Location: Utah

Posted: 23rd Apr 2005 10:24

Link

You could just set the fog up close, color it red, and then reset it to however far away you want, and re-color it

+ Code Snippet

`this turns fog on, you don't need it if it is already on

fog on

fog distance 0

`this will color everything red

fog color rgb(255,0,0)

`this waits 2 seconds, if you just want it to flash red, then instead of using wait, just use sync

wait 2000

fog off

Back to top

Profile PM Email

Underworld 1020

20

Years of Service

User Offline

Joined: 2nd Mar 2004

Location: NY, USA

Posted: 23rd Apr 2005 11:46

Link

Well, you could always just use my handy dandy FlashScreen function

.

Try This:

+ Code Snippet

Sync On : Sync Rate 30
Hide Mouse : Wait 1000

Do

If ReturnKey()=1 Then FlashScreen(511,255,255,100,5)

Sync

Loop

Function FlashScreen(Red,Green,Blue,Duration,Flashes)
Flash_Num=0
Repeat
Set Gamma Red,Green,Blue
Wait Duration
Set Gamma 255,255,255
Inc Flash_Num
Until Flash_Num=Flashes
EndFunction

Of course it will only work if your graphics card supports it, but you should be fine. However, if you can't get it to work then I'll make something else for you

.

Check Out My Site Here: http://www.freewebs.com/underworld1020/

Back to top

Profile PM

Dark Flame

19

Years of Service

User Offline

Joined: 15th Feb 2005

Location: England

Posted: 23rd Apr 2005 19:31

Link

Underworld....i tried it, but nothing happened??

Thanks anyway

Back to top

Profile PM

DBAlex

19

Years of Service

User Offline

Joined: 4th Oct 2004

Location: United Kingdom

Posted: 24th Apr 2005 04:49

Link

did mine work?

AMD 64 3000 + 512mb RAM + 80GB HD + Radeon 9600se 128mb

Back to top

Profile PM

James Morgan

19

Years of Service

User Offline

Joined: 17th Apr 2005

Location: Behind you

Posted: 24th Apr 2005 08:51

Link

Dark Flame

Quote: "
show object 1
wait 2000
hide object 1
"

This causes lag due to the [Wait 2000] command
If you were to experiment with the Timer() command instead, the loss in lag will be VERY unnoticable, if any lag at all.

James Morgan

Back to top

Profile PM

Mentor

22

Years of Service

User Offline

Joined: 27th Aug 2002

Location: United Kingdom

Posted: 24th Apr 2005 21:18

Link

heres a simple damage flash routine, its a little messy but dinners about ready

+ Code Snippet

ink rgb(255,0,0),0
box 0,0,8,8
get image 1,0,0,7,7
cls
autocam off
rem make world

for i=1 to 150
make object cube i,rnd(10)
color object i,rgb(rnd(255),rnd(255),rnd(255))
position object i,50-rnd(100),0,50-rnd(100)
next i

make object sphere 160,-300
color object 160,rgb(120,120,120)


`make plain

make object plain 200,100,100
texture object 200,1
set object light 200,0
ghost object on 200
hide object 200

set camera range 0.1,2000

`run world
do

control camera using arrowkeys 0,0.1,1

set object to camera orientation 200
position object 200,camera position x(),0,camera position z()
move object 200,0.5

if spacekey() and t<timer()
   flag=1-flag
   t=timer()+200
endif

if flag
   show object 200
else
   hide object 200
endif


text 0,0,"press space to toggle hit"

loop

hope thats some help.

Mentor.

PC1:XP, P4 3ghz, 1gig mem, 3x160gig hd`s, Radeon 9800pro, 6 way sound.
PC2: Linux, AMD 2ghz, 512mb ram, Nvidia GeForce4mx, 16 bit SB.
PC3: XP, laptop, intel 2.6ghz celeron, ATI 9000igp, 256mb

Back to top

Profile PM

Dark Flame

19

Years of Service

User Offline

Joined: 15th Feb 2005

Location: England

Posted: 25th Apr 2005 02:57

Link

Thanks mentor! Works!

Back to top

Profile PM

Underworld 1020

20

Years of Service

User Offline

Joined: 2nd Mar 2004

Location: NY, USA

Posted: 26th Apr 2005 00:45 Edited at: 26th Apr 2005 05:15

Link

@DarkFlame - Press the enter key when you run it

. It should make the screen flash red five times, with a duration of one tenth of a second. But, if you go into the code you can change the color, amount of flashes, and also the duration.

Check Out My Site Here: http://www.freewebs.com/underworld1020/

Back to top

Profile PM

Dark Flame

19

Years of Service

User Offline

Joined: 15th Feb 2005

Location: England

Posted: 26th Apr 2005 02:22

Link

Thanks dude!

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / Red Death Screen...