Install Steam
login
|
language
简体中文 (Simplified Chinese)
繁體中文 (Traditional Chinese)
日本語 (Japanese)
한국어 (Korean)
ไทย (Thai)
Български (Bulgarian)
Čeština (Czech)
Dansk (Danish)
Deutsch (German)
Español - España (Spanish - Spain)
Español - Latinoamérica (Spanish - Latin America)
Ελληνικά (Greek)
Français (French)
Italiano (Italian)
Bahasa Indonesia (Indonesian)
Magyar (Hungarian)
Nederlands (Dutch)
Norsk (Norwegian)
Polski (Polish)
Português (Portuguese - Portugal)
Português - Brasil (Portuguese - Brazil)
Română (Romanian)
Русский (Russian)
Suomi (Finnish)
Svenska (Swedish)
Türkçe (Turkish)
Tiếng Việt (Vietnamese)
Українська (Ukrainian)
Report a translation problem
mode 60,300
color 1e
set haus={3 .Y. C }{
set stand=20 11 2 3 4 5 6 7 8 9 10 10 10 10
set farbe[0]=-J-o-
set farbe[1]= Herz
set farbe[2]= Blatt
set farbe[3]= Karo
set farbe[4]= Kreuz
set blatt[0]=k-e-r-
set blatt[1]=-ASS-
set blatt[2]= 2
set blatt[3]= 3
set blatt[4]= 4
set blatt[5]= 5
set blatt[6]= 6
set blatt[7]= 7
set blatt[8]= 8
set blatt[9]= 9
set blatt[10]= 10
set blatt[11]=Bube
set blatt[12]=Dame
set blatt[13]=K€iG
echo %farbe[2]%
echo %blatt[9]%
echo.
pause >nul
echo ___installing____Colours____Hz__Bl__Ka__Kr____
echo.___________Colours________>Colours.txt
for /l %%a in (0,1,4) do (
call echo %%farbe[%%a]%% >>Colours.txt
)
pause>nul
for %%b in (%haus%) do (
call echo %%b
)
pause >nul
echo.
echo ___installing___Cards___7_8_9_10_B_D_K_A______
echo.____________Cards________>Cards.txt
for /l %%a in (0,1,13) do (
call echo %%blatt[%%a]%% >>Cards.txt
)
pause >nul
for %%b in (%stand%) do (
echo %%b
)
pause >nul
echo.
for /f "delims=" %%c in ('type "Colours.txt"') do (
call echo %%c
)
pause >nul
for /f %%c in ('type "Cards.txt"') do (
call echo %%c
)
cls
echo.____________Kartenstapel erstellen_________
echo.
pause >nul
echo.
echo -Anzahl der Karten?--2bis6 im stapel?--jokeranzahl?--DoppeltesBlatt?
pause >nul
echo.
echo Methode zu stapeln? Grundmethode 2 stapelplaetze zum mischen deck stapel
set newCard=%blatt[0]%%farbe[0]%
set /a "slot=0"
set /a "xa=1"
set /a "xb=1"
set /a "xc=1"
set /a "xd=1"
echo.
:createCards
if %slot% LSS 58 (
if %slot% LSS 13 (
set /a xd+=1
call set newCard=%farbe[1]% %%blatt[%xd%]%%
call echo %%newCard%%>>Stack.txt
)
if %slot% GTR 51 (
call set newCard=%farbe[0]%%blatt[0]%
call echo %%newCard%%>>Stack.txt
)
if %slot% GTR 38 (
if %slot% LSS 52 (
set /a xa+=1
call set newCard=%farbe[4]% %%blatt[%xa%]%%
call echo %%newCard%%>>Stack.txt
)
)
if %slot% GTR 25 (
if %slot% LSS 39 (
set /a xb+=1
call set newCard=%farbe[3]% %%blatt[%xb%]%%
call echo %%newCard%%>>Stack.txt
)
)
if %slot% LSS 26 (
if %slot% GTR 12 (
set /a xc+=1
call set newCard=%farbe[2]% %%blatt[%xc%]%%
call echo %%newCard%%>>Stack.txt
)
)
set /a slot+=1
goto createCards
)
echo _______________karten erstellt
del Colours.txt
del Cards.txt
cls
pause
echo.
pause>nul
set /a slot=0
for /f "delims=" %%a in ('type "Stack.txt"') do (
call set /a slot+=1
call set stapelA[%%slot%%]=%%a
)
echo _________Stapel befuellt_____
del Stack.txt
pause >nul