Project Angels 2D side-scrolling ORPG engine v8

[Zopto]

yea i know about that bug

that was problem in project vertigo also

Inertia overflow i try to fix….

so when player frst time register and if he faill from sky 10 blocks more you got overflow that was same in project vertigo

so temp fix is to dont give player to fail from 10 blocks on frst time log in...

And btw tnx for fixing mask1 bug Zopto.

Np anytime hope you like v3 ….

[santa-clause]

> yea i know about that bug
>
> that was problem in project vertigo also
>
> Inertia overflow i try to fix….
>
> so when player frst time register and if he faill from sky 10 blocks more you got overflow that was same in project vertigo
>
> so temp fix is to dont give player to fail from 10 blocks on frst time log in...
>
> And btw tnx for fixing mask1 bug Zopto.
>
> Np anytime hope you like v3 ….

I just fixed it in V1 my game i far more advanced then you're engine at this moment and now i started to add pet system and then i'll add my own custom stuff

[Zopto]

**ok here is fix of inertia is overflowing**

**Client side**

**Find**

```

XOffset As Integer

YOffset As Integer

inerting As Byte
```

**And chage all 3x to**

```

XOffset As Long

YOffset As Long

inerting As Long
```

that should fix overflow try it

it works for me

[santa-clause]

> **ok here is fix of inertia is overflowing**
>
> **Client side**
>
> **Find**
>
> ```
>
> XOffset As Integer
>
> YOffset As Integer
>
> inerting As Byte
> ```
>
> **And chage all 3x to**
>
> ```
>
> XOffset As Long
>
> YOffset As Long
>
> inerting As Long
> ```
>
> that should fix overflow try it
>
> it works for me

Tnx 

[Zopto]

**Update : Project Angels v4**

**ChageLog**

