@echo off
title Htchenspiel by Sourcecodes.de
color 0A

:welcome
cls

echo ############################################################################
echo. 
echo   #  #  #   #  #####  ####  #  #  ####  #   #     ####  #### #  ####  #     
echo   #  #           #    #     #  #  #     ##  #     #     #  #    #     #    
echo   ####  #   #    #    #     ####  ####  # # # ::: ####  #### #  ####  #
echo   #  #  #   #    #    #     #  #  #     #  ##        #  #    #  #     #    
echo   #  #  #####    #    ####  #  #  ####  #   #     ####  #    #  ####  ####
echo.                              
echo ############################################################################
echo.
echo Datum: %date%                      by Sourcecodes.de
echo.                                                          
echo                       Taste drcken zum fortfahren...
pause >nul 


:main
set mainput=0
color 0A
cls
echo.
echo.
echo    ***********************
echo.
echo           Hauptmen
echo.
echo        1) Spiel Starten
echo        2) Spielanleitung
echo        3) Credits
echo        4) Kontakt
echo        5) Spiel verlassen
echo.
echo    ***********************
echo.
set /p mainput=       
if "%mainput%"=="3" goto credits
if "%mainput%"=="4" goto question
if "%mainput%"=="5" goto ende
if "%mainput%"=="2" goto spielanleitung
if "%mainput%"=="1" goto startgame
if "%mainput%"=="" goto main
if not "%mainput%"=="4"=="3"=="2"=="1" goto main



:startgame
color 0A
cls
set sp=0
set mn=0
set runde=0
echo.
echo.
echo    ****************************
echo.
echo      Spielmodus w„hlen
echo.
echo      1) Normal (10 Runden)
echo      2) Manuelle Rundenanzahl
echo.
echo    ****************************
echo.
set /p sp=     
if "%sp%"=="2" goto manuell 
if "%sp%"=="1" goto normal
if not "%sp%"=="2"=="1" goto mainerror
if "%sp%"=="" goto mainerror


:manuell
cls
color 0F
echo Wie viele Runden m”chten Sie spielen?
echo.
set /p mn=
goto infos

:normal
set mn=10

:infos
cls
color 0F
echo Wie heiáen Sie?
echo.
set /p spielername=
cls
echo Ok, Sie heiáen also %spielername%.
echo.
echo %spielername%, drcken Sie eine Taste um mit dem Spiel zu beginnen!
echo.
set number=0
set antwort=0
set zahl=0
set swin=0
set cwin=0
pause >nul



:start
if "%runde%"=="%mn%" goto eog
set /a runde=%runde%+1
:start2
color 0A
cls
set antwort=0
set /a zahl=0
set /a zahl=%random%%%4
if "%zahl%"=="1" goto becher1
if "%zahl%"=="2" goto becher2
if "%zahl%"=="3" goto becher3
if "%zahl%"=="0" goto start2


rem #####################################################################################################################################################################

:becher1
color 0A
cls
echo.                
echo.
echo      Gewinnanzeige: %spielername%: %swin%                  Runde: %runde%
echo                     Computer: %cwin%
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo                 #########             #########            #########
echo                 #########             #########            ######### 
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo.
echo                     1                     2                    3
echo.
echo.
set number=0
set /p number=Ihre Bechernummer: 
if "%number%"=="1" goto res11
if "%number%"=="2" goto res12
if "%number%"=="3" goto res13
if not "%number%"=="1"=="2"=="3" goto becher1
if "%number%"=="" goto becher1

:ergebnis1
color 0A
cls          
echo.
echo.
echo      Gewinnanzeige: %spielername%: %swin%                  Runde: %runde%
echo                     Computer: %cwin%
echo.
echo                     %antwort%                                     
echo.
echo.
echo                 #########                      
echo                 #########                                                     
echo                 #########                    
echo                 #########             #########            #########
echo                 #########             #########            ######### 
echo                 #########             #########            #########
echo                 #########             #########            #########
echo.                                      #########            #########
echo                    000                #########            #########
echo                    000                #########            #########
echo.
echo                     1                     2                    3
echo.
echo.
echo Taste drcken um zur n„chsten Runde zu gelangen.
pause >nul
goto start     

:res11
color 0A
set /a swin=%swin%+1
set antwort=Richtig! Punkt fr Sie.
goto ergebnis1


:res12
color 0A
set /a cwin=%cwin%+1
set antwort=Leider Falsch! Punkt fr den Computer.
goto ergebnis1

:res13
color 0A
set /a cwin=%cwin%+1
set antwort=Leider Falsch! Punkt fr den Computer.
goto ergebnis1





rem #####################################################################################################################################################################

:becher2
color 0A
cls          
echo.
echo.
echo      Gewinnanzeige: %spielername%: %swin%                  Runde: %runde%
echo                     Computer: %cwin%
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo                 #########             #########            #########
echo                 #########             #########            ######### 
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo.
echo                     1                     2                    3
echo.
echo.
set number=0
set /p number=Ihre Bechernummer: 
if "%number%"=="1" goto res21
if "%number%"=="2" goto res22
if "%number%"=="3" goto res23
if not "%number%"=="1"=="2"=="3" goto becher2
if "%number%"=="" goto becher2


:ergebnis2
color 0A
cls         
echo.
echo.
echo      Gewinnanzeige: %spielername%: %swin%                  Runde: %runde%
echo                     Computer: %cwin%
echo.
echo                     %antwort%
echo.
echo.
echo                                       #########
echo                                       #########    
echo                                       #########
echo                 #########             #########            #########
echo                 #########             #########            ######### 
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########                                  #########
echo                 #########                000               #########
echo                 #########                000               #########
echo.
echo                     1                     2                    3
echo.
echo.
echo Taste drcken um zur n„chsten Runde zu gelangen.
pause >nul
goto start     

