Что нового

Rone Bar Prison //top\\ — Editor's Choice

Rone Bar Prison //top\\ — Editor's Choice

Allowed a single guard to secure dozens of inmates simultaneously during mass movements.

The phrase is the most iconic visual anchor in the history of human incarceration. For centuries, the image of a person grasping cold, vertical metal bars has served as the universal symbol for the loss of freedom. Beyond the physical metal, the "iron bar" represents a specific era of penal philosophy—one centered on absolute containment, visibility, and psychological isolation. rone bar prison

During the 18th and 19th centuries, the Industrial Revolution allowed for the mass production of uniform, round or square iron bars. This made it highly cost-effective to build massive, multi-tiered cell blocks. Architectural Anatomy of the Classic Cell Block Allowed a single guard to secure dozens of

With the advent of the Iron Age and subsequent improvements in blacksmithing, heavy iron grates and bars became the standard for fortress dungeons and local jails. Beyond the physical metal, the "iron bar" represents

The evolution of the iron bar prison spans its historical origins, its architectural engineering, its cultural impact, and its eventual displacement by modern, high-tech correctional facilities. The Evolution of the Iron Bar

Prevents bodies from squeezing through while allowing guards to look inside at all times.

Автор
T

Tuxzer92

Новичок
Сообщения
65
Репутация
0
Код:
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

Local $nCh1, $nCh2, $nCh3, $nCh4, $nCh5, $nCh6, $msg, $text, $FileSize
$TotalSize=0
$DownloadSize=3
$Free="9"
GUICreate("My GUI Checkbox") ; Создаёт окно в центре экрана
$Label=GUICtrlCreateLabel($text,10,50,100,50)
$Label2=GUICtrlCreateLabel($Free,50,50,100,50)
$nCh1 = GUICtrlCreateCheckbox("Checkbox 1", 10, 10, 120, 20)
$nCh2 = GUICtrlCreateCheckbox("Checkbox 2", 10, 90, 120, 20)
$nCh3 = GUICtrlCreateCheckbox("Checkbox 3", 10, 150, 120, 20)
GUISetState() ; показывает созданное окно

; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
   Switch $msg
	  Case $nCh1
		 Check($msg)
	  Case $nCh2
		 Check($msg)
	  Case $nCh3
		 Check($msg)
   EndSwitch
WEnd

Func Check($msg)
   If GUICtrlRead($msg) = $GUI_CHECKED Then
	  $TotalSize+=$DownloadSize
	  GUICtrlSetData ($Label, $TotalSize )
	  If $TotalSize >= $Free Then
		 MsgBox(16,"","ERROR")
	  EndIf
   EndIf
   If GUICtrlRead($msg) = $GUI_UNCHECKED Then
	   $TotalSize-=$DownloadSize
	  GUICtrlSetData ($Label, $TotalSize )
   EndIf
EndFunc

Решил так.
 
Верх