Author Topic: (no subject)  (Read 3469 times)

Xorlak

  • Administrator
  • Member
  • *****
  • Posts: 2225
    • View Profile
    • http://darkagegames.net
(no subject)
« on: January 22, 2004, 08:11:11 PM »
I put up a new RPG Code Challenge.  Enjoy!
« Last Edit: December 31, 1969, 06:00:00 PM by Xorlak »

Mark of the Dragon

  • Member
  • *
  • Posts: 1658
    • View Profile
    • http://www.geocities.com/zeroentity01/
(no subject)
« Reply #1 on: January 23, 2004, 06:22:16 AM »
I might enter...if I find the time.
« Last Edit: December 31, 1969, 06:00:00 PM by Mark of the Dragon »
<center>
Roy Mustang



Yeah...that sounds like me <_<

<center>
You were born in the land of Warrior Pride. You live to fight, you have a strong spirit, courage and bravery. Strong lord! Unsheath thy sword, rush into war and strip the enemy of his flesh down to the core.


Umm...yeah

DarkElite

  • Member
  • *
  • Posts: 1452
    • View Profile
    • http://cryosoft.mysticsoftware.net/Home.html
(no subject)
« Reply #2 on: January 23, 2004, 09:21:58 AM »
did you get my email xorlak? guess not.. but i wanted to know wether i could use music or not, and how i would sent a progran through mail? oh yeah, would i be able to set it up as a game and not a program, so that i can separate each program to be easier.
« Last Edit: December 31, 1969, 06:00:00 PM by DarkElite »
DarkElite

Dei vobem omniam proditiverunt.  Iam vobis quis deposcibitis sacrificium rersum vitae est!

Haraldur

  • Member
  • *
  • Posts: 2860
    • View Profile
    • http://haraldur.mysticsoftware.net
(no subject)
« Reply #3 on: January 23, 2004, 11:23:43 AM »
I cannot do it... must read RPGCode tutorial again...
« Last Edit: December 31, 1969, 06:00:00 PM by Haraldur »

Xorlak

  • Administrator
  • Member
  • *****
  • Posts: 2225
    • View Profile
    • http://darkagegames.net
(no subject)
« Reply #4 on: January 23, 2004, 04:21:19 PM »
Quote from: DarkElite,Friday, January 23, 2004 9:21 AM
did you get my email xorlak? guess not.. but i wanted to know wether i could use music or not, and how i would sent a progran through mail? oh yeah, would i be able to set it up as a game and not a program, so that i can separate each program to be easier.
Heh, give me at least 24 hours to reply, okay?  I'll answer it here too for everyone else:

The entries need to be in pure RPG Code, which means no outside resources.  It will probably be one program, but you can span it out over mutiple programs if you like.  I'm basically looking for something I can test in the RPG Code editor.
« Last Edit: December 31, 1969, 06:00:00 PM by Xorlak »

Haraldur

  • Member
  • *
  • Posts: 2860
    • View Profile
    • http://haraldur.mysticsoftware.net
(no subject)
« Reply #5 on: January 23, 2004, 04:40:56 PM »
OK.
« Last Edit: December 31, 1969, 06:00:00 PM by Haraldur »

TK Game Boy

  • Member
  • *
  • Posts: 782
    • View Profile
    • http://Coming Soon
(no subject)
« Reply #6 on: February 05, 2004, 03:53:34 PM »
Last day for the contest.  Xorlax, did ya get my e-mail?
« Last Edit: December 31, 1969, 06:00:00 PM by TK Game Boy »
OI!

DarkElite

  • Member
  • *
  • Posts: 1452
    • View Profile
    • http://cryosoft.mysticsoftware.net/Home.html
(no subject)
« Reply #7 on: February 05, 2004, 07:47:47 PM »
ahh!!.....im not going to be able to finish, i have only a start up and selcting thing done for 2 player and exit....nothing else....quess i was too busy on my BS.... Sad ...ill send it in anyways!!! although i doubt it will even be graded because on uncompleteness... but what the heck!!! here i go!
« Last Edit: December 31, 1969, 06:00:00 PM by DarkElite »
DarkElite

Dei vobem omniam proditiverunt.  Iam vobis quis deposcibitis sacrificium rersum vitae est!

DarkElite

  • Member
  • *
  • Posts: 1452
    • View Profile
    • http://cryosoft.mysticsoftware.net/Home.html
(no subject)
« Reply #8 on: February 05, 2004, 07:49:07 PM »
or should i try to finish it in the 1.1 days i have left...hmm.. doubt its possible...hmm..
« Last Edit: December 31, 1969, 06:00:00 PM by DarkElite »
DarkElite

Dei vobem omniam proditiverunt.  Iam vobis quis deposcibitis sacrificium rersum vitae est!

