Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $hWallet = GUICreate("Galaxia Wallet", 800, 470)
- Const $Color_White = 0xfafafa, $Color_Grey = 0x424242, $Color_Cyan = 0x1abc9c
- GUICtrlCreateLabel("", 0, 0, 200, 150)
- GUICtrlSetBkColor(-1, 0x1b1b1b)
- GUICtrlCreateLabel("", 0, 150, 200, 650)
- GUICtrlSetBkColor(-1, $Color_Grey)
- $hLabelGalaxia = GUICtrlCreateLabel("GALAXIA", 25, 0, 150, 60, 0x0201)
- GUICtrlSetBkColor(-1, 0x1b1b1b)
- GUICtrlSetColor(-1, $Color_Cyan)
- GUICtrlSetFont(-1, 24, 600)
- $hLabelBalance = GUICtrlCreateLabel("Balance", 25, 60)
- GUICtrlSetBkColor(-1, 0x1b1b1b)
- GUICtrlSetColor(-1, 0x008b6e)
- $hLabelBalanceVal = GUICtrlCreateLabel("0.000000", 25, 80, 125)
- GUICtrlSetBkColor(-1, 0x1b1b1b)
- GUICtrlSetColor(-1, $Color_White)
- GUICtrlSetFont(-1, 18)
- $hLabelBalanceLocked = GUICtrlCreateLabel("Locked balance", 25, 105)
- GUICtrlSetBkColor(-1, 0x1b1b1b)
- GUICtrlSetColor(-1, 0x008b6e)
- $hLabelBalanceLockedVal = GUICtrlCreateLabel("0.000000", 25, 120, 125)
- GUICtrlSetBkColor(-1, 0x1b1b1b)
- GUICtrlSetColor(-1, $Color_White)
- GUICtrlSetFont(-1, 14)
- $hButtonSend = GUICtrlCreateLabel(" Send >", 0, 150, 200, 35, 0x0200)
- GUICtrlSetBkColor(-1, $Color_Grey)
- GUICtrlSetColor(-1, $Color_Cyan)
- GUICtrlSetFont(-1, 10, 600)
- $hButtonReveive = GUICtrlCreateLabel(" Receive >", 0, 185, 200, 35, 0x0200)
- GUICtrlSetBkColor(-1, $Color_Grey)
- GUICtrlSetColor(-1, $Color_Cyan)
- GUICtrlSetFont(-1, 10, 600)
- $hButtonHistory = GUICtrlCreateLabel(" History >", 0, 220, 200, 35, 0x0200)
- GUICtrlSetBkColor(-1, $Color_Grey)
- GUICtrlSetColor(-1, $Color_Cyan)
- GUICtrlSetFont(-1, 10, 600)
- $hButtonSettings = GUICtrlCreateLabel(" Settings >", 0, 255, 200, 35, 0x0200)
- GUICtrlSetBkColor(-1, $Color_Grey)
- GUICtrlSetColor(-1, $Color_Cyan)
- GUICtrlSetFont(-1, 10, 600)
- GUISetState()
- $activeTab = 0
- While GUIGetMsg() <> -3
- $hCursor = GUIGetCursorInfo()
- If Not @error Then
- If $hCursor[4] <> $activeTab And $hCursor[4] >= $hButtonSend And $hCursor[4] <= $hButtonSettings Then
- GUICtrlSetBkColor($hCursor[4], $Color_Cyan)
- GUICtrlSetColor($hCursor[4], $Color_Grey)
- While 1
- If _IsPressed("01") Then
- GUICtrlSetBkColor($activeTab, $Color_Grey)
- GUICtrlSetColor($activeTab, $Color_Cyan)
- $activeTab = $hCursor[4]
- ContinueLoop 2
- EndIf
- $hCursor2 = GUIGetCursorInfo()
- If Not @error Then
- If $hCursor2[4] <> $hCursor[4] Then ExitLoop
- EndIf
- WEnd
- GUICtrlSetBkColor($hCursor[4], $Color_Grey)
- GUICtrlSetColor($hCursor[4], $Color_Cyan)
- EndIf
- EndIf
- WEnd
- Func _IsPressed($s_hexKey, $v_dll = 'user32.dll')
- Local $a_R = DllCall($v_dll, "int", "GetAsyncKeyState", "int", '0x' & $s_hexKey)
- If Not @error And BitAND($a_R[0], 0x8000) = 0x8000 Then Return 1
- Return 0
- EndFunc
- Exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement