Jump to content

Sweet Little Fighting System


Homer90001
 Share

Recommended Posts

Just updating yall, added 2 new stats, 2 new items and 7 skills, gonna post when I finish with all the skills and make an installer due to massive icon usage

and emoyasha it'd be hard cause I don't know the first thing about networks, this game no matter how fun it is (I find it fun >.>) even if it becomes as true 2d battle game with controls and such, is very basic code, tcp is insanely hard

Edited by Darth
Link to comment
Share on other sites

well i am a tcp and udp expert, so how about you create the game, post the source, and i add tcp.udp support, i could do it in a day or so, maybe a couple hours. i have created several tcp and udp applications. all i need you to do is make two different applications, one for player one to attack, have it write the damage out to a file, and same fo rplayer two, that all just have two codes, one for player one that writes all output to a text file, and one for player two, from there i will add network support.

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites

  • 4 weeks later...

Nice work i like it

"FREEDOM is not FREE""Its a good thing war is so terrible, or we grow too fond of it" -Robert E. Lee[quote]Firestrom: global $warming = False[/quote]My scripts:Desktop Cleaner---->Total Downloads:167;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;111111;;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;11;;;;;;"a wise man once said why use your skills when we have technology"

Link to comment
Share on other sites

hell no it ain't dead, gonna finish the skills real quick and post everything, then immediately revamp the spell system :). gonna remove item dependency from spells etc etc but first gotta finish real quick. expect it up in 1-2 hours tops

Link to comment
Share on other sites

  • 2 weeks later...

that was days ago, lol, if you post an installer make sure to put the source in it.

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites

  • 3 weeks later...

I know you've been waiting a while for this not so big update and I'm sorry. here it is, i'd have a change log but I don't remember what I've changed. anyway enjoy. the only ability that still isn't finished is the fire sword because I got lazy. might get rid of it as it is pretty useless. anyways feedback is appreciated. now I will go off on a tangent of what is planned for this system.

AHEM.

expanding the ability list to roughly thirty or so abilities. help with this would be greatly appreciated.

A hundred or so items including consumables, different types of armour i.e. head, body, accessory, etc. different weapons bows maybe. help with the weapons would be extremely appreciated because a whole new damage formula would have to be applied and ammo consumption for bows and an ability system for the items so that each does not have to be coded by hand which takes me for ever. thus armour and weapons will be the last thing added.

fights against the computer. the monsters are easy, just write an ini file with all monster stats and use a random func to pick a monster. what I need help with is getting it to attack and such. this will thus be developed independently from the main game untill all the kinks are worked out then it'll be merged. this is for safety reasons of course.

an inventory system which is needed to store the consumables. i'll think of something but again help is appreciated especially since with the large amount of items it would be best to only show items owned.

xp system and levels as well as ability levels and stat ups this will need a lot of work and will thus be developed independently from the main game untill all the kinks are worked out then it'll be merged.

monster item and gold drops.

a shop to buy items and thus currency

very last thing even after the weapons and mostly optional for me anyway is the graphics.

after all the above is completed I will start work on an rpg of sorts but will not start planning anything for it till after the battle system is done and maybe animations are up.

thank you for listening to my rant and enjoy.

and thanks in advance for your help.

Edited by Darth
Link to comment
Share on other sites

waittt... they both have zero health

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites

update, finished prototype inventory/shop system.

#include <GUIConstants.au3>
#include<array.au3>

$test = 15
$price = 7
Dim $Items[10] = ["Potion","Mind-up","Bob","epic","monkey","lol","stuff","apple","qwerty","test"]
Dim $price[10] = [10,20,50,25,82,96,12,1,1,99]
Dim $shopstock[10] = [20,40,100,85,70,2,45,0,2,$test]
Dim $playerstock[10] = [2,4,1,8,5,1,1,999,0,$test]


$pgold = 1000
$sgold = 2000
Opt("GUIOnEventMode", 1)
GUICreate("item test",200,180,-1,-1)
$edit = GUICtrlCreateEdit("",0,0,200,150,BitOr($ES_READONLY,$WS_VSCROLL))
$G = GUICtrlCreateLabel("Gold: " & $pGold,100,155)