>! **Fixed inertia overflow (me)**
>! **Fixed Spell Menu Bug (me)**
>! **Add FMOD(now you can play any sound on map mp3,mp4, ogg etc…)**
>! **Add Projectiles system (wabbit)**
>! **Add [Consume Give-backs](http://www.touchofdeathforums.com/community/index.php?/topic/131295-eo-20-consume-give-backs/) ([- Matthew -](http://www.touchofdeathforums.com/community/index.php?/user/65954-matthew/))**

**Download Link :**

>! **PA V4:**
>! http://www.sendspace.com/file/b5f4r4

[Daneta]

thanks for fixing bugs but the thing is the screen is to big please have a smaller one it dows not fit my screen

[Draco.exe]

looking good, and thanks for the credits for the GUI 

good luck mate!

[Daneta]

can u pls make it a smaller screen its to big for me plss

[Zopto]

> looking good, and thanks for the credits for the GUI 
>
> good luck mate!

tnx bro !

> can u pls make it a smaller screen its to big for me plss

i will make some chages to screen in v5

[Zopto]

**Update : Project Angels v5**

**Chage Log**

>! Chaged Screen Size
>! GUI now looks litl bit better
>! Fixed friend system
>! Fixed Buttons
>! Add Options
>! on/ff chat
>! on/off hotbar
>! on/off hp/mp/exp menu

**Download Link**

>! **PA v5**
>! [http://www.sendspace.com/file/7wt97n](http://www.sendspace.com/file/7wt97n)

**Screen:**

>! [](http://imageshack.us/photo/my-images/341/pic1al.png/)

[Daneta]

awesome thank

[Zopto]

> awesome thank

np enjoy!

–--------------------------------------------------

**Event bug v 4 and v5 (fix)**

i miss one sub when i add projectile system so

chage all:

```
Public Sub CheckAttack()
```

to

```
Public Sub CheckAttack()

Dim Buffer As clsBuffer

Dim attackspeed As Long, X As Long, Y As Long, i As Long

' If debug mode, handle error then exit out

If Options.Debug = 1 Then On Error GoTo errorhandler

If ControlDown Then

If InEvent = True Then Exit Sub

If SpellBuffer > 0 Then Exit Sub ' currently casting a spell, can't attack

If StunDuration > 0 Then Exit Sub ' stunned, can't attack

' speed from weapon

If GetPlayerEquipment(MyIndex, Weapon) > 0 Then

attackspeed = Item(GetPlayerEquipment(MyIndex, Weapon)).Speed

Else

attackspeed = 1000

End If

If Player(MyIndex).AttackTimer + attackspeed < GetTickCount Then

If Player(MyIndex).Attacking = 0 Then

With Player(MyIndex)

.Attacking = 1

.AttackTimer = GetTickCount

SendAttack

End With

If GetPlayerEquipment(MyIndex, Weapon) > 0 Then

If Item(GetPlayerEquipment(MyIndex, Weapon)).projectile.Pic > 0 Then

' projectile

Set Buffer = New clsBuffer

Buffer.WriteLong CProjecTileAttack

SendData Buffer.ToArray()

Set Buffer = Nothing

End If

End If

Set Buffer = New clsBuffer

Buffer.WriteLong CAttack

SendData Buffer.ToArray()

Set Buffer = Nothing

End If

End If

Select Case Player(MyIndex).Dir

Case DIR_UP

X = GetPlayerX(MyIndex)

Y = GetPlayerY(MyIndex) - 1

Case DIR_DOWN

X = GetPlayerX(MyIndex)

Y = GetPlayerY(MyIndex) + 1

Case DIR_LEFT

X = GetPlayerX(MyIndex) - 1

Y = GetPlayerY(MyIndex)

Case DIR_RIGHT

X = GetPlayerX(MyIndex) + 1

Y = GetPlayerY(MyIndex)

End Select

If GetTickCount > Player(MyIndex).EventTimer Then

For i = 1 To Map.CurrentEvents

If Map.MapEvents(i).Visible = 1 Then

If Map.MapEvents(i).X = X And Map.MapEvents(i).Y = Y Then

Set Buffer = New clsBuffer

Buffer.WriteLong CEvent

Buffer.WriteLong i

SendData Buffer.ToArray()

Set Buffer = Nothing

Player(MyIndex).EventTimer = GetTickCount + 200

End If

End If

Next

End If

End If

' Error handler

Exit Sub

errorhandler:

HandleError "CheckAttack", "modGameLogic", Err.Number, Err.Description, Err.Source, Err.HelpContext

Err.Clear

Exit Sub

End Sub
```

so now your events will work

[Zopto]

any ideas for next update?

i think to i add day/night system whit day/night npc spwn

and to add weather system

maybe to i remove dinamic sprites so all of you can easy edit characters …..(if i remove you got just left and right sprites whiteout jump or standing or attack animation)

any other ideas?

[Bloo]

> any ideas for next update?
>
> i think to i add day/night system whit day/night npc spwn
>
> and to add weather system
>
> maybe to i remove dinamic sprites so all of you can easy edit characters …..
>
> any other ideas?

Night and Day would be awesome 

[Zetasis]

> any ideas for next update?
>
> i think to i add day/night system whit day/night npc spwn
>
> and to add weather system
>
> maybe to i remove dinamic sprites so all of you can easy edit characters …..(if i remove you got just left and right sprites whiteout jump or standing or attack animation)
>
> any other ideas?

Don't remove the sprite system. If people want to have boring animations then they can just use the same frames as walking and etc…

[Zopto]

sry i was not online too much last week …. collage things.... anyway i will update engein in next cople days ^^

[mrmiguu]

I like what you're doing here, Zopto! I think it's cool of you to show interest in the side-scrolling ORPG scene.

[Zopto]

tnx mrmiguu !!  i do my best

[Wortel Angels]

You made nice Process and i love the Engine name ;-)

If you get an Support Image then ill put it in my Signature for sure.

At the moment is that for me one of the BEST Engines here, very stable, much stuff added and what the best ?

You dont give up at Problems like the first Sidescroller engine guy ;-) (Sorry if you read that but its the truth…)

Best Regards

MortalAngels

[Zopto]

next update in cople days >>>>>>>

[Zopto]

**Update:**

**Chage Log:**

>! Add Weather System
>! Add Buff/Debuff spells **(Ryoku)**
>! Add server side show how much players is online
>! Add server side show ip and Port
>! fix Event bug

**Download Link:**

>! **Pa v6:**
>! http://www.sendspace.com/file/skdrrh

if you found any bug tell me i will try to fix it ^^

[Daneta]

YAY AWESOME dude just awesome

[Zopto]

**Weather and npc Walk fix: v6**

**Client Side:**

Find:

```
Public Sub LoadMap(ByVal MapNum As Long)
```

then find:

```
Get #f, , Map.Background
```

below that ADD:

```
Get #f, , Map.Weather
```

and now your npc wont gitch when normal player show up on map ^^

[Zopto]

**Update**: **Project Angels v7**

in this version i fixed some bugs etc… 

**Chage Log:**

>! **Fixed** directional blocking
>! **Fixed** Platform show on minimap
>! **Fixed** Weather system and npc walk from v6
>! Removed Covers From Shop,Trade,Bank
>! Chaged Screen Size

**Download Link:**

>! **Pa v7**
>! http://www.sendspace.com/file/qgfaz4

[Jumbofile]

add a semi transparent chat box

Edit* Wow that sounded rude…sorry