[Pytanie] MsgBox

[JestemPolakiem]

hej... to znowu ja.

 

MsgBox (0,"Licznik zycia", $a - $d @CRLF & $b - $e & @CRLF & $c - $f)

mam problem z tym kodem, otóż chcę zrobić tak :

 

MsgBox (0,"Licznik zycia", $a - $d "Lat"  @CRLF & $b - $e "Dni" & @CRLF & $c - $f "Miesięcy")

Lecz wyskakuje błąd taki :

 

>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Users\Michal\Documents\AutoIT3\licznik życia.au3" /UserParams    
+>19:24:53 Starting AutoIt3Wrapper v.2.1.2.9    Environment(Language:0415  Keyboard:00000415  OS:WIN_8/  CPU:X64 OS:X64)
>Running AU3Check (1.54.22.0)  from:C:\Program Files (x86)\AutoIt3
C:\Users\Michal\Documents\AutoIT3\licznik życia.au3(34,44) : ERROR: syntax error
			MsgBox (0,"Licznik zycia", $a - $d "Lat"
			~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Users\Michal\Documents\AutoIT3\licznik życia.au3(34,67) : ERROR: syntax error
			MsgBox (0,"Licznik zycia", $a - $d "Lat"  @CRLF & $b - $e "Dni"
			~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Users\Michal\Documents\AutoIT3\licznik życia.au3(34,96) : ERROR: syntax error
			MsgBox (0,"Licznik zycia", $a - $d "Lat"  @CRLF & $b - $e "Dni" & @CRLF & $c - $f "Miesięcy"
			~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Users\Michal\Documents\AutoIT3\licznik życia.au3 - 3 error(s), 0 warning(s)
!>19:24:53 AU3Check ended. Press F4 to jump to next error.rc:2
>Exit code: 2    Time: 0.400

mam już wcześniej wszystko podeklarowane itd.

i mam pyt. czy można zrobić by było wyświetlane np

67 lat

5 miesięcy

3 dni

(przykład)

a nie tylko :

67

5

3

????

 

[C.J]

 

MsgBox (0,"Licznik zycia", $a - $d & "Lat" @CRLF & $b - $e & "Dni" & @CRLF & $c - $f & "Miesiecy")

Tak spróbuj.

[JestemPolakiem]

Nadal error :

 

MsgBox (0,"Licznik zycia", $a - $d &  "Lat"  @CRLF

 

Temat cls omg, jestem idiotą, nie dałem pierwszego & ....

 

Jednak nie będę robić nowego tematu ....

otóż bawię się w robienie teraz kasyna i mam taki problem ... otóż kasyno działa idealnie, a teraz chciałbym zrobić bank ... jak zrobić by z banku kasa była na -, a w głównym labelu dodało tyle ? chodzi mi tylko o komende, na zabranie tej kasy, tak samo żeby można było spłacać ;o

 

mój kod z kasyna :

 

 

 

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Kasyno", 397, 263, 189, 292)
$Input1 = GUICtrlCreateInput("1",208, 16, 177, 21)
$Input2 = GUICtrlCreateInput("2", 208, 56, 177, 21)
$Button1 = GUICtrlCreateButton("Graj!", 120, 88, 265, 33,$WS_GROUP)
$Label1 = GUICtrlCreateLabel("Ile stawiasz w tej rundzie", 8, 16, 188, 17)
$Label2 = GUICtrlCreateLabel("Jaka liczbe obstawiasz 0-20", 8, 56, 180, 17)
$Label3 = GUICtrlCreateLabel("Cash:", 8, 96, 100, 17)
GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("5000", 38, 96, 36, 17)
GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
$Input3 = GUICtrlCreateInput("3", 208, 136, 177, 21)
$Input4 = GUICtrlCreateInput("4", 208, 176, 177, 21)
$Label5 = GUICtrlCreateLabel("Pozycz kredyt (maksymalnie 3000)", 8, 138, 180, 17)
$Label6 = GUICtrlCreateLabel("Spłać kredyt w wysokości :", 8, 176, 156, 17)
$Button2 = GUICtrlCreateButton("Pozycz/Spłać", 187, 216, 200, 33)
$Label7 = GUICtrlCreateLabel("W banku masz:", 8, 217, 73, 30)
GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
$Label8 = GUICtrlCreateLabel("0 zł", 70, 228, 36, 17)
GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			start ()
			Case $Button2
			bank ()
		Case $Form1
	EndSwitch
WEnd

Func start ()
	 Global $i1 = GUICtrlRead ($Input1); kasa
			$i2 = GUICtrlRead ($Input2); liczba

			$i5 = GUICtrlRead ($label4)
			$r = random (0,20,1)
			If $r == $i2 Then
			$i1 *= 5
			MsgBox (0,"Informacja","Wygrałeś " & $i1 & " kasy!")
			$i5 += $i1
			guictrlsetdata($Label4,$i5)
			Else
			$i5 -= $i1
			guictrlsetdata($Label4,$i5)
			Msgbox(0,"Informacja","przegrałes " & $i1 & " zł")
			EndIf
			if $i5 <= -1500 Then
			msgbox(0,"Informacja","Gramy od nowa!")
			guictrlsetdata($Label4,5000)
			EndIf
EndFunc

Func bank ()
		;________________________________BANK_______
			$i3 = GUICtrlRead ($Input3);  Pozycz    |
			$i4 = GUICtrlRead ($Input4);  Spłać     |
            $l = GUICtrlRead ($Label8); Kasa        |
		;________________________________BANK_______|
EndFunc

 

 

 

[Andre13]

Mam pomysł co do banku, ale ile może wynosić maksymalna liczba pożyczonych kredytów?

[JestemPolakiem]

3000 na start (masz 1000 już wpłacone lecz nie dokończyłem tego banku) chodzi mi o to by ktoś mi pomógł stworzyć ten bank, bo ja już nie mam sił...