# Pitwindow GUI V1.03b xx-xx-xx Initial release # # Pitwindow GUI V1.04 22-03-13 Re-write to split pitwindow (GUI) code from pitboard code # ######################################################################################################### CatchEvent OnLapperStart() OnLapperStart_Pitwindow(); EndCatchEvent CatchEvent OnNewPlayerJoin( $userName ) # Player event OnNewPlayerJoin_Pitwindow(); EndCatchEvent CatchEvent OnMSO( $userName, $text ) # Player event $idxOfFirtsSpace = indexOf( $text, " "); IF( $idxOfFirtsSpace == -1 ) THEN $command = $text; $argv = ""; ELSE $command = subStr( $text,0,$idxOfFirtsSpace ); $argv = trim( subStr( $text,$idxOfFirtsSpace ) ); ENDIF SWITCH( $command ) CASE "!pwgui": IF ( UserIsAdmin( $userName ) == 1 ) THEN Pitwindow_gui(0,0); ELSE privMsg(langEngine( "%{main_notadmin}%" )); ENDIF BREAK; CASE "!pitwindow": Pitwindow( $KeyFlags ); BREAK; ENDSWITCH EndCatchEvent Sub OnLapperStart_Pitwindow() ### Pitwindow GUI ### GlobalVar $left_right_pw_gui; GlobalVar $top_bottom_pw_gui; GlobalVar $number_of_windows; GlobalVar $number_of_stops_w1; GlobalVar $number_of_stops_w2; GlobalVar $number_of_stops_w3; GlobalVar $penalty_laps; GlobalVar $force_tyre_change; GlobalVar $start_window_1; GlobalVar $end_window_1; GlobalVar $start_window_2; GlobalVar $end_window_2; GlobalVar $start_window_3; GlobalVar $end_window_3; $left_right_pw_gui=70; $top_bottom_pw_gui=70; $number_of_windows=""; $number_of_stops_w1=""; $number_of_stops_w2=""; $number_of_stops_w3=""; $penalty_laps=""; $force_tyre_change="No"; $start_window_1=""; $end_window_1=""; $start_window_2=""; $end_window_2=""; $start_window_3=""; $end_window_3=""; ### End ### EndSub Sub OnNewPlayerJoin_Pitwindow() SetCurrentPlayerVar( "nbr_stops_window_1",$number_of_stops_w1 ); SetCurrentPlayerVar( "nbr_stops_window_2",$number_of_stops_w2 ); SetCurrentPlayerVar( "nbr_stops_window_3",$number_of_stops_w3 ); EndSub Sub Pitwindow_gui( $KeyFlags,$id ) closePrivButton ("pw_gui_next_2&pw_gui_previous"); closePrivButton ("start_window_1&start_window1_min&start_window1_value&start_window1_plus&end_window_1&end_window1_min&end_window1_value&end_window1_plus&pw_gui_done_1"); closePrivButton ("start_window_2&start_window2_min&start_window2_value&start_window2_plus&end_window_2&end_window2_min&end_window2_value&end_window2_plus&pw_gui_done_2"); closePrivButton ("start_window_3&start_window3_min&start_window3_value&start_window3_plus&end_window_3&end_window3_min&end_window3_value&end_window3_plus&pw_gui_done_3"); closePrivButton ("pw_gui_previous&pw_gui_done_1"); $action_done_w2="false"; openPrivButton( "pw_gui_bg",$left_right_pw_gui,$top_bottom_pw_gui,60,62,5,-1,16,"" ); openPrivButton( "pw_gui_title",$left_right_pw_gui+1,$top_bottom_pw_gui+1,58,5,5,-1,0,"^7Pitwindow GUI - V1.04" ); openPrivButton( "nbr_of_windows",$left_right_pw_gui+1,$top_bottom_pw_gui+7,25,5,5,-1,96,"^7Number of windows" ); IF ($number_of_windows > 0) THEN openPrivButton( "nbr_of_windows_min",$left_right_pw_gui+35,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3-", nbr_of_windows_min ); ELSE closePrivButton ("nbr_of_windows_min"); ENDIF openPrivButton( "nbr_of_windows_value",$left_right_pw_gui+42,$top_bottom_pw_gui+7,10,5,5,-1,32,"^7" . $number_of_windows ); openPrivButton( "nbr_of_windows_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3+", nbr_of_windows_plus ); IF ($number_of_windows >= 1) THEN openPrivButton( "nbr_of_stops_w1",$left_right_pw_gui+1,$top_bottom_pw_gui+14,25,5,5,-1,96,"^7Number of stops W1" ); IF ($number_of_stops_w1 > 0) THEN openPrivButton( "nbr_of_stops_w1_min",$left_right_pw_gui+35,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3-", nbr_of_stops_w1_min ); ELSE closePrivButton ("nbr_of_stops_w1_min"); ENDIF openPrivButton( "nbr_of_stops_w1_value",$left_right_pw_gui+42,$top_bottom_pw_gui+14,10,5,5,-1,32,"^7" . $number_of_stops_w1 ); openPrivButton( "nbr_of_stops_w1_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3+", nbr_of_stops_w1_plus ); ELSE closePrivButton ("nbr_of_stops_w1&nbr_of_stops_w1_min&nbr_of_stops_w1_value&nbr_of_stops_w1_plus"); ENDIF IF ($number_of_windows >= 2) THEN openPrivButton( "nbr_of_stops_w2",$left_right_pw_gui+1,$top_bottom_pw_gui+21,25,5,5,-1,96,"^7Number of stops W2" ); IF ($number_of_stops_w2 > 0) THEN openPrivButton( "nbr_of_stops_w2_min",$left_right_pw_gui+35,$top_bottom_pw_gui+21,5,5,5,-1,32,"^3-", nbr_of_stops_w2_min ); ELSE closePrivButton ("nbr_of_stops_w2_min"); ENDIF openPrivButton( "nbr_of_stops_w2_value",$left_right_pw_gui+42,$top_bottom_pw_gui+21,10,5,5,-1,32,"^7" . $number_of_stops_w2 ); openPrivButton( "nbr_of_stops_w2_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+21,5,5,5,-1,32,"^3+", nbr_of_stops_w2_plus ); ELSE closePrivButton ("nbr_of_stops_w2&nbr_of_stops_w2_min&nbr_of_stops_w2_value&nbr_of_stops_w2_plus"); ENDIF IF ($number_of_windows == 3) THEN openPrivButton( "nbr_of_stops_w3",$left_right_pw_gui+1,$top_bottom_pw_gui+28,25,5,5,-1,96,"^7Number of stops W3" ); IF ($number_of_stops_w3 > 0) THEN openPrivButton( "nbr_of_stops_w3_min",$left_right_pw_gui+35,$top_bottom_pw_gui+28,5,5,5,-1,32,"^3-", nbr_of_stops_w3_min ); ELSE closePrivButton ("nbr_of_stops_w3_min"); ENDIF openPrivButton( "nbr_of_stops_w3_value",$left_right_pw_gui+42,$top_bottom_pw_gui+28,10,5,5,-1,32,"^7" . $number_of_stops_w3 ); openPrivButton( "nbr_of_stops_w3_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+28,5,5,5,-1,32,"^3+", nbr_of_stops_w3_plus ); ELSE closePrivButton ("nbr_of_stops_w3&nbr_of_stops_w3_min&nbr_of_stops_w3_value&nbr_of_stops_w3_plus"); ENDIF IF ($number_of_windows >= 1) THEN openPrivButton( "blackflag_laps",$left_right_pw_gui+1,$top_bottom_pw_gui+35,25,5,5,-1,96,"^7Laps before ^0BLACK^7 flag" ); IF ($penalty_laps > 0) THEN openPrivButton( "blackflag_laps_min",$left_right_pw_gui+35,$top_bottom_pw_gui+35,5,5,5,-1,32,"^3-", blackflag_laps_min ); ELSE closePrivButton ("blackflag_laps_min"); ENDIF openPrivButton( "blackflag_laps_value",$left_right_pw_gui+42,$top_bottom_pw_gui+35,10,5,5,-1,32,"^7" . $penalty_laps ); openPrivButton( "blackflag_laps_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+35,5,5,5,-1,32,"^3+", blackflag_laps_plus ); ELSE closePrivButton ("blackflag_laps&blackflag_laps_min&blackflag_laps_value&blackflag_laps_plus"); ENDIF openPrivButton( "force_tyre_change",$left_right_pw_gui+1,$top_bottom_pw_gui+42,25,5,5,-1,96,"^7Force tyre change" ); IF ($force_tyre_change == "Yes") THEN openPrivButton( "force_tyre_change_yes",$left_right_pw_gui+35,$top_bottom_pw_gui+42,11,5,5,-1,32,"^2Yes" ); openPrivButton( "force_tyre_change_no",$left_right_pw_gui+48,$top_bottom_pw_gui+42,11,5,5,-1,32,"^3No" , force_tyre_change ); ELSE openPrivButton( "force_tyre_change_yes",$left_right_pw_gui+35,$top_bottom_pw_gui+42,11,5,5,-1,32,"^3Yes", force_tyre_change ); openPrivButton( "force_tyre_change_no",$left_right_pw_gui+48,$top_bottom_pw_gui+42,11,5,5,-1,32,"^2No" ); ENDIF openPrivButton( "pw_gui_clear_all",$left_right_pw_gui+1,$top_bottom_pw_gui+49,58,5,5,-1,32,"^3Clear all values ", MA_pwgui_clear_all ); IF ($number_of_windows == 1 && $number_of_stops_w1 > 0 && $penalty_laps > 0) THEN openPrivButton( "pw_gui_next_1",$left_right_pw_gui+1,$top_bottom_pw_gui+56,58,5,5,-1,32,"^3Next - Step 2 of " . $number_of_windows+1, MA_pwgui_next_1 ); closePrivButton ("pw_gui_close"); ELSE IF ($number_of_windows == 2 && $number_of_stops_w1 > 0 && $number_of_stops_w2 > 0 && $penalty_laps > 0) THEN openPrivButton( "pw_gui_next_1",$left_right_pw_gui+1,$top_bottom_pw_gui+56,58,5,5,-1,32,"^3Next - Step 2 of " . $number_of_windows+1, MA_pwgui_next_1 ); closePrivButton ("pw_gui_close"); ELSE IF ($number_of_windows == 3 && $number_of_stops_w1 > 0 && $number_of_stops_w2 > 0 && $number_of_stops_w3 > 0 && $penalty_laps > 0) THEN openPrivButton( "pw_gui_next_1",$left_right_pw_gui+1,$top_bottom_pw_gui+56,58,5,5,-1,32,"^3Next - Step 2 of " . $number_of_windows+1, MA_pwgui_next_1 ); closePrivButton ("pw_gui_close"); ELSE openPrivButton( "pw_gui_close",$left_right_pw_gui+1,$top_bottom_pw_gui+56,58,5,5,-1,32,"^3Close", MA_pwgui_close ); closePrivButton ("pw_gui_next_1"); ENDIF ENDIF ENDIF EndSub Sub MA_pwgui_next_1( $KeyFlags,$id ) closePrivButton("nbr_of_windows&nbr_of_windows_min&nbr_of_windows_value&nbr_of_windows_plus&nbr_of_stops_w1&nbr_of_stops_w2&nbr_of_stops_w3"); closePrivButton ("nbr_of_stops_w1_min&nbr_of_stops_w1_value&nbr_of_stops_w1_plus"); closePrivButton ("nbr_of_stops_w2_min&nbr_of_stops_w2_value&nbr_of_stops_w2_plus"); closePrivButton ("nbr_of_stops_w3_min&nbr_of_stops_w3_value&nbr_of_stops_w3_plus"); closePrivButton ("pw_gui_next_1&pw_gui_next_3&pw_gui_done_2"); closePrivButton ("start_window_2&start_window2_min&start_window2_value&start_window2_plus&end_window_2&end_window2_min&end_window2_value&end_window2_plus"); closePrivButton ("blackflag_laps&blackflag_laps_min&blackflag_laps_value&blackflag_laps_plus"); closePrivButton ("force_tyre_change&force_tyre_change_yes&force_tyre_change_no"); openPrivButton( "start_window_1",$left_right_pw_gui+1,$top_bottom_pw_gui+7,25,5,5,-1,96,"^7Start window 1" ); IF ($start_window_1 > 1) THEN openPrivButton( "start_window1_min",$left_right_pw_gui+35,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3-", start_window1_min ); ELSE closePrivButton ("start_window1_min"); ENDIF openPrivButton( "start_window1_value",$left_right_pw_gui+42,$top_bottom_pw_gui+7,10,5,5,-1,32,"^7" . $start_window_1 ); openPrivButton( "start_window1_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3+", start_window1_plus ); openPrivButton( "end_window_1",$left_right_pw_gui+1,$top_bottom_pw_gui+14,25,5,5,-1,96,"^7End window 1" ); IF ($end_window_1 > 1) THEN openPrivButton( "end_window1_min",$left_right_pw_gui+35,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3-", end_window1_min ); ELSE closePrivButton ("end_window1_min"); ENDIF openPrivButton( "end_window1_value",$left_right_pw_gui+42,$top_bottom_pw_gui+14,10,5,5,-1,32,"^7" . $end_window_1 ); openPrivButton( "end_window1_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3+", end_window1_plus ); IF ($start_window_1 >= 1 && $end_window_1 >= 1 && $end_window_1 >= $start_window_1) THEN IF ($number_of_windows >= 2) THEN openPrivButton( "pw_gui_next_2",$left_right_pw_gui+30,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Next - Step 3 of " . $number_of_windows+1, MA_pwgui_next_2 ); ELSE openPrivButton( "pw_gui_done_1",$left_right_pw_gui+30,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Done", MA_pwgui_close ); ENDIF openPrivButton( "pw_gui_previous",$left_right_pw_gui+1,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Previous", Pitwindow_gui ); ELSE openPrivButton( "pw_gui_previous",$left_right_pw_gui+1,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Previous", Pitwindow_gui ); closePrivButton ("pw_gui_next_2&pw_gui_done_1"); ENDIF EndSub Sub MA_pwgui_next_2( $KeyFlags,$id ) closePrivButton("start_window_1&start_window1_min&start_window1_value&start_window1_plus&end_window_1&end_window1_min&end_window1_value&end_window1_plus"); closePrivButton("start_window_3&start_window3_min&start_window3_value&start_window3_plus&end_window_3&end_window3_min&end_window3_value&end_window3_plus"); closePrivButton("pw_gui_next_2&pw_gui_next_3&pw_gui_done_3"); IF ($start_window_2 == "") THEN $start_window_2=$end_window_1+$penalty_laps+1; $end_window_2=$start_window_2; ENDIF IF ($number_of_windows >= 2) THEN openPrivButton( "start_window_2",$left_right_pw_gui+1,$top_bottom_pw_gui+7,25,5,5,-1,96,"^7Start window 2" ); IF ($start_window_2 > $end_window_1+$penalty_laps+1) THEN openPrivButton( "start_window2_min",$left_right_pw_gui+35,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3-", start_window2_min ); ELSE closePrivButton ("start_window2_min"); ENDIF openPrivButton( "start_window2_value",$left_right_pw_gui+42,$top_bottom_pw_gui+7,10,5,5,-1,32,"^7" . $start_window_2 ); openPrivButton( "start_window2_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3+", start_window2_plus ); openPrivButton( "end_window_2",$left_right_pw_gui+1,$top_bottom_pw_gui+14,25,5,5,-1,96,"^7End window 2" ); IF ($end_window_2 > $start_window_2) THEN openPrivButton( "end_window2_min",$left_right_pw_gui+35,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3-", end_window2_min ); ELSE closePrivButton ("end_window2_min"); ENDIF openPrivButton( "end_window2_value",$left_right_pw_gui+42,$top_bottom_pw_gui+14,10,5,5,-1,32,"^7" . $end_window_2 ); openPrivButton( "end_window2_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3+", end_window2_plus ); ENDIF IF ($start_window_2 >= $end_window_1 && $end_window_2 >= $start_window_2) THEN IF ($number_of_windows == 3) THEN openPrivButton( "pw_gui_next_3",$left_right_pw_gui+30,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Next - Step 4 of " . $number_of_windows+1, MA_pwgui_next_3 ); ELSE openPrivButton( "pw_gui_done_2",$left_right_pw_gui+30,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Done", MA_pwgui_close ); ENDIF openPrivButton( "pw_gui_previous",$left_right_pw_gui+1,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Previous", MA_pwgui_next_1 ); ELSE openPrivButton( "pw_gui_previous",$left_right_pw_gui+1,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Previous", MA_pwgui_next_1 ); closePrivButton ("pw_gui_next_3&pw_gui_done_2"); ENDIF EndSub Sub MA_pwgui_next_3( $KeyFlags,$id ) closePrivButton("start_window_2&start_window2_min&start_window2_value&start_window2_plus&end_window_2&end_window2_min&end_window2_value&end_window2_plus"); closePrivButton("pw_gui_next_3"); IF ($start_window_3 == "") THEN $start_window_3=$end_window_2+$penalty_laps+1; $end_window_3=$start_window_3; ENDIF IF ($number_of_windows >= 3) THEN openPrivButton( "start_window_3",$left_right_pw_gui+1,$top_bottom_pw_gui+7,25,5,5,-1,96,"^7Start window 3" ); IF ($start_window_3 > $end_window_2+$penalty_laps+1) THEN openPrivButton( "start_window3_min",$left_right_pw_gui+35,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3-", start_window3_min ); ELSE closePrivButton ("start_window3_min"); ENDIF openPrivButton( "start_window3_value",$left_right_pw_gui+42,$top_bottom_pw_gui+7,10,5,5,-1,32,"^7" . $start_window_3 ); openPrivButton( "start_window3_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+7,5,5,5,-1,32,"^3+", start_window3_plus ); openPrivButton( "end_window_3",$left_right_pw_gui+1,$top_bottom_pw_gui+14,25,5,5,-1,96,"^7End window 3" ); IF ($end_window_3 > $start_window_3) THEN openPrivButton( "end_window3_min",$left_right_pw_gui+35,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3-", end_window3_min ); ELSE closePrivButton ("end_window3_min"); ENDIF openPrivButton( "end_window3_value",$left_right_pw_gui+42,$top_bottom_pw_gui+14,10,5,5,-1,32,"^7" . $end_window_3 ); openPrivButton( "end_window3_plus",$left_right_pw_gui+54,$top_bottom_pw_gui+14,5,5,5,-1,32,"^3+", end_window3_plus ); ENDIF IF ($start_window_3 >= $end_window_2 && $end_window_3 >= $start_window_3) THEN openPrivButton( "pw_gui_done_3",$left_right_pw_gui+30,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Done", MA_pwgui_close ); openPrivButton( "pw_gui_previous",$left_right_pw_gui+1,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Previous", MA_pwgui_next_2 ); ELSE openPrivButton( "pw_gui_previous",$left_right_pw_gui+1,$top_bottom_pw_gui+56,29,5,5,-1,32,"^3Previous", MA_pwgui_next_2 ); closePrivButton ("pw_gui_done_2&pw_gui_done_3"); ENDIF EndSub Sub MA_pwgui_close( $KeyFlags,$id ) closePrivButton("pw_gui_bg&pw_gui_title"); closePrivButton("nbr_of_windows&nbr_of_windows_min&nbr_of_windows_value&nbr_of_windows_plus&nbr_of_stops_w1&nbr_of_stops_w2&nbr_of_stops_w3"); closePrivButton("nbr_of_stops_w1_min&nbr_of_stops_w1_value&nbr_of_stops_w1_plus"); closePrivButton("nbr_of_stops_w2_min&nbr_of_stops_w2_value&nbr_of_stops_w2_plus"); closePrivButton("nbr_of_stops_w3_min&nbr_of_stops_w3_value&nbr_of_stops_w3_plus"); closePrivButton("blackflag_laps&blackflag_laps_min&blackflag_laps_value&blackflag_laps_plus&pw_gui_clear_all"); closePrivButton ("force_tyre_change&force_tyre_change_yes&force_tyre_change_no"); closePrivButton("start_window_1&start_window1_min&start_window1_value&start_window1_plus&end_window_1&end_window1_min&end_window1_value&end_window1_plus"); closePrivButton("start_window_2&start_window2_min&start_window2_value&start_window2_plus&end_window_2&end_window2_min&end_window2_value&end_window2_plus"); closePrivButton("start_window_3&start_window3_min&start_window3_value&start_window3_plus&end_window_3&end_window3_min&end_window3_value&end_window3_plus"); closePrivButton("pw_gui_previous&pw_gui_done_1&pw_gui_done_2&pw_gui_done_3"); closePrivButton ("pw_gui_close"); FOR ($i=1;$i<=32;$i=$i+1) IF ($user_array[$i,1] != "") THEN $user_array[$i,2] = $number_of_stops_w1; $user_array[$i,3] = $number_of_stops_w2; $user_array[$i,4] = $number_of_stops_w3; ENDIF ENDFOR EndSub Sub MA_pwgui_clear_all( $KeyFlags,$id ) $number_of_windows=""; $number_of_stops_w1=""; $number_of_stops_w2=""; $number_of_stops_w3=""; $penalty_laps=""; $force_tyre_change="No"; FOR ($i=1;$i<=32;$i=$i+1) IF ($user_array[$i,1] != "") THEN $user_array[$i,2] = $number_of_stops_w1; $user_array[$i,3] = $number_of_stops_w2; $user_array[$i,4] = $number_of_stops_w3; ENDIF ENDFOR $start_window_1=""; $end_window_1=""; $start_window_2=""; $end_window_2=""; $start_window_3=""; $end_window_3=""; Pitwindow_gui(0,0); EndSub Sub nbr_of_windows_min( $KeyFlags,$id ) IF ($number_of_windows >= 1) THEN $number_of_windows=$number_of_windows-1; ENDIF closePrivButton("nbr_of_stops_w1&nbr_of_stops_w2&nbr_of_stops_w3"); closePrivButton ("nbr_of_stops_w1_min&nbr_of_stops_w1_value&nbr_of_stops_w1_plus"); closePrivButton ("nbr_of_stops_w2_min&nbr_of_stops_w2_value&nbr_of_stops_w2_plus"); closePrivButton ("nbr_of_stops_w3_min&nbr_of_stops_w3_value&nbr_of_stops_w3_plus"); Pitwindow_gui(0,0); EndSub Sub nbr_of_windows_plus( $KeyFlags,$id ) IF ($number_of_windows <= 2) THEN $number_of_windows=$number_of_windows+1; ENDIF Pitwindow_gui(0,0); EndSub Sub nbr_of_stops_w1_min( $KeyFlags,$id ) IF ($number_of_stops_w1 >= 1) THEN $number_of_stops_w1=$number_of_stops_w1-1; ENDIF Pitwindow_gui(0,0); EndSub Sub nbr_of_stops_w1_plus( $KeyFlags,$id ) $number_of_stops_w1=$number_of_stops_w1+1; Pitwindow_gui(0,0); EndSub Sub nbr_of_stops_w2_min( $KeyFlags,$id ) IF ($number_of_stops_w2 >= 1) THEN $number_of_stops_w2=$number_of_stops_w2-1; ENDIF Pitwindow_gui(0,0); EndSub Sub nbr_of_stops_w2_plus( $KeyFlags,$id ) $number_of_stops_w2=$number_of_stops_w2+1; Pitwindow_gui(0,0); EndSub Sub nbr_of_stops_w3_min( $KeyFlags,$id ) IF ($number_of_stops_w3 >= 1) THEN $number_of_stops_w3=$number_of_stops_w3-1; ENDIF Pitwindow_gui(0,0); EndSub Sub nbr_of_stops_w3_plus( $KeyFlags,$id ) $number_of_stops_w3=$number_of_stops_w3+1; Pitwindow_gui(0,0); EndSub Sub blackflag_laps_min( $KeyFlags,$id ) IF ($penalty_laps >= 1) THEN $penalty_laps=$penalty_laps-1; IF ($penalty_laps == 0) THEN $penalty_laps=""; ENDIF ENDIF Pitwindow_gui(0,0); EndSub Sub blackflag_laps_plus( $KeyFlags,$id ) $penalty_laps=$penalty_laps+1; Pitwindow_gui(0,0); EndSub Sub force_tyre_change ( $KeyFlags,$id ) IF ($force_tyre_change == "Yes") THEN $force_tyre_change="No"; ELSE $force_tyre_change="Yes"; ENDIF Pitwindow_gui(0,0); EndSub Sub start_window1_min( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN IF ($start_window_1 > 1) THEN $start_window_1=$start_window_1-1; ENDIF ENDIF IF ($KeyFlags == 2) THEN IF ($start_window_1 >= 6) THEN $start_window_1=$start_window_1-5; ENDIF ENDIF MA_pwgui_next_1(0,0); EndSub Sub start_window1_plus( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN $start_window_1=$start_window_1+1; ENDIF IF ($KeyFlags == 2) THEN $start_window_1=$start_window_1+5; ENDIF MA_pwgui_next_1(0,0); EndSub Sub end_window1_min( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN IF ($end_window_1 > 1) THEN $end_window_1=$end_window_1-1; ENDIF ENDIF IF ($KeyFlags == 2) THEN IF ($end_window_1 >= 6) THEN $end_window_1=$end_window_1-5; ENDIF ENDIF MA_pwgui_next_1(0,0); EndSub Sub end_window1_plus( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN $end_window_1=$end_window_1+1; ENDIF IF ($KeyFlags == 2) THEN $end_window_1=$end_window_1+5; ENDIF MA_pwgui_next_1(0,0); EndSub Sub start_window2_min( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN IF ($start_window_2 > $end_window_1+$penalty_laps+1) THEN $start_window_2=$start_window_2-1; ENDIF ENDIF IF ($KeyFlags == 2) THEN IF ($start_window_2 > $end_window_1+$penalty_laps+5) THEN $start_window_2=$start_window_2-5; ENDIF ENDIF MA_pwgui_next_2(0,0); EndSub Sub start_window2_plus( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN $start_window_2=$start_window_2+1; ENDIF IF ($KeyFlags == 2) THEN $start_window_2=$start_window_2+5; ENDIF MA_pwgui_next_2(0,0); EndSub Sub end_window2_min( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN IF ($end_window_2 > $end_window_1+$penalty_laps+1) THEN $end_window_2=$end_window_2-1; ENDIF ENDIF IF ($KeyFlags == 2) THEN IF ($end_window_2 > $end_window_1+$penalty_laps+5) THEN $end_window_2=$end_window_2-5; ENDIF ENDIF MA_pwgui_next_2(0,0); EndSub Sub end_window2_plus( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN $end_window_2=$end_window_2+1; ENDIF IF ($KeyFlags == 2) THEN $end_window_2=$end_window_2+5; ENDIF MA_pwgui_next_2(0,0); EndSub Sub start_window3_min( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN IF ($start_window_3 > $end_window_2+$penalty_laps+1) THEN $start_window_3=$start_window_3-1; ENDIF ENDIF IF ($KeyFlags == 2) THEN IF ($start_window_3 > $end_window_2+$penalty_laps+5) THEN $start_window_3=$start_window_3-5; ENDIF ENDIF MA_pwgui_next_3(0,0); EndSub Sub start_window3_plus( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN $start_window_3=$start_window_3+1; ENDIF IF ($KeyFlags == 2) THEN $start_window_3=$start_window_3+5; ENDIF MA_pwgui_next_3(0,0); EndSub Sub end_window3_min( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN IF ($end_window_3 > $end_window_2+$penalty_laps+1) THEN $end_window_3=$end_window_3-1; ENDIF ENDIF IF ($KeyFlags == 2) THEN IF ($end_window_3 > $end_window_2+$penalty_laps+5) THEN $end_window_3=$end_window_3-5; ENDIF ENDIF MA_pwgui_next_3(0,0); EndSub Sub end_window3_plus( $KeyFlags,$id ) IF ($KeyFlags == 1) THEN $end_window_3=$end_window_3+1; ENDIF IF ($KeyFlags == 2) THEN $end_window_3=$end_window_3+5; ENDIF MA_pwgui_next_3(0,0); EndSub Sub Pitwindow( $KeyFlags ) OpenPrivButton( "pitwindow_bg",75,75,50,57,5,-1,16,""); OpenPrivButton( "pitwindow_title",76,76,48,5,5,-1,32,"^7Current set Pitwindow(s):"); OpenPrivButton( "pitwindow_1",76,86,15,5,5,-1,0,"^7Pitwindow 1:"); OpenPrivButton( "pitwindow_1_start",92,86,15,5,5,-1,96,"^2Start: " . $start_window_1); OpenPrivButton( "pitwindow_1_end",109,86,15,5,5,-1,96,"^1End: " . $end_window_1); OpenPrivButton( "pitwindow_2",76,96,15,5,5,-1,0,"^7Pitwindow 2:"); OpenPrivButton( "pitwindow_2_start",92,96,15,5,5,-1,96,"^2Start: " . $start_window_2); OpenPrivButton( "pitwindow_2_end",109,96,15,5,5,-1,96,"^1End: " . $end_window_2); OpenPrivButton( "pitwindow_3",76,106,15,5,5,-1,0,"^7Pitwindow 3:"); OpenPrivButton( "pitwindow_3_start",92,106,15,5,5,-1,96,"^2Start: " . $start_window_3); OpenPrivButton( "pitwindow_3_end",109,106,15,5,5,-1,96,"^1End: " . $end_window_3); OpenPrivButton( "pitwindow_blackflag",76,116,35,5,5,-1,0,"^7Laps before getting black flag: "); OpenPrivButton( "pitwindow_blackflag_2",114,116,10,5,5,-1,32, "^7" . $penalty_laps); OpenPrivButton( "pitwindow_close",76,126,48,5,5,-1,32, "^3Close", pitwindow_close); EndSub Sub pitwindow_close ( $KeyFlags,$id ) closePrivButton( "pitwindow_bg&pitwindow_title&pitwindow_1&pitwindow_1_start&pitwindow_1_end&pitwindow_2&pitwindow_2_start&pitwindow_2_end&pitwindow_3&pitwindow_3_start&pitwindow_3_end" ); closePrivButton( "pitwindow_blackflag&pitwindow_blackflag_2&pitwindow_close" ); EndSub