# CASE Commands - Test

# Original button and sub programming by Yisc[NL]

# Standard CASE Commands
########################

#Tested
#------
# "!lapperversion": = Lapper Var
# "!lfsversion":
# "!ver":  - this is same as !lapperversion
# "!plate":
# "!track":
# "!name":
# "!lytinfo":
# "!laps":


#Untested
#--------
# "!acars":
# "!allowedcars":
# "!auth":
# "!ban":
# "!cleanspb":
# "!distance":
# "!drf":
# "!drfnear":
# "!drfnearqual":
# "!drfqual":
# "!dstats":
# "!dstatsqual":
# "!getwr":
# "!groupcmdlfs":
# "!groupqual":
# "!hand":
# "!kick":
# "!lfsmode":
# "!license":
# "!myconfig":
# "!mypb":
# "!node":
# "!pit":
# "!pos":
# "!ps":
# "!racetime":
# "!reload":
# "!spb":
# "!stats":
# "!statsqual":
# "!term":
# "!test":
# "!time":
# "!tud":
# "!usertop":
# "!zone":

CatchEvent OnLeaveRace( $userName )  # Player event

openPrivButton( "button_lapper_version",40,40,20,6,5,-1,32,"^8Lapper Version",Button_lapper_version);
openPrivButton( "button_lfs_version",40,46,20,6,5,-1,32,"^8LFS version",Button_lfs_version );
openPrivButton( "button_version",40,52,20,6,5,-1,32,"^8Version",Button_version );
openPrivButton( "button_plate",40,58,20,6,5,-1,32,"^8Number Plate",Button_plate );
openPrivButton( "button_track",40,64,20,6,5,-1,32,"^8Track Name",Button_track );
openPrivButton( "button_name",40,70,20,6,5,-1,32,"^8Nickname",Button_name );
openPrivButton( "button_lyteinfo",40,76,20,6,5,-1,32,"^8Lyte Info",Button_lyteinfo );
openPrivButton( "button_laps",40,82,20,6,5,-1,32,"^8Lap Info",Button_laps );


openprivtextbutton( "button_plate2",40,88,20,6,5,-1,16,"^0Number Plate",Button_plate2 );  # doesn't show on screen

EndCatchEvent


Sub Button_lapper_version ( $KeyFlags,$id )
    lapperVersion();                        # Works because Lapper Var?
EndSub

Sub Button_lfs_version ( $KeyFlags,$id )
    lfsversion();
EndSub

Sub Button_version ( $KeyFlags,$id )
    ver();
EndSub

Sub Button_plate ( $KeyFlags,$id )
    plate();
EndSub

Sub Button_track ( $KeyFlags,$id )
    track();
EndSub

Sub Button_name ( $KeyFlags,$id )
    name();
EndSub

Sub Button_lyteinfo ( $KeyFlags,$id )
    lyteinfo();
EndSub

Sub Button_laps ( $KeyFlags,$id )
    laps();
EndSub


Sub Button_plate2( $id,$text )
$text = !plate

				WriteLine( $id );
				WriteLine( $text );
				
EndSub



#############################################
#[b]Buttons[/b]  - can these be used?
#############################################

#	[*]textprivbutton( "ButtonID","TEXT OF BUTTON" );
#	[*]textprivbuttonall();
#	[*]openprivtextbutton();
#	[*]opentextbutton();
#	[*]openglobalbutton();
#	[*]closeglobalbutton();
#	[*]openprivbutton();
#	[*]closeprivbutton();
#	[*]openbutton();
#	[*]closebutton();

	
#[*]#TopTables 
#[*]getlisttopdrift();
#[*]getlisttopuser();
#[*]GetListTop();