Stardew Valley, PlanteRentabiliter /j

@echo off
title PlanteArgent
mode con: cols=90 lines=30
Color 0F
:lunchnpt
cls
echo.
echo.
set /p npt=Nombre Plante Total ( Plus grand que 0 ) :
if %npt% LEQ 0 goto :failnpt
goto :nptk
:failnpt
cls
echo.
echo.
echo Nombre Plante Total Plus grand que 0 !!
timeout /t 1 /nobreak >nul
goto :lunchnpt
:nptk
cls
echo.
echo.
set /p nj=Nombre Jour ( Plus grand que 0 ) :
if %nj% LEQ 0 goto :failnj
goto :niv
:failnj
cls
echo.
echo.
echo Nombre Jour Plus grand que 0 !!
timeout /t 1 /nobreak >nul
goto :nptk
:niv
cls
echo.
echo.
set /p niv=Nivo Farming ( Superieur ou egal a 0 ) :
if %niv% LSS 0 goto :failniv
if %niv% GTR 10 goto :failniv
goto :ferti
:failniv
cls
echo.
echo.
echo Nivo Farming Superieur ou egal ? 0 !!
timeout /t 1 /nobreak >nul
goto :niv
:ferti
cls
echo.
echo.
set /p ferti=Fertiliser ( 0 1 2 ) :
if %ferti% LSS 0 goto :failferti
if %ferti% GTR 2 goto :failferti
goto :acha
:failferti
cls
echo.
echo.
echo Fertiliser niv 0 1 2 !!
timeout /t 1 /nobreak >nul
goto :ferti
:acha
cls
echo.
echo.
set /p acha=Prix D acha ( Superieur ou egal a 0 ) :
if %acha% LSS 0 goto :failacha
goto :pvo
:failacha
cls
echo.
echo.
echo Prix D acha Superieur ou egal a 0 !!
timeout /t 1 /nobreak >nul
goto :acha
:pvo
cls
echo.
echo.
set /p pvo=Prix De Vente Or ( Superieur a 0 ) :
if %pvo% LEQ 0 goto :failpvo
goto :pva
:failpvo
cls
echo.
echo.
echo Prix De Vante Superieur a 0 !!
timeout /t 1 /nobreak >nul
goto :pvo
:pva
cls
echo.
echo.
set /p pva=Prix De Vente Argent ( Superieur a 0 ) :
if %pva% LEQ 0 goto :failpva
goto :pvn
:failpva
cls
echo.
echo.
echo Prix De Vante Superieur a 0 !!
timeout /t 1 /nobreak >nul
goto :pva
:pvn
cls
echo.
echo.
set /p pvn=Prix De Vente Normal ( Superieur a 0 ) :
if %pvn% LEQ 0 goto :failpvn
goto :fertical
:failpvn
cls
echo.
echo.
echo Prix De Vante Superieur a 0 !!
timeout /t 1 /nobreak >nul
goto :pvn
:fertical
cls
if %ferti% == 0 goto :fertia
if %ferti% == 1 goto :fertib
if %ferti% == 2 goto :fertic
timeout /t 1 /nobreak >nul
exit
:fertia
if %niv% == 0 set fertireso=1
if %niv% == 1 set fertireso=3
if %niv% == 2 set fertireso=5
if %niv% == 3 set fertireso=7
if %niv% == 4 set fertireso=9
if %niv% == 5 set fertireso=11
if %niv% == 6 set fertireso=13
if %niv% == 7 set fertireso=15
if %niv% == 8 set fertireso=17
if %niv% == 9 set fertireso=19
if %niv% == 10 set fertireso=21
if %niv% == 0 set fertiresa=2
if %niv% == 1 set fertiresa=6
if %niv% == 2 set fertiresa=10
if %niv% == 3 set fertiresa=14
if %niv% == 4 set fertiresa=18
if %niv% == 5 set fertiresa=22
if %niv% == 6 set fertiresa=26
if %niv% == 7 set fertiresa=30
if %niv% == 8 set fertiresa=34
if %niv% == 9 set fertiresa=38
if %niv% == 10 set fertiresa=42
goto :cal
:fertib
if %niv% == 0 set fertireso=4
if %niv% == 1 set fertireso=8
if %niv% == 2 set fertireso=12
if %niv% == 3 set fertireso=15
if %niv% == 4 set fertireso=19
if %niv% == 5 set fertireso=23
if %niv% == 6 set fertireso=26
if %niv% == 7 set fertireso=30
if %niv% == 8 set fertireso=34
if %niv% == 9 set fertireso=37
if %niv% == 10 set fertireso=41
if %niv% == 0 set fertiresa=9
if %niv% == 1 set fertiresa=16
if %niv% == 2 set fertiresa=23
if %niv% == 3 set fertiresa=31
if %niv% == 4 set fertiresa=38
if %niv% == 5 set fertiresa=45
if %niv% == 6 set fertiresa=53
if %niv% == 7 set fertiresa=60
if %niv% == 8 set fertiresa=67
if %niv% == 9 set fertiresa=75
if %niv% == 10 set fertiresa=75
goto :cal
:fertic
if %niv% == 0 set fertireso=8
if %niv% == 1 set fertireso=13
if %niv% == 2 set fertireso=18
if %niv% == 3 set fertireso=24
if %niv% == 4 set fertireso=29
if %niv% == 5 set fertireso=34
if %niv% == 6 set fertireso=40
if %niv% == 7 set fertireso=45
if %niv% == 8 set fertireso=50
if %niv% == 9 set fertireso=56
if %niv% == 10 set fertireso=61
if %niv% == 0 set fertiresa=15
if %niv% == 1 set fertiresa=26
if %niv% == 2 set fertiresa=37
if %niv% == 3 set fertiresa=47
if %niv% == 4 set fertiresa=58
if %niv% == 5 set fertiresa=69
if %niv% == 6 set fertiresa=75
if %niv% == 7 set fertiresa=75
if %niv% == 8 set fertiresa=75
if %niv% == 9 set fertiresa=75
if %niv% == 10 set fertiresa=75
goto :cal
:cal
cls
set /a npo=(%npt%*%fertireso%)/100
set /a npa=((%npt%-%npo%)*30)/100
set /a npn=(%npt%-%npa%)-%npo%
set /a ppot=%npo%*%pvo%
set /a ppat=%npa%*%pva%
set /a ppnt=%npn%*pvn%
set /a ppt=%ppot%+%ppat%+%ppnt%
set /a rest=(%ppt%-%npt%*%acha%)/%nj%
timeout /t 1 /nobreak >nul
cls
echo.
echo.
echo %rest%/j
echo.
pause
exit