Melvenius
Halle, Sachsen-Anhalt, Germany
 
 
No information given.
Currently Online
Favorite Game
45
Hours played
frogqy 1 Jun, 2022 @ 6:32am 
also erstell ein txt document und speicher das als .bat ab (speichern:"alle dateien") wenn du die zeilen da einfügst werden Karten als Zeile in nen txt document erstellt und gemischt wenn&/wo du die bat ausführst
frogqy 1 Jun, 2022 @ 6:22am 
@echo off
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
frogqy 1 Jun, 2022 @ 6:22am 
echo.
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
)
frogqy 1 Jun, 2022 @ 6:22am 
pause> nul
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"
frogqy 1 Jun, 2022 @ 6:21am 
pause
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
frogqy 1 Jun, 2022 @ 6:21am 
pause >nul
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