GUISetState (@SW_SHOW)

GUICreate("Shop",200,230,-1,-1)
$shop = GUICtrlCreateEdit("",0,0,200,150,BitOr($ES_READONLY,$WS_VSCROLL))
$GS = GUICtrlCreateLabel("Gold: " & $sGold,0,155)
$PSI = GUICtrlCreateInput("",1,175)
$PS = GUICtrlCreateButton("Price",60,172)
$BI = GUICtrlCreateInput("",1,200,59,20)
$buy = guictrlcreatebutton("Buy",60,197)
$SI = GUICtrlCreateInput("",90,200,59,20)
$sell = GUICtrlCreateButton("Sell",144,197)
GUISetState (@SW_SHOW)
GUICtrlSetOnEvent($PS, "Price")
GUICtrlSetOnEvent($buy,"Buy")
GUICtrlSetOnEvent($sell,"Sell")


Item_list($Shopstock,10,$shop)

Item_list($playerstock,10,$edit)

while(1)
    sleep(100)
WEnd

Func Item_list($array,$size,$output)
    $var = 0
    GUICtrlSetData($output,"")
    While ($var <= $size-1)
        If $array[$var] > 0 Then
            GUICtrlSetData($output,GUICtrlRead($output) & $Items[$var] & ": " & $array[$var] & @CRLF)
        
        EndIf
        $var = $var + 1
    WEnd
EndFunc

Func Price()
    $search = GUICtrlRead($PSI)
$find = _ArraySearch($Items,$search)
If $find = -1 Then 
    MsgBox(0,"","Invalid Item")
    Else
MsgBox(0,"","A " & $Items[$find] & " costs " & $price[$find] & " Gold. (Items sell for half of thier normal value.)")
EndIf
EndFunc

Func Buy()
    $search = GUICtrlRead($BI)
    $find = _ArraySearch($Items,$search)
    If $find = -1 Then
        msgbox(0,"","Invalid Item")
    Else
        $ammount = InputBox("Buy","How many " & $Items[$Find] & "s would you like to buy?",""," M")
        $cost = ($ammount * $price[$find])
        If $ammount > $shopstock[$find] Then
            MsgBox(0,"","The shop does not have that many " & $Items[$find] & "(s).")
        Else
            
            If $cost > $pgold Then
                msgbox(0,"","You do not have enough gold.")
            Else
                $pgold = $pgold - $cost
                $sgold = $sgold + $cost
                $Shopstock[$find] = $Shopstock[$find] - $ammount    
                $playerstock[$find] = $playerstock[$find] + $ammount
                Item_list($playerstock,10,$edit)
                Item_list($Shopstock,10,$shop)
                GUICtrlSetData($g,$pgold)
                GUICtrlSetData($GS,$sgold)
                msgbox(0,"Buy","You bought " & $ammount & " " & $Items[$find] & "(s) for " & $cost & " gold.")
            EndIf
        EndIf
    EndIf
EndFunc

Func Sell()
    $search = GUICtrlRead($SI)
    $find = _ArraySearch($Items,$search)
    If $find = -1 Then
        msgbox(0,"","Invalid Item")
    Else
        $ammount = InputBox("Buy","How many " & $Items[$Find] & "s would you like to sell?",""," M")
        $cost = int(($ammount * $price[$find])/2)
        If $ammount > $playerstock[$find] Then
            MsgBox(0,"","You do not have that many " & $Items[$find] & "s to sell.")
        Else
            
            If $cost > $sgold Then
                msgbox(0,"","The shop does not have enough gold.")
            Else
                $pgold = $pgold + $cost
                $sgold = $sgold - $cost
                $Shopstock[$find] = $Shopstock[$find] + $ammount    
                $playerstock[$find] = $playerstock[$find] - $ammount
                Item_list($playerstock,10,$edit)
                Item_list($Shopstock,10,$shop)
                GUICtrlSetData($g,$pgold)
                GUICtrlSetData($GS,$sgold)
                msgbox(0,"Buy","You sold " & $ammount & " " & $Items[$find] & "(s) for " & $cost & " gold.")
            EndIf
        EndIf
    EndIf
EndFunc
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...