Xorlak

  • Administrator
  • Member
  • *****
  • Posts: 2225
    • View Profile
    • http://darkagegames.net
(no subject)
« Reply #9 on: February 05, 2004, 08:31:22 PM »
Quote from: TK Game Boy,Thursday, February 5, 2004 3:53 PM
Last day for the contest.  Xorlax, did ya get my e-mail?
Got it.

Quote
or should i try to finish it in the 1.1 days i have left...hmm.. doubt its possible...hmm..


You can do it!  Mine only took four hours (heh... don't worry, mine won't count)
« Last Edit: December 31, 1969, 06:00:00 PM by Xorlak »

DarkElite

  • Member
  • *
  • Posts: 1452
    • View Profile
    • http://cryosoft.mysticsoftware.net/Home.html
(no subject)
« Reply #10 on: February 05, 2004, 08:33:57 PM »
i wonder why? your the Tk master!! theres no way....not an enemy ai...maybe i can do 2 players if that counts...but not ai...how would i? i only did ai in my bs with a thousand if statments
« Last Edit: December 31, 1969, 06:00:00 PM by DarkElite »
DarkElite

Dei vobem omniam proditiverunt.  Iam vobis quis deposcibitis sacrificium rersum vitae est!

Mark of the Dragon

  • Member
  • *
  • Posts: 1658
    • View Profile
    • http://www.geocities.com/zeroentity01/
(no subject)
« Reply #11 on: February 08, 2004, 12:24:45 AM »
LOL. That's the way you have to do it.
« Last Edit: December 31, 1969, 06:00:00 PM by Mark of the Dragon »
<center>
Roy Mustang



Yeah...that sounds like me <_<

<center>
You were born in the land of Warrior Pride. You live to fight, you have a strong spirit, courage and bravery. Strong lord! Unsheath thy sword, rush into war and strip the enemy of his flesh down to the core.


Umm...yeah

Cesque

  • Member
  • *
  • Posts: 2178
    • View Profile
    • http://cesque.mysticsoftware.net
(no subject)
« Reply #12 on: February 08, 2004, 04:34:52 AM »
Wow! DarkElite! You've actually beat me! My BS has NO AI at all, opponents have 1 program which is their attack method, usually they simply attack physicaly or with some other element, or use spells (though that's not yet included at current state of game).

I haven't started in the contest...
« Last Edit: December 31, 1969, 06:00:00 PM by Cesque »
TKGB cancelled Spyder.

Bastard.

Haraldur

  • Member
  • *
  • Posts: 2860
    • View Profile
    • http://haraldur.mysticsoftware.net
(no subject)
« Reply #13 on: February 08, 2004, 05:00:17 AM »
I will not start in a contest for a long time.
« Last Edit: December 31, 1969, 06:00:00 PM by Haraldur »

DarkElite

  • Member
  • *
  • Posts: 1452
    • View Profile
    • http://cryosoft.mysticsoftware.net/Home.html
(no subject)
« Reply #14 on: February 08, 2004, 11:07:06 AM »
Cesque, i modeled parts of my bs after xorlaks, you should take a look, but its quite simple realy, all you do is add if's and randoms to make it work, heres my AI: (note, donot copy or i will eat you! i spent to much time on this!)