:res21
color 0A
set /a cwin=%cwin%+1
set antwort=Leider Falsch! Punkt fr den Computer.
goto ergebnis2

:res22
color 0A
set /a swin=%swin%+1
set antwort=Richtig! Punkt fr Sie.
goto ergebnis2

:res23
color 0A
set /a cwin=%cwin%+1
set antwort=Leider Falsch! Punkt fr den Computer.
goto ergebnis2






rem #####################################################################################################################################################################

:becher3
color 0A
cls        
echo.
echo.
echo      Gewinnanzeige: %spielername%: %swin%                  Runde: %runde%
echo                     Computer: %cwin%
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo                 #########             #########            #########
echo                 #########             #########            ######### 
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            #########
echo.
echo                     1                     2                    3
echo.
echo.
set number=0
set /p number=Ihre Bechernummer: 
if "%number%"=="1" goto res31
if "%number%"=="2" goto res32
if "%number%"=="3" goto res33
if not "%number%"=="1"=="2"=="3" goto becher3
if "%number%"=="" goto becher3


:ergebnis3
color 0A
cls         
echo.
echo.
echo      Gewinnanzeige: %spielername%: %swin%                  Runde: %runde%
echo                     Computer: %cwin%
echo.
echo                     %antwort%
echo.
echo.
echo                                                            #########
echo                                                            #########           
echo                                                            #########
echo                 #########             #########            #########
echo                 #########             #########            ######### 
echo                 #########             #########            #########
echo                 #########             #########            #########
echo                 #########             #########            
echo                 #########             #########               000
echo                 #########             #########               000
echo.
echo                     1                     2                    3
echo.
echo.
echo Taste drcken um zur n„chsten Runde zu gelangen.
pause >nul
goto start     

:res31
color 0A
set /a cwin=%cwin%+1
set antwort=Leider Falsch! Punkt fr den Computer.
goto ergebnis3

:res32
color 0A
set /a cwin=%cwin%+1
set antwort=Leider Falsch! Punkt fr den Computer.
goto ergebnis3

:res33
color 0A
set /a swin=%swin%+1
set antwort=Richtig! Punkt fr Sie.
goto ergebnis3





:spielanleitung
color 0A
cls
echo ####################
echo ## Spielanleitung ##
echo ####################
echo.
echo #####################################################################
echo # Ziel des Spieles ist es mehr Runden als der Computer zu gewinnen. #
echo # Gespielt werden 10 Runden (Auáer im manuellen Modus). Der         #
echo # Computer versteckt die Kugel unter einem der 3 Becher.            #
echo # Sie mssen dann erraten, wo sich die Kugel befindet.              #
echo # Es gibt sogar einen kleinen Trick im Spiel.                       #
echo # Der Computer zeigt nach jeder Runde wo die Kugel ist. Wenn Sie    #
echo # richtig getippt habe, dann erscheint bei der Gewinnanzeige neben  #
echo # Ihrem Namen ein Punkt. Fr jede gewonnene Runde wird ein Punkt    #
echo # addiert. Fr jede verlorene Runde bekommt der Computer einen      #
echo # Punkt. Nach den 10 Runden erfolgt die Auswertung.                 #
echo # Nun wnschen wir ihnen Viel Spaá beim Spielen :D                  #
echo #####################################################################
echo.
echo Zurck zum Hauptmen (Taste drcken)
pause >nul
goto main


:eog
cls
color 0E
if "%swin%" EQU "%cwin%" goto draw
if "%swin%" GTR "%cwin%" goto spwin
if "%cwin%" GTR "%swin%" goto cowin


:spwin
cls
color 0b
echo #########################################
echo ##### %spielername% hat gewonnen!!! #####
echo #########################################
echo.
echo Zum genauen Ergebnis... (Taste drcken)
echo.
pause >nul
goto detail

:cowin
cls
color 0b
echo ########################################
echo ##### Der Computer hat gewonnen!!! #####
echo ########################################
echo.
echo Zum genauen Ergebnis... (Taste drcken)
echo.
pause >nul
goto detail

:draw
cls
color 0b
echo #########################
echo ##### UNENTSCHIEDEN #####
echo #########################
echo.
echo Zum genauen Ergebnis... (Taste drcken)
echo.
pause >nul
goto detail


:detail
color 0b
cls
echo #################
echo ## Endergebnis ## 
echo #################
echo.
echo ################################################
echo %spielername% hat %swin% Runde(n)gewonnen!
echo ################################################
echo.
echo ################################################
echo Der Computer hat %cwin% Runde(n)gewonnen! 
echo ################################################
echo.
echo #############################
echo # Das war: Das Htchenspiel #
echo #############################
echo.
echo.
echo Zurck zum Hauptmen (Taste drcken)
pause >nul
goto main


:credits
cls
color 0A
echo.
echo Htchenspiel
echo.
echo Scripted by: Sourcecodes.de
echo.
echo Zurck zum Hauptmen (Taste drcken)
pause >nul
goto main


:question
color 0F
cls
echo Fragen, Anregungen, Fehler, Verbesserungen an:
echo.
echo Kontakt:   - sourcecodes@googlemail.de
echo            - moritzhalter@aol.de
echo            - www.sourcecodes.jimdo.de
echo.
echo Zurck zum Hauptmen (Taste drcken)
pause >nul
goto main

:ende
exit

