TiredWithJoy/pike
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

update libpike

Browse Source
This commit is contained in:
vx-clutch
2025-11-08 17:43:05 -05:00
parent 029b08bedb
commit 06b6ddcdef
3 changed files with 155 additions and 155 deletions
Download Patch File Download Diff File Expand all files Collapse all files

149
libpike/casino/casino.odin Normal file
View File

@@ -0,0 +1,149 @@
// SPDX-License-Identifer: MIT
/* casino.odin
*
* Routines for handling card games
*
* Written by vx-clutch
*/
package casino
import "core:fmt"
import "core:math/rand"
/*
Type represeting a suit
*/
Suit :: enum {
CRUBS,
DIAMONDS,
HEARTS,
SPADES,
}
/*
Type represeting a card
*/
Card :: struct {
rank: int,
suit: Suit,
}
/*
Type represeting a deck of cards
*/
Deck :: struct {
cards: [52]Card,
top_index: int,
}
/*
Creates a well-ordered deck
*/
create_deck :: proc() -> Deck {
deck: Deck
deck.top_index = 0
for suit in Suit {
for rank in 1 ..= 13 {
deck.cards[deck.top_index] = Card{rank, suit}
deck.top_index += 1
}
}
deck.top_index = 0
return deck
}
CRUB :: "♣"
DIAMOND :: "♦"
HEART :: "♥️"
SPADE :: "♠"
/*
Pretty print a card
*/
print_card :: proc(card: Card) {
switch card.suit {
case .CRUBS:
switch card.rank {
case 1:
fmt.printf("A%s", CRUB)
case 11:
fmt.printf("J%s", CRUB)
case 12:
fmt.printf("Q%s", CRUB)
case 13:
fmt.printf("K%s", CRUB)
case:
fmt.printf("%d%s", card.rank, CRUB)
}
case .DIAMONDS:
switch card.rank {
case 1:
fmt.printf("A%s", DIAMOND)
case 11:
fmt.printf("J%s", DIAMOND)
case 12:
fmt.printf("Q%s", DIAMOND)
case 13:
fmt.printf("K%s", DIAMOND)
case:
fmt.printf("%d%s", card.rank, DIAMOND)
}
case .HEARTS:
switch card.rank {
case 1:
fmt.printf("A%s", HEART)
case 11:
fmt.printf("J%s", HEART)
case 12:
fmt.printf("Q%s", HEART)
case 13:
fmt.printf("K%s", HEART)
case:
fmt.printf("%d%s", card.rank, HEART)
}
case .SPADES:
switch card.rank {
case 1:
fmt.printf("A%s", SPADE)
case 11:
fmt.printf("J%s", SPADE)
case 12:
fmt.printf("Q%s", SPADE)
case 13:
fmt.printf("K%s", SPADE)
case:
fmt.printf("%d%s", card.rank, SPADE)
}
}
}
/*
Pretty print out the deck
*/
print_deck :: proc(deck: Deck) {
i := 0
for card in deck.cards {
if i >= 13 {
fmt.println("")
i = 0
}
print_card(card)
fmt.print(" ")
i += 1
}
fmt.println("")
}
/*
Shuffles the deck
*/
shuffle :: proc(deck: ^Deck) {
rand.shuffle(deck^.cards[:])
}
/*
Deal one card from the top of the deck
*/
deal_card :: proc(deck: ^Deck) -> Card {
return deck^.cards[deck^.top_index]
}

152
libpike/poker/poker.odin
View File

@@ -7,20 +7,8 @@
*/
package poker
import "core:fmt"
import "core:math/rand"
import "../log"
/*
Type represeting a suit
*/
Suit :: enum {
CRUBS,
DIAMONDS,
HEARTS,
SPADES,
}
import "../casino"
/*
Type represeting a hand's rank
@@ -38,147 +26,11 @@ HandRank :: enum {
ROYAL,
}
/*
Type represeting a card
*/
Card :: struct {
rank: int,
suit: Suit,
}
/*
Type represeting a poker hand
*/
Hand :: struct {
_: [5]Card,
}
/*
Type represeting a deck of cards
*/
Deck :: struct {
cards: [52]Card,
top_index: int,
}
/*
Creates a well-ordered deck
*/
create_deck :: proc() -> Deck {
deck: Deck
deck.top_index = 0
for suit in Suit {
for rank in 1 ..= 13 {
deck.cards[deck.top_index] = Card{rank, suit}
deck.top_index += 1
}
}
deck.top_index = 0
return deck
}
CRUB :: "♣"
DIAMOND :: "♦"
HEART :: "♥️"
SPADE :: "♠"
/*
Pretty print a card
*/
print_card :: proc(card: Card) {
switch card.suit {
case .CRUBS:
switch card.rank {
case 1:
fmt.printf("A%s", CRUB)
case 11:
fmt.printf("J%s", CRUB)
case 12:
fmt.printf("Q%s", CRUB)
case 13:
fmt.printf("K%s", CRUB)
case:
fmt.printf("%d%s", card.rank, CRUB)
}
case .DIAMONDS:
switch card.rank {
case 1:
fmt.printf("A%s", DIAMOND)
case 11:
fmt.printf("J%s", DIAMOND)
case 12:
fmt.printf("Q%s", DIAMOND)
case 13:
fmt.printf("K%s", DIAMOND)
case:
fmt.printf("%d%s", card.rank, DIAMOND)
}
case .HEARTS:
switch card.rank {
case 1:
fmt.printf("A%s", HEART)
case 11:
fmt.printf("J%s", HEART)
case 12:
fmt.printf("Q%s", HEART)
case 13:
fmt.printf("K%s", HEART)
case:
fmt.printf("%d%s", card.rank, HEART)
}
case .SPADES:
switch card.rank {
case 1:
fmt.printf("A%s", SPADE)
case 11:
fmt.printf("J%s", SPADE)
case 12:
fmt.printf("Q%s", SPADE)
case 13:
fmt.printf("K%s", SPADE)
case:
fmt.printf("%d%s", card.rank, SPADE)
}
}
}
/*
Pretty print out the deck
*/
print_deck :: proc(deck: Deck) {
i := 0
for card in deck.cards {
if i >= 13 {
fmt.println("")
i = 0
}
print_card(card)
fmt.print(" ")
i += 1
}
fmt.println("")
}
/*
Shuffles the deck
*/
shuffle :: proc(deck: ^Deck) {
rand.shuffle(deck^.cards[:])
}
/*
Deal one card from the top of the deck
*/
deal_card :: proc(deck: ^Deck) -> Card {
return deck^.cards[deck^.top_index]
}
/*
Deal a hand of size n
*/
deal_hand :: proc(d: Deck, n: int) -> Card {
log.printl("%s is NOT implemented", #procedure)
return Card{}
_: [5]casino.Card,
}
/*

9
main.odin
View File

@@ -13,17 +13,16 @@
package main
import "core:fmt"
import "libpike/log"
import "libpike/poker"
import "libpike/casino"
main :: proc() {
log.printl("pike init")
deck := poker.create_deck()
deck := casino.create_deck()
// poker.shuffle(&deck)
casino.shuffle(&deck)
poker.print_deck(deck)
casino.print_deck(deck)
}