homework

来源：互联网发布：检查端口是否开放编辑：程序博客网时间：2024/05/19 12:37

<?xml version="1.0" encoding="UTF-16"?>
<AUISkinDef StartForm="Form1">
<Shortcut AutoRepeat="1" AutoRepeatDelay="1000">
<Key Keycode="N" Event="Click">Form2.show;</Key>
<Key Keycode="R" Event="Click">Form2.unload;</Key>
</Shortcut>

<Font Id="Font_26_B">
  <FontName>MS Gothic</FontName>
  <FontSize>26</FontSize>
  <Color>#FFFFFF</Color>
  <Bold/>
</Font>
<Font Id="Font_16">
  <FontName>MS Gothic</FontName>
  <FontSize>16</FontSize>
  <Color>#FF444444</Color>
</Font>

<Bitmap Id="BMP_black_B">
  <File>Image/PLA_BL_H480W800.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_black_G">
  <File>Image/PLA_GR_H480W800.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_car">
  <File>Image/CAR.BMP</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_Button_U_Normal">
  <File>Image/button_M.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_Button_U_Push">
  <File>Image/button_M_yellow.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_Button_U_Disable">
  <File>Image/button_M_Black.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<States Id="STYLE_Button">
  BMP_Button_U_Normal,BMP_Button_U_Normal,BMP_Button_U_Push,BMP_Button_U_Normal,BMP_Button_U_Disable,BMP_Button_U_Disable,BMP_Button_U_Normal,BMP_Button_U_Push,BMP_Button_U_Normal,BMP_Button_U_Normal
</States>
<Bitmap Id="BMP_fumikiri">
  <File>Image/fumikiri.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_left">
  <File>Image/left.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_right">
  <File>Image/right.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_curve">
  <File>Image/curve.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>
<Bitmap Id="BMP_jiko">
  <File>Image/jiko.bmp</File>
  <TransparentColor>#FF00FF</TransparentColor>
</Bitmap>

<Location Id="Location_Left">
  <HorizontalAlignment>Left</HorizontalAlignment>
  <VerticalAlignment>Center</VerticalAlignment>
</Location>
<Location Id="Location_Center">
  <HorizontalAlignment>Center</HorizontalAlignment>
  <VerticalAlignment>Center</VerticalAlignment>
</Location>
<Location Id="Location_Right">
  <HorizontalAlignment>Right</HorizontalAlignment>
  <VerticalAlignment>Center</VerticalAlignment>
</Location>

<Table Id="Tab" Dimension="[5]">
  BMP_fumikiri,
  BMP_left,
  BMP_right,
  BMP_curve,
  BMP_jiko,
</Table>

<Form Id="FormBase" Background="BMP_black_B">
  <Top>0</Top>
  <Left>0</Left>
  <Width>800</Width>
  <Height>480</Height>
  <Var Id="Var2">Location_Left</Var>
  <Button Id="BtnBase">
   <Top>199</Top>
   <Left>99</Left>
   <Width>142</Width>
   <Height>37</Height>
   <Style>STYLE_Button</Style>
   <Font>Font_16</Font>
   <Caption>"BtnBase"</Caption>
   <Action Event="Click">
    if(Var2 == Location_Left){
     Var2 = Location_Center;
    }
    else if(Var2 == Location_Center){
     Var2 = Location_Right;
    }
    else{
     Var2 = Location_Left;
    }
   </Action>

  </Button>
  <Label Id="LabelBase">
   <Top>196</Top>
   <Left>288</Left>
   <Width>430</Width>
   <Height>46</Height>
   <Font>font_26_B</Font>
   <CaptionAlignment>Var2</CaptionAlignment>
   <Caption>"LabelBase"</Caption>
  </Label>
</Form>

<Form Id="Form1" Base="FormBase">
  <Var Id="Var1">0</Var>
  <Button Id="Btn1">
   <Type>Push</Type>
   <Top>283</Top>
   <Left>104</Left>
   <Width>142</Width>
   <Height>37</Height>
   <Style>STYLE_Button</Style>
   <Font>Font_16</Font>
   <Caption>"Btn1"</Caption>
   <Action Event="Click">
    if(Var1 == 4){
     Var1 = 0;
    }
    else{
     Var1 = Var1 + 1;
    }
   </Action>
  </Button>
  <Button Id="BtnNext">
   <Type>Push</Type>
   <Top>146</Top>
   <Left>557</Left>
   <Width>142</Width>
   <Height>37</Height>
   <Style>STYLE_Button</Style>
   <Font>Font_16</Font>
   <Caption>"Next"</Caption>
   <Action Event="Click">
    Form2.show;
   </Action>
  </Button>
  <PictureBox Id="Icon">
   <Top>319</Top>
   <Left>524</Left>
   <Width>34</Width>
   <Height>42</Height>
   <Image>Tab(Var1)</Image>
  </PictureBox>
  <Left>7</Left>
  <Top>-10</Top>
</Form>

<Form Id="Form2" Background="BMP_black_G">
  <Button Id="BtnStart" Base="BtnBase">
   <Type>Push</Type>
   <Caption>"Start"</Caption>
   <Action Event="Click">
    TIM1.Start;
    BtnStart.Enabled = 0;
    BtnStop.Enabled = 1;
   </Action>
  </Button>
  <Button Id="BtnStop" Base="BtnBase">
   <Type>Push</Type>
   <Top>265</Top>
   <Left>99</Left>
   <Font>Font_16</Font>
   <Caption>"Stop"</Caption>
   <Action Event="Click">
    TIM1.Stop;
    BtnStart.Enabled = 1;
    BtnStop.Enabled = 0;
    Car.Visible = 1;
   </Action>
  </Button>
  <Button Id="BtnReturn">
   <Top>390</Top>
   <Left>100</Left>
   <Width>142</Width>
   <Height>37</Height>
   <Style>STYLE_Button</Style>
   <Caption>"Return"</Caption>
   <Font>Font_16</Font>
   <Action Event="Click">
    Form2.Unload;
   </Action>
  </Button>
  <PictureBox Id="Car">
   <Top>109</Top>
   <Left>372</Left>
   <Width>281</Width>
   <Height>236</Height>
   <Image>BMP_car</Image>
  </PictureBox>
  <Action Id="OnTimer" For="TIM1" Event="OnTimer">
   Car.Visible = !Car.Visible;
   TIM1.Start;
  </Action>
  <Action Id="OnLoad" Event="OnLoad">
   BtnStop.Enabled = 0;
  </Action>
</Form>

</AUISkinDef>