Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,51 +0,0 @@
|
|||
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
|
||||
#AutoIt3Wrapper_Change2CUI=y
|
||||
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
|
||||
#include <Array.au3>
|
||||
|
||||
; ## GLOBALS ##
|
||||
Global $SUIT = ["D", "H", "S", "C"]
|
||||
Global $FACE = [2, 3, 4, 5, 6, 7, 8, 9, 10, "J", "Q", "K", "A"]
|
||||
Global $DECK[52]
|
||||
|
||||
; ## CREATES A NEW DECK
|
||||
Func NewDeck()
|
||||
|
||||
For $i = 0 To 3
|
||||
For $x = 0 To 12
|
||||
_ArrayPush($DECK, $FACE[$x] & $SUIT[$i])
|
||||
Next
|
||||
Next
|
||||
|
||||
EndFunc ;==>NewDeck
|
||||
|
||||
; ## SHUFFLE DECK
|
||||
Func Shuffle()
|
||||
|
||||
_ArrayShuffle($DECK)
|
||||
|
||||
EndFunc ;==>Shuffle
|
||||
|
||||
; ## DEAL A CARD
|
||||
Func Deal()
|
||||
|
||||
Return _ArrayPop($DECK)
|
||||
|
||||
EndFunc ;==>Deal
|
||||
|
||||
; ## PRINT DECK
|
||||
Func Print()
|
||||
|
||||
ConsoleWrite(_ArrayToString($DECK) & @CRLF)
|
||||
|
||||
EndFunc ;==>Print
|
||||
|
||||
|
||||
#Region ;#### USAGE ####
|
||||
NewDeck()
|
||||
Print()
|
||||
Shuffle()
|
||||
Print()
|
||||
ConsoleWrite("DEALT: " & Deal() & @CRLF)
|
||||
Print()
|
||||
#EndRegion ;#### USAGE ####
|
||||
Loading…
Add table
Add a link
Reference in a new issue