Code: [Select]
#Method EnemyTurn(enemy!)
{
#SaveScreen()
#SetImageTransparent(enemyflash[enemy!]$,enemyposX[enemy!]!,enemyposY[enemy!]!,enemyX[enemy!]!,enemyY[enemy!]!,0,0,0)
#Delay(.07)
#RestoreScreen()
#SetImageTransparent(enemyflash[enemy!]$,enemyposX[enemy!]!,enemyposY[enemy!]!,enemyX[enemy!]!,enemyY[enemy!]!,0,0,0)
#Delay(.07)
#RestoreScreen()
#SetImageTransparent(enemyflash[enemy!]$,enemyposX[enemy!]!,enemyposY[enemy!]!,enemyX[enemy!]!,enemyY[enemy!]!,0,0,0)
#Delay(.07)
#RestoreScreen()
:rechoose
#Random(90,enechoice!)
#If (enechoice!>=85)
{
#If (enemyhp[enemy!]!<=20)
  {
  #If (enemypotion[enemy!]!>=1)
   {
   #enemypotion[enemy!]!=enemypotion[enemy!]!-1
   #enemyhp[enemy!]!=enemyhp[enemy!]!+50
   #If (enemyhp[enemy!]!>enemythp[enemy!]!){#enemyhp[enemy!]!=enemythp[enemy!]!}
   #Wav("Potion.wav")
   #BorderColor(20,200,20)
   #Delay(.1)
   #BorderColor(0,0,0)
   #BorderColor(20,200,20)
   #Delay(.1)
   #BorderColor(0,0,0)
   #BorderColor(20,200,20)
   #Delay(.1)
   #BorderColor(0,0,0)
   #Branch (:battlecontinue)
   }
  #If (enemypotion[enemy!]!=0){#Branch (:rechoose)}
  }
#If (enemyhp[enemy!]!>20){#Branch (:rechoose)}
}
#If (enechoice!>=75)
{
#If (enemymagic[enemy!]$=""){#Branch (:rechoose)}
#If (enemymagic[enemy!]$~="")
  {
  #If (enemymp[enemy!]!<enemymptake[enemy!]!)
   {
   #Window("")
   #Line1("<enemyspecial[enemy!]$>!")
   #Delay(.8)
   #RestoreScreen()
   #Delay(.5)
   #Window("")
   #Line1("Not enough Mp!")
   #Delay(1.5)
   #RestoreScreen()
   #Branch (:battlecontinue)
   }
  #If (enemymp[enemy!]!>=enemymptake[enemy!]!)
   {
   #SaveScreen()
   #ms$=""+enemymagic[enemy!]$+".wav"
   #m1$="Magic_"+enemy[enemy!]$+""+enemymagic[enemy!]$+"1.bmp"
   #m2$="Magic_"+enemy[enemy!]$+""+enemymagic[enemy!]$+"2.bmp"
   #m3$="Magic_"+enemy[enemy!]$+""+enemymagic[enemy!]$+"3.bmp"
   #m4$="Magic_"+enemy[enemy!]$+""+enemymagic[enemy!]$+"4.bmp"
   #setimagetransparent(m1$,enemymposX[1]!,enemymposY[1]!,enemymX[1]!,enemymY[1]!,255,255,255)
   #Delay(.05)
   #setimagetransparent(m2$,enemymposX[1]!,enemymposY[1]!,enemymX[1]!,enemymY[1]!,255,255,255)
   #Delay(.05)
   #setimagetransparent(m3$,enemymposX[1]!,enemymposY[1]!,enemymX[1]!,enemymY[1]!,255,255,255)
   #Delay(.05)
   #Wav(ms$)
   #setimagetransparent(m4$,enemymposX[1]!,enemymposY[1]!,enemymX[1]!,enemymY[1]!,255,255,255)
   #Delay(.05)
   #RestoreScreen()
   #Kail_Hp!=Kail_Hp!-enemyspecial[enemy!]!
   #Branch (:statrefresh)
   #Color(4)
   #SaveScreen()
   #Text(enemyspecial[enemy!]!,9,6)
   #Delay(1)
   #RestoreScreen()
   }
  }
}
#If (enechoice!>=70)
{
#If (enemyhp[enemy!]!<=15)
  {
  #Random(3,enerun!)
  #CastLit(enemy!,enemy$)
  #If (enerun!<=2)
   {
   #Window("")
   #Line1("<enemy[enemy$]$> failed to run!")
   #Delay(2)
   #RestoreScreen()
   #Kill(enemy$)
   #Branch (:battlecontinue)
   }
  #If (enerun!=3)
   {
   #Window("")
   #Line1("<enemy[enemy$]$> ran!")
   #Delay(2)
   #RestoreScreen()
   #enemyhp[enemy!]!=0
   #Kill(enemy$)
   #Wav("ran.wav")
   #Branch (:battlecontinue)
   }
  }
#If (enemyhp[enemy!]!>15){#Branch (:rechoose)}
}
#If (enechoice!<70)
{
#Random(15,miss!)
#If (miss!<=13)
  {
:reattack
  #If (eneP!<=KailD!)
   {
   #eneP!=eneP!+5
   #Branch (:reattack)
   }
  #If (eneP!>KailD!)
   {
   #attack!=eneP!-KailD!
   #Kail_Hp!=Kail_Hp!-attack!
   }
  #Wav("Hit.wav")
  #SaveScreen()
  #setimagetransparent("KailHit.bmp",480,129,64,64,0,0,255)
  #Color(4)
  #FontSize(12)
  #Text(40,17,attack!)
  #Delay(1)
  #RestoreScreen()
  #eneP!=enemyattack[enemy!]!*2
  #KailD!=Kail_Defence!
  #Kill(miss!)
  #Branch (:battlecontinue)
  }
#If (miss!>=14)
  {
  #Wav("miss.wav")
  #ColorRGB(255,255,255)
  #FontSize(12)
  #SaveScreen()
  #Text(40,17,"Miss")
  #Delay(1)
  #RestoreScreen()
  #Kill(miss!)
  #Branch (:battlecontinue)
  }
}
}*for enemy method
« Last Edit: December 31, 1969, 06:00:00 PM by DarkElite »
DarkElite

Dei vobem omniam proditiverunt.  Iam vobis quis deposcibitis sacrificium rersum vitae est!