View
previous topic :: View
next topic |
Author |
Message |
ZoSo Moderator
Joined: 23 Feb 2006 Posts:
770
Points
|
Posted: Fri Feb 24,
2006 3:35 pm
Post subject: 96x96 Spells |
|
|
Made By : Mithlomion
Very Easy
Replace the whole sub
Code: |
Sub BltSpell(ByVal Index As
Long) |
With this one.
Code: |
Sub BltSpell(ByVal Index As
Long) Dim X As Long, Y As Long, i As Long
If Player(Index).SpellNum <= 0 Or
Player(Index).SpellNum > MAX_SPELLS Then Exit
Sub If Spell(Player(Index).SpellNum).SpellAnim
<= 0 Then Exit Sub
For i = 1 To
MAX_SPELL_ANIM If
Player(Index).SpellAnim(i).CastedSpell = YES Then
If
Player(Index).SpellAnim(i).SpellDone <
Spell(Player(Index).SpellNum).SpellDone Then
If
Player(Index).SpellAnim(i).SpellVar > 43 Then
Player(Index).SpellAnim(i).SpellDone
= Player(Index).SpellAnim(i).SpellDone + 1
Player(Index).SpellAnim(i).SpellVar
= 0
End If
If GetTickCount >
Player(Index).SpellAnim(i).SpellTime +
Spell(Player(Index).SpellNum).SpellTime Then
Player(Index).SpellAnim(i).SpellTime
= GetTickCount
Player(Index).SpellAnim(i).SpellVar =
Player(Index).SpellAnim(i).SpellVar + 3
End If
rec.Top = Spell(Player(Index).SpellNum).SpellAnim
* PIC_Y
rec.Bottom = rec.Top + PIC_Y + 64
rec.Left = Player(Index).SpellAnim(i).SpellVar *
PIC_X
rec.Right = rec.Left + PIC_X + 64
If
Player(Index).SpellAnim(i).TargetType = 0 Then
If Player(Index).SpellAnim(i).Target
> 0 Then
If
Player(Index).SpellAnim(i).Target = MyIndex Then
X = NewX
- 32
Y = NewY
- 32
Call
DD_BackBuffer.BltFast(X, Y, DD_SpellAnim, rec,
DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)
Else
X =
GetPlayerX(Player(Index).SpellAnim(i).Target) *
PIC_X - 32 +
Player(Player(Index).SpellAnim(i).Target).XOffset
Y =
GetPlayerY(Player(Index).SpellAnim(i).Target) *
PIC_Y - 32 +
Player(Player(Index).SpellAnim(i).Target).YOffset
Call
DD_BackBuffer.BltFast(X - (NewPlayerX * PIC_X) -
NewXOffset, Y - (NewPlayerY * PIC_Y) - NewYOffset,
DD_SpellAnim, rec, DDBLTFAST_WAIT Or
DDBLTFAST_SRCCOLORKEY)
End If
End If
Else
X =
MapNpc(Player(Index).SpellAnim(i).Target).X *
PIC_X - 32 +
MapNpc(Player(Index).SpellAnim(i).Target).XOffset
Y =
MapNpc(Player(Index).SpellAnim(i).Target).Y *
PIC_Y - 32 +
MapNpc(Player(Index).SpellAnim(i).Target).YOffset
Call DD_BackBuffer.BltFast(X -
(NewPlayerX * PIC_X) - NewXOffset, Y - (NewPlayerY
* PIC_Y) - NewYOffset, DD_SpellAnim, rec,
DDBLTFAST_WAIT Or DDBLTFAST_SRCCOLORKEY)
End
If Else
Player(Index).SpellAnim(i).CastedSpell = NO
End If
End If Next i End Sub
|
There
done. _________________
| |
Back
to top |
|
|
William Member
Joined: 23 Feb 2006 Posts:
198
Points
|
Posted: Fri Feb 24,
2006 7:40 pm
Post subject: |
|
|
Just so everybody
know, this doesnt let you choose between 32*32 and
96*96. This makes your spells only 96*96. But in order
to have 32*32 you can just put the animation in the
middle of it.
And does this cause more lag, not
really. Since its already blitting the image onto the
screen, making it bigger wont affect much. So I
recommend you use this, will make a big difference to
your game. | |
Back
to top |
|
Da Undead Sr. Member
Joined: 03 Mar
2006 Posts: 221 Location: USA,
Texas Points
|
Posted: Sun Mar 19,
2006 7:00 pm
Post subject: |
|
|
Since elysium doesn't
come with these size spells, can someone post a list of
some good 96x96 spells. This will shorten the request
for spells. This would also be helpfull for me too. _________________ -Da
Undead- | |
Back
to top |
|
Yossarian Moderator
Joined: 23 Feb
2006 Posts: 350
Points
|
Posted: Sun Mar 19,
2006 9:00 pm
Post subject: |
|
|
Just take the current
spells and stretch them 300% and 300% in
paint. | |
Back
to top |
|
Da Undead Sr. Member
Joined: 03 Mar
2006 Posts: 221 Location: USA,
Texas Points
|
Posted: Sun Mar 19,
2006 11:18 pm
Post subject: |
|
|
wouldn't that make
them blurry _________________ -Da
Undead- | |
Back
to top |
|
marsh Sr. Member
Joined: 28 Feb
2006 Posts: 255
Points
|
|
Back
to top |
|
Raijenki Sr. Member
Joined: 13 Mar 2006 Posts:
396 Location: Brazil, Natal Points
|
Posted: Mon Mar 20,
2006 10:26 am
Post subject: |
|
|
lol... marsh,
"your" GFX is cool XD, i laugh a lot with it... It tooks
10 minutes to load in my pc =/ Maybe one day we will
get a code to make Elysium 3D... We have 96x96
Spells and 32x64 chars... We will make it one day
XD _________________ Need to make a new
sig | |
Back
to top |
|
marsh Sr. Member
Joined: 28 Feb
2006 Posts: 255
Points
|
Posted: Mon Mar 20,
2006 10:57 am
Post subject: |
|
|
Raijenki wrote: |
lol... marsh, "your"
GFX is cool XD, i laugh a lot with it... It tooks
10 minutes to load in my pc =/ Maybe one day
we will get a code to make Elysium 3D... We
have 96x96 Spells and 32x64 chars... We will make
it one day XD |
I just stretched the old spells
as i believe someone mention you can do here also. took
me about a minute for it to download. Now it appears
instantly. My 1.5 gigs o ram finaly paying off i
gues | |
Back
to top |
|
Da Undead Sr. Member
Joined: 03 Mar
2006 Posts: 221 Location: USA,
Texas Points
|
Posted: Mon Mar 20,
2006 4:21 pm
Post subject: |
|
|
marsh
wrote: |
Raijenki
wrote: |
lol... marsh, "your"
GFX is cool XD, i laugh a lot with it... It
tooks 10 minutes to load in my pc =/ Maybe
one day we will get a code to make Elysium 3D...
We have 96x96 Spells and 32x64 chars... We
will make it one day
XD |
I just stretched the old
spells as i believe someone mention you can do
here also. took me about a minute for it to
download. Now it appears instantly. My 1.5 gigs o
ram finaly paying off i
gues |
Its blurry
Oh well thanks. And I guess this 750 +
RAM pays off too! _________________ -Da
Undead- | |
Back
to top |
|
pingu "The Bird"
Joined: 23 Feb 2006 Posts:
3413 Location: Antartica Points
|
Posted: Mon Mar 20,
2006 4:50 pm
Post subject: |
|
|
Photoshop:
Filters > Sharpen > Sharpen More
And
you guys must not know much about how the internet
works. Your computer downloads every single image in
sees the first time and stores it away in some temporary
folder. Then, if you ever need the same image again, you
don't have to re-download. _________________
| |
Back
to top |
|
Da Undead Sr. Member
Joined: 03 Mar
2006 Posts: 221 Location: USA,
Texas Points
|
Posted: Thu Mar 23,
2006 8:15 pm
Post subject: |
|
|
Start -> Search
-> All Files and Folders -> All or Part of the
file name: -> Photoshop -> NOTHING!
Oh ya,
I don't have photoshop! >=( _________________ -Da
Undead- | |
Back
to top |
|
marsh Sr. Member
Joined: 28 Feb
2006 Posts: 255
Points
|
Posted: Fri Mar 24,
2006 4:25 am
Post subject: |
|
|
pingu
wrote: |
Photoshop: Filters >
Sharpen > Sharpen More
And you guys
must not know much about how the internet works.
Your computer downloads every single image in sees
the first time and stores it away in some
temporary folder. Then, if you ever need the same
image again, you don't have to
re-download. |
i no that..... thats why i said
the first time it loaded. But its more based on the
internet speed. | |
Back
to top |
|
MastaMind Jr. Member
Joined: 18 Mar
2006 Posts: 69
Points
|
Posted: Wed Apr 26,
2006 9:35 pm
Post subject: |
|
|
I dont know whats
wrong i put the code in my source and used the bigspells
png switch it to bmp and its not showin the spells
rite...Look at it....
What did i wrong?
>_<
Last edited
by MastaMind on Mon Nov 20, 2006 11:47 am; edited 1 time
in total | |
Back
to top |
|
banana Member
Joined: 26 Sep 2006 Posts:
120 Location: washington state Points
|
Posted: Wed Sep 27,
2006 4:08 pm
Post subject: |
|
|
um,is this in
modgamelogic?At least tell if it is server or
client | |
Back
to top |
|
ZoSo Moderator
Joined: 23 Feb 2006 Posts:
770
Points
|
Posted: Wed Sep 27,
2006 4:15 pm
Post subject: |
|
|
banana
wrote: |
um,is this in
modgamelogic?At least tell if it is server or
client |
.. Client, even i could figure
that out. Since when does server have to do with the way
things blit.
And by the way if you are talking
about the black thing aroun the spell effect.. It has
nothing to do with coding, its lack of GFX skills to see
the the glowing effect on the pasted spell GFX into the
BMP file, BMP file got no transparency , PNG do but it
still would't work with VB. Im talking about real
transparency, like Gifs have.. So when u paste over
transparent colour into a black spellsheet the
transparent colour colours the black part.. and there
you have it, the coloured colour is no longer black and
there is no transparency.
Bleh, understood
anything? XD. _________________
| |
Back
to top |
|
|
|