Package 'FourScores'

Move of AI

Description

Help-Function for an AI

Usage

AImove(field, AIstrength, AIplayernumber)

Arguments

field	matrix: the playing field
AIstrength	integer: strength of the AI - number of moves the AI will simulate?
AIplayernumber	integer: 0 or 1: should the AI be player 1 or player 2?

Value

the selected row

---

a function

Description

help-function which return the x-axis-value of the mouse when releasing the mouse button.

Usage

clicking(buttons, x, y)

Arguments

buttons	the mouse buttons input.
x	the x-value of the mouse button.
y	the y-value of the mouse button.

Value

a rounded value for the x-coordinate

---

check input

Description

a function to check the mouse click input by the user

Usage

clickingXY(buttons, x, y)

Arguments

buttons	the mouse buttons input.
x	the x-value of the mouse button.
y	the y-value of the mouse button.

Value

a Vector of the x and y coordinates of the mouse click

---

Field buttons

Description

A function to show buttons, letting the player(s) decide what to do: show the winning field, play again or exit.

Usage

fbuttons(field, justsub, message, MACuser, rows, columns, AI, AIstrength,
  AIplayernumber, PlayerNames, PlayerColors)

Arguments

field	matrix: the field.
justsub	boolean: should only be a subtitle plotted (below the winning field)?
message	character: a message to be plotted.
MACuser	boolean: on some non-mac computers this can be set to FALSE to have mouse-functionality in the graphics device.
rows	integer: how many rows shall the playing field have?
columns	integer: how many columns shall the playing field have?
AI	boolean: play against AI?
AIstrength	integer: strength of the AI - number of moves the AI will simulate?
AIplayernumber	integer: 0 or 1: should the AI be player 1 or player 2?
PlayerNames	array of characters: the players' names.
PlayerColors	vector of characters: the players' colors.

---

Is the field correct?

Description

help-function that checks whether the field is correct

Usage

FieldCorrect(column, field)

Arguments

column	integer: the column chosen by the current player
field	matrix: the playing field.

Value

a boolean (TRUE if the given column would be a valid move for the field given).

---

field generation

Description

help-function which generates the playing-field

Usage

FieldGeneration(rows, columns)

Arguments

rows	integer: how many rows shall the playing field have?
columns	integer: how many columns shall the playing field have?

Value

an empty matrix with rows and columns

---

plot the field

Description

a major-function which plots the current field, and if given a hint, which player has won

Usage

FieldPlot(field, message, PlayerColors)

Arguments

field	matrix: the playing field
message	character: a message to be plotted.
PlayerColors	vector of characters: the players' colors.

---

check for a winner

Description

help-function that checks whether (at least) one of the four possibilities of winning is given

Usage

FieldWinCheck(field, player)

Arguments

field	matrix: the playing field.
player	integer: the current player.

Value

a boolean whether the player has won the match or not

---

Main Function

Description

Function to play FourScores

Usage

FourScores(rows = 6, columns = 7, AI = TRUE, AIstrength = rows *
  columns, AIplayernumber = 1, MACuser = TRUE, PlayerNames = c("AI",
  "Human"), getnewnames = FALSE, PlayerColors = c("green", "blue"),
  getnewcolors = FALSE)

Arguments

rows	integer: how many rows shall the playing field have?
columns	integer: how many columns shall the playing field have?
AI	boolean: play against AI?
AIstrength	integer: strength of the AI - number of moves the AI will simulate?
AIplayernumber	integer: 0 or 1: should the AI be player 1 or player 2?
MACuser	boolean: on some non-mac computers this can be set to FALSE to have mouse-functionality in the graphics device.
PlayerNames	array of characters: the players' names.
getnewnames	boolean: should new names be asked for?
PlayerColors	vector of characters: the players' colors.
getnewcolors	boolean: should new colors be asked for?

Examples

## Not run: 
FourScores(AI = T, AIstrength = 10, MACuser = T, getnewnames = F, getnewcolors = F)

## End(Not run)

---

A function

Description

A function to get some colors

Usage

getColors(PlayerNames, PlayerColors, MACuser)

Arguments

PlayerNames	array of characters: the players' names.
PlayerColors	vector of characters: the players' colors.
MACuser	boolean: on some non-mac computers this can be set to FALSE to have mouse-functionality in the graphics device.

Value

a vector with the updated player colors

---

Get player names

Description

help-function which gets and returns the players' names

Usage

getPlayerNames(PlayerNames, MACuser)

Arguments

PlayerNames	array of characters: the players' names.
MACuser	boolean: on some non-mac computers this can be set to FALSE to have mouse-functionality in the graphics device.

Value

a vector with the player names

---

Generate a new field

Description

help-function which "throws" the stone into the field and returns the new field

Usage

NewField(field, column, player)

Arguments

field	matrix: the playing field.
column	integer: the column chosen by the current player.
player	integer: the current player.

Value

The updated field matrix.

---

logo painter

Description

a general help function to plot

Usage

painter(numberMatrix, colorArray)

Arguments

numberMatrix	a matrix with different integers showing which color to pick from the colorArray.
colorArray	a character array with different names of colors to be used by the painter.

---

plot logo

Description

plot the "different purpose" logo

Usage

plotlogo()

---

resample

Description

resampling function

Usage

resample(x, ...)

Arguments

x	a vector
...	other parameters

Value

a vector

References

Help function from ?sample to overcome the "sample(ret, size = 1)" problem for length(ret) == 1

---

Return a key

Description

help-function which returns, the key on the keyboard which is being typed

Usage

typing(key)

Arguments

key	a keyboard input.

Value

the key pressed.

---