' This program exported from BASIC Anywhere Machine (Version [5.2.3].[2026.05.16.03.15]) on 2026.05.17 at 05:10 (Coordinated Universal Time)
' By Charlie Veniot
' This program creates 16x16 icons of the stratagem tokens
' found in the board game "Blitzkrieg! World War Two in 20 minutes"
' (The stratagem tokens are for controlling the A.I. opponent
' when playing the solo variant of the game.)

BigGuns1$ = "...............................................................X"
BigGuns2$ = "....................X......XXX....XXX....XXXX...XXXX....XXX....."
BigGuns3$ = "......XX.....XXX......XX.....XXX.....XXX.XXXXXXX................"
BigGuns4$ = "XX......X.XXX....XXXXX...XXXXX...XXXXX..X.XXX..................."

CounterAttack1$ = ".......................X.......X.....X.X....XX.X...XXX.X..XXXX.X"
CounterAttack2$ = "........................X.......XX......XXX.....XXXX....XXXXX..."
CounterAttack3$ = ".XXXXX.X..XXXX.X...XXX.X....XX.X.....X.X.......X.......X........"
CounterAttack4$ = "XXXXXX..XXXXX...XXXX....XXX.....XX......X......................."

EconomicWarfare1$ = "..............XX.........XX.XX.....XX......XX......XX..X...XX..."
EconomicWarfare2$ = ".........XX.....XX......XX......XX......XX.X....XX..X...X...X..."
EconomicWarfare3$ = "..XXX......X...X......XX.....XXX.....X.X....XXXX....XXXX........"
EconomicWarfare4$ = "....X.....X.X....XX.X...XXXXXX..X.XX.X..XXXXXX..XXXXXX.........."

ForTheGlory1$ = "......................XX...XXXXX...XXXXX...XXXXX...XXXXX...XXXXX"
ForTheGlory2$ = "................XX......XXXXX...XXXXX...XXXXX...XXXXX...XXXXX..."
ForTheGlory3$ = "...XXXXX....XXXX....XXXX.....XXX......XX.......X................"
ForTheGlory4$ = "XXXXX...XXXX....XXXX....XXX.....XX......X......................."

RapidDeployment1$ = ".............XXX......XX......X.......X.......X.......X.......X."
RapidDeployment2$ = "........XXXXX...XXXXXX..XXXXX.X..XXX..X...X...X..X.X..X.X...X.X."
RapidDeployment3$ = ".............XX....XXXX.....XXX....X.X....X.X......X............"
RapidDeployment4$ = ".....XX.XXXXXXX.......X........................................."

ResearchAndDevelopment1$ = ".........X.XXXX...XXXXXX.XXX..XX.XX....X.XX....X.XXX..XX..XXXXXX"
ResearchAndDevelopment2$ = "........X...............X.......X.......X.......X..............."
ResearchAndDevelopment3$ = ".X.XXXX...........X...X....XXX.....X.X.....XXX....X...X........."
ResearchAndDevelopment4$ = "X.XXX.X..XXXXX..XX...XX.XX...XX.XX...XX..XXXXX..X.XXX.X........."

Secure1$ = ".........X...XXX..X.X......X......X.X.XX.X...X...X..X.X..X..X..X"
Secure2$ = "........XXX...X....X.X......X...XX.X.X....X...X..X.X..X.X..X..X."
Secure3$ = ".X..X..X.X..X.X..X...X....X.X.XX...X......X.X....X...XXX........"
Secure4$ = "X..X..X..X.X..X...X...X.XX.X.X......X......X.X..XXX...X........."

Steamroll1$ = "......X.......XX......XX...XXXXX..XXXXXX.XXXXXXX.XXXX.XX.XXX..XX"
Steamroll2$ = "................X.......XX......XXX.....XX......X...XXX.....XXX."
Steamroll3$ = ".XXX..X..XXX.....XXXX....XXXXXXX..XXXXXX...XXXXX................"
Steamroll4$ = "....XXX.....XXX....XXXX.XXXXXXX.XXXXXX..XXXXX..................."

SCREEN _NEWIMAGE(24,192,14)
COLOR 63,60

LETCHR$( 1, BigGuns1$ ) : LETCHR$( 2, BigGuns2$ )
LETCHR$( 3, BigGuns3$ ) : LETCHR$( 4, BigGuns4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4) 
PRINT

LETCHR$( 1, CounterAttack1$ ) : LETCHR$( 2, CounterAttack2$ )
LETCHR$( 3, CounterAttack3$ ) : LETCHR$( 4, CounterAttack4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4) 
PRINT

LETCHR$( 1, EconomicWarfare1$ ) : LETCHR$( 2, EconomicWarfare2$ )
LETCHR$( 3, EconomicWarfare3$ ) : LETCHR$( 4, EconomicWarfare4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4) 
PRINT

LETCHR$( 1, ForTheGlory1$ ) : LETCHR$( 2, ForTheGlory2$ )
LETCHR$( 3, ForTheGlory3$ ) : LETCHR$( 4, ForTheGlory4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4)
PRINT

LETCHR$( 1, RapidDeployment1$ ) : LETCHR$( 2, RapidDeployment2$ )
LETCHR$( 3, RapidDeployment3$ ) : LETCHR$( 4, RapidDeployment4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4) 
PRINT

LETCHR$( 1, ResearchAndDevelopment1$ ) : LETCHR$( 2, ResearchAndDevelopment2$ )
LETCHR$( 3, ResearchAndDevelopment3$ ) : LETCHR$( 4, ResearchAndDevelopment4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4) 
PRINT

LETCHR$( 1, Secure1$ ) : LETCHR$( 2, Secure2$ )
LETCHR$( 3, Secure3$ ) : LETCHR$( 4, Secure4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4) 
PRINT

LETCHR$( 1, Steamroll1$ ) : LETCHR$( 2, Steamroll2$ )
LETCHR$( 3, Steamroll3$ ) : LETCHR$( 4, Steamroll4$ )

PRINT CHR$(1) + CHR$(2) 
PRINT CHR$(3) + CHR$(4)