function sp_reset(type)
{
+ # Per message
+ if (type >= 0) {
+ sp_from = "" # The speakers player name
+ sp_valid = "" # It is the speaker turn
+ }
+
# Per hand
if (type >= 0) {
sp_suit = "" # The lead suit {s,h,d,c}
sp_dealer =-1 # Who is dealing this round
sp_turn = 0 # Index of who's turn it is
sp_player = "" # Who's turn it is
- sp_valid = 0 # Message sent from sp_player
sp_limit = 10 # Bag out limit
delete sp_hands # [p] Each players cards
delete sp_players # [p] Player names players["name"] -> i
+ delete sp_auths # [c] Player auth names auths["auth"] -> "name"
delete sp_order # [i] Player order order[i] -> "name"
delete sp_scores # [i] Teams score
}
game["limit"] = sp_limit;
json_copy(game, "hands", sp_hands);
json_copy(game, "players", sp_players);
+ json_copy(game, "auths", sp_auths);
json_copy(game, "order", sp_order);
json_copy(game, "scores", sp_scores);
sp_limit = game["limit"];
sp_acopy(sp_hands, game["hands"]);
sp_acopy(sp_players, game["players"]);
+ sp_acopy(sp_auths, game["auths"]);
sp_acopy(sp_order, game["order"]);
sp_acopy(sp_scores, game["scores"]);
}
say("Bidding starts with " sp_player "!")
}
-function sp_hand(who, sort, str)
+function sp_hand(to, who, sort, str)
{
asorti(sp_hands[who], sort, "sp_csort")
for (i=0; i<length(sort); i++)
str = str "" sprintf("%4s", sort[i])
gsub(/^ +| +$/, "", str)
- return sp_pretty(str, who)
+ return sp_pretty(str, to)
}
function sp_hasa(who, expr)
function sp_play(card, winner, pi)
{
- delete sp_hands[FROM][card]
+ delete sp_hands[sp_from][card]
sp_pile[card] = sp_player
sp_piles = sp_piles (sp_piles?",":"") card
sp_next()
sp_init()
sp_reset(2)
sp_load("var/sp_cur.json");
- if (sp_channel)
- say(sp_channel, "Game restored.")
+ #if (sp_channel)
+ # say(sp_channel, "Game restored.")
}
// {
- sp_valid = (FROM && FROM == sp_player)
+ sp_from = AUTH in sp_auths ? sp_auths[AUTH] : FROM
+ sp_valid = sp_from && sp_from == sp_player
}
+CMD == "PRIVMSG" &&
! /help/ &&
/[Ss]pades/ {
say("Spades! " sp_pretty("As,Ah,Ad,Ac", FROM))
}
-FROM == OWNER &&
+AUTH == OWNER &&
/^\.savegame/ {
sp_save("var/sp_save.json");
say("Game saved.")
}
-FROM == OWNER &&
+AUTH == OWNER &&
/^\.loadgame/ {
sp_load("var/sp_save.json");
say("Game loaded.")
}
# Debugging
-FROM == OWNER &&
+AUTH == OWNER &&
/^\.deal (\w+) (.*)/ {
delete sp_hands[$2]
for (i=3; i<=NF; i++)
}
}
-(FROM == sp_owner || FROM == OWNER) &&
+(sp_from == sp_owner || AUTH == OWNER) &&
/^\.endgame$/ {
if (sp_state == "new") {
reply("There is no game in progress.")
else if (sp_state == "play") {
reply("The game has already started")
}
- else if (sp_state == "join" && FROM in sp_players) {
+ else if (sp_state == "join" && sp_from in sp_players) {
reply("You are already playing")
}
else if (sp_state == "join") {
i = sp_next()
- sp_order[i] = FROM
sp_players[FROM] = i
+ if (AUTH)
+ sp_auths[AUTH] = FROM
+ sp_order[i] = FROM
say(FROM " joins the game!")
}
if (sp_state == "join" && sp_turn == 0)
!sp_valid &&
(sp_state "bid" || sp_state == "play") &&
/^\.(bid|play)\>/ {
- if (FROM in sp_players)
+ if (sp_from in sp_players)
say(".slap " FROM ", it is not your turn.")
else
say(".slap " FROM ", you are not playing.")
say("Bidding goes to " sp_player "!")
} else {
for (p in sp_players)
- say(p, "You have: " sp_hand(p))
+ say(p, "You have: " sp_hand(p, p))
sp_state = "play"
for (i=0; i<2; i++) {
if (sp_nil[i] == 2 || sp_nil[i+2] == 2) {
sp_state == "pass" &&
/^\.pass (\S+)$/ {
- card = $2
- team = sp_players[FROM] % 2
- if (!(FROM in sp_players)) {
+ _card = $2
+ _team = sp_from in sp_players ? sp_players[sp_from] % 2 : 0
+
+ # check validity and pass
+ if (!(sp_from in sp_players)) {
say(".slap " FROM ", you are not playing.")
}
- else if (sp_nil[team] != 2 && sp_nil[team+2] != 2) {
+ else if (sp_nil[_team] != 2 && sp_nil[_team+2] != 2) {
reply("Your team did not go blind")
}
- else if (sp_pass[sp_players[FROM]]) {
+ else if (sp_pass[sp_players[sp_from]]) {
reply("You have already passed a card")
}
- else if (!(card in sp_deck)) {
+ else if (!(_card in sp_deck)) {
reply("Invalid card")
}
- else if (!(card in sp_hands[FROM])) {
+ else if (!(_card in sp_hands[sp_from])) {
reply("You do not have that card")
}
else {
- sp_pass[sp_players[FROM]] = $2
+ sp_pass[sp_players[sp_from]] = $2
say(sp_channel, FROM " passes a card")
}
+
+ # check for end of passing
if (((sp_nil[0] != 2 && sp_nil[2] != 2) || (sp_pass[0] && sp_pass[2])) &&
((sp_nil[1] != 2 && sp_nil[3] != 2) || (sp_pass[1] && sp_pass[3]))) {
for (i in sp_pass) {
- partner = (i+2)%4
- card = sp_pass[i]
- delete sp_hands[sp_order[i]][card]
- sp_hands[sp_order[partner]][card] = 1
+ _partner = (i+2)%4
+ _card = sp_pass[i]
+ delete sp_hands[sp_order[i]][_card]
+ sp_hands[sp_order[_partner]][_card] = 1
}
say(sp_channel, "Cards have been passed, play starts with " sp_player "!")
for (p in sp_players)
- say(p, "You have: " sp_hand(p))
+ say(p, "You have: " sp_hand(p, p))
sp_state = "play"
}
}
sp_state ~ "(play|bid)" &&
/^\.look$/ {
- if (!(FROM in sp_players)) {
+ if (!(sp_from in sp_players)) {
say(".slap " FROM ", you are not playing.")
} else {
- sp_looked[sp_players[FROM]] = 1
- say(FROM, "You have: " sp_hand(FROM))
+ sp_looked[sp_players[sp_from]] = 1
+ say(FROM, "You have: " sp_hand(FROM, sp_from))
}
}
if (!(card in sp_deck)) {
reply("Invalid card")
}
- else if (!(card in sp_hands[FROM])) {
+ else if (!(card in sp_hands[sp_from])) {
reply("You do not have that card")
}
- else if (sp_suit && card !~ sp_suit && sp_hasa(FROM, sp_suit)) {
+ else if (sp_suit && card !~ sp_suit && sp_hasa(sp_from, sp_suit)) {
reply("You must follow suit (" sp_suit ")")
}
- else if (card ~ /s/ && length(sp_hands[FROM]) == 13 && sp_hasa(FROM, "[^s]$")) {
+ else if (card ~ /s/ && length(sp_hands[sp_from]) == 13 && sp_hasa(sp_from, "[^s]$")) {
reply("You cannot trump on the first hand")
}
- else if (card ~ /s/ && length(sp_pile) == 0 && sp_hasa(FROM, "[^s]$") && !sp_broken) {
+ else if (card ~ /s/ && length(sp_pile) == 0 && sp_hasa(sp_from, "[^s]$") && !sp_broken) {
reply("Spades have not been broken")
}
else {
sp_play(card)
if (sp_state == "play") {
- if (length(sp_hands[FROM]))
- say(FROM, "You have: " sp_hand(FROM))
+ if (length(sp_hands[sp_from]))
+ say(FROM, "You have: " sp_hand(FROM, sp_from))
if (sp_piles)
say(sp_player ": it is your turn! " \
"(" sp_pretty(sp_piles, sp_player) ")")
projects / ~andy / rhawk / blobdiff