This is just a combat game. I changed it to Kombat, because many people have cmb and stat scripts that would interfere with the commands. Paste this into your remotes section. Type !kombat to begin. For help, type !kombatcmds.
on $*:text:!kombatcmds:*:{
msg $nick 12,0 ~ Attacks ~
msg $nick !upper cut
msg $nick !dbl punch
msg $nick !jab
msg $nick !skick
msg $nick 0,12 ~ Others ~
msg $nick !flee
msg $nick !kombat
msg $nick !stopkmb
}
on *:text:!kombat*:#: {
if (%fight2 == active) {
msg $chan 4,0 a Match is already underway! Wait your turn!
}
if (%fight == active) {
set %player2 $nick
if (%player2 = %player1) { halt }
msg $chan 4,0 the match is set! 0,4 %player1 4,0 vs 0,4 %player2
notice %player1 Type "!kombatcmds" for the commands list.
notice %player2 Type "!kombatcmds" for the commands list.
set %fight2 active
set %p1hp 99
set %p2hp 99
set %stamina1 0
set %stamina2 0
set %turn 1
}
else {
set %fight active
set %player1 $nick
msg $chan 4,7 $nick 7,4 has declared a challenge type !kombat to fight them
}
}
on *:text:!dbl punch*:#: {
if (%turn == 1) {
if ($nick == %player1) {
if (%stamina2 < 4) {
set %hit1 $rand(0,15)
set %hit2 $rand(0,15)
inc %stamina1
msg $chan 4,0 %player1 0,4 has hit 4,0 %hit1 0,4 and 4,0 %hit2
dec %p2hp %hit1
dec %p2hp %hit2
msg $chan 4,7 %player2 7,4 has 4,7 %p2hp 7,4 hp left
set %turn 2
}
if (%p2hp <= 0) {
msg $chan 4,1 %player1 1,4 has koed 4,1 %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina1 == 4) {
notice %player1 you are out of stamina
}
}
else {
if (%turn == 2) {
if ($nick == %player2) {
if (%stamina2 < 4) {
set %hit1 $rand(0,15)
set %hit2 $rand(0,15)
inc %stamina2
msg $chan 4,7 %player2 7,4 has hit 4,7 %hit1 7,4 and 4,7 %hit2
dec %p1hp %hit1
dec %p1hp %hit2
msg $chan 4,7 %player1 7,4 has 4,7 %p1hp 7,4 hp left
set %turn 1
if (%p2hp <= 0) {
msg $chan 4,1 %player1 has koed 1,4 %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina2 == 4) {
notice %player2 you are out of stamina
}
}
}
}
}
on *:text:!skick*:#: {
if (%turn == 1) {
if ($nick == %player1) {
if (%stamina2 < 4) {
set %hit1 $rand(3,32)
set %hit2 $rand(2,38)
inc %stamina1
msg $chan 4,0 %player1 0,4 has hit 4,0 %hit1 0,4 and 4,0 %hit2
dec %p2hp %hit1
dec %p2hp %hit2
msg $chan 4,7 %player2 7,4 has 4,7 %p2hp 7,4 hp left
set %turn 2
}
if (%p2hp <= 0) {
msg $chan 4,1 %player1 1,4 has koed 4,1 %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina1 == 4) {
notice %player1 4,0 you are out of stamina
}
}
else {
if (%turn == 2) {
if ($nick == %player2) {
if (%stamina2 < 4) {
set %hit1 $rand(3,32)
set %hit2 $rand(2,28)
inc %stamina2
msg $chan 4,0 %player2 0,4 has hit 0,4 %hit1 4,0 and 0,4 %hit2
dec %p1hp %hit1
dec %p1hp %hit2
msg $chan 4,7 %player1 has 7,4 %p1hp 4,7 hp left
set %turn 1
if (%p2hp <= 0) {
msg $chan 4,1 %player1 1,4 has koed 4,1 %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina2 == 4) {
notice %player2 4,0 you are out of stamina
}
}
}
}
}
on *:text:!jab*:#: {
if (%turn == 1) {
if ($nick == %player1) {
set %turn 2
set %hit $rand(0,18)
msg $chan 2,0 %player1 has hit a 0,2 %hit
dec %p2hp %hit
msg $chan 2,0 %player2 0,2 has 2,0 %p2hp 0,2 hp left
if (%p2hp <= 0) {
msg $chan 2,0 %player1 0,2 has koed 2,0 %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
}
else if (%turn == 2) {
if ($nick == %player2) {
set %turn 1
set %hit $rand(0,18)
msg $chan 2,0 %player2 has hit a 0,2 %hit
dec %p1hp %hit
msg $chan 2,0 %player1 0,2 has 2,0 %p1hp 0,2 hp left
if (%p1hp <= 0) {
msg $chan 2,0 %player2 0,2 has koed 2,0 %player1
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
}
}
on *:text:!upper cut*:#: {
if (%turn == 1) {
if ($nick == %player1) {
set %turn 2
set %hit $rand(0,26)
msg $chan 7,14 %player1 has hit a 14,7 %hit
dec %p2hp %upper cut
msg $chan 7,14 %player2 has 14,7 %p2hp 7,14 hp left
if (%p2hp <= 0) {
msg $chan 7,14 %player1 14,7 has koed 7,14 %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
}
if (%turn == 2) {
if ($nick == %player2) {
set %turn 1
set %hit $rand(0,26)
msg $chan 7,14 %player2 has hit a 14,7 %hit
dec %p1hp %upper cut
msg $chan 7,14 %player1 14,7 has 7,14 %p1hp 14,7 hp left
if (%p1hp <= 0) {
msg $chan 7,14 %player2 14,7 has koed 7,14 %player1
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
}
}
on *:text:!flee*:#: {
if (%turn == 1) {
if ($nick == %player1) {
msg $chan msg $chan 4,1 %player2 1,4 has won the match by default
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else{
}
if (%turn == 2) {
if ($nick == %player2) {
msg $chan 4,1 %player1 1,4 has won the match by default
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
}
on *:text:!stopkmb*:#: {
msg $chan 12KOMBAT STOPPED
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
Tried your version, while it's nice, the "you're out of stamina" parts doesn't seem to work.
If I have like 2 stamina left, and I use an attack that costs 4 stamina next turn, instead of telling me "you're out of stamina", it just goes ahead and let's me attack and then afterwards it says "you have -2 stamina".
And it just keeps going like that into further negative stamina.
Fix pls?
on $*:text:!kombatcmds:*:{
why r u doing on $ when u dont do regex?
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
just do
unset %fight %player1 %player2 %fight2 %p1hp %p2hp %stamina1 %stamina2 %turn %hit1 %hit2
Fixed the color examples
on *:LOAD: {
/echo Kombat script loaded.
/echo Colors: 0,1 0=White 1 1=Black 2 2=Dark Blue 3 3=Green 4 4=Red 5 5=Dark Red 6 6=Dark Purple 7 7=Orange 8 8= Yellow 9 9=Bright Green 10 10=Teal 11 11=Light Blue 12 12=Blue 13 13=Purple 14 14=Dark Gray 15 15=Gray
/set %txt1 $?=\"What text color # did you want to use?\"
/set %bg1 $?=\"What Background color # did you want to use?\"
/set %KCol $+ %txt1 $+ , $+ %bg1
}
Heres a rough fix of the code posted above.
on *:LOAD: {
/echo Kombat script loaded.
/echo Colors: 0,1 $+ 0=White 1 $+ 1=Black 2 $+ 2=Dark Blue 3 $+ 3=Green 4 $+ 4=Red 5 $+ 5=Dark Red 6 $+ 6=Dark Purple 7 $+ 7=Orange 8 $+ 8= Yellow 9 $+ 9=Bright Green 10 $+ 10=Teal 11 $+ 11=Light Blue 12 $+ 12=Blue 13 $+ 13=Purple 14 $+ 14=Dark Gray 15 $+ 15=Gray
/set %txt1 $?=\"What text color # did you want to use?\"
/set %bg1 $?=\"What Background color # did you want to use?\"
/set %KCol $+ %txt1 $+ , $+ %bg1
}
on $*:text:!kombatcmds:*:{
notice $nick %KCol $+ ~ Attacks ~
notice $nick !upper cut
notice $nick !dbl punch
notice $nick !jab
notice $nick !skick
notice $nick %KCol $+ ~ Others ~
notice $nick !rest
notice $nick !flee
notice $nick !kombat
notice $nick !stopkmb
}
on *:text:!kombat*:#: {
if (%fight2 == active) {
msg $chan %KCola $+ Match is already underway! Wait your turn!
}
if (%fight == active) {
set %player2 $nick
if (%player2 = %player1) { halt }
msg $chan %KCol $+ the match is set! %player1 vs %player2
notice %player1 Type \"!kombatcmds\" for the commands list.
notice %player2 Type \"!kombatcmds\" for the commands list.
set %fight2 active
set %p1hp 99
set %p2hp 99
set %stamina1 0
set %stamina2 0
set %turn 1
}
else {
set %fight active
set %player1 $nick
msg $chan %KCol $+ $nick has declared a challenge type !kombat to fight them
}
}
on *:text:!dbl punch*:#: {
if (%turn == 1) {
if ($nick == %player1) {
if (%stamina2 < 10) {
set %hit1 $rand(0,15)
set %hit2 $rand(0,15)
inc %stamina1 2
msg $chan %KCol $+ %player1 has hit %hit1 and %hit2
dec %p2hp %hit1
dec %p2hp %hit2
msg $chan %KCol $+ %player2 has %p2hp hp left
notice $nick %KCol $+ %player1 you have $calc(10 - %stamina1) stamina left.
set %turn 2
}
if (%p2hp <= 0) {
msg $chan %KCol $+ %player1 has koed %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina1 >= 10) {
notice %player1 you are out of stamina
}
}
else {
if (%turn == 2) {
if ($nick == %player2) {
if (%stamina2 < 10) {
set %hit1 $rand(0,15)
set %hit2 $rand(0,15)
inc %stamina2 2
msg $chan %KCol $+ %player2 has hit %hit1 and %hit2
dec %p1hp %hit1
dec %p1hp %hit2
msg $chan %KCol $+ %player1 has %p1hp hp left
notice $nick %KCol $+ %player2 you have $calc(10 - %stamina2) stamina left.
set %turn 1
if (%p1hp <= 0) {
msg $chan %KCol $+ %player2 has koed %player1
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina2 >= 10) {
notice %player2 you are out of stamina
}
}
}
}
}
on *:text:!skick*:#: {
if (%turn == 1) {
if ($nick == %player1) {
if (%stamina1 < 10) {
set %hit1 $rand(1,20)
set %hit2 $rand(1,20)
inc %stamina1 4
msg $chan %KCol $+ %player1 has hit %hit1 and %hit2
dec %p2hp %hit1
dec %p2hp %hit2
msg $chan %KCol $+ %player2 has %p2hp hp left
notice $nick %KCol $+ %player1 you have $calc(10 - %stamina1) stamina left.
set %turn 2
if (%p2hp <= 0) {
msg $chan %KCol $+ %player1 has koed %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina1 >= 10) {
notice %player1 %KCol $+ you are out of stamina
}
}
}
else {
if (%turn == 2) {
if ($nick == %player2) {
if (%stamina2 < 10) {
set %hit1 $rand(1,20)
set %hit2 $rand(1,20)
inc %stamina2 4
msg $chan %KCol $+ %player2 has hit %hit1 and %hit2
dec %p1hp %hit1
dec %p1hp %hit2
msg $chan %KCol $+ %player1 has %p1hp hp left
notice $nick %KCol $+ %player2 you have $calc(10 - %stamina2) stamina left.
set %turn 1
if (%p1hp <= 0) {
msg $chan %KCol $+ %player2 has koed %player1
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
else if (%stamina2 >= 10) {
notice %player2 %KCol $+ you are out of stamina
}
}
}
}
}
on *:text:!jab*:#: {
if (%turn == 1) {
if ($nick == %player1) {
set %turn 2
set %hit $rand(0,10)
msg $chan %KCol $+ %player1 has hit a %hit
dec %p2hp %hit
msg $chan %KCol $+ %player2 has %p2hp hp left
notice $nick %KCol $+ %player1 you have $calc(10 - %stamina1) stamina left.
if (%p2hp <= 0) {
msg $chan %KCol $+ %player1 has koed %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
}
else if (%turn == 2) {
if ($nick == %player2) {
set %turn 1
set %hit $rand(0,10)
msg $chan %KCol $+ %player2 has hit a %hit
dec %p1hp %hit
msg $chan %KCol $+ %player1 has %p1hp hp left
notice $nick %KCol $+ %player2 you have $calc(10 - %stamina2) stamina left.
if (%p1hp <= 0) {
msg $chan %KCol $+ %player2 has koed %player1
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else {
}
}
}
}
on *:text:!upper cut*:#: {
if (%turn == 1) {
if ($nick == %player1) {
if (%stamina1 < 10) {
set %turn 2
set %hit $rand(10,26)
inc %stamina1 6
msg $chan %KCol $+ %player1 has hit a %hit
dec %p2hp %hit
msg $chan %KCol $+ %player2 has %p2hp hp left
notice $nick %KCol $+ %player1 you have $calc(10 - %stamina1) stamina left.
if (%p2hp <= 0) {
msg $chan %KCol $+ %player1 has koed %player2
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
else if (%stamina1 >= 10) {
notice %player1 %KCol $+ you are out of stamina
}
}
}
if (%turn == 2) {
if ($nick == %player2) {
if (%stamina2 < 10) {
set %turn 1
set %hit $rand(10,26)
inc %stamina2 6
msg $chan %KCol $+ %player2 has hit a %hit
dec %p1hp %hit
msg $chan %KCol $+ %player1 has %p1hp hp left
notice $nick %KCol $+ %player2 you have $calc(10 - %stamina2) stamina left.
if (%p1hp <= 0) {
msg $chan %KCol $+ %player2 has koed %player1
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
else if (%stamina2 >= 10) {
notice %player2 %KCol $+ you are out of stamina
}
}
}
}
on *:text:!rest*:#: {
if (%turn == 1) {
if ($nick == %player1) {
dec %stamina1 4
set %turn 2
msg $chan %KCol $+ %player1 rested.
notice %player1 %KCol $+ %player1 you have $calc(10 - %stamina1) stamina left.
}
}
if (%turn == 2) {
if ($nick == %player2) {
dec %stamina2 4
set %turn 1
msg $chan %KCol $+ %player2 rested.
notice %player2 %KCol $+ %player2 you have $calc(10 - %stamina2) stamina left.
}
}
}
on *:text:!flee*:#: {
if (%turn == 1) {
if ($nick == %player1) {
msg $chan msg $chan %KCol $+ %player2 has won the match by default
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
else{
}
if (%turn == 2) {
if ($nick == %player2) {
msg $chan %KCol $+ %player1 has won the match by default
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
}
on *:text:!stopkmb*:#: {
if ($nick isop $chan) {
msg $chan %KCol $+ KOMBAT STOPPED
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
on *:PART:#: {
if ($nick == %player1) || ($nick == %player2) {
msg $chan %KCol $+ $nick has forfeited the match by leaving the channel.
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
on *:QUIT: {
if ($nick == %player1) || ($nick == %player2) {
msg $chan %KCol $+ $nick has forfeited the match by quiting IRC.
unset %fight
unset %player1
unset %player2
unset %fight2
unset %p1hp
unset %p2hp
unset %stamina1
unset %stamina2
unset %turn
unset %hit1
unset %hit2
}
}
The color scheme on this is...
The game was ok but the script posted here has many errors that require the person who wants it to correct them.
1: The endurance if your not going to have it enabled whats the point in having more than 1 move...
2: some of the player variables were backwards on the commands.
3: you could have easily implemented a experience/level system.
4: the colors are just awful.