TheGameCreators - CodeBase - Basic Battle Engine

Return to the CodeBase listing

Category: Miscellaneous

Version: 1.1

Information

Uploaded: 27th Mar 2004 09:20

Modified: 1st Jan 1970 01:00

Author: Zero Blitzt

Summary

A basic battle engine for fighting games.

Full Description

The short description says it all. Parts of this you will have to code yourself, because the code may vary from game to game.

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

sync on : sync rate 25 : backdrop off

`Thus begins my first battle engine...

Gosub _types

Gosub _setup

yourturn=1

enemyturn=0

attack=1

cls

Gosub _stats

If spacekey()=1 AND attack=1 THEN gosub _attack

IF yourturn=1 : Text 200,400,"Your Turn" : enemyturn=0 : Endif

IF enemyturn=1 : Text 200,400,"Enemy's Turn" : yourturn=0 : Endif

IF attack=0 THEN gosub _enemyattack

sync

loop

_types:

`Main Character

Type MainChar

Name as string

Health as integer

Level as integer

Endtype

Char as MainChar

Char.Name=charname$

Char.Health=100

Char.Level=1

`Enemys

Type MainEnemy

Health as integer

Level as integer

Endtype

Enemy as MainEnemy

Enemy.Health=75

Enemy.Level=1

return

_setup:

Text 500,1,"GX Battle Engine"

sync

Input "What is your character's name>",charname$

sync

return

_stats:

Set cursor 0,30 : Print charname$;" Health: ";Char.Health;"!":

Set cursor 0,40 : Print "Enemy Health is ";Enemy.Health;"":

Set cursor 0,50 : Print "Your level is ";Char.Level;" and the enemy's is ";enemy.level;".": sync

sync

return

_attack:

`This is where you put in your battle system, I just made a basic one.

Enemy.Health=Enemy.Health-1

yourturn=0 : enemyturn=1 : attack=0

return

_enemyattack:

`Also include an enemy battle system. This is another basic one.

`You may want to include a defend system also.

Char.Health=Char.Health-1

IF Enemy.Health=0 THEN Text 200,500,"Enemy Defeated!"

yourturn=1 : enemyturn=0 : attack=1

return

Download

Please login to download

Comments

No comments yet.

Author Name:	Zero Blitzt
CodeBase Entries:	1

CodeBase - Basic Battle Engine

Information

Summary

Full Description

DarkBASIC Professional Source Code

Download

Screen Shot

Author

Comments