HyperLib 1997 Winter - Disc 1/HYPERLIB-1997-Winter-CD1.ISO.7z/HYPERLIB-1997-Winter-CD1.ISO/オンラインウェア/BUS/寺務管理1.2.0.sit/寺務管理1.2.0/檀家名簿/background_2752.xml

Extensible Markup Language | 1995-05-28 | 250KB | 4,454 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>2752</id>
    <filler1>0</filler1>
    <bitmap>BMAP_3617.pbm</bitmap>
    <cantDelete> <true /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_3123.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>58</left>
            <top>49</top>
            <right>196</right>
            <bottom>76</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>18</textSize>
        <textStyle>bold</textStyle>
        <textHeight>24</textHeight>
        <name>ﾃｩﾃ…ﾃｱﾂｺ</name>
        <script></script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>58</left>
            <top>34</top>
            <right>194</right>
            <bottom>50</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ‡ﾃ甘‡窶ｺ</name>
        <script></script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>240</left>
            <top>24</top>
            <right>310</right>
            <bottom>40</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœ</name>
        <script></script>
    </part>
    <part>
        <id>4</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>207</left>
            <top>40</top>
            <right>467</right>
            <bottom>73</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｨZﾃｨﾃ､</name>
        <script></script>
    </part>
    <part>
        <id>5</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>280</left>
            <top>74</top>
            <right>422</right>
            <bottom>92</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬdﾃｲb</name>
        <script></script>
    </part>
    <part>
        <id>6</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>280</left>
            <top>92</top>
            <right>422</right>
            <bottom>110</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>FAX</name>
        <script></script>
    </part>
    <part>
        <id>7</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>79</left>
            <top>18</top>
            <right>163</right>
            <bottom>34</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ</name>
        <script>on mouseWithinInflate "text" , "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿‡竕暗‡竏妥③ﾃｪ窶堙ｫﾅ津‡窶ｦﾃｯﾅ禿ｧXﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡竕暗｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithin</script>
    </part>
    <part>
        <id>8</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>78</left>
            <top>88</top>
            <right>140</right>
            <bottom>104</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ</name>
        <script>on mouseWithinInflate "text" , "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃ愿‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾃ暗液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡竕暗‡竏妥③ﾃ嘉ｧﾃ叡ﾃ丑ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ï｣ｿﾃｨﾃｺﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡竏†ﾃｨﾃｫﾃ‡ﾂｴﾃｧﾃｻﾃ‡窶ｺﾃ‡邃｢ﾃｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"end mouseWithin</script>
    </part>
    <part>
        <id>9</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>78</left>
            <top>103</top>
            <right>140</right>
            <bottom>119</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｣ﾃ甘ｯ邃｢</name>
        <script>on mouseUpshow bkgnd button "ﾃ｣ﾃ甘ｯ邃｢ﾃ瓜ﾃ叡ﾃ曳"end mouseUpon mouseWithinInflate "text" , "ﾃ｣ﾃ甘ｯ邃｢ﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡竕暗‡竏妥③ﾃ‡ﾂｱﾃ‡ﾃε ﾂ ﾃｭuﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ②ﾃ益ﾃ嘉｣ﾃ雲ﾃ右ﾃ嘉ｬﾃ嘉…ﾃ泳ﾃ嘉姪…[ﾃ‡ﾂｩﾃ‡ﾃﾃｩﾃ古ｳïｬﾃ‡ï｣ｿﾃｫIﾃ‡ﾃ津‡竕暗‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithin</script>
    </part>
    <part>
        <id>10</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>78</left>
            <top>121</top>
            <right>140</right>
            <bottom>137</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｭIﾃ･o</name>
        <script>on mouseWithinInflate "text" , "ﾃｭIﾃ･oﾃ‡窶ｦﾃ｢ﾃ凖‡ﾃ暗｢竏†ﾃ‡ﾃε‡窶ｺﾃ｣Lﾃｬﾂｸﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ嘉ｧﾃ叡ﾃ丑ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ï｣ｿﾃｨﾃｺﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡竏†ﾃｨﾃｫﾃ‡ﾂｴﾃｧﾃｻﾃ‡窶ｺﾃ‡邃｢ﾃｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"end mouseWithin</script>
    </part>
    <part>
        <id>11</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>78</left>
            <top>137</top>
            <right>140</right>
            <bottom>153</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ﾃ氾ｮﾃ”</name>
        <script>on mouseUpshow bkgnd button "ﾃ｢ﾃ氾ｮﾃ氾瓜ﾃ叡ﾃ曳"end mouseUpon mouseWithinInflate "text" , "ﾃ｢ﾃ氾ｮﾃ氾｣窶｡ﾃ､zﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡竕暗‡竏妥③ﾃ‡ﾂｱﾃ‡ﾃε ﾂ ﾃｭuﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ②ﾃ益ﾃ嘉｣ﾃ雲ﾃ右ﾃ嘉ｬﾃ嘉…ﾃ泳ﾃ嘉姪…[ﾃ‡ﾂｩﾃ‡ﾃﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｫIﾃ‡ﾃ津‡竕暗‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithin</script>
    </part>
    <part>
        <id>12</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>78</left>
            <top>152</top>
            <right>140</right>
            <bottom>168</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx</name>
        <script>on mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾃ暗液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡竕暗‡竏妥③ﾃ嘉ｧﾃ叡ﾃ丑ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ï｣ｿﾃｨﾃｺﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡竏†ﾃｨﾃｫﾃ‡ﾂｴﾃｧﾃｻﾃ‡窶ｺﾃ‡邃｢ﾃｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"end mouseWithin</script>
    </part>
    <part>
        <id>14</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>491</left>
            <top>31</top>
            <right>587</right>
            <bottom>172</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>15</textHeight>
        <name>ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpput the clickText into Ffind F in fld "ﾃｩﾃ…ﾃｱﾂｺ"put the number of lines of bkgnd button "Option" into Lrepeat with i = 1 to 8if line i of bkgnd button "Option" is F then exit mouseUpend repeatif L is "8" thenput line 2 to 8 of bkgnd button "Option" into bkgnd button "Option"put F into line 8 of bkgnd button "Option"elseput F into line L + 1 of bkgnd button "Option"end ifend mouseUpon mouseWithinInflate "text" , "ﾃｱﾂｺﾃｫOﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ暗‡竏†ﾃ②ﾃ‡ﾂｪﾃ‡ﾃεｱﾂｺﾃｫOﾃ‡ﾃε雨ﾃ…[ﾃ栄ﾃ‡窶ｦﾃ 竅„ﾃｬﾃ†ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>15</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>243</left>
            <top>113</top>
            <right>443</right>
            <bottom>194</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <true /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｨﾃ禿ｯﾃ’</name>
        <script></script>
    </part>
    <part>
        <id>16</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>72</left>
            <top>169</top>
            <right>152</right>
            <bottom>186</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｪUﾃｧﾃｻﾃｮNﾃｬx</name>
        <script>on mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｬﾋ凖ｯtﾃ‡竕暗‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>17</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>617</left>
            <top>179</top>
            <right>633</right>
            <bottom>196</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>next</name>
        <script>on mouseUpget the number of cardsif number of this card is it thengo to second cardelsego to nextend ifput char 1 of fld "ﾃ‡ﾃ甘‡窶ｺ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡邃｢" then put "ﾃ‡ﾂｩ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂｨ" then put "ﾃ‡ﾂｴ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾃ†" then put "ﾃ‡竕 " into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏ž" then put "ﾃ‡ﾃ˜" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竕､" then put "ﾃ‡ﾂｱ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂ･" then put "ﾃ‡竕･" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏‚" then put "ﾃ‡ﾂｵ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏" then put "ﾃ‡竏‘" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏ｫ" then put "ﾃ‡ﾏ\" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂｺ" then put "ﾃ‡ﾂｪ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾃｦ" then put "ﾃ‡ﾎｩ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂｫ" then put "ﾃ‡竏†" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竕ˆ" then put "ﾃ‡ﾆ’" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾅ’" then put "ﾃ‡ﾃ•" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡窶”" then put "ﾃ‡窶“" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡窶˜" then put "ﾃ‡窶" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡笳Š" then put "ﾃ‡ﾃｷ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竅„" then put "ﾃ‡ﾅｸ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>18</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>602</left>
            <top>179</top>
            <right>618</right>
            <bottom>196</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>next</name>
        <script>on mouseUpif number of this card is "2" thengo to last cardelsego to prevend ifput char 1 of fld "ﾃ‡ﾃ甘‡窶ｺ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡邃｢" then put "ﾃ‡ﾂｩ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂｨ" then put "ﾃ‡ﾂｴ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾃ†" then put "ﾃ‡竕 " into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏ž" then put "ﾃ‡ﾃ˜" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竕､" then put "ﾃ‡ﾂｱ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂ･" then put "ﾃ‡竕･" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏‚" then put "ﾃ‡ﾂｵ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏" then put "ﾃ‡竏‘" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竏ｫ" then put "ﾃ‡ﾏ\" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂｺ" then put "ﾃ‡ﾂｪ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾃｦ" then put "ﾃ‡ﾎｩ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾂｫ" then put "ﾃ‡竏†" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竕ˆ" then put "ﾃ‡ﾆ’" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡ﾅ’" then put "ﾃ‡ﾃ•" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡窶”" then put "ﾃ‡窶“" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡窶˜" then put "ﾃ‡窶" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡笳Š" then put "ﾃ‡ﾃｷ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"if fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" is "ﾃ‡竅„" then put "ﾃ‡ﾅｸ" into fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>19</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>587</left>
            <top>179</top>
            <right>603</right>
            <bottom>197</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｪVﾃ｣Kﾃ閲ﾃ運ﾃ嘉ｬ</name>
        <script>on mouseUpset LockScreen to trueset the cursor to watch------------DTHCSpeak "SpeakKana","<=M3=>ﾎｩﾂｿ竏榿停ˆゑｬ≫\懌\ｺﾂ･ 竕､ﾆ抵ｬ≫ˆ楪ｺﾅ鳶ｩ"go to firstend mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>20</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>30</top>
            <right>607</right>
            <bottom>47</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>5</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡窶 ﾃｧs</name>
        <script>on mouseUpput the selectedText of me into Fset LockScreen to trueput empty into fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"go to second cardfind char 1 of F in fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"put "1 " into Lrepeatput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line L of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"put fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" into Rgo to nextif R is not fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" then exit repeatadd 1 to Lend repeatif F is "ﾃ‡窶 " thenput line 2 of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ" into FIelseput line 1 of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ" into FIend iffind FI in fld "ﾃｩﾃ…ﾃｱﾂｺ"end mouseUp</script>
    </part>
    <part>
        <id>21</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>174</left>
            <top>18</top>
            <right>195</right>
            <bottom>34</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬ邃｢ﾃｯ竏づｩﾃｶ</name>
        <script></script>
    </part>
    <part>
        <id>24</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>45</top>
            <right>607</right>
            <bottom>64</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡ﾂｩﾃｧs</name>
        <script>on mouseUpglobal Fput the selectedText of me into FSIMEIKENSAKUend mouseUp</script>
    </part>
    <part>
        <id>25</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>62</top>
            <right>607</right>
            <bottom>81</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡竕･ﾃｧs</name>
        <script>on mouseUpglobal Fput the selectedText of me into FSIMEIKENSAKUend mouseUp</script>
    </part>
    <part>
        <id>26</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>75</top>
            <right>607</right>
            <bottom>94</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>5</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡ﾎｩﾃｧs</name>
        <script>on mouseUpglobal Fput the selectedText of me into FSIMEIKENSAKUend mouseUp</script>
    </part>
    <part>
        <id>27</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>91</top>
            <right>607</right>
            <bottom>110</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡ﾂｻﾃｧs</name>
        <script>on mouseUpglobal Fput the selectedText of me into FSIMEIKENSAKUend mouseUp</script>
    </part>
    <part>
        <id>28</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>107</top>
            <right>607</right>
            <bottom>126</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>2</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡ﾃ陛ｧs</name>
        <script>on mouseUpglobal Fput the selectedText of me into FSIMEIKENSAKUend mouseUp</script>
    </part>
    <part>
        <id>29</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>124</top>
            <right>607</right>
            <bottom>143</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡窶ｹﾃｧs</name>
        <script>on mouseUpglobal Fput the selectedText of me into FSIMEIKENSAKUend mouseUp</script>
    </part>
    <part>
        <id>32</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>588</left>
            <top>140</top>
            <right>607</right>
            <bottom>159</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ‡窶堙ｧs</name>
        <script>on mouseUpput the selectedText of me into Fset LockScreen to trueput the number of cards into xxput empty into fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"go to second cardfind char 1 of F in fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"put "1 " into Lrepeatput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line L of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"put fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" into Rif the number of this card is XX then exit repeatgo to nextif R is not fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" then exit repeatadd 1 to Lend repeatput line 1 of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ" into FIfind FI in fld "ﾃｩﾃ…ﾃｱﾂｺ"end mouseUp</script>
    </part>
    <part>
        <id>38</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>14</left>
            <top>251</top>
            <right>311</right>
            <bottom>381</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>as</name>
        <script></script>
    </part>
    <part>
        <id>39</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>17</left>
            <top>233</top>
            <right>154</right>
            <bottom>250</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ</name>
        <script></script>
    </part>
    <part>
        <id>44</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>323</left>
            <top>242</top>
            <right>413</right>
            <bottom>262</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>14</textSize>
        <textStyle>condense</textStyle>
        <textHeight>18</textHeight>
        <name>ﾃｩﾃ…ﾃｱﾂｺﾃｬﾂｸﾃｳﾃ•</name>
        <script>on mouseUpask "ﾃｩﾃ…ﾃｱﾂｺﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with fld "ﾃｩﾃ…ﾃｱﾂｺ"put it into meend mouseUpon mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｩﾃ…ﾃｱﾂｺﾃ‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛‡窶｡ﾃ‡竕暗‡ﾂｴﾃ‡窶ｹﾃ‡竏妥‡邃｢ﾃ②ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｭhﾃ｢竏†ﾃ‡ﾃεｯ竕暗‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ･窶榲②ﾃ｣Lﾃｭ窶 ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ催‡ﾅ津ｩﾂｩﾃｬﾃ†ﾃｬIﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>45</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>325</left>
            <top>262</top>
            <right>367</right>
            <bottom>282</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>14</textSize>
        <textStyle>condense</textStyle>
        <textHeight>18</textHeight>
        <name>ﾃ｣窶｡ﾃ､zﾃｬﾂｸﾃｳﾃ•</name>
        <script>on mouseUpask "ﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"put it into meend mouseUpon mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ｣窶｡ﾃ､zﾃ‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛‡窶｡ﾃ‡竕暗‡ﾂｴﾃ‡窶ｹﾃ‡竏妥‡邃｢ﾃ②ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｭhﾃ｢竏†ﾃ‡ﾃεｯ竕暗‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ･窶榲②ﾃ｣Lﾃｭ窶 ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ催‡ﾅ津ｩﾂｩﾃｬﾃ†ﾃｬIﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>46</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>367</left>
            <top>262</top>
            <right>417</right>
            <bottom>281</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>14</textSize>
        <textStyle>condense</textStyle>
        <textHeight>18</textHeight>
        <name>ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•</name>
        <script>on mouseUpask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx"put it into meend mouseUpon mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｮNﾃｬxﾃ‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛‡窶｡ﾃ‡竕暗‡ﾂｴﾃ‡窶ｹﾃ‡竏妥‡邃｢ﾃ②ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｭhﾃ｢竏†ﾃ‡ﾃεｯ竕暗‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ･窶榲②ﾃ｣Lﾃｭ窶 ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ催‡ﾅ津ｩﾂｩﾃｬﾃ†ﾃｬIﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>47</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>346</left>
            <top>226</top>
            <right>391</right>
            <bottom>244</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>14</textSize>
        <textStyle>condense</textStyle>
        <textHeight>18</textHeight>
        <name>ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿ｬﾂｸﾃｳﾃ•</name>
        <script>on mouseUpask "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ"put it into meend mouseUpon mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛‡窶｡ﾃ‡竕暗‡ﾂｴﾃ‡窶ｹﾃ‡竏妥‡邃｢ﾃ②ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｭhﾃ｢竏†ﾃ‡ﾃεｯ竕暗‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ･窶榲②ﾃ｣Lﾃｭ窶 ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ催‡ﾅ津ｩﾂｩﾃｬﾃ†ﾃｬIﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>48</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>327</left>
            <top>281</top>
            <right>410</right>
            <bottom>300</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <textHeight>18</textHeight>
        <name>ﾃｬﾋ凖ｯtﾃｬﾂｸﾃｳﾃ•</name>
        <script>on mouseUpput the date into RRput the number of chars of RR into KKask "ﾃｬﾋ凖ｯtﾃ‡ï｣ｿﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with char 3 to KK of RRput it into meend mouseUpon mouseWithinInflate "text" , "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｬﾋ凖ｯtﾃ‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛‡窶｡ﾃ‡竕暗‡ﾂｴﾃ‡窶ｹﾃ‡竏妥‡邃｢ﾃ②ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃ‡ﾃε‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｭhﾃ｢竏†ﾃ‡ﾃεｯ竕暗‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ･窶榲②ﾃ｣Lﾃｭ窶 ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ催‡ﾅ津ｩﾂｩﾃｬﾃ†ﾃｬIﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>49</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>324</left>
            <top>322</top>
            <right>406</right>
            <bottom>343</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｪUﾃｧﾃｻ</name>
        <script>on mouseUpif fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ" is not "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" thenanswer "ﾃ･ﾂｪﾃｧ窶ｺﾃ‡ﾃ陛嘉､ﾃ厩ﾃ曳ﾃｯ¥ﾃｩﾂｶﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾂ｡ﾃ‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③ﾃ｣Lﾃｭ窶 ﾃ‡竏妥‡ﾃ暗‡窶ｦﾃ‡ﾃ陛②ﾃｨﾂ｡ﾃ｣ﾃｩﾃ閲ﾃ運ﾃ嘉ｬﾃ‡竕暗丑ﾃ嘉､ﾃ陰ﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"exit mouseUpend ifset LockScreen to trueput fld "ﾃｩﾃ…ﾃｱﾂｺ" into fld "ﾃｩﾃ…ﾃｱﾂｺﾃｬﾂｸﾃｳﾃ•"put fld "ﾃ｢ﾃ氾ｮﾃ”" into fld "ﾃ｣窶｡ﾃ､zﾃｬﾂｸﾃｳﾃ•"put fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" into fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿ｬﾂｸﾃｳﾃ•"put char 1 to 2 of fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx" into Padd 1 to Pif the number of chars of P is "1" thenput "0" & P & "ﾃｮNﾃｬx" into fld "ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•"elseput P & "ﾃｮNﾃｬx" into fld "ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•"end ifenable bkgnd button "ﾃｯ[ﾃｬﾂｸﾃｳﾃ•"set the cursor to watch-------get fld "ﾃ‡ﾃ甘‡窶ｺ"------------DTHCSpeak "Speak", it & "ﾂｪ窶ｺ"-----get fld "ﾃ｢ﾃ氾ｮﾃ”"---------DTHCSpeak "Speak", it & "ﾂ･窶ｺ"------get fld "ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•"-----------DTHCSpeak "Speak", it ---------- & "ﾂ･窶ｺ"end mouseUpon mouseWithinInflate "text" , "ﾃ･ﾂｪﾃｧ窶ｺﾃｯ¥ﾃｩﾂｶﾃｭﾃ愿‡ﾃεｭhﾃ｢竏†ﾃ‡ﾂｩﾃ‡ﾃﾃｪUﾃｧﾃｻﾃ‡窶ｺﾃ‡邃｢ﾃ‡窶 ﾃ‡ﾂ｡ﾃ‡ﾎｩﾃｩﾃｻﾃ‡窶ｦﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ映ﾃ…[ﾃ運ﾃ‡ﾃ陛ｨ窶榲‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>51</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <false /> </enabled>
        <rect>
            <left>324</left>
            <top>342</top>
            <right>406</right>
            <bottom>363</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｯ[ﾃｬﾂｸﾃｳﾃ•</name>
        <script>on mouseUpif fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ" is not "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" thenanswer "ﾃ･ﾂｪﾃｧ窶ｺﾃ‡ﾃ陛ｮNﾃｬxﾃｯ¥ﾃｩﾂｶﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾂ｡ﾃ‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③ﾃｬﾂｸﾃｳﾃ陛‡竏妥‡ﾃ暗‡窶ｦﾃ‡ﾃ陛②ﾃ‡ﾂｪﾃ‡ﾃ催‡ï｣ｿﾃ丑ﾃ嘉､ﾃ陰ﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"exit mouseUpend ifput the date into RRput the number of chars of RR into KKif fld "ﾃｬﾋ凖ｯtﾃｬﾂｸﾃｳﾃ•" is empty thenask "ﾃｬﾋ凖ｯtﾃ‡ï｣ｿﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with char 3 to KK of RRif it is empty then exit mouseUpput it into SSSput the number of chars of SSS into Lrepeat with i = 1 to Lif char i of SSS is "." then put "/" into char i of SSSend repeatput SSS into fld "ﾃｬﾋ凖ｯtﾃｬﾂｸﾃｳﾃ•"end ifset LockScreen to trueget the number of lines of fld "as"put fld "ﾃｬﾋ凖ｯtﾃｬﾂｸﾃｳﾃ•" into line it + 1 of fld "as"put "," & fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿ｬﾂｸﾃｳﾃ•" after line it + 1 of fld "as"put "," & fld "ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•" after line it + 1 of fld "as"put "," & fld "ﾃｩﾃ…ﾃｱﾂｺﾃｬﾂｸﾃｳﾃ•" after line it + 1 of fld "as"put "," & fld "ﾃ｣窶｡ﾃ､zﾃｬﾂｸﾃｳﾃ•" & ",ﾃ…ﾃｱ" after line it + 1 of fld "as"put empty into fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿ｬﾂｸﾃｳﾃ•"put fld "ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•" into fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx"put fld "ﾃｬﾋ凖ｯtﾃｬﾂｸﾃｳﾃ•" into fld "ﾃｪUﾃｧﾃｻﾃｮNﾃｬx"put empty into fld "ﾃｮNﾃｬxﾃｬﾂｸﾃｳﾃ•"put empty into fld "ﾃｩﾃ…ﾃｱﾂｺﾃｬﾂｸﾃｳﾃ•"put empty into fld "ﾃ｣窶｡ﾃ､zﾃｬﾂｸﾃｳﾃ•"put empty into fld "ﾃｬﾋ凖ｯtﾃｬﾂｸﾃｳﾃ•"put number of lines of fld "as" into Lput item 5 of line 1 of fld "as" into SHOUKEISrepeat with i = 2 to Ladd item 5 of line i of fld "as" to SHOUKEISend repeatput SHOUKEIS into fld "ﾃｨﾂｨﾃ･v"get number of chars of fld "ﾃｨﾂｨﾃ･v"repeat with i = 1 to itif char i of fld "ﾃｨﾂｨﾃ･v" is "," then put "" into char i of fld "ﾃｨﾂｨﾃ･v"end repeatput fld "ﾃｨﾂｨﾃ･v" into sujiput kuraidori (suji) into fld "ﾃｨﾂｨﾃ･v"enable bkgnd button "ﾃｪUﾃｧﾃｻ"disable bkgnd button "ﾃｯ[ﾃｬﾂｸﾃｳﾃ•"end mouseUpon mouseWithinInflate "text" , "ﾃｨ窶榲‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃ‡窶 ﾃ‡ﾃ暗映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃ②ﾃｧ竏づ‡ﾃεｯ[ﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃｪUﾃｫﾃｷﾃｭﾂ ﾃｭmﾃｯ[ﾃ ﾃ催ｱﾃ｡ﾃ‡窶ｦﾃ‡窶 ﾃ‡ﾃ暗映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｫSﾃ‡ﾆ津ｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>53</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>324</left>
            <top>301</top>
            <right>406</right>
            <bottom>322</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｯ窶｢ﾃｨo</name>
        <script>on mouseUpif fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ" is not "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" thenanswer "ﾃ･ﾂｪﾃｧ窶ｺﾃ‡ﾃ陛ｮNﾃｬxﾃｯ¥ﾃｩﾂｶﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾂ｡ﾃ‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③ﾃ｣Lﾃｭ窶 ﾃ‡竏妥‡ﾃ暗‡窶ｦﾃ‡ﾃ陛②ﾃ‡ﾂｪﾃ‡ﾃ催‡ï｣ｿﾃ丑ﾃ嘉､ﾃ陰ﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"exit mouseUpend ifput the date into RRput the number of chars of RR into KKput the selectedText of me into Fif F is "ﾃｪUﾃｫﾃｷﾃ｣窶｡" thenask "ﾃｪUﾃｫﾃｷﾃｪﾃ甘‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"if it is empty then exit mouseUpput "ﾃｪUﾃｫﾃｷﾃ⑿" & it & "ﾃ⒀" into Fend ifask "ﾃｬﾋ凖ｯtﾃ‡ï｣ｿﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with char 3 to KK of RRif it is empty then exit mouseUpput it into SSSput the number of chars of SSS into Lrepeat with i = 1 to Lif char i of SSS is "." then put "/" into char i of SSSend repeatput SSS into KKask "ﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢"if it is empty then exit mouseUpput it into PPif fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ" is not "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" then put empty into fld "as"set LockScreen to trueput "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" into fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ"put the number of lines of fld "as" into LLput KK & ",,," & F & ",-" & PP & ",ﾃ…ﾃｱ" into line LL + 1 of fld "as"enable bkgnd button "ﾃｯ[ﾃｬoﾃｲ^"put number of lines of fld "as" into Lput item 5 of line 1 of fld "as" into SHOUKEISrepeat with i = 2 to Ladd item 5 of line i of fld "as" to SHOUKEISend repeatput SHOUKEIS into fld "ﾃｨﾂｨﾃ･v"get number of chars of fld "ﾃｨﾂｨﾃ･v"repeat with i = 1 to itif char i of fld "ﾃｨﾂｨﾃ･v" is "," then put "" into char i of fld "ﾃｨﾂｨﾃ･v"end repeatput fld "ﾃｨﾂｨﾃ･v" into sujiput kuraidori (suji) into fld "ﾃｨﾂｨﾃ･v"put "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" into fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ"end mouseUpon mouseWithinInflate "text" , "ﾃｯ窶｢ﾃ‡ﾂ｢ﾃｨoﾃ‡ﾂｵﾃ‡窶堙ｩﾃ凝ｪﾃｮﾃｳﾃｸﾃ‡ï｣ｿﾃ②ﾃｧ竏づ‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseEnterset the style of me to popupend mouseEnteron mouseLeaveset the style of me to transparentend mouseLeavemouseEnteron mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>55</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>90</left>
            <top>215</top>
            <right>160</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｨﾂ｡ﾃ｣ﾃｩ</name>
        <script>on mouseUpanswer "ﾃ｢ﾃ氾ｮﾃ氾液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｨﾂ｡ﾃ｣ﾃｩﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" then exit mouseUpput empty into fld "as"put empty into fld "ﾃｨﾂｨﾃ･v"put "ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ" into fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ"disable bkgnd button "ﾃｯ[ﾃｬoﾃｲ^"disable bkgnd button "ﾃｯ[ﾃｬﾂｸﾃｳﾃ•"play "Ding"end mouseUpon mouseWithinInflate "text" , "ﾃ｢竏ｫﾃ‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ陰ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>56</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>490</left>
            <top>207</top>
            <right>617</right>
            <bottom>228</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ嘉‡ﾃ…[ﾃ栄ﾃｪﾃｿﾃ‡ﾃ凝ｫﾃｷﾃ‡ﾂｶ</name>
        <script>on mouseUpput the selectedText of me into Fset LockScreen to trueif F is "ﾃ ﾃ崚ｧﾂｸﾃ⑴ﾃ｢ﾃ氾ｮﾃ氾嘉‡ﾃ…[ﾃ栄" then--------play "Buttons1"set lockScreen to trueset cursor to watchcolorScreenput "ﾃ ﾃ崚ｧﾂｸﾃ⑴ﾃ｢ﾃ氾ｮﾃ氾嘉‡ﾃ…[ﾃ栄" into fld "ﾃ‡窶｡ﾃ…[ﾃ‡ﾂｫ"KAIHIMODOend ifif F is "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ嘉‡ﾃ…[ﾃ栄" then---play "Buttons1"set lockScreen to trueset cursor to watchcolorScreenBput "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ嘉‡ﾃ…[ﾃ栄" into fld "ﾃ‡窶｡ﾃ…[ﾃ‡ﾂｫ"KAKOCHOMODOend ifif F is "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ嘉‡ﾃ…[ﾃ栄" then---play "Buttons1"set lockScreen to trueset cursor to watchcolorScreenCput "ﾃｪUﾃｫﾃｷﾃｬ`ﾃｯ[ﾃ嘉‡ﾃ…[ﾃ栄" into fld "ﾃ‡窶｡ﾃ…[ﾃ‡ﾂｫ"FURIKAEMODOend if----set the style of me to transparentend mouseUpon mouseWithinInflate "text" , "ﾃ､eﾃ嘉‡ﾃ…[ﾃ栄ﾃ‡ﾃεｪﾃｿﾃ‡ﾃ凝ｫﾃｷﾃ‡ﾂｶﾃ‡ï｣ｿﾃｧsﾃ‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>57</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>404</left>
            <top>301</top>
            <right>417</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>1</name>
        <script>on mouseUpanswer "ﾃ｣Lﾃｭ窶 ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡竏妥‡竏†ﾃ②ﾃ‡ﾂｱﾃ‡ﾃε雨ﾃ…[ﾃ栄ﾃ‡ﾃε｢ﾃ氾ｮﾃ氾映ﾃ…[ﾃ運ﾃ‡邃｢ﾃ嘘ﾃ鋭ﾃ…[ﾃ‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③ﾃ‡窶ｹﾃ‡ﾎｩﾃ ﾂｯﾃ‡ﾂｴﾃｨoﾃ‡ﾂｵﾃ⑴ﾃｩﾃ凝ｪﾃｮﾃｳﾃｸﾃ‡ﾃ陛ｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseUp</script>
    </part>
    <part>
        <id>58</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>404</left>
            <top>342</top>
            <right>417</right>
            <bottom>362</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>2</name>
        <script>on mouseUpanswer "ﾃｬﾂｸﾃｳﾃ陛閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡竏妥‡竏†ﾃ②ﾃ｣Lﾃｭ窶 ﾃ‡竕･ﾃ‡ﾃ催‡ﾎｩﾃｨ窶榲‡ﾃε映ﾃ…[ﾃ運ﾃ‡邃｢ﾃｧ竏づ‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｨﾃ｡ﾃｩﾃｼﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseUp</script>
    </part>
    <part>
        <id>59</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>404</left>
            <top>362</top>
            <right>417</right>
            <bottom>382</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>3</name>
        <script>on mouseUpanswer "ﾃｬoﾃｲ^ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡竏妥‡竏†ﾃ②ﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡ﾎｩﾃｧ竏づ‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡邃｢ﾃｬoﾃｲ^ﾃ‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseUp</script>
    </part>
    <part>
        <id>60</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>170</left>
            <top>233</top>
            <right>245</right>
            <bottom>251</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｫﾃｧﾃ･v</name>
        <script></script>
    </part>
    <part>
        <id>61</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>245</left>
            <top>233</top>
            <right>311</right>
            <bottom>251</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｨﾂｨﾃ･v</name>
        <script></script>
    </part>
    <part>
        <id>62</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>170</left>
            <top>216</top>
            <right>249</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｫﾃｧﾃ･vﾃ運ﾃ韻ﾃ曳ﾃ嘉｣</name>
        <script>on mouseUpanswer "ﾃ･Jﾃ｢zﾃｧﾃ‡ﾃ‡ï｣ｿﾃ｣Lﾃｬﾂｸﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cansel" or "OK"if it is "Cansel" then exit mouseUpask "ﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"put it into sujiput kuraidori (suji) into fld "ﾃｫﾃｧﾃ･v"end mouseUpon mouseWithinInflate "text" , "ﾃ･Jﾃ｢zﾃｧﾃ‡ﾃ‡ï｣ｿﾃ｣Lﾃｬﾂｸﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>63</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>248</left>
            <top>216</top>
            <right>310</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｨﾂｨﾃ･vﾃ運ﾃ韻ﾃ曳ﾃ嘉｣</name>
        <script></script>
    </part>
    <part>
        <id>65</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <false /> </enabled>
        <rect>
            <left>547</left>
            <top>181</top>
            <right>579</right>
            <bottom>197</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Sort</name>
        <script>on mouseUpif fld "ﾃ‡ﾃ甘‡窶ｺ" is empty thenanswer "ﾃ‡ﾃ甘‡窶ｺﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾂｻﾃ‡ﾃ佚‡ﾃ催‡ﾅ津②ﾃ噂ﾃ…[ﾃ曳ﾃｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"exit mouseUpend ifanswer "ﾃ雨ﾃ…[ﾃ栄ﾃ‡ï｣ｿﾃ‡ﾃ甘‡窶ｺﾃ‡竕暗噂ﾃ…[ﾃ曳ﾃ‡ﾂｵﾃ‡ﾆ津‡窶｡ﾃ‡ﾂ｢ﾃ‡ﾂ｢ﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨" with "Cansel" or "OK"if it is "Cansel" then exit mouseUpsort this bkgnd international by fld "ﾃ‡ﾃ甘‡窶ｺ"----------DTHCSpeak "Speak","竕闇督･窶ｦﾃｸ竏榿陳ｶﾂｵ竏ｫ竕遺王ﾅ督ｺﾂｿ"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>66</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>485</left>
            <top>13</top>
            <right>515</right>
            <bottom>26</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>9</textSize>
        <textStyle>condense</textStyle>
        <textHeight>12</textHeight>
        <name>ﾃｧ竕暗ｨIﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ</name>
        <script></script>
    </part>
    <part>
        <id>67</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <false /> </enabled>
        <rect>
            <left>510</left>
            <top>182</top>
            <right>545</right>
            <bottom>196</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Add</name>
        <script>on mouseUpanswer "ﾃｭhﾃ｢竏†ﾃ‡ï｣ｿﾃｭﾂｫﾃ｢ﾂ｡ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cansel" or "OK"if it is "Cansel" then exit mouseUp-------------DTHCSpeak "Speak","竏やˆ榿抵ｬ≫ˆ†ﾂ 竏や沿笳莞ｩïｬﾃｷ窶凪ˆゑｬ≫沿ﾂｶ竕､竅„竏壺ˆ渉ｿïｬﾂｪ竕､"doMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"add 1 to fld "ﾃｧ竕暗ｨIﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ"put fld "ﾃｧ竕暗ｨIﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" into fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ"answer "ﾃｯKﾃ‡竏湘…uﾃ‡ﾃ甘‡窶ｺﾃ…vﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津②ﾃｯKﾃｳvﾃｩﾃｱﾃｧﾃ„ﾃ‡ï｣ｿﾃ｣Lﾃｬﾂｸﾃ‡ﾃε‡ﾂｧﾃ‡ﾂｶﾃ噂ﾃ…[ﾃ曳ﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseUpon mouseWithinInflate "text" , "ﾃｪVﾃ｣Kﾃ‡窶ｦﾃｭhﾃ｢竏†ﾃ‡ï｣ｿﾃｭﾂｫﾃ｢ﾂ｡ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>68</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>14</left>
            <top>254</top>
            <right>136</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™</name>
        <script></script>
    </part>
    <part>
        <id>69</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>105</left>
            <top>254</top>
            <right>254</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ</name>
        <script></script>
    </part>
    <part>
        <id>70</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>230</left>
            <top>254</top>
            <right>337</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ</name>
        <script></script>
    </part>
    <part>
        <id>71</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>309</left>
            <top>254</top>
            <right>379</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ</name>
        <script></script>
    </part>
    <part>
        <id>72</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>345</left>
            <top>254</top>
            <right>406</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ</name>
        <script>on mouseWithinset lockScreen to trueget the scroll of meset the scroll of field "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" to itset the scroll of field "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ" to itset the scroll of field "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ" to itset the scroll of field "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ" to itset lockScreen to falseend mouseWithinon mouseUpfind string the clickText in fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ"put fld "ﾃｩﾃ…ﾃｱﾂｺ" into Fput the number of lines of bkgnd button "Option" into Lrepeat with i = 1 to 8if line i of bkgnd button "Option" is F then exit mouseUpend repeatif L is "8" thenput line 2 to 8 of bkgnd button "Option" into bkgnd button "Option"put F into line 8 of bkgnd button "Option"elseput F into line L + 1 of bkgnd button "Option"end ifend mouseUp</script>
    </part>
    <part>
        <id>74</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>177</left>
            <top>177</top>
            <right>594</right>
            <bottom>394</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1</name>
        <script></script>
    </part>
    <part>
        <id>75</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>443</left>
            <top>341</top>
            <right>578</right>
            <bottom>374</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA2</name>
        <script></script>
    </part>
    <part>
        <id>76</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>456</left>
            <top>271</top>
            <right>591</right>
            <bottom>304</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>putDATANumber</name>
        <script></script>
    </part>
    <part>
        <id>77</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>455</left>
            <top>324</top>
            <right>590</right>
            <bottom>357</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA2</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>78</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>14</left>
            <top>236</top>
            <right>126</right>
            <bottom>254</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｯ¥ﾃｩﾂｶ</name>
        <script></script>
    </part>
    <part>
        <id>79</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>261</left>
            <top>212</top>
            <right>346</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Narita</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢竏†ﾃｯﾂ ﾃｮNﾃ｢ﾃ津･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpif last char of fld "ﾃｯ¥ﾃｩﾂｶ" is "ﾃ､ﾄｱ" thenanswer "ﾃ･ﾂｪﾃｧ窶ｺﾃ②ﾃ･ﾃｼﾃｧﾄｱﾃｫﾅ津ｨ竄ｬﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｮNﾃ｢ﾃ津‡邃｢ﾃｯ¥ﾃｩﾂｶﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥⑩ﾃ⑿ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ･ﾃｼﾃｧﾄｱﾃ⒀ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡竕暗②ﾃ映ﾃ…[ﾃ運ﾃ･ﾃｼﾃｧﾄｱﾃ･ﾃ｣ﾃ｢ﾂ ﾃ‡ﾂｩﾃ｢竏†ﾃｯﾂ ﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃｫﾅ津ｨ竄ｬﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｯ¥ﾃｩﾂｶﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ⑩"exit mouseUpend ifanswer "ﾃ‡ﾂｫﾃ‡ﾃｸﾃ‡ﾃﾃ‡ï｣ｿﾃ･ﾃｼﾃｧﾄｱﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "ﾃｳﾃ ﾃｮNﾃｬx" or "ﾃｱ{ﾃｮNﾃｬx"if it is "ﾃｱ{ﾃｮNﾃｬx" thenput number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into Liif Li is zero thenexit mouseUpend ifset LockScreen to truerepeat with n = 1 to Liput "ﾃ‡ﾂｻﾃ‡ﾂｵ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put char 1 of line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into GENput char 2 to 3 of line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into DCif GEN is not "ﾃｨ竏ｫ" and GEN is not  "ﾃｯﾎｩ" then next repeatif GEN is "ﾃｨ竏ｫ" then add 1925 to DCif GEN is "ﾃｯﾎｩ" then add 1988 to DCget the dateput char 1 to 4 of it into DDsubtract DC from DDif ( DD <> 1 ) and  ( DD <> 2 ) and ( DD <> 6 ) and  ( DD <> 12 ) and ( DD <> 16 ) and  ( DD <> 22 ) and ( DD <> 26 ) and  ( DD <> 32 ) and ( DD <> 36 ) and  ( DD <> 42 ) and ( DD <> 46 ) and  ( DD <> 49 ) then next repeatif DD = 1 thenput "ﾃｨﾂｨﾃｨﾃ\ﾃ､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 2 thenput "ﾃｫﾃづｨﾃ\ﾃ､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 6 thenput "7ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 12 thenput "13ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 16 thenput "17ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 22 thenput "23ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 26 thenput "27ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 32 thenput "33ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 36 thenput "37ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 42 thenput "43ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 46 thenput "47ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 49 thenput "50ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｧﾂｰﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"end ifend repeatelseput number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into Liif Li is zero thenexit mouseUpend ifset LockScreen to truerepeat with n = 1 to Liput "ﾃ‡ﾂｻﾃ‡ﾂｵ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put char 1 of line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into GENput char 2 to 3 of line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into DCif GEN is not "ﾃｨ竏ｫ" and GEN is not  "ﾃｯﾎｩ" then next repeatif GEN is "ﾃｨ竏ｫ" then add 1925 to DCif GEN is "ﾃｯﾎｩ" then add 1988 to DCget the dateput char 1 to 4 of it into DDsubtract DC from DDadd 1 to DD ----ﾃｳﾃ ﾃｮNﾃｳpif ( DD <> 1 ) and  ( DD <> 2 ) and ( DD <> 6 ) and  ( DD <> 12 ) and ( DD <> 16 ) and  ( DD <> 22 ) and ( DD <> 26 ) and  ( DD <> 32 ) and ( DD <> 36 ) and  ( DD <> 42 ) and ( DD <> 46 ) and  ( DD <> 49 ) then next repeatif DD = 1 thenput "ﾃｨﾂｨﾃｨﾃ\ﾃ､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 2 thenput "ﾃｫﾃづｨﾃ\ﾃ､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 6 thenput "7ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 12 thenput "13ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 16 thenput "17ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 22 thenput "23ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 26 thenput "27ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 32 thenput "33ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 36 thenput "37ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 42 thenput "43ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 46 thenput "47ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"else if DD = 49 thenput "50ﾃ｢ﾃ津､ﾄｱ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"elseput "ﾃ‡ﾂｻﾃ‡ﾂｵ" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "ﾃｳﾃ ﾃｮN" into line n of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"end ifend repeatend ifend mouseUpon mouseDownplay "Click Down"end mouseDownon mouseWithinInflate "text" , "ﾃ､eﾃｭhﾃ｢竏†ﾃｯﾂ ﾃ‡ﾃεｮNﾃ｢ﾃ津‡ï｣ｿﾃｭ竕､ﾃ‡笳甘‡窶ｹﾃ‡竏妥③ﾃ‡ﾎｩﾃ‡ﾃｦﾃ‡ﾂｵﾃ②ﾃｭhﾃ｢竏†ﾃｯﾂ ﾃ‡ﾃε｢ﾋ凖ｱﾂｺﾃ‡邃｢ﾃｯ¥ﾃｩﾂｶﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡ﾃ暗ｯKﾃｳvﾃ‡邃｢ﾃ‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>82</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>349</left>
            <top>212</top>
            <right>408</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾋ凖ｱﾂｺﾃｭﾂｫﾃ｢ﾂ｡</name>
        <script>on mouseUpanswer "ﾃｭﾂｫﾃ｢ﾂ｡ﾃｯﾋ堙ｱ@ﾃ‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃ｢ﾋ凖ｱﾂｺﾃｧﾃ湘ｪﾂｨﾃ‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ‡竏妥‡ﾃ暗‡竏†ﾃ②ﾃ｢ﾋ凖ｱﾂｺﾃｧﾃ湘ｪﾂｨﾃ厩ﾃ運ﾃ叡ﾃ丑ﾃ‡ﾃｷﾃ 竅„ﾃｬﾃ†ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ•" or "ﾃ｢ﾋ凖ｱﾂｺﾃｧﾃ湘ｪﾂｨ"if it is "Cansel" then exit mouseUpif it is "ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ•" thenanswer "ﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃｭﾂｫﾃ｢ﾂ｡ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" then exit mouseUpset LockScreen to trueput empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"ask "ﾃｮNﾃ･ﾃｩﾃｬﾋ凖‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃ⑿ﾃｬﾃ津･ﾃ姪‡竕暗⒀" with "ﾃｯﾎｩﾃｮNﾃ･ﾃｩﾃｬﾋ™"put it into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"ask "ﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"put it into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"ask "ﾃｫ竕 ﾃｱﾂｺﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"put it into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"ask "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃ愿‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ"put it into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"ask "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃ愿‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with fld "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put it into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"show bkgnd button "ﾃ｢ﾋ凖ｱﾂｺﾃｬoﾃｲ^"answer "ﾃｪ竕･ﾃ‡ﾂｵﾃ‡ﾃ佚‡ﾃ催‡ﾅ津ｬoﾃｲ^ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"elseput fld "ﾃｩﾃ…ﾃｱﾂｺ" into Aput fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" into Bput fld "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ" into Cgo to stack "ﾃ｢ﾋ凖ｱﾂｺﾃｧﾃ湘ｪﾂｨ"put A into card fld "ﾃｩ{ﾃｩﾃづｱﾂｺ"put B into card fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ"put C into card fld "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"end ifend mouseUpon mouseWithinInflate "text" , "ﾃｪVﾃ‡ﾂｵﾃ‡竕 ﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃｭﾂｫﾃ｢ﾂ｡ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ‡竏妥‡竕暗‡窶ｦﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡ﾆ津‡窶 ﾃ‡ﾃ暗‡竏†ﾃ‡ﾂｴﾃ‡ﾃ陛⑿ﾃｭﾂｺﾃｪ竅„ﾃｬﾂｸﾃｳﾃ陛⒀ﾃ②ﾃ‡ﾂｪﾃ‡ﾂｧﾃ‡竕暗‡ﾂｻﾃ‡ﾂ｢ﾃ‡竏†ﾃ‡ﾂｴﾃ‡ﾃ陛⑿ﾃ｢ﾋ凖ｱﾂｺﾃｧﾃ湘ｪﾂｨﾃ⒀ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>85</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>106</left>
            <top>236</top>
            <right>390</right>
            <bottom>369</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ass</name>
        <script></script>
    </part>
    <part>
        <id>87</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>129</left>
            <top>236</top>
            <right>208</right>
            <bottom>253</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ･ﾃｨﾃｪﾃｮ</name>
        <script></script>
    </part>
    <part>
        <id>91</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>411</left>
            <top>288</top>
            <right>486</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>9</textSize>
        <textStyle>condense</textStyle>
        <textHeight>12</textHeight>
        <name>ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt</name>
        <script>on mouseUpset lockScreen to trueput word 2 of the clickLine into Lput line L of fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z" into sujiput kuraidori (suji) into KEIput line L of fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt" && "ﾃ｣窶｡ﾃ､z" & KEI & "ﾃ｢~" && line L of fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe" into MSGend mouseUp</script>
    </part>
    <part>
        <id>93</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>446</left>
            <top>288</top>
            <right>505</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z</name>
        <script>on mouseUpset lockScreen to trueput the clickText into sujiput kuraidori (suji) into KEIput word 2 of the clickLine into Lput line L of fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt" && "ﾃ｣窶｡ﾃ､z" & KEI & "ﾃ｢~" && line L of fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe" into MSGend mouseUp</script>
    </part>
    <part>
        <id>94</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>487</left>
            <top>288</top>
            <right>628</right>
            <bottom>386</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>9</textSize>
        <textStyle>condense</textStyle>
        <textHeight>12</textHeight>
        <name>ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe</name>
        <script>on mouseWithinset lockScreen to trueget the scroll of meset the scroll of field "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt" to itset the scroll of field "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z" to itset lockScreen to falseend mouseWithin-----on mouseUpif the rect of me is "487,288,628,386" thenlock screenset the rect of me to "411,288,628,386"set the textSize of me to 12set the textStyle of me to plainput the clickText into Fput word 2 of the clickLine into Lelse if the rect of me is "411,288,628,386" thenlock screenset the rect of me to "487,288,628,386"set the textSize of me to 9set the textStyle of me to condenseend if-----end mouseUp-----on mouseUpput the rect of me into msg-------end mouseUpon mouseUpset lockScreen to trueput word 2 of the clickLine into Lput line L of fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z" into sujiput kuraidori (suji) into KEIput line L of fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt" && "ﾃ｣窶｡ﾃ､z" & KEI & "ﾃ｢~" && line L of fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe" into MSGend mouseUp</script>
    </part>
    <part>
        <id>95</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>520</left>
            <top>256</top>
            <right>626</right>
            <bottom>273</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｧﾃ｡ﾃ･vﾃ｣窶｡ﾃ､z</name>
        <script></script>
    </part>
    <part>
        <id>96</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>414</left>
            <top>256</top>
            <right>520</right>
            <bottom>273</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｫﾅ津ｨ竄ｬﾃｩﾃ…ﾃｱﾂｺ</name>
        <script></script>
    </part>
    <part>
        <id>99</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>209</left>
            <top>87</top>
            <right>229</right>
            <bottom>107</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｮNﾃ｢ﾃ催閲ﾃ運ﾃ嘉ｬ</name>
        <script></script>
    </part>
    <part>
        <id>100</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>209</left>
            <top>106</top>
            <right>230</right>
            <bottom>126</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｭﾂ ﾃｪMﾃ閲ﾃ運ﾃ嘉ｬ</name>
        <script>on mouseUpend mouseUp</script>
    </part>
    <part>
        <id>101</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>209</left>
            <top>125</top>
            <right>230</right>
            <bottom>145</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｭIﾃ･oﾃ閲ﾃ運ﾃ嘉ｬ</name>
        <script>on mouseUpend mouseUp</script>
    </part>
    <part>
        <id>102</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>544</left>
            <top>235</top>
            <right>630</right>
            <bottom>263</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸ</name>
        <script>on mouseUpanswer "ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸﾃ‡ﾃε嘉･ﾃ榎ﾃ…[ﾃ曳ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ï｣ｿﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" then exit mouseUppush this cardglobal TENSOglobal COUNTset LockScreen to trueset cursor to 4put "ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸﾃ‡ﾃεｨﾃ„ﾃｮﾄｱﾃｭﾃ愿‡竕暗‡竏妥③" into MSGput number of cards into Lunmark all cardsgo to second cardrepeat with i = 1 to L - 1if the hilite of bkgnd button "ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸﾃ閲ﾃ運ﾃ嘉ｬ" is true thenmark this cardend ifif the number of this card is L then exit repeatgo to nextend repeatgo to second cardput "1" into Rput "1" into COUNTrepeat with i = 1 to L - 1if marked of this card is false thengo to nextelseput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line R of TENSOput "," & fld "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ" after line R of TENSOput "," & fld "ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœ" after line R of TENSOput "," & fld "ﾃｨZﾃｨﾃ､" after line R of TENSOput "," & fld "ﾃ｣ﾃ甘ｯ邃｢" after line R of TENSOput "," & fld "ﾃｬdﾃｲb" after line R of TENSOput "," & fld "FAX" after line R of TENSOput "," & fld "ﾃｯﾋš" after line R of TENSOadd 1 to Radd 1 to COUNTif the number of this card is L then exit repeatgo to nextend ifend repeatput "ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸﾃ‡竏妥‡ﾃ暗ｪlﾃｪﾃｮﾃ‡ﾃ•" & COUNT & "ﾃｪlﾃ‡竕暗‡竏妥③" into MSGgo to stack "ﾃｨZﾃｨﾃ､LIST" in a new windowput "1" into fld "ﾃ謁ﾃ…[ﾃ姥"put "0" into fld "No"repeat with i = 1 to 15put "ﾃｩﾃ…ﾃｱﾂｺ-" & i into TNput "ﾃｬdﾃｲb-" & i into TTput "ﾃｨZﾃｨﾃ､-" & i into TAput "ﾃ雨ﾃ影ﾃ唄ﾃ嘉､ﾃ…[-" & i into TCput "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ-" & i into TBput empty into fld TNput empty into fld TTput empty into fld TAput empty into fld TCput empty into fld TBend repeatput "1" into fld "No"put trunc(COUNT / 15) into Lrepeat with ik = 1 to L + 1put fld "No" into PPput PP & "ﾃｮ窶佚ｱ竅„ﾃ‡ï｣ｿﾃｨﾃｫﾃ‡ﾂｴﾃｧﾃｻﾃ‡ﾃ津‡竕暗‡ﾂ｢ﾃ‡窶ｹﾃ‡竏妥③" into MSG ------------------repeat with i = 1 to 15put "ﾃｩﾃ…ﾃｱﾂｺ-" & i into TNput "ﾃｬdﾃｲb-" & i into TTput "ﾃｨZﾃｨﾃ､-" & i into TAput "ﾃ雨ﾃ影ﾃ唄ﾃ嘉､ﾃ…[-" & i into TCput "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ-" & i into TBput item 1 of line PP of TENSO into fld TN -------------ﾃｩﾃ…ﾃｱﾂｺput item 6 of line PP of TENSO into line 1 of fld TT ---------ﾃｬdﾃｲbput item 7 of line PP of TENSO into line 2 of fld TT ----------FAXput item 3 of line PP of TENSO into line 1 of fld TA ---------ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœput item 4 of line PP of TENSO into line 2 of fld TA -----------ﾃｨZﾃｨﾃ､put "  " & item 8 of line PP of TENSO after line 2 of fld TA -----------ﾃｯﾋšput item 5 of line PP of TENSO into line 1 of fld TC ----------ﾃ｣ﾃ甘ｯ邃｢put item 2 of line PP of TENSO into line 1 of fld TB -----------ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœadd 1 to fld "No"put fld "No" into PPend repeatput fld "ﾃ謁ﾃ…[ﾃ姥" into PEJIdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"put PEJI + 1 into fld "ﾃ謁ﾃ…[ﾃ姥"end repeatdoMenu "ﾃ雨ﾃ…[ﾃ栄ﾃｧﾃ古ｨﾃｺ"pop cardplay "Intercom"put empty into MSGhide MSGanswer "ﾃ益ﾃ嘉､ﾃ嘉ｬﾃ曳ﾃｳpﾃｨZﾃｨﾃ､ﾃｲ^ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃｨZﾃｨﾃ､ﾃｲ^LISTﾃ厩ﾃ運ﾃ叡ﾃ丑ﾃ‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡ﾆ津益ﾃ嘉､ﾃ嘉ｬﾃ曳ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>103</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>544</left>
            <top>264</top>
            <right>630</right>
            <bottom>292</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ 竏づｱﾂｺﾃ ﾃ崚ｧﾂｸ</name>
        <script>on mouseUpanswer "ﾃ 竏づｱﾂｺﾃ ﾃ崚ｧﾂｸﾃ‡ﾃε嘉･ﾃ榎ﾃ…[ﾃ曳ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" then exit mouseUpanswer "ﾃ ﾃ崚ｧﾂｸﾃ‡竏妥‡ﾃ暗ｨï｣ｿﾃ･ﾃｨﾃ‡ï｣ｿﾃｫIﾃ‡ﾃ津‡竕暗｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "Cansel" or "ﾃｮNﾃ｢ﾃ" or "ﾃｭﾂ ﾃｪM"if it is "Cansel" then exit mouseUpput it & "ﾃ閲ﾃ運ﾃ嘉ｬ" into GGGpush this cardset LockScreen to trueset cursor to 4put number of cards into Lunmark all cardsgo to second cardput empty into COUNTrepeat with i = 1 to L - 1if the hilite of bkgnd button GGG is true thenmark this cardadd 1 to COUNT ------ﾃｫﾃｧﾃｪﾃｮend ifif the number of this card is L then exit repeatgo to nextend repeatgo to second cardput "1" into Rrepeat with i = 1 to L - 1if marked of this card is false thengo to nextelseput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line R of TENSOput "," & fld "ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœ" after line R of TENSOput "," & fld "ﾃｨZﾃｨﾃ､" after line R of TENSOput "," & fld "ﾃｯﾋš" after line R of TENSOadd 1 to Rif the number of this card is L then exit repeatgo to nextend ifend repeatgo to stack "ﾃ 竏づｱﾂｺLIST" in a new windowput empty into fld "as"put TENSO into fld "as"get number of lines of fld "as"put trunc(it / 20) into Lput L into MSGput "1" into Wrepeat with m = 1 to Lrepeat with i = 1 to 20put "ﾃｩﾃ…ﾃｱﾂｺ" & i into TNput "ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœ" & i into TTput "ﾃｨZﾃｨﾃ､" & i into TAput "ﾃｯﾋš" & i into TTAput item 1 of line W of fld "as" into fld TNput item 2 of line W of fld "as" into line 1 of fld TTput item 3 of line W of fld "as" into line 1 of fld TAif item 4 of line W of fld "as" is not empty thenput item 4 of line W of fld "as" & "ﾃｳlﾃｯﾋš" into line 1 of fld TTAend ifadd 1 to Wend repeatdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"end repeatdoMenu "ﾃ雨ﾃ…[ﾃ栄ﾃｧﾃ古ｨﾃｺ"put empty into fld "as"pop cardplay "Intercom"answer "ﾃ 竏づｱﾂｺﾃ ﾃ崚ｧﾂｸﾃｳpﾃ‡ﾃε雨ﾃ…[ﾃ栄ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃ① ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ益ﾃ嘉､ﾃ嘉ｬﾃ曳ﾃｪ窶ｺﾃｭﾃ凝‡ï｣ｿﾃ②ﾃ益ﾃ嘉､ﾃ嘉ｬﾃ曳ﾃｳﾃε ﾃ甘､gﾃｫﾃづ②ﾃｮ{ﾃｳﾂｶ90ﾃ②ﾃ｢ﾂｰﾃ･ﾂｸﾃ‡ﾂｴﾃ②ﾃ‡窶ｦﾃｪ窶ｺﾃｭﾃ凝‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>104</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>544</left>
            <top>293</top>
            <right>630</right>
            <bottom>322</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ ﾃ崚ｧﾂｸ</name>
        <script>on mouseUpglobal DATAPOOLput empty into DATAPOOLanswer "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ ﾃ崚ｧﾂｸﾃ‡ﾃε嘉･ﾃ榎ﾃ…[ﾃ曳ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpset LockScreen to trueset cursor to 4push this cardput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA1" into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of DATAPOOLadd 1 to Lend repeatclose file QFILEpush this cardgo to stack "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 LIST" in a new windowput "1" into fld "ﾃ謁ﾃ…[ﾃ姥"put  fld "ﾃ謁ﾃ…[ﾃ姥" & "ﾃｯ竕暗‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿‡竕暗‡竏妥③" into MSGput empty into fld "as"put DATAPOOL into fld "as"put char 1 to 4 of line 1 of fld "as" into NENput NEN into line 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put number of lines of fld "as" into Lrepeat with i = 1 to Lput number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into Pif P = 40 thenput fld "ﾃ謁ﾃ…[ﾃ姥" into PEJIdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"put PEJI + 1 into fld "ﾃ謁ﾃ…[ﾃ姥"put  fld "ﾃ謁ﾃ…[ﾃ姥" & "ﾃｯ竕暗‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿‡竕暗‡竏妥③" into MSGput "0" into Pend ifadd 1 to Pput char 1 to 4 of line i of fld "as" into NENput item 1 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃｩﾃ…ﾃｱﾂｺ"put item 5 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"add 1 to iif char 1 to 4 of line i of fld "as" is not NEN thenif P = 40 thenput fld "ﾃ謁ﾃ…[ﾃ姥" into PEJIdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"put PEJI + 1 into fld "ﾃ謁ﾃ…[ﾃ姥"put char 1 to 4 of line i of fld "as" into line 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"elseput char 1 to 4 of line i of fld "as" into line P + 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"end ifsubtract 1 from iend ifsubtract 1 from iend repeatpop cardput empty into DATAPOOLput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA2" into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of DATAPOOLadd 1 to Lend repeatclose file QFILEgo to last card of stack "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 LIST"put empty into fld "as"put DATAPOOL into fld "as"put char 1 to 4 of line 1 of fld "as" into NENput number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into Pput NEN into line P + 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put number of lines of fld "as" into Lrepeat with i = 1 to Lput number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into Pif P = 40 thenput fld "ﾃ謁ﾃ…[ﾃ姥" into PEJIdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"put PEJI + 1 into fld "ﾃ謁ﾃ…[ﾃ姥"put  fld "ﾃ謁ﾃ…[ﾃ姥" & "ﾃｯ竕暗‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿‡竕暗‡竏妥③" into MSGput "0" into Pend ifadd 1 to Pput char 1 to 4 of line i of fld "as" into NENput item 1 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃｩﾃ…ﾃｱﾂｺ"put item 5 of line i of fld "as" into line P of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"add 1 to iif char 1 to 4 of line i of fld "as" is not NEN thenif P = 40 thenput fld "ﾃ謁ﾃ…[ﾃ姥" into PEJIdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"put PEJI + 1 into fld "ﾃ謁ﾃ…[ﾃ姥"put  fld "ﾃ謁ﾃ…[ﾃ姥" & "ﾃｯ竕暗‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿‡竕暗‡竏妥③" into MSGput char 1 to 4 of line i of fld "as" into line 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"elseput char 1 to 4 of line i of fld "as" into line P + 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"end ifsubtract 1 from iend ifsubtract 1 from iend repeatpop cardplay "Intercom"put empty into MSGhide MSGanswer "ﾃ益ﾃ嘉､ﾃ嘉ｬﾃ曳ﾃｳpﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 LISTﾃ厩ﾃ運ﾃ叡ﾃ丑ﾃ‡ï｣ｿﾃｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡ﾆ津益ﾃ嘉､ﾃ嘉ｬﾃ曳ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>105</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>544</left>
            <top>323</top>
            <right>630</right>
            <bottom>352</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｨoﾃｮ[ﾃｯﾃ偲ｧﾃ湘ｪﾂｨ</name>
        <script>on mouseUpanswer "ﾃ‡窶ｹﾃ‡ﾃｦﾃ②ﾃｧﾃ湘ｪﾂｨﾃｬrﾃｭﾃ愿‡竕暗‡竏‘"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>108</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>209</left>
            <top>144</top>
            <right>230</right>
            <bottom>164</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸﾃ閲ﾃ運ﾃ嘉ｬ</name>
        <script>on mouseUpend mouseUp</script>
    </part>
    <part>
        <id>109</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>209</left>
            <top>162</top>
            <right>230</right>
            <bottom>182</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾋ凖ｱﾂｺﾃ ﾃ崚ｧﾂｸﾃ閲ﾃ運ﾃ嘉ｬ</name>
        <script>on mouseUpend mouseUp</script>
    </part>
    <part>
        <id>113</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>474</left>
            <top>249</top>
            <right>511</right>
            <bottom>265</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ謁ﾃ…[ﾃ姥ﾃｯ¥ﾃｩﾂｶ</name>
        <script></script>
    </part>
    <part>
        <id>114</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>0</left>
            <top>99</top>
            <right>567</right>
            <bottom>202</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>TENSO</name>
        <script></script>
    </part>
    <part>
        <id>119</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>605</left>
            <top>31</top>
            <right>625</right>
            <bottom>159</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name></name>
        <script></script>
    </part>
    <part>
        <id>120</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>593</left>
            <top>216</top>
            <right>636</right>
            <bottom>233</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ‡窶｡ﾃ…[ﾃ‡ﾂｫ</name>
        <script></script>
    </part>
    <part>
        <id>122</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>83</left>
            <top>212</top>
            <right>174</right>
            <bottom>232</bottom>
        </rect>
        <style>opaque</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｮNﾃ｢ﾃ津ｯ¥ﾃｧﾃ湘ｪﾂｨ</name>
        <script>on mouseUpglobal MSglobal Yset LockScreen to trueset cursor to 4put char 1 to 4 of the short date into Yadd 1 to Yask "ﾃｮNﾃ｢ﾃ津ｯ¥ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡ﾎｩﾃ‡ﾂ｢ﾃｮN(ﾃｳﾃ ﾃｮNﾃ‡ﾃ•" & Y & "ﾃｮNﾃ‡竕暗‡竏‘)ﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"if it is empty thenhide meexit mouseUpend ifput it into fld "Y"----------put it into Yput empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put "ﾃ ﾃ催ｩﾂｸﾃ､ﾄｱ" into line 1 of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃ ﾃ催ｩﾂｸﾃ､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "1" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｩOﾃｩﾂｸﾃ､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｩOﾃｩﾂｸﾃ､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "2" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｩﾂｵﾃｩﾂｸﾃ､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "6" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "12" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "16" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｬﾃ津ｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｬﾃ津ｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "22" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｬﾃ津ｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｬﾃ津ｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "26" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｩOﾃｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｩOﾃｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "32" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｩOﾃｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｩOﾃｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "36" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｩlﾃｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｩlﾃｨ¥ﾃｩOﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "42" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃｩlﾃｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃｩlﾃｨ¥ﾃｩﾂｵﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "46" into MSKEISANget the number of lines of  fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to itput "ﾃ･窶ｹﾃｨ¥ﾃ｢ﾃ津､ﾄｱ" into line it of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃ･窶ｹﾃｨ¥ﾃ｢ﾃ津､ﾄｱﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃｭﾃ愿③" into MSGput "49" into MSKEISANput empty into MSGopen file "ﾃｮNﾃ｢ﾃ津ｯ¥"put the number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into LLrepeat with i = 1 to LLwrite line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" & tab to file "ﾃｮNﾃ｢ﾃ津ｯ¥"write line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ" & return to file "ﾃｮNﾃ｢ﾃ津ｯ¥"end repeathide meclose file "ﾃｮNﾃ｢ﾃ津ｯ¥"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"beepput "ﾃ穎ﾃ韻ﾃ英ﾃ…[ﾃ雨ﾃ…[ﾃ栄ﾃ‡ﾃε液ﾃ羽ﾃ嘉｣ﾃ雲ﾃ‡窶ｦﾃｮNﾃ｢ﾃ津ｯ¥ﾃ‡ï｣ｿﾃｯ竄ｬﾃｫ竏づ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③" into MSGend mouseUpon KEISANglobal MSglobal Yglobal HYOUJIglobal LINglobal HENKANglobal tHENKANglobal nHENKANput empty into HENKANput fld "Y" into Ysubtract MS from Yput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & Y into QFILEopen file QFILEput "1" into Lput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"repeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILEput number of lines of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into KKKput number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into RGENGONENHENKANput "ﾃ⑿" & HYOUJI & HENKAN & "ﾃｮNﾃ⒀" after line R of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"add 1 to Rrepeat with LIN = 1 to KKKTSUKIHENKANHIHENKANput tHENKAN & "ﾃ･ﾃｩ" & nHENKAN & "ﾃｬﾋ™" into line R of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 3 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" & "ﾃｬa" into line R of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"add 1 to Rput empty into tHENKANend repeat--------beepend KEISANon GENGOglobal LINglobal HYOUJIif char 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "ﾃｯﾎｩ" then put "ﾃｯﾎｩﾃｪﾂｨ" into HYOUJIif char 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "ﾃｨ竏ｫ" then put "ﾃｨ竏ｫﾃｲa" into HYOUJIend GENGOon NENHENKANglobal LINglobal HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "0" then put "" after HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "1" then put "ﾃｨ¥" after HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "2" then put "ﾃｬﾃ津ｨ¥" after HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "3" then put "ﾃｩOﾃｨ¥" after HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "4" then put "ﾃｩlﾃｨ¥" after HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "5" then put "ﾃ･窶ｹﾃｨ¥" after HENKANif char 2 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "6" then put "ﾃｲZﾃｨ¥" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "0" then put "ﾃｨ¥" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "1" then put "ﾃ ﾃ" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "2" then put "ﾃｬﾃ’" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "3" then put "ﾃｩO" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "4" then put "ﾃｩl" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "5" then put "ﾃ･窶ｹ" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "6" then put "ﾃｲZ" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "7" then put "ﾃｩﾂｵ" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "8" then put "ﾃｮ邃｢" after HENKANif char 3 of item 1 of line 1 of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "9" then put "ﾃ｣窶ž" after HENKANend NENHENKANon TSUKIHENKANglobal LINglobal tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "01" then put "ﾃ ﾃ" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "02" then put "ﾃｬﾃ’" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "03" then put "ﾃｩO" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "04" then put "ﾃｩl" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "05" then put "ﾃ･窶ｹ" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "06" then put "ﾃｲZ" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "07" then put "ﾃｩﾂｵ" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "08" then put "ﾃｮ邃｢" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "09" then put "ﾃ｣窶ž" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "10" then put "ﾃｨ¥" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "11" then put "ﾃｨ¥ﾃ ﾃ" into tHENKANif char 5 to 6 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "12" then put "ﾃｨ¥ﾃｬﾃ’" into tHENKANend TSUKIHENKANon HIHENKANglobal LINglobal nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "01" then put "ﾃ ﾃ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "02" then put "ﾃｬﾃ’" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "03" then put "ﾃｩO" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "04" then put "ﾃｩl" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "05" then put "ﾃ･窶ｹ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "06" then put "ﾃｲZ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "07" then put "ﾃｩﾂｵ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "08" then put "ﾃｮ邃｢" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "09" then put "ﾃ｣窶ž" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "10" then put "ﾃｨ¥" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "11" then put "ﾃｨ¥ﾃ ﾃ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "12" then put "ﾃｨ¥ﾃｬﾃ’" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "13" then put "ﾃｨ¥ﾃｩO" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "14" then put "ﾃｨ¥ﾃｩl" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "15" then put "ﾃｨ¥ﾃ･窶ｹ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "16" then put "ﾃｨ¥ﾃｲZ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "17" then put "ﾃｨ¥ﾃｩﾂｵ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "18" then put "ﾃｨ¥ﾃｮ邃｢" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "19" then put "ﾃｨ¥ﾃ｣窶ž" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "20" then put "ﾃｬﾃ津ｨ¥" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "21" then put "ﾃｬﾃ津ｨ¥ﾃ ﾃ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "22" then put "ﾃｬﾃ津ｨ¥ﾃｬﾃ’" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "23" then put "ﾃｬﾃ津ｨ¥ﾃｩO" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "24" then put "ﾃｬﾃ津ｨ¥ﾃｩl" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "25" then put "ﾃｬﾃ津ｨ¥ﾃ･窶ｹ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "26" then put "ﾃｬﾃ津ｨ¥ﾃｲZ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "27" then put "ﾃｬﾃ津ｨ¥ﾃｩﾂｵ" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "28" then put "ﾃｬﾃ津ｨ¥ﾃｮ邃｢" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "29" then put "ﾃｬﾃ津ｨ¥ﾃ｣窶ž" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "30" then put "ﾃｩOﾃｨ¥" into nHENKANif char 8 to 9 of item 1 of line LIN of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" is "31" then put "ﾃｩOﾃｨ¥ﾃ ﾃ" into nHENKANend HIHENKAN</script>
    </part>
    <part>
        <id>123</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>413</left>
            <top>229</top>
            <right>575</right>
            <bottom>245</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>124</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>411</left>
            <top>217</top>
            <right>573</right>
            <bottom>233</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>putDATANumber</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>125</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>468</left>
            <top>230</top>
            <right>630</right>
            <bottom>246</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Y</name>
        <script></script>
    </part>
    <part>
        <id>127</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>14</left>
            <top>251</top>
            <right>110</right>
            <bottom>384</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｮNﾃ･ﾃｩﾃｬﾋ™</name>
        <script></script>
    </part>
    <part>
        <id>128</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>88</left>
            <top>251</top>
            <right>136</right>
            <bottom>384</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄</name>
        <script></script>
    </part>
    <part>
        <id>129</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>119</left>
            <top>251</top>
            <right>287</right>
            <bottom>384</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>C</name>
        <script></script>
    </part>
    <part>
        <id>130</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>251</left>
            <top>251</top>
            <right>386</right>
            <bottom>384</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>D</name>
        <script></script>
    </part>
    <part>
        <id>131</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>369</left>
            <top>251</top>
            <right>456</right>
            <bottom>384</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>E</name>
        <script></script>
    </part>
    <part>
        <id>132</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>437</left>
            <top>251</top>
            <right>512</right>
            <bottom>384</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textHeight>16</textHeight>
        <name>F</name>
        <script>on mouseWithinset lockScreen to trueget the scroll of meset the scroll of field "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" to itset the scroll of field "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄" to itset the scroll of field "C" to itset the scroll of field "D" to itset the scroll of field "E" to itset lockScreen to falseend mouseWithin</script>
    </part>
    <part>
        <id>133</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>211</left>
            <top>217</top>
            <right>282</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>DD</name>
        <script></script>
    </part>
    <part>
        <id>134</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>387</left>
            <top>217</top>
            <right>483</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>EE</name>
        <script></script>
    </part>
    <part>
        <id>135</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>530</left>
            <top>301</top>
            <right>576</right>
            <bottom>321</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾂｻﾃｱ竅„</name>
        <script>on mouseUpif the optionKey is down thenanswer "ﾃ｢ﾂｻﾃｱ竅„ﾃ‡ï｣ｿﾃｯﾅ禿ｧXﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨ﾃ⑿ﾃｩﾋ堙ｬﾂｸﾃ｢ﾂｻﾃｱ竅„ﾃ‡ﾃ•3ﾃ②ﾃｩxﾃｨoﾃ｢ﾂｻﾃｱ竅„ﾃ‡ﾃ•13ﾃ‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥‡邃｢ﾃ②ﾃ｢ﾂｻﾃｱ竅„ﾃｪﾃｮﾃ‡ï｣ｿﾃｫﾃｹﾃ‡窶堙‡竏妥‡ﾂｱﾃ‡竏†ﾃ‡ﾃ陛ｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③ﾃ⒀" with "OK" or "Cansel"if it is "Cansel" then exit mouseUprepeat with i = 1 to 3ask "ﾃｩﾋ堙ｬﾂｸﾃ｢ﾂｻﾃｱ竅„ﾃ‡ﾃƒ" & i & "ﾃ‡ï｣ｿﾃｯﾅ禿ｧXﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③Canselﾃ‡竏妥‡ﾃ暗‡竏†ﾃ｣ﾃ崚ｮﾃｭﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③" with line i of meput it into line i of meput "(ﾃ･ﾃｼ) " & it into line i of bkgnd button "ﾃ｢ﾂｻﾃｱ竅„ﾃ･ﾃｼﾃｧﾄｱ"end repeatrepeat with i = 5 to 17ask "ﾃｩxﾃｨoﾃ｢ﾂｻﾃｱ竅„ﾃ‡ﾃƒ" & i - 4 & "ﾃ‡ï｣ｿﾃｯﾅ禿ｧXﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③Canselﾃ‡竏妥‡ﾃ暗‡竏†ﾃ｣ﾃ崚ｮﾃｭﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③" with line i of meput it into line i of meput "(ﾃ･ﾃｼ) " & it into line i of bkgnd button "ﾃ｢ﾂｻﾃｱ竅„ﾃ･ﾃｼﾃｧﾄｱ"end repeatend ifput the selectedText of me into fld "ﾃ｢ﾂｻﾃｱ竅„"if word 2 of the selectedLine of me is not "4" thenput empty into bkgnd button " ﾃ｣Lﾃｭ窶 "put word 2 of the selectedLine of me into bkgnd button " ﾃ｣Lﾃｭ窶 "end ifend mouseUpon mouseEnterset the style of me to popupend mouseEnteron mouseLeaveset the style of me to transparentend mouseLeaveon mouseWithinInflate "text" , "ﾃ､Yﾃｬﾃｱﾃ‡竏妥‡ﾃ暗｢ﾂｻﾃｱ竅„ﾃ‡ï｣ｿﾃ‡ﾂｱﾃ‡ﾂｱﾃ‡ﾂｩﾃ‡ﾃﾃｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ｢ﾂｻﾃｱ竅„ﾃｩﾂｩﾃｫﾃε‡ï｣ｿﾃｯﾅ禿ｧXﾃ‡竏妥‡ﾃ暗ｨﾃ催ｧﾃ｡ﾃ‡ﾃ陛②ﾃ迂ﾃ益ﾃ鰻ﾃ嘉｡ﾃ嘉ｬﾃ鵜ﾃ…[ﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡邃｢ﾃ‡ﾃﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>136</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>577</left>
            <top>301</top>
            <right>623</right>
            <bottom>321</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｬEﾃｳv</name>
        <script>on mouseUpput the selectedText of me into ATif char 3 of At is "ﾃ⑿" thenask "ﾃ｢ﾎｩﾃ｢竏†ﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"put it after char 3 of ATput AT into fld "ﾃｬEﾃｳv"elseput AT into fld "ﾃｬEﾃｳv"end ifend mouseUpon mouseEnterset the style of me to popupend mouseEnteron mouseLeaveset the style of me to transparentend mouseLeaveon mouseWithinInflate "text" , "ﾃ､Yﾃｬﾃｱﾃ‡竏妥‡ﾃ暗ｬEﾃｳvﾃ‡ï｣ｿﾃ‡ﾂｱﾃ‡ﾂｱﾃ‡ﾂｩﾃ‡ﾃﾃｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃｬEﾃｳvﾃｩﾂｩﾃｫﾃε‡ï｣ｿﾃｯﾅ禿ｧXﾃ‡窶ｹﾃ‡ﾎｩﾃ‡ﾃ陛ｭﾂｫﾃ｢ﾂ｡ﾃ‡竏妥‡ﾃ暗ｩﾃｻﾃ‡ﾃ陛②ﾃ迂ﾃ益ﾃ鰻ﾃ嘉｡ﾃ嘉ｬﾃ鵜ﾃ…[ﾃ‡ï｣ｿﾃ｢ﾃｼﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡邃｢ﾃ‡ﾃﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>138</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <false /> </enabled>
        <rect>
            <left>531</left>
            <top>322</top>
            <right>623</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name> ﾃ｣Lﾃｭ窶 </name>
        <script>on mouseUpif fld "ﾃ｣窶｡ﾃ､z" is empty thenanswer "ﾃ｣窶｡ﾃ､zﾃ‡邃｢ﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"exit mouseUpend ifif fld "ﾃｬﾋ凖ｯt" is empty thenanswer "ﾃｬﾋ凖ｯtﾃ‡邃｢ﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"exit mouseUpend ifset cursor to 4set LockScreen to trueif fld "ﾃ､mﾃｮF" is "ﾃ､mﾃｮF" thenput empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put empty into fld "C"put empty into fld "D"put empty into fld "E"put empty into fld "F"put empty into fld "ﾃ､mﾃｮF"end ifget number of lines of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put fld "ﾃ｢ﾂｻﾃｱ竅„" into line it + 1 of fld "D"put fld "ﾃｬEﾃｳv" into line it + 1 of fld "C"put char 1 to 5 of fld "ﾃｬﾋ凖ｯt" into Aput char 6 to 7 of fld "ﾃｬﾋ凖ｯt" into Bput char 9 to 10 of fld "ﾃｬﾋ凖ｯt" into Cput A & B & "/" & C into line it + 1 of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"if me is "1" thenput "10" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "E"end ifif me is "2" thenput "11" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "E"end ifif me is "3" thenput "12" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "E"end ifif me is "5" thenput "20" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "6" thenput "21" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "7" thenput "22" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "8" thenput "23" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "9" thenput "24" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "10" thenput "25" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "11" thenput "26" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "12" thenput "27" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "13" thenput "28" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "14" thenput "29" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "15" thenput "30" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "16" thenput "31" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifif me is "17" thenput "32" into line it + 1 of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put fld "ﾃ｣窶｡ﾃ､z" into line it + 1 of fld "F"end ifenable bkgnd btn " ﾃｬoﾃｲ^"disable meput empty into fld "ﾃ｢ﾂｻﾃｱ竅„"put empty into fld "ﾃｬEﾃｳv"put empty into fld "ﾃ｣窶｡ﾃ､z"put empty into fld "ﾃｬﾋ凖ｯt"end mouseUpon mouseWithinInflate "text" , "ﾃｬﾂｸﾃｳﾃ陛‡ﾂｵﾃ‡ﾎｩﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｧ竏づ‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃ｣Lﾃｭ窶 ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>139</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <false /> </enabled>
        <rect>
            <left>531</left>
            <top>342</top>
            <right>623</right>
            <bottom>363</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name> ﾃｬoﾃｲ^</name>
        <script>on mouseUpanswer "ﾃ‡ﾂｱﾃ‡ﾃεｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ‡ï｣ｿﾃ｣Lﾃｭ窶 ﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cancel" or "OK"if it is "Cancel" thenanswer "ﾃ｣Lﾃｭ窶 ﾃｬoﾃｲ^ﾃ‡邃｢ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣ﾃ‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃｧﾂｰﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃ｣Lﾃｭ窶 ﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡ﾃ暗映ﾃ…[ﾃ運ﾃ‡窶｡ﾃｨﾂ｡ﾃ｣ﾃｩﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cancel" or "OK"if it is "OK" thenset lockScreen to trueput empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put empty into fld "C"put empty into fld "D"put empty into fld "E"put empty into fld "F"disable meexit mouseUpelseexit mouseUpend ifend ifput the date into Mput char 1 to 4 of M into Jput char 6 to 7 of M into Qif Q < 4 thenanswer "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx" into WWend ifelseanswer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WWend ifend ifset lockScreen to trueset cursor to busyput the number of lines of field "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into YUput empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["repeat with L = 1 to YUput line L of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put "," & line L of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put "," & line L of fld "C" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put "," & line L of fld "D" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put "," & line L of fld "E" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put "," & line L of fld "F" & ",ﾃ…ﾃｮ," after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["end repeatput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Qopen file Qput the number of lines of field "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Lwrite return to file Q at endwrite fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" to file Q at endclose file Qput "ﾃ､mﾃｮF" into fld "ﾃ､mﾃｮF"put empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put empty into fld "C"put empty into fld "D"put empty into fld "E"put empty into fld "F"disable meplay "Expired"put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["end mouseUpon mouseWithinInflate "text" , "ﾃ｣Lﾃｭ窶 ﾃ‡竕･ﾃ‡ﾃ催‡ﾎｩﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃ ﾃ催､ﾃ｡ﾃ‡窶ｦﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ‡窶ｹﾃ‡竏†ﾃ‡ïｬづ‡ﾆ津ｬoﾃｲ^ﾃ‡ﾂｵﾃ‡ﾎｩﾃｯﾋ堙‡邃｢ﾃ･ﾂｯﾃｳﾂｶﾃｬIﾃ‡竕暗‡竏‘"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>140</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>16</left>
            <top>216</top>
            <right>83</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ･ﾃｩﾃ･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpask "ﾃ･ﾃｼﾃｧﾄｱﾃ‡竏妥‡ﾃ暗･ﾃｩﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ⑿ﾃｬﾃ津･ﾃ姪‡竕暗⒀"if it is empty then exit mouseUpput it into PMONTHset cursor to 4set LockScreen to trueput empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put the destination into WHEREput the date into Mput char 1 to 4 of M into Jput char 6 to 7 of M into Qif Q < 4 thenanswer "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx" into WWend ifelseanswer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WWend ifend ifset cursor to 4set LockScreen to trueput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into QFILEopen file QFILErepeatRead from file QFILE until ""put it after fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["if it is empty then exit repeatend repeatclose file QFILEsort lines of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" dateTime by word 1 of eachput "ﾃ､mﾃｮF" into fld "ﾃ､mﾃｮF"put "/" & PMONTH & "/" into FindMonthAfind FindMonthA in fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["if the result is not empty thenanswer "ﾃ‡ﾂｪﾃ‡ﾃε･ﾃｩﾃ‡ﾃ陛‡窶ｹﾃ‡ﾃｦﾃ｣Lﾃｬﾂｸﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["exit mouseUpend ifput the foundLine into MLINEput word 2 of MLINE into ALINEput "1" into LINESput empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put empty into fld "C"put empty into fld "D"put empty into fld "E"put empty into fld "F"repeatput item 1 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put char 6 to 7 of item 1 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Zput item 2 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put item 2 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Numput item 3 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "C"put item 4 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "D"put item 5 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "E"put item 6 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "F"add 1 to ALINEif char 6 to 7 of item 1 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" is not Z then exit repeatadd 1 to LINESend repeatput empty into fld "CC"put empty into fld "DD"put empty into fld "EE"put number of lines of fld "E" into Wput line 1 of fld "E" into KKrepeat with i = 2 to Wadd line i of fld "E" to KKend repeatput KK into sujiput kuraidori (suji) into fld "DD"if fld "DD" is "0" then put empty into fld "DD"put number of lines of fld "F" into Wput line 1 of fld "F" into Krepeat with i = 2 to Wadd line i of fld "F" to Kend repeatput K into sujiput kuraidori (suji) into fld "CC"if fld "CC" is "0" then put empty into fld "CC"put KK - K into sujiput kuraidori (suji) into fld "EE"show fld "DD"show fld "CC"show fld "EE"put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["play "Ding"end mouseUpon mouseWithinInflate "text" , "ﾃ･ﾃｩﾃ‡ﾃε･ﾃｼﾃｧﾄｱﾃ‡窶ｦﾃｩgﾃｳpﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>144</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>532</left>
            <top>234</top>
            <right>625</right>
            <bottom>253</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｢ﾂｻﾃｱ竅„</name>
        <script>on mouseWithinInflate "text" , "ﾃ｢ﾂｻﾃｱ竅„ﾃ榎ﾃ叡ﾃ益ﾃ陰ﾃ叡ﾃ益ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡竕暗ｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡ﾎｩﾃ｢ﾂｻﾃｱ竅„ﾃ‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>145</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>537</left>
            <top>251</top>
            <right>630</right>
            <bottom>268</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬEﾃｳv</name>
        <script>on mouseUpask "ﾃｬEﾃｳvﾃ‡ﾃεｬ窶｡ﾃｳeﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"if it is empty then exit mouseUpput it into meend mouseUpon mouseWithinInflate "text" , "ﾃｬEﾃｳvﾃ榎ﾃ叡ﾃ益ﾃ陰ﾃ叡ﾃ益ﾃ閲ﾃ運ﾃ嘉ｬﾃ‡竕暗ｫIﾃｫï｣ｿﾃ‡ﾂｵﾃ‡ﾎｩﾃ｢ﾂｻﾃｱ竅„ﾃ‡邃｢ﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③ﾃ､Yﾃｬﾃｱﾃ‡竏妥‡ﾃ暗ｬEﾃｳvﾃ‡邃｢ﾃ‡ﾂｻﾃ‡ﾂ｢ﾃｨﾃ催ｧﾃ｡ﾃ‡窶ｦﾃ‡ﾃ陛②ﾃ‡ﾂｱﾃ‡ﾃε液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithin</script>
    </part>
    <part>
        <id>146</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>540</left>
            <top>268</top>
            <right>626</right>
            <bottom>285</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ｣窶｡ﾃ､z</name>
        <script>on mouseUpask "ﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢"if it is empty then exit mouseUpput it into fld "ﾃ｣窶｡ﾃ､z"end mouseUpon mouseWithinInflate "text" , "ﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾃ暗‡竏†ﾃ‡ﾂｴﾃ‡窶ｦﾃ②ﾃ‡ﾂｱﾃ‡ﾂｱﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>147</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>540</left>
            <top>283</top>
            <right>626</right>
            <bottom>299</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬﾋ凖ｯt</name>
        <script>on mouseUpask "ﾃｬﾋ凖ｯtﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢" with the short dateif it is empty then exit mouseUpput char 1 to 4 of it into NENput char 6 to 7 of it into TSUKIput char 9 to 10 of it into HIput NEN & "/" & TSUKI & "/" & HI into fld "ﾃｬﾋ凖ｯt"---show bkgnd btn "ﾃ｣Lﾃｭ窶 "enable bkgnd btn " ﾃ｣Lﾃｭ窶 "---hide bkgnd btn "ﾃ｣Lﾃｭ窶 ﾃｩﾃ甘‡ﾃ凝ｨﾂ｡ﾃ‡ﾂｵ"end mouseUpon mouseWithinInflate "text" , "ﾃｬﾋ凖ｯtﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾃ暗‡竏†ﾃ‡ﾂｴﾃ‡窶ｦﾃ②ﾃ‡ﾂｱﾃ‡ﾂｱﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>148</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>474</left>
            <top>312</top>
            <right>560</right>
            <bottom>329</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃ､mﾃｮF</name>
        <script></script>
    </part>
    <part>
        <id>149</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>5</left>
            <top>339</top>
            <right>530</right>
            <bottom>387</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[</name>
        <script></script>
    </part>
    <part>
        <id>150</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>286</left>
            <top>217</top>
            <right>370</right>
            <bottom>232</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>CC</name>
        <script></script>
    </part>
    <part>
        <id>152</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>158</left>
            <top>217</top>
            <right>185</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｩﾋ堙ｩxﾃ･vﾃｩZ</name>
        <script>on mouseUpset lockScreen to trueput empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put the destination into WHEREput the date into Mput char 1 to 4 of M into Jput char 6 to 7 of M into Qif Q < 4 thenanswer "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx" into WWend ifelseanswer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WWend ifend ifput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Qopen file QrepeatRead from file Q until ""put it after fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["if it is empty then exit repeatend repeatclose file Qput number of lines of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Kput empty into SUMCput empty into SUMDrepeat with R = 1 to Kif item 5 of line R of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" is not empty thenput item 5 of line R of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into SSaput SSa & "," after SUMDend ifif item 6 of line R of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" is not empty thenput item 6 of line R of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into SSbput SSb & "," after SUMCend ifadd 1 to Rend repeatget sum (SUMD)put it into fld "DD"get sum (SUMC)put it into fld "CC"put fld "DD" - fld "CC" into fld "EE"put fld "DD" into sujiput kuraidori (suji) into fld "DD"put fld "CC" into sujiput kuraidori (suji) into fld "CC"put fld "EE" into sujiput kuraidori (suji) into fld "EE"play "Ding"put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["end mouseUpon mouseWithinInflate "text" , "ﾃｮNﾃ､窶佚‡ﾃεｩﾋ堙ｩxﾃ‡ï｣ｿﾃ･vﾃｩZﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>153</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>83</left>
            <top>381</top>
            <right>266</right>
            <bottom>399</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>SF</name>
        <script></script>
    </part>
    <part>
        <id>154</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>543</left>
            <top>352</top>
            <right>629</right>
            <bottom>381</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾃ氾ｮﾃ”/ﾃｮNﾃ｢ﾃ津ｭﾂ ﾃｭm</name>
        <script>on mouseUpanswer "ﾃｮNﾃ｢ﾃ津ｭﾂ ﾃｭmﾃ｢ﾃ氾ｮﾃ氾 ﾃ\ﾃｳﾃ､ﾃｨﾃｫﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpglobal TENSOset lockScreen to trueset cursor to 4put "ﾃ‡ﾂｵﾃ‡ﾅ津‡ﾃﾃ‡竕 ﾃ‡ﾂｮﾃｫ窶愿‡ﾃｸﾃ‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" into MSGput empty into TENSOput number of cards into Lpush this cardgo to second cardrepeat with i = 1 to L - 1put fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" into line i of TENSOput "," & fld "ﾃｩﾃ…ﾃｱﾂｺ" after line i of TENSOput "," & fld "ﾃ｢ﾃ氾ｮﾃ”" after line i of TENSOput "," & fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx" after line i of TENSOput "," & fld "ﾃｪUﾃｧﾃｻﾃｮNﾃｬx" after line i of TENSOif the number of this card is L then exit repeatgo to nextend repeatgo to stack "ﾃｮNﾃ｢ﾃ津｢ﾃ氾ｮﾃ氾ｭﾂ ﾃｭmLIST" in a new windowput TENSO into fld "as"put empty into fld "SF"pop cardput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"put empty into  TENSOput "1" into MSrepeatput char 1 to 4 of the short date into Yput char 1 to 4 of the short date into NENGOHYOUJIput NENGOHYOUJI - 1988 into NENGOHYOUJIDESU-----ﾃ､ﾃ禿ｱ{ﾃｬIﾃ‡窶ｦﾃ‡ﾃ陛②ﾃ･ﾂｪﾃｧ窶ｺﾃ‡ﾃεｪﾂｺﾃｳﾃ氾‡ﾂｩﾃ‡ﾃﾃ②ﾃｮNﾃ｢ﾃ津ｪﾃｮﾃ‡窶ｦ1ﾃ‡ï｣ｿﾃ ﾂｯﾃ‡ﾂ｢ﾃ‡ﾎｩﾃｪﾃｮﾃ‡ï｣ｿﾃ ﾂｯﾃ‡竕 ﾃ③ﾃｭAﾃ‡ﾂｵﾃ②1ﾃｩﾂｸﾃ､ﾄｱﾃ‡ﾃ陛ｳﾂｷﾃ､Oif MS is "1" thensubtract MS from Yelsesubtract MS - 1 from Yend ifput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & Y into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILEput number of lines of TENSO into Radd 1 to Rput the number of lines of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into Mrepeat with i = 1 to Mif MS < 7 thenput MS & "ﾃｩﾂｸﾃ､ﾄｱ" into line R of TENSOelseput MS & "ﾃ｢ﾃ津､ﾄｱ" into line R of TENSOend ifput "," & item 5 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "," & item 1 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "," & item 2 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put "," & item 3 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"add 1 to Rend repeatif MS is "50" then exit repeatif MS is "47" then put "50" into MSif MS is "43" then put "47" into MSif MS is "37" then put "43" into MSif MS is "33" then put "37" into MSif MS is "27" then put "33" into MSif MS is "23" then put "27" into MSif MS is "17" then put "23" into MSif MS is "13" then put "17" into MSif MS is "7" then put "13" into MSif MS is "3" then put "7" into MSif MS is "1" then put "3" into MSput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"end repeatpush this cardgo to stack "ﾃｮNﾃ｢ﾃ津｢ﾃ氾ｮﾃ氾ｭﾂ ﾃｭmLIST" in a new windowgo to first cardput TENSO into fld "SF"sort lines of fld "SF" by item 2 of eachput empty into fld "SFS"set LockScreen to trueset cursor to 4pop cardput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"put empty into  TENSOput "1" into MSrepeatput char 1 to 4 of the short date into Y-----ﾃ､ﾃ禿ｱ{ﾃｬIﾃ‡窶ｦﾃ‡ﾃ陛②ﾃ･ﾂｪﾃｧ窶ｺﾃ‡ﾃεｪﾂｺﾃｳﾃ氾‡ﾂｩﾃ‡ﾃﾃ②ﾃｮNﾃ｢ﾃ津ｪﾃｮﾃ‡窶ｦ1ﾃ‡ï｣ｿﾃ ﾂｯﾃ‡ﾂ｢ﾃ‡ﾎｩﾃｪﾃｮﾃ‡ï｣ｿﾃ ﾂｯﾃ‡竕 ﾃ③ﾃｭAﾃ‡ﾂｵﾃ②1ﾃｩﾂｸﾃ､ﾄｱﾃ‡ﾃ陛ｳﾂｷﾃ､Oif MS is "1" thensubtract MS from Yelsesubtract MS - 1 from Yend ifadd 1 to Yput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & Y into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILEput number of lines of TENSO into Radd 1 to Rput the number of lines of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into Mrepeat with i = 1 to Mif MS < 7 thenput MS & "ﾃｩﾂｸﾃ､ﾄｱ" into line R of TENSOelseput MS & "ﾃ｢ﾃ津､ﾄｱ" into line R of TENSOend ifput "," & item 5 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put "," & item 1 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "," & item 2 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put "," & item 3 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" after line R of TENSO ---- "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"add 1 to Rend repeatif MS is "50" then exit repeatif MS is "47" then put "50" into MSif MS is "43" then put "47" into MSif MS is "37" then put "43" into MSif MS is "33" then put "37" into MSif MS is "27" then put "33" into MSif MS is "23" then put "27" into MSif MS is "17" then put "23" into MSif MS is "13" then put "17" into MSif MS is "7" then put "13" into MSif MS is "3" then put "7" into MSif MS is "1" then put "3" into MSput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"end repeatput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"set LockScreen to false ---------------------------------------go to stack "ﾃｮNﾃ｢ﾃ津｢ﾃ氾ｮﾃ氾ｭﾂ ﾃｭmLIST" in a new windowgo to first cardput TENSO into fld "SFS"sort lines of fld "SFS" by item 2 of eachput number of lines of fld "as" into KKrepeat with i = 1 to KKif item 2 of line i of fld "as" is empty then next repeatput item 1 of line i of fld "as" into fld "ﾃｮ窶佚ｧﾃœ"put item 2 of line i of fld "as" into fld "ﾃｩﾃ…ﾃｱﾂｺ"put item 5 of line i of fld "as" into fld "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 4 of line i of fld "as" into fld "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃｮNﾃｬx"put word 1 of fld "ﾃｪUﾃ‡ﾃ凝ｧﾃｻﾃ‡窶ｺﾃｮNﾃｬx" + 1 into HJJif HJJ is NENGOHYOUJIDESU thenput NENGOHYOUJIDESU into fld "ﾃｱ{ﾃｮNﾃｬx"put item 3 of line i of fld "as" into fld "ﾃ｣窶｡ﾃ､z"elseput HJJ & " ﾃ⑶ " & NENGOHYOUJIDESU into fld "ﾃｱ{ﾃｮNﾃｬx"put item 3 of line i of fld "as" into KEISANif KEISAN is "ﾃ…ﾃｮ" then put "0" into KEISANif KEISAN is "ﾃ…ﾃｮ" then put empty into fld "ﾃｱ{ﾃｮNﾃｬx"if KEISAN is empty then put empty into fld "ﾃｱ{ﾃｮNﾃｬx"if HJJ > 60 then subtract 63 from HJJput KEISAN *  ( NENGOHYOUJIDESU - HJJ + 1 ) into fld "ﾃ｣窶｡ﾃ､z"end ifput item 1 of line i of fld "as" into RRpush this cardgo to first cardfind  whole RR in fld "SF"if the result is not empty thenpop cardput "ﾃｱ{ﾃｮNﾃｬxﾃ‡ﾃεｮNﾃ｢ﾃ津‡ﾃ陛‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’" into fld "ﾃｱ{ﾃｮNﾃｬxﾃｮNﾃ｢ﾃ’"elseget the foundLineput word 2 of it into Lput "1" into Jput item 2 of line L of fld "SF" into FINput empty into GGGrepeatput item 1 of line L of fld "SF" into line J of GGGput "ﾃ①" & item 3 of line L of fld "SF" after line J of GGGput "ﾃ①" & item 4 of line L of fld "SF" after line J of GGGput "ﾃ①" & item 5 of line L of fld "SF" & "ﾃｬa" after line J of GGGadd 1 to Ladd 1 to Jif item 2 of line L of fld "SF" is not FIN then exit repeatend repeatpop cardput GGG into fld "ﾃｱ{ﾃｮNﾃｬxﾃｮNﾃ｢ﾃ’"end ifput item 1 of line i of fld "as" into RRpush this cardgo to first cardfind  whole RR in fld "SFS"if the result is not empty thenpop cardput "ﾃｳﾃ ﾃｮNﾃｬxﾃ‡ﾃεｮNﾃ｢ﾃ津‡ﾃ陛‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’" into fld "ﾃｳﾃ ﾃｮNﾃｬxﾃｮNﾃ｢ﾃ’"elseget the foundLineput word 2 of it into Lput "1" into Jput item 2 of line L of fld "SFS" into FINput empty into GGGrepeatput item 1 of line L of fld "SFS" into line J of GGGput "ﾃ①" & item 3 of line L of fld "SFS" after line J of GGGput "ﾃ①" & item 4 of line L of fld "SFS" after line J of GGGput "ﾃ①" & item 5 of line L of fld "SFS" & "ﾃｬa" after line J of GGGadd 1 to Ladd 1 to Jif item 2 of line L of fld "SFS" is not FIN then exit repeatend repeatpop cardput GGG into fld "ﾃｳﾃ ﾃｮNﾃｬxﾃｮNﾃ｢ﾃ’"end ifdoMenu "ﾃｪVﾃ｣Kﾃ雨ﾃ…[ﾃ栄"end repeatput empty into MSGhide MSGplay "Intercom"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>157</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>343</left>
            <top>24</top>
            <right>413</right>
            <bottom>40</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Memory</name>
        <script></script>
    </part>
    <part>
        <id>158</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>587</left>
            <top>158</top>
            <right>623</right>
            <bottom>177</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>10</textSize>
        <textStyle>condense</textStyle>
        <name>Option</name>
        <script>on mouseUpput me into fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"end mouseUpon mouseWithinInflate "text" , "ﾃｧ竕暗｣ïｬ‚Informationﾃ‡ﾂｩﾃ‡ﾃﾃｩwﾃｭﾃ凝‡ﾂｵﾃ‡ﾎｩﾃ雨ﾃ…[ﾃ栄ﾃ‡ï｣ｿﾃ②8ﾃｪlﾃ‡窶ｹﾃ‡竕ˆ Information ﾃ‡窶ｦﾃｯ¥ﾃｩﾂｶﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>159</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>262</left>
            <top>73</top>
            <right>280</right>
            <bottom>90</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>23613</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｪVﾃ｣Kﾃ閲ﾃ運ﾃ嘉ｬ</name>
        <script>on mouseUpget fld "ﾃｬdﾃｲb"dial itend mouseUpon mouseWithinInflate "text" , "ﾃ｢Eﾃ‡ﾃεｬdﾃｲbﾃｮ窶佚ｧﾃ愿‡竕暗ｬdﾃｲbﾃ‡ï｣ｿﾃ‡ﾂｩﾃ‡ﾃ佚‡窶ｹﾃ‡竏妥③ﾃｩﾃ崚ｲbﾃ､ﾃ古‡ï｣ｿﾃ厩ﾃ鋭ﾃ…[ﾃ雨ﾃ‡窶ｦﾃ｣ïｬづ‡竏堙‡ﾃ佚‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithin</script>
    </part>
    <part>
        <id>173</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <false /> </enabled>
        <rect>
            <left>324</left>
            <top>363</top>
            <right>406</right>
            <bottom>383</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｯ[ﾃｬoﾃｲ^</name>
        <script>on mouseUpanswer "ﾃ｢ﾃ氾ｮﾃ氾‡ï｣ｿﾃｬoﾃｲ^ﾃ‡ï｣ｿﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cansel" or "OK"if it is "Cansel" thenexit mouseUpend ifget number of lines of fld "as"if it is "0" thenput "ﾃ映ﾃ…[ﾃ運ﾃ‡邃｢ﾃ‡ﾂｻﾃ‡ﾃ佚‡ﾃ催‡ﾅ津②ﾃｬoﾃｲ^ﾃｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③" into MSGexit mouseUpend ifput the date into Mput char 1 to 4 of M into Jput char 6 to 7 of M into Qif Q < 4 thenanswer "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡窶ｦﾃｯ竄ｬﾃｫ竏づ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｯ竄ｬﾃｫ竏づ‡竏妥‡ﾃ暗ｮNﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx" into WWend ifelseanswer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡窶ｦﾃｯ竄ｬﾃｫ竏づ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｯ竄ｬﾃｫ竏づ‡竏妥‡ﾃ暗ｮNﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WWend ifend ifset LockScreen to trueset cursor to 4put number of lines of fld "as" into Lput item 5 of line 1 of fld "as" into SHOUKEISrepeat with i = 2 to Ladd item 5 of line i of fld "as" to SHOUKEISend repeatput SHOUKEIS into fld "ﾃｨﾂｨﾃ･v"get number of chars of fld "ﾃｫﾃｧﾃ･v"repeat with i = 1 to itif char i of fld "ﾃｫﾃｧﾃ･v" is "," then put "" into char i of fld "ﾃｫﾃｧﾃ･v"end repeatadd SHOUKEIS to fld "ﾃｫﾃｧﾃ･v"put fld "ﾃｫﾃｧﾃ･v" into sujiput kuraidori (suji) into fld "ﾃｫﾃｧﾃ･v"put fld "ﾃｨﾂｨﾃ･v" into sujiput kuraidori (suji) into fld "ﾃｨﾂｨﾃ･v"put number of lines of fld "as" into Lput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ﾃ氾ｮﾃ氾液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW into QFILEopen file QFILEput number of lines of fld "as" into Lrepeat with i = 1 to Lwrite line i of fld "as" & return to file QFILE at endend repeatclose file QFILEput empty into fld "as"play "Expired"answer "ﾃ｢ﾃ氾ｮﾃ氾ｬoﾃｲ^ﾃ‡ï｣ｿﾃ､ﾃ†ﾃｳﾏ\ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩ"disable bkgnd button "ﾃｯ[ﾃｬoﾃｲ^"end mouseUpon mouseWithinInflate "text" , "ﾃｪUﾃｫﾃｷﾃｭﾂ ﾃｭmﾃｯ[ﾃ‡竏†ﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡ﾎｩﾃｧ竏づ‡ﾃεｯ[ﾃ‡ï｣ｿﾃｨ竏†ﾃｧﾃ｡ﾃ‡ﾃεｨ窶榲②ﾃ､窶佚 ﾂｷﾃ‡ﾂ｢ﾃ‡邃｢ﾃ‡ﾂｻﾃ‡ﾃ佚‡ﾃ催‡ﾅ津ｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>175</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>528</left>
            <top>234</top>
            <right>616</right>
            <bottom>255</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｱ@ﾃｳvdataﾃｭﾂｫﾃ｢ﾂ｡</name>
        <script>on mouseUpanswer fld "ﾃｩﾃ…ﾃｱﾂｺ" & "ﾃｩﾃ…ﾃ‡ﾃεｱ@ﾃｳvﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｭﾂｫﾃ｢ﾂ｡ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cansel" or "OK"if it is "Cansel" thenexit mouseUpend ifput empty into fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"put empty into fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"put empty into fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"put The date into PPPget number of chars of PPPput char 3 to it of PPP into PPask "ﾃｮNﾃ･ﾃｩﾃｬﾋ凖‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃ⑿ﾃｳﾂｷﾃ⑦" & PP with char 3 to 10 of the dateif it is "Cansel" thenput empty into fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"put empty into fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"put empty into fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"exit mouseUpend ifput it into fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"ask "ﾃ｣窶｡ﾃ､zﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"if it is "Cansel" thenput empty into fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"put empty into fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"put empty into fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"exit mouseUpend ifput it into fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"ask "ﾃｬ窶｡ﾃｳeﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"if it is "Cansel" thenput empty into fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"put empty into fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"put empty into fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"exit mouseUpend ifput it into fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"hide meshow bkgnd button "ﾃｱ@ﾃｳvdataﾃｬoﾃｲ^"end mouseUpon mouseDownplay "Click Down"end mouseDownon mouseWithinInflate "text" , "ﾃ･ﾂｪﾃｧ窶ｺﾃ､Jﾃ‡ﾂｩﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡ﾃ暗ｭhﾃ｢竏†ﾃ‡ﾃεｱ@ﾃｳvﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃ｣Lﾃｭ窶 ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ｣Lﾃｭ窶 ﾃ･窶榲ｪ竕･ﾃ‡ﾂｵﾃ‡ﾃ佚‡ﾃ催‡ﾅ津ｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>176</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>528</left>
            <top>234</top>
            <right>617</right>
            <bottom>255</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｱ@ﾃｳvdataﾃｬoﾃｲ^</name>
        <script>on mouseUpanswer "ﾃ｣Lﾃｬﾂｸﾃ‡竕･ﾃ‡ﾃ催‡ﾎｩﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥⑩" with "Cansel" or "OK"if it is "Cansel" thenhide meshow bkgnd button "ﾃｱ@ﾃｳvdataﾃｭﾂｫﾃ｢ﾂ｡"exit mouseUpend ifget number of lines of fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"if it < 1 thenanswer "ﾃ映ﾃ…[ﾃ運ﾃ‡邃｢ﾃ｣Lﾃｬﾂｸﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"hide meshow bkgnd button "ﾃｱ@ﾃｳvdataﾃｭﾂｫﾃ｢ﾂ｡"exit mouseUpend ifif it > 1 thenanswer "ﾃ映ﾃ…[ﾃ運ﾃ‡ﾃ陛 ﾃ催ｧsﾃ‡窶ｦﾃ‡ﾂｮﾃ‡竕･ﾃ‡ïｬづ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"hide meshow bkgnd button "ﾃｱ@ﾃｳvdataﾃｭﾂｫﾃ｢ﾂ｡"exit mouseUpend ifset LockScreen to truerepeat with PS = 1 to 3 --------------3ﾃ‡ﾂｬﾃ‡ﾃεｱ@ﾃｳvﾃ映ﾃ…[ﾃ運ﾃ‡ﾃε映ﾃ…[ﾃ運ﾃｳﾂ ﾃ‡ï｣ｿﾃ‡ﾂｵﾃ‡ﾃﾃ‡笳甘‡ﾆ’put empty into fld "ass"put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｱ@ﾃｳvDATA:ﾃｱ@ﾃｳvﾃ映ﾃ…[ﾃ運" & PS into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ass"add 1 to Lend repeatif the length of fld "ass" > 28000 then -------------ﾃ‡窶｡ﾃ‡ﾂｵﾃ ﾃ催ｮtﾃ‡ﾃｦﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ‡ﾃput PS + 1 into PPSelseput PS into PPSexit repeatend ifend repeatput empty into fld "ass"put line 1 of fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" into line 1 of fld "ass"put "," & line 1 of fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt" after line 1 of fld "ass"put "," & line 1 of fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z" after line 1 of fld "ass"put "," & line 1 of fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe" after line 1 of fld "ass"put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｱ@ﾃｳvDATA:ﾃｱ@ﾃｳvﾃ映ﾃ…[ﾃ運" & PPS into QFILE --------ﾃｩﾃｼﾃ‡ﾃεｱ@ﾃｳvﾃ映ﾃ…[ﾃ運ﾃ‡ﾃｷﾃ｣Lﾃｭ窶 open file QFILEwrite return to file QFILE at endwrite line 1 of fld "ass" to file QFILE at endclose file QFILEanswer "ﾃｱ@ﾃｳvﾃ映ﾃ…[ﾃ運ﾃ‡ﾃεｬoﾃｲ^ﾃ‡邃｢ﾃ､ﾃ†ﾃｳﾏ\ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ⑩"set LockScreen to truehide meshow bkgnd button "ﾃｱ@ﾃｳvdataﾃｭﾂｫﾃ｢ﾂ｡"put empty into fld "ass"end mouseUp</script>
    </part>
    <part>
        <id>178</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>129</left>
            <top>102</top>
            <right>210</right>
            <bottom>119</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>1</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｣ﾃ甘ｯ邃｢ﾃ瓜ﾃ叡ﾃ曳</name>
        <script>on mouseUpif the selectedText of me is "ﾃ‡ﾂｻﾃ‡ﾂｵ" thenhide meexit mouseUpelseput the selectedText of me into fld "ﾃ｣ﾃ甘ｯ邃｢"hide meend ifend mouseUp</script>
    </part>
    <part>
        <id>179</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>125</left>
            <top>135</top>
            <right>205</right>
            <bottom>152</bottom>
        </rect>
        <style>popup</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <selectedLines>
            <integer>6</integer>
        </selectedLines>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾃ氾ｮﾃ氾瓜ﾃ叡ﾃ曳</name>
        <script>on mouseUpput the selectedText of me into fld "ﾃ｢ﾃ氾ｮﾃ”"hide meend mouseUp</script>
    </part>
    <part>
        <id>183</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>19</left>
            <top>212</top>
            <right>80</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｮNﾃｬxﾃ･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpask "ﾃｮNﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃ⑿ﾃｳﾂｷﾃ⑦ﾃｯﾎｩ06ﾃｱﾃｮﾃ‡ﾃ陛ｪﾂｺﾃｳﾃ氾‡竕暗⒀" with "ﾃｯﾎｩ"if it is empty then exit mouseUpput it into FINDDATAset LockScreen to trueput empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"if the number of chars of FINDDATA is "4" then -----ﾃｪﾂｺﾃｳﾃ氾‡ﾃｦﾃ‡ﾂ｡ﾃ‡ﾎｩﾃ‡ﾃﾃ③put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & FINDDATA into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILEput the number of lines of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into Lrepeat with i = 1 to Lput item 1 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put item 4 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put item 5 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"end repeatput FINDDATA & "ﾃｮN" into fld "ﾃｯ¥ﾃｩﾂｶ"put the number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" & "ﾃｪl" into fld "ﾃ･ﾃｨﾃｪﾃｮ"put empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"beepend ifif the number of chars of FINDDATA is "3" then -----ﾃｪﾂｺﾃｳﾃ氾‡竕暗‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾂｻﾃ‡ﾃﾃ③if char 1 of FINDDATA is "ﾃｯﾎｩ" thenput 1988 + char 2 to 3 of FINDDATA into FINDDATAelseif char 1 of FINDDATA is "ﾃｨ竏ｫ" thenput 1925 + char 2 to 3 of FINDDATA into FINDDATAend ifend ifput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & FINDDATA into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILEput the number of lines of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into Lrepeat with i = 1 to Lput item 1 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put item 4 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put item 5 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"end repeatput FINDDATA & "ﾃｮN" into fld "ﾃｯ¥ﾃｩﾂｶ"put the number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" & "ﾃｪl" into fld "ﾃ･ﾃｨﾃｪﾃｮ"put empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"beepend ifplay "Found"end mouseUpon mouseDownplay "Click Down"end mouseDownon mouseWithinInflate "text" , "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｩwﾃｭﾃ凝‡ﾂｵﾃ‡ﾆ津･ﾃｼﾃｧﾄｱﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>184</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>82</left>
            <top>212</top>
            <right>175</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <name>ﾃｮNﾃ｢ﾃ津･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpget the selectedText of meif it is "ﾃｮNﾃ｢ﾃ津ｯ¥ﾃｧﾃ湘ｪﾂｨ" thenanswer "ﾃｮNﾃ｢ﾃ津ｯ¥ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "OK" or "Cansel"if it is "Cansel" thenexit mouseUpelseshow bkgnd button "ﾃｮNﾃ｢ﾃ津ｯ¥ﾃｧﾃ湘ｪﾂｨ"end ifelsepush this cardput it into HYOUJIput word 1 of it into MSput char 1 to 4 of the short date into Y-----ﾃ､ﾃ禿ｱ{ﾃｬIﾃ‡窶ｦﾃ‡ﾃ陛②ﾃ･ﾂｪﾃｧ窶ｺﾃ‡ﾃεｪﾂｺﾃｳﾃ氾‡ﾂｩﾃ‡ﾃﾃ②ﾃｮNﾃ｢ﾃ津ｪﾃｮﾃ‡窶ｦ1ﾃ‡ï｣ｿﾃ ﾂｯﾃ‡ﾂ｢ﾃ‡ﾎｩﾃｪﾃｮﾃ‡ï｣ｿﾃ ﾂｯﾃ‡竕 ﾃ③ﾃｭAﾃ‡ﾂｵﾃ②1ﾃｩﾂｸﾃ､ﾄｱﾃ‡ﾃ陛ｳﾂｷﾃ､Oif MS is "1" thensubtract MS from Yelsesubtract MS - 1 from Yend ifset LockScreen to trueput empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & Y into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILEget the number of lines of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"repeat with i = 1 to itput item 1 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put item 4 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put item 5 of line i of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1" into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"end repeatput HYOUJI into fld "ﾃｯ¥ﾃｩﾂｶ"get number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put it & "ﾃｪl" into fld "ﾃ･ﾃｨﾃｪﾃｮ"pop cardbeepend ifput empty into fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"end mouseUpon mouseEnterset the style of me to popupend mouseEnteron mouseLeaveset the style of me to transparentend mouseLeaveon mouseDownplay "Click Down"end mouseDownon mouseWithinInflate "text" , "ﾃｮNﾃ｢ﾃ津‡ï｣ｿﾃ･ﾃｼﾃｧﾄｱﾃ②ﾃ‡窶ｹﾃ‡ﾎｩﾃ‡ﾃ陛ｮNﾃ｢ﾃ津ｯ¥ﾃ‡ﾃε影ﾃ鵜ﾃ厩ﾃ曳ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>194</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>511</left>
            <top>275</top>
            <right>530</right>
            <bottom>287</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>26288</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ盈ﾃ疫</name>
        <script>on mouseStillDownget the mouseVif it > 255 and it < 360 thenset loc of me to 520,itelse if it < 256 thenset loc of me to 520,255elseset loc of me to 520,350end ifput the number of cards into Rif it > 255 and it < 360 thenput round ((it - 255)*2*.1) into fld "ﾃ謁ﾃ…[ﾃ姥ﾃｯ¥ﾃｩﾂｶ"end ifend mouseStillDownon mouseUppush this cardset LockScreen to truego to second cardput fld "ﾃ謁ﾃ…[ﾃ姥ﾃｯ¥ﾃｩﾂｶ" into PAJIput (PAJI - 1) * 15 + 1 into MS -----ﾃ‡ﾂｱﾃ‡ﾃεｳﾃ津‡ﾂｩﾃ‡ﾃﾃｯ¥ﾃｩﾂｶﾃ ﾃ崚ｧﾂｸglobal TENSOset LockScreen to trueset cursor to 4put empty into fld "ATACK"put empty into fld "TENSO"put number of cards into Lunmark all cardsput "1" into Rrepeat with i = 1 to L - 1if the hilite of bkgnd button "ﾃｨZﾃｨﾃ､ﾃ ﾃ崚ｧﾂｸﾃ閲ﾃ運ﾃ嘉ｬ" is true thenput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line R of TENSOadd 1 to R ------end ifif the number of this card is L then exit repeatgo to nextend repeatif COUNT < MS + 14 then put COUNT into KKif COUNT > MS + 14 then put MS + 14 into KKput "1" into Rrepeat with i = MS to KKput line i of TENSO into line R of fld "ATACK"add 1 to Rend repeatpop cardset LockScreen to falseput "ﾃｱﾂｺﾃｫOﾃ‡邃｢ﾃｯ¥ﾃｩﾂｶﾃ‡竕･ﾃ‡ﾃ催‡ﾎｩﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ叡ﾃ丑ﾃ‡竏妥‡ﾃ暗‡竏†ﾃ②ﾃ ﾃ崚ｧﾂｸﾃ影ﾃ鵜ﾃ厩ﾃ曳ﾃ‡邃｢ﾃｧﾃ湘ｪﾂｨﾃ‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③" into MSGend mouseUpon mouseWithinInflate "text" , "ﾃｨZﾃｨﾃ､ﾃ ﾃ催ｯﾃｮﾃ ﾃ崚ｧﾂｸﾃ‡ﾃεｯ竕暗‡ï｣ｿﾃｩwﾃｭﾃ凝‡竏妥‡ﾃ暗‡ﾃε‡窶ｦﾃｩgﾃｳpﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ頴ﾃ…[ﾃ‡ﾃεｨ窶榲｢竏ｫﾃ‡竕暗ｯ竕暗‡ï｣ｿﾃｯﾅ禿ｧXﾃ②ﾃｯ竕暗ｮ窶佚ｧﾃ愿‡ﾃ陛ｧ竏づｨ窶榲‡窶ｦﾃｯ¥ﾃｩﾂｶﾃ‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>196</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>445</left>
            <top>152</top>
            <right>467</right>
            <bottom>178</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>16679</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ･ﾃ†ﾃ｢ï｣ｿﾃｨﾃｺ</name>
        <script>on mouseUpshow bkgnd button "ﾃ･ﾃ†ﾃ嘉ｧﾃ叡ﾃ丑"hide meend mouseUp</script>
    </part>
    <part>
        <id>199</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>483</left>
            <top>179</top>
            <right>503</right>
            <bottom>199</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>16680</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ迂ﾃ嘉ｬ</name>
        <script>on mouseUp--------if the lockText of fld "ﾃｩﾃ…ﾃｱﾂｺ" is false thenset the lockText of fld "ﾃ‡ﾃ甘‡窶ｺ" to trueset the lockText of fld "ﾃｩﾃ…ﾃｱﾂｺ" to trueset the lockText of fld "ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœ" to trueset the lockText of fld "ﾃｨZﾃｨﾃ､" to trueset the lockText of fld "ﾃｬdﾃｲb" to trueset the lockText of fld "FAX" to trueset the lockText of fld "ﾃｭIﾃ･o" to trueset the lockText of fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx" to trueset the lockText of fld "ﾃｪUﾃｧﾃｻﾃｮNﾃｬx" to trueset the lockText of fld "ﾃｨﾃ禿ｯﾃ’" to trueset the lockText of fld "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ" to trueshow bkgnd button "ﾃ鵜ﾃ嘉嘉叡ﾃ益"disable bkgnd button "Add"disable bkgnd button "Sort"hide me-----------DTHCSpeak "Speak","ﾃｩﾃ…ﾃｱﾂｺﾃｬﾃｴﾃ‡ﾃεｨﾃ禿ｯﾃ津‡ï｣ｿ ﾃ嘉ｧﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩ"end mouseUpon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>200</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>485</left>
            <top>178</top>
            <right>502</right>
            <bottom>200</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>16679</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ鵜ﾃ嘉嘉叡ﾃ益</name>
        <script>on mouseUpset the lockText of fld "ﾃｩﾃ…ﾃｱﾂｺ" to falseset the lockText of fld "ﾃ‡ﾃ甘‡窶ｺ" to falseset the lockText of fld "ﾃｳXﾃｯﾃｷﾃｮ窶佚ｧﾃœ" to falseset the lockText of fld "ﾃｨZﾃｨﾃ､" to falseset the lockText of fld "ﾃｬdﾃｲb" to falseset the lockText of fld "FAX" to falseset the lockText of fld "ﾃｭIﾃ･o" to falseset the lockText of fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx" to falseset the lockText of fld "ﾃｪUﾃｧﾃｻﾃｮNﾃｬx" to falseset the lockText of fld "ﾃｨﾃ禿ｯﾃ’" to falseset the lockText of fld "ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ" to falseenable bkgnd button "Add"enable bkgnd button "Sort"hide meshow bkgnd button "ﾃ迂ﾃ嘉ｬ"----------DTHCSpeak "Speak","ﾃｩﾃ…ﾃｱﾂｺﾃｬﾃｴﾃ‡ﾃεｨﾃ禿ｯﾃ津‡ï｣ｿﾃ｣Lﾃｬﾂｸﾃ‡竕暗‡ﾂｴﾃ‡ﾃ暗‡ﾃ甘‡ﾂｧﾃ‡窶ｦﾃ‡ﾂｻﾃ‡ﾃ凝‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃ｣Lﾃｬﾂｸﾃ･窶榲‡ﾃ陛ｯKﾃ‡竏湘‡ﾂｱﾃ‡ﾃε閲ﾃ運ﾃ嘉ｬﾃ‡竕ˆ ﾃ嘉ｧﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseUpon mouseWithinInflate "text" , "ﾃｩﾃ…ﾃｱﾂｺﾃｨZﾃｨﾃ､ﾃｬﾃｴﾃ‡ﾃεｨﾃ禿ｯﾃ津‡ï｣ｿﾃｯﾅ禿ｧXﾃ‡竏妥‡ﾃ暗‡竏†ﾃ‡ﾂｴﾃ‡窶ｦﾃ②ﾃ‡ﾂｱﾃ‡ﾃε閲ﾃ運ﾃ嘉ｬﾃ‡竕暗嘉ｧﾃ叡ﾃ丑ﾃ‡ï｣ｿﾃ｢ï｣ｿﾃｨﾃｺﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ･ﾃ偲‡ﾂ｡ﾃ‡ﾆ津ｯﾅ禿ｧXﾃ‡ﾂｵﾃ‡ﾂｻﾃ‡ﾂ｢ﾃ‡ﾃ甘‡ﾂｧﾃ②ﾃｯﾅ禿ｧXﾃ･窶榲‡ﾃ陛ｯKﾃ‡竏湘嘉ｧﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>218</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>325</left>
            <top>24</top>
            <right>395</right>
            <bottom>40</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>ﾃｯﾋš</name>
        <script>on mouse upset the loc of me to 360,27end mouse up</script>
    </part>
    <part>
        <id>220</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>598</left>
            <top>16</top>
            <right>625</right>
            <bottom>28</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Osaka</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ﾃ･ﾃｼﾃｧﾄｱﾃｮNﾃｬx</name>
        <script></script>
    </part>
    <part>
        <id>225</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>442</left>
            <top>240</top>
            <right>483</right>
            <bottom>254</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾃ氾ｮﾃ”</name>
        <script>on mouseUpanswer "ﾃ｢ﾃ氾ｮﾃ氾‡ﾃεｱﾂ｢ﾃｮ[ﾃ｣yﾃ‡窶氾｢ïｬづｯ窶｢ﾃ‡ﾂ｢ﾃ‡ï｣ｿﾃ･ﾃｼﾃｧﾄｱﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" thenput empty into fld "ATACK"exit mouseUpend ifpush this cardset LockScreen to trueput char 1 to 4 of the short date into NENGOHYOUJIput NENGOHYOUJI - 1988 into NENGOset cursor to 4put empty into fld "ATACK"push this cardgo to second cardput the number of cards into Lput "0" into SUUput "0" into SUTrepeat with i = 1 to L - 1put char 1 to 2 of bkgnd fld "ﾃ｢ﾃ氾ｮﾃ氾ｮNﾃｬx" into PPif PP > NENGO then -----ﾃ｢ïｬづｯ窶｢ﾃ‡ﾂ｢if char 1 of PP is not "6" thenadd 1 to SUTput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line SUT of KABARAIend ifend ifif PP < NENGO then -----ﾃｱﾂ｢ﾃｮ[add 1 to SUUput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line SUU of MINOUend ifif char 1 of PP is "6" then -----ﾃｱﾂ｢ﾃｮ[add 1 to SUUput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line SUU of MINOUend ifget the number of cardsif number of this card is it thengo to second cardelsego to nextend ifend repeatput "ﾃ｢ïｬづｯ窶｢ﾃ‡ﾂ｢ﾃｩ窶愿ｩﾃ…ﾃｱﾂｺ" into line 1 of fld "ATACK"put KABARAI into line 2 of fld "ATACK"put the number of lines of fld "ATACK" into Ladd 2 to Lput "ﾃｱﾂ｢ﾃｮ[ﾃｩ窶愿ｩﾃ…ﾃｱﾂｺ" into line L of fld "ATACK"put MINOU into line L + 1 of fld "ATACK"pop cardbeepanswer "ﾃ｢ïｬづｯ窶｢ﾃ‡ﾂ｢ﾃｩ窶愿‡ﾃ•" & SUT & "ﾃｪl  " & "ﾃｱﾂ｢ﾃｮ[ﾃ‡ﾃ•" & SUU & "ﾃｪl ﾃ‡竕暗‡竏妥③ﾃ嘉､ﾃ厩ﾃ曳ﾃ‡ﾃεｧﾃ湘ｪﾂｨﾃ‡ﾃ陛液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ "end mouseUpon mouseWithinInflate "text" , "ﾃ｢ﾃ氾ｮﾃ氾‡ﾃεｩxﾃｯ窶｢ﾃ‡ﾂ｢ﾃｨﾃ崚｣ﾂｵﾃ‡ï｣ｿﾃ･ﾃｼﾃｧﾄｱﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>226</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>442</left>
            <top>256</top>
            <right>483</right>
            <bottom>270</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｭIﾃ･o</name>
        <script>on mouseUpanswer "ﾃｭIﾃ･oﾃ‡ﾃε嘉､ﾃ厩ﾃ曳ﾃ‡ï｣ｿﾃｯ¥ﾃｩﾂｶﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" thenput empty into fld "ATACK"exit mouseUpend ifset LockScreen to trueset cursor to 4put empty into fld "ATACK"push this cardgo to second cardput the number of cards into Lput "ﾃｭIﾃ･oﾃ‡ﾃε嘉､ﾃ厩ﾃ曳" into fld "ATACK"put "0" into SUUput "2" into UUrepeat with i = 1 to L - 1if the hilite of bkgnd button "ﾃｭIﾃ･oﾃ閲ﾃ運ﾃ嘉ｬ" is true thenput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line UU of fld "ATACK"add 1 to SUUadd 1 to UUend ifget the number of cardsif number of this card is it thengo to second cardelsego to nextend ifend repeatpop cardbeepanswer "ﾃｭIﾃ･oﾃ嘉､ﾃ厩ﾃ曳ﾃ‡ﾃεｧﾃ湘ｪﾂｨﾃ‡ﾃ陛液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃｪlﾃｪﾃｮﾃ‡ﾃ•" & SUU & "ﾃｪlﾃ‡竕暗‡竏妥③"end mouseUpon mouseWithinInflate "text" , "ﾃｭIﾃ･oﾃ‡ï｣ｿﾃｧsﾃ‡ﾂｧﾃｭhﾃ｢竏†ﾃ‡ï｣ｿﾃ･ﾃｼﾃｧﾄｱﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>227</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>488</left>
            <top>256</top>
            <right>530</right>
            <bottom>271</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｮNﾃ｢ﾃ</name>
        <script>on mouseUpanswer "ﾃｮNﾃ｢ﾃ催‡ﾃε嘉､ﾃ厩ﾃ曳ﾃ‡ï｣ｿﾃｯ¥ﾃｩﾂｶﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" thenput empty into fld "ATACK"exit mouseUpend ifset LockScreen to trueset cursor to 4put empty into fld "ATACK"push this cardgo to second cardput the number of cards into Lput "0" into SUUput "1" into UUrepeat with i = 1 to L - 1if the hilite of bkgnd button "ﾃｮNﾃ｢ﾃ催閲ﾃ運ﾃ嘉ｬ" is true thenput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line UU of fld "ATACK"add 1 to SUUadd 1 to UUend ifget the number of cardsif number of this card is it thengo to second cardelsego to nextend ifend repeatpop cardbeepanswer "ﾃｮNﾃ｢ﾃ催嘉､ﾃ厩ﾃ曳ﾃ‡ﾃεｧﾃ湘ｪﾂｨﾃ‡ﾃ陛液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡ï｣ｿﾃ丑ﾃ嘉､ﾃ叡ﾃ丑ﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃｪlﾃｪﾃｮﾃ‡ﾃ•" & SUU & "ﾃｪlﾃ‡竕暗‡竏妥③"end mouseUpon mouseWithinInflate "text" , "ﾃｮNﾃ｢ﾃ催‡ï｣ｿﾃｨoﾃ‡竏妥ｱﾂｺﾃｫOﾃ‡ï｣ｿﾃｯ¥ﾃｩﾂｶﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithin</script>
    </part>
    <part>
        <id>228</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>434</left>
            <top>235</top>
            <right>523</right>
            <bottom>255</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｱ@ﾃｳvﾃ映ﾃ…[ﾃ運</name>
        <script>on mouseUpset LockScreen to trueput empty into fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"put empty into fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"put empty into fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"put fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" & "," into tgStringput the destination into WHEREget number of chars of WHEREput char 1 to it - 4 of WHERE & "ﾃｱ@ﾃｳvDATA:" into myFileset cursor to 4get MtGrep(tgString,myFile)if length(it) < 30000 thenput it into INNelseanswer "ﾃ･ﾃｼﾃｧﾄｱﾃ･ﾃ｣ﾃ｢ﾂ ﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡邃｢ﾃｫﾃづ‡ﾂｴﾃ‡竏妥‡ﾂｨﾃ‡ﾆ津液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"&returnﾂｬ&return&length(it)&" byte"end ifget the number of lines of INNif it is "0" then put "ﾃ｢ïｬづ｣ﾃｩﾃ‡ﾃεｱ@ﾃｳvﾃ映ﾃ…[ﾃ運ﾃ‡ﾃ陛‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③" into MSGrepeat with i = 1 to itput item 2 of line i of INN into line i of fld "ﾃｱ@ﾃｳvﾃｬﾋ凖ｯt"put item 3 of line i of INN into line i of fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z"put item 4 of line i of INN into line i of fld "ﾃｱ@ﾃｳvﾃｬ窶｡ﾃｳe"end repeatput "0" into KEIrepeat with i = 1 to itadd line i of fld "ﾃｱ@ﾃｳvﾃ｣窶｡ﾃ､z" to KEIend repeatput KEI into sujiput kuraidori (suji) into KEIput "ﾃｫﾃｧﾃ･v" & KEI & "ﾃ｢~" into fld "ﾃｧﾃ｡ﾃ･vﾃ｣窶｡ﾃ､z"put fld "ﾃｩﾃ…ﾃｱﾂｺ" into fld "ﾃｫﾅ津ｨ竄ｬﾃｩﾃ…ﾃｱﾂｺ"end mouseUp</script>
    </part>
    <part>
        <id>229</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>188</left>
            <top>212</top>
            <right>259</right>
            <bottom>231</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpput fld "ﾃｩﾃ…ﾃｱﾂｺ" into NAanswer "ﾃ映ﾃ…[ﾃ運ﾃ･ﾃｼﾃｧﾄｱﾃ‡ﾃ陛ｩwﾃｭﾃ凝‡竕･ﾃ‡ﾃ催‡ﾎｩﾃｯ竏づｩﾃｶﾃｳﾃ津‡竕暗･ﾃｼﾃｧﾄｱﾃ‡ﾂｵﾃ②ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ｢竏†ﾃｯﾂ ﾃ｢ﾋ凖ｱﾂｺﾃ‡ﾃ陛⑿ﾃｩ{ﾃｩﾃ‚ " & NA & "ﾃｩﾃ…) ﾃ‡ﾃε｢ﾋ凖ｱﾂｺﾃｯﾃ偲‡ï｣ｿﾃｯ¥ﾃｩﾂｶﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "ﾃ映ﾃ…[ﾃ運ﾃ･ﾃｼﾃｧﾄｱ" or "ﾃ｢竏†ﾃｯﾂ ﾃ｢ﾋ凖ｱﾂｺ"if it is "Cansel" then exit mouseUpif it is "ﾃ｢竏†ﾃｯﾂ ﾃ｢ﾋ凖ｱﾂｺ" thenset LockScreen to trueput empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" & "," into tgStringput the destination into WHEREget number of chars of WHEREput char 1 to it - 4 of WHERE & "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" into myFileset cursor to 4get MtGrep(tgString,myFile)if length(it) < 30000 thenput it into INNelseanswer "ﾃ･ﾃｼﾃｧﾄｱﾃ･ﾃ｣ﾃ｢ﾂ ﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡邃｢ﾃｫﾃづ‡ﾂｴﾃ‡竏妥‡ﾂｨﾃ‡ﾆ津液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"&returnﾂｬ&return&length(it)&" byte"end ifget the number of lines of INNif it is "0" then put "ﾃ‡ﾂｱﾃ‡ﾃεｭhﾃ｢竏†ﾃ‡ﾃε｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ映ﾃ…[ﾃ運ﾃ‡ﾃ陛‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③" into MSGrepeat with i = 1 to itput item 1 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put item 5 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"end repeatget number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put it & "ﾃｭﾃ･" into fld "ﾃ･ﾃｨﾃｪﾃｮ"put "ﾃｩ{ﾃｩﾃ‚ " & fld "ﾃｩﾃ…ﾃｱﾂｺ" into fld "ﾃｯ¥ﾃｩﾂｶ"end ifif it is "ﾃ映ﾃ…[ﾃ運ﾃ･ﾃｼﾃｧﾄｱ" thenask "ﾃ･ﾃｼﾃｧﾄｱﾃ‡竏妥‡ﾃ暗ｯ竏づｩﾃｶﾃｳﾃ津‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③ﾃｭAﾃ‡ﾂｵﾃｩﾃ…ﾃｱﾂｺ/ﾃ｢ﾋ凖ｱﾂｺﾃ‡ﾂｪﾃ‡ﾃεｫﾂｺﾃ‡ﾃε｣ﾃ甘ｯﾂ ﾃ‡ﾃ陛‡ﾂｵﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③"if it is empty then exit mouseUpset LockScreen to trueput empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"put empty into fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ"put it into tgStringput the destination into WHEREget number of chars of WHEREput char 1 to it - 4 of WHERE & "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" into myFileset cursor to 4get MtGrep(tgString,myFile)if length(it) < 30000 thenput it into INNelseanswer "ﾃ･ﾃｼﾃｧﾄｱﾃ･ﾃ｣ﾃ｢ﾂ ﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡邃｢ﾃｫﾃづ‡ﾂｴﾃ‡竏妥‡ﾂｨﾃ‡ﾆ津液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"&returnﾂｬ&return&length(it)&" byte"end ifget the number of lines of INNif it is "0" then put "ﾃ･ﾃｼﾃｧﾄｱﾃｯ竏づｩﾃｶﾃ‡ﾃ陛｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ映ﾃ…[ﾃ運ﾃ‡窶ｦﾃ‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③" into MSGrepeat with i = 1 to itput item 1 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ"put item 3 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ"put item 5 of line i of INN into line i of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ"end repeatget number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put "ﾃ･ﾃｼﾃｧﾄｱﾃｪﾃｮ  " & it & "ﾃｪl" into fld "ﾃ･ﾃｨﾃｪﾃｮ"put "ﾃ･ﾃｼﾃｧﾄｱﾃｫﾅ津ｨ竄ｬ  " & tgString into fld "ﾃｯ¥ﾃｩﾂｶ"end ifplay "Ding"end mouseUp</script>
    </part>
    <part>
        <id>230</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>86</left>
            <top>216</top>
            <right>154</right>
            <bottom>233</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾂｻﾃｱ竅„ﾃ･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpput the selectedText of me into AAget number of chars of AAput char 5 to it of AA into tgStringset cursor to 4set LockScreen to trueput empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put the date into Mput char 1 to 4 of M into Jput char 6 to 7 of M into Qif Q < 4 thenanswer "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx"put it into HHelseput "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx" into HHend ifelseanswer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"put it into HHelseput "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into HHend ifend ifset cursor to 4set LockScreen to trueput empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put empty into fld "C"put empty into fld "D"put empty into fld "E"put empty into fld "F"put the destination into WHEREget number of chars of WHEREput char 1 to it - 4 of WHERE & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & HH  & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[:" into myFile--------put myFile into MSGput MtGrep(tgString,myFile) into  GGget the number of lines of GGif it is "0" thenanswer "ﾃ‡ﾂｪﾃ‡ﾃε｢ﾂｻﾃｱ竅„ﾃ‡ﾃ陛｣Lﾃｬﾂｸﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"exit mouseUpend if-------put GG into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"sort lines of GG by item 1 of each-------put fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into GGrepeat with i = 1 to itput item 1 of line i of GG into line i of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"put item 2 of line i of GG into line i of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"put item 2 of line i of GG into OKput item 3 of line i of GG into line i of fld "C"put item 4 of line i of GG into line i of fld "D"put item 5 of line i of GG into line i of fld "E"put item 6 of line i of GG into line i of fld "F"end repeatput empty into fld "CC"put empty into fld "DD"put empty into fld "EE"put number of lines of fld "E" into Wput line 1 of fld "E" into Krepeat with i = 2 to Wadd line i of fld "E" to Kend repeatput K into sujiput kuraidori (suji) into fld "DD"if fld "DD" is "0" then put empty into fld "DD"put number of lines of fld "F" into Wput line 1 of fld "F" into Krepeat with i = 2 to Wadd line i of fld "F" to Kend repeatput K into sujiput kuraidori (suji) into fld "CC"if fld "CC" is "0" then put empty into fld "CC"play "Ding"put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put "ﾃ､mﾃｮF" into fld "ﾃ､mﾃｮF"end mouseUpon mouseEnterset the style of me to popupend mouseEnteron mouseLeaveset the style of me to transparentend mouseLeaveon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>232</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>441</left>
            <top>273</top>
            <right>533</right>
            <bottom>377</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>ﾃｧ笳甘ｱﾃｦﾃｭﾂｩﾃｫﾃƒ</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>ATACK</name>
        <script>on mouseUpanswer "ﾃ嘉､ﾃ厩ﾃ曳ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cansel" or "OK"if it is "Cansel" thenput empty into meexit mouseUpend ifset LockScreen to trueset cursor to 4if line 1 of fld "ATACK" is "ﾃｭIﾃ･oﾃ‡ﾃε嘉､ﾃ厩ﾃ曳" thenput the number of lines of fld "ATACK" into Lset lockScreen to trueset cursor to 4push this cardrepeat with i = 2 to Lfind line i of fld "ATACK" in fld "ﾃｩﾃ…ﾃｱﾂｺ"put "," & char 1 to 2 of fld "ﾃｭIﾃ･o" & "," & char 4 to 5 of fld "ﾃｭIﾃ･o" after line i of fld "ATACK"end repeatsort lines of fld "ATACK" by item 3 of eachsort lines of fld "ATACK" by item 2 of eachpop cardput the destination into WHEREget number of chars of WHEREput char 1 to it - 13 of WHERE & "ﾃ嘉､ﾃ厩ﾃ曳ﾃε溪王ﾅｸ" into QFILEopen file QFILEput the number of lines of me into Lrepeat with i = 2 to Lwrite item 1 of line i of me & "--" to file QFILEwrite item 2 of line i of me & "ﾃｬﾋ™-" to file QFILEwrite item 3 of line i of me & return to file QFILEend repeatclose file QFILEelseput the destination into WHEREget number of chars of WHEREput char 1 to it - 13 of WHERE & "ﾃ嘉､ﾃ厩ﾃ曳ﾃε溪王ﾅｸ" into QFILEopen file QFILEput the number of lines of me into Lrepeat with i = 1 to Lwrite line i of me & return to file QFILEend repeatclose file QFILEend ifput empty into mebeepanswer "ﾃｩﾃｱﾃｱﾂｱﾃ､ﾂｫﾃｳﾃｹﾃ液ﾃ羽ﾃ嘉｣ﾃ雲ﾃｬ窶｡ﾃ‡窶ｦﾃ②ﾃ嘉､ﾃ厩ﾃ曳ﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"end mouseUpbeep</script>
    </part>
    <part>
        <id>234</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>349</left>
            <top>212</top>
            <right>408</right>
            <bottom>233</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Narita</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾋ凖ｱﾂｺﾃｬoﾃｲ^</name>
        <script>on mouseUpget number of lines of fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™"if it > 1 thenanswer "ﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃ‡窶ｹﾃ‡竏†ﾃ‡ïｬづ‡ﾆ津ｬoﾃｲ^ﾃ‡竏妥‡ﾃ暗‡ﾂｱﾃ‡竏†ﾃ‡ﾃ陛ｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"hide meshow bkgnd button "ﾃ｢ﾋ凖ｱﾂｺﾃｭﾂｫﾃ｢ﾂ｡"exit mouseUpend ifif it < 1 thenanswer "ﾃ｢ﾋ凖ｱﾂｺﾃ‡邃｢ﾃ‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津⑩"hide meshow bkgnd button "ﾃ｢ﾋ凖ｱﾂｺﾃｭﾂｫﾃ｢ﾂ｡"exit mouseUpend ifanswer "ﾃ｢ﾋ凖ｱﾂｺﾃ‡ï｣ｿﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥⑩" with "Cansel" or "OK"if it is "Cansel" thenhide meshow bkgnd button "ﾃ｢ﾋ凖ｱﾂｺﾃｭﾂｫﾃ｢ﾂ｡"exit mouseUpend ifput char 1 to 4 of the date into RRanswer RR & "ﾃｮNﾃ‡ﾃε｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ‡窶ｦﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｬoﾃｲ^ﾃ‡竏妥‡ﾃ暗ｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with RRput it into RRend ifset LockScreen to trueset cursor to 4put empty into fld "ass"put fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into line 1 of fld "ass"put "," & fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ｢ﾋ凖ｱﾂｺ" after line 1 of fld "ass"put "," & fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｩﾃ…ﾃｱﾂｺ" after line 1 of fld "ass"put "," & fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｯﾃ甘ｭnﾃｮ窶佚ｧﾃœ" after line 1 of fld "ass"put "," & fld "ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃｮ窶佚ｧﾃœ" after line 1 of fld "ass"put ",ﾃ…ﾃｮ" after line 1 of fld "ass"put line 1 of fld "ass" into PICKput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA:" & RR into QFILEopen file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeat-----put it into line L of fld "ass"-----add 1 to Lend repeatput it into line L of fld "ass"get number of lines of fld "ass"put PICK into line it + 1 of fld "ass"repeat with i = 1 to it + 1write line i of fld "ass" & return to file QFILEend repeatclose file QFILEhide meshow bkgnd button "ﾃ｢ﾋ凖ｱﾂｺﾃｭﾂｫﾃ｢ﾂ｡"put empty into fld "ass"answer "ﾃｬoﾃｲ^ﾃ‡邃｢ﾃ､ﾃ†ﾃｳﾏ\ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ⑩"end mouseUprepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "ﾃｬﾂｫﾃ‡窶ｺﾃｧﾃｻﾃ‡窶ｺDATA1"add 1 to Lend repeatclose file QFILE------get number of lines of fld "ass"------write return to file QFILE at end------repeat with i = 1 to it</script>
    </part>
    <part>
        <id>235</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>531</left>
            <top>362</top>
            <right>622</right>
            <bottom>381</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃｨﾃｫﾃ‡ﾂｴﾃｨoﾃ‡ﾂｵ</name>
        <script>on mouseUpanswer "EXCELﾃｳpﾃ‡ﾃεｨﾃｫﾃｳïｬﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃｫﾎｩﾃｨ竕 ﾃｩﾃｻﾃ､窶佚‡邃｢ﾃ‡ﾂｩﾃ‡ﾂｩﾃ‡ﾃ凝‡窶ｹﾃ‡竏妥③" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpset lockScreen to trueset cursor to 4put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["put the date into Mput char 1 to 4 of M into Jput char 6 to 7 of M into Qif Q < 4 thenanswer "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1989 & "ﾃｮNﾃｬx" into WWend ifelseanswer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"if it is "NO" thenask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"put it into WWelseput "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WWend ifend ifput the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Qopen file QrepeatRead from file Q until ""put it after fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["if it is empty then exit repeatend repeatclose file Qset lockScreen to trueset cursor to 4put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[EXCELﾃｳp" into Qfileopen file Qfileget number of lines of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["write "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" & tab to file Qfilewrite "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄" & tab to file Qfilewrite "ﾃｬEﾃｳv" & tab to file Qfilewrite "ﾃ｢ﾂｻﾃｱ竅„" & tab to file Qfilewrite "ﾃｬﾂｸﾃ｣窶｡" & tab to file Qfilewrite "ﾃｨoﾃ｣窶｡" & tab to file Qfilewrite "ﾃｩcﾃｧﾃ‡" & return to file Qfilewrite tab & tab & tab & "ﾃｫOﾃｮNﾃｬxﾃ･Jﾃ｢z" & return to file Qfilerepeat with L = 1 to itwrite item 1 of line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" & tab to file Qfilewrite item 2 of line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" & tab to file Qfilewrite item 3 of line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" & tab to file Qfilewrite item 4 of line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" & tab to file Qfilewrite item 5 of line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" & tab to file Qfilewrite item 6 of line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" & return to file Qfileend repeatclose file Qfileput empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["beepanswer "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲ﾃｬ窶｡ﾃ‡窶ｦEXCELﾃｳpﾃ‡ﾃεｨﾃｫﾃｳïｬﾃ‡ï｣ｿﾃｧﾃ湘ｪﾂｨﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③"end mouseUpon mouseWithinInflate "text" , "ﾃｨﾃｫﾃｳïｬﾃ‡竏†ﾃ‡ﾂｵﾃ‡ﾆ津ｨﾃｫﾃ‡ﾂｴﾃｨoﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃｨoﾃｮ[ﾃｯﾃ偲‡ﾂｻﾃ‡ﾂｫﾃ‡ﾃεｯ窶愿ｨWﾃ‡窶ｦﾃｩgﾃｳpﾃ‡ﾂｵﾃ‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <part>
        <id>236</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>20</left>
            <top>215</top>
            <right>89</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Osaka</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ﾃ｢ﾃ氾ｮﾃ氾･ﾃｼﾃｧﾄｱ</name>
        <script>on mouseUpanswer "ﾃ･ﾃｼﾃｧﾄｱﾃ‡ﾃεｯﾋ堙ｱ@ﾃ‡ï｣ｿﾃｫIﾃ‡ﾃ津‡竕暗｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｮNﾃｬxﾃ･ﾃｼﾃｧﾄｱ" or "ﾃｭhﾃ｢竏†ﾃ･ﾃｼﾃｧﾄｱ"if it is "ﾃｮNﾃｬxﾃ･ﾃｼﾃｧﾄｱ" thenput char 1 to 4 of the date - 1988 into PPask "ﾃ｢ﾎｩﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨ﾃ⑿ﾃｳﾂｷﾃ⑧ﾃ①ﾃｯﾎｩ*ﾃ①ﾃ⒀" with "ﾃｯﾎｩ" & PPif it is empty then exit mouseUpset LockScreen to trueset cursor to 4put it into WWput it & "ﾃｮNﾃｬx" into fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ"put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ﾃ氾ｮﾃ氾液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｮNﾃｬx" into QFILEput empty into fld "as"open file QFILEput "1" into Lrepeatread from file QFILE until ""if it is empty then exit repeatput it into line L of fld "as"add 1 to Lend repeatclose file QFILEelseset LockScreen to trueset cursor to 4put fld "ﾃｭhﾃ｢竏†ﾃｮ窶佚ｧﾃœ" into tgStringput fld "ﾃｩﾃ…ﾃｱﾂｺ" into fld "ﾃｮNﾃｬxﾃｯ¥ﾃｩﾂｶ"put the destination into WHEREget number of chars of WHEREput char 1 to it - 5 of WHERE & ":ﾃ｢ﾃ氾ｮﾃ氾液ﾃ羽ﾃ嘉｣ﾃ雲:" into myFile-----put myFile into MSGset cursor to 4get MtGrep(tgString,myFile)if length(it) < 30000 thenput it into INNelseanswer "ﾃ･ﾃｼﾃｧﾄｱﾃ･ﾃ｣ﾃ｢ﾂ ﾃ‡ﾃε映ﾃ…[ﾃ運ﾃ‡邃｢ﾃｫﾃづ‡ﾂｴﾃ‡竏妥‡ﾂｨﾃ‡ﾆ津液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃｬﾂｸﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"&returnﾂｬ&return&length(it)&" byte"end ifget the number of lines of INNif it is "0" then put "ﾃ‡ﾂｱﾃ‡ﾃεｭhﾃ｢竏†ﾃ‡ﾃε｢ﾃ氾ｮﾃ氾映ﾃ…[ﾃ運ﾃ‡ﾃ陛‡窶 ﾃ‡ﾃ凝‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③" into MSGput INN into fld "as"end ifdisable bkgnd button "ﾃｯ[ﾃｬoﾃｲ^"disable bkgnd button "ﾃｯ[ﾃｬﾂｸﾃｳﾃ•"set LockScreen to falseplay "Found"end mouseUpon mouseWithinInflate "text" , "ﾃ｢ﾃ氾ｮﾃ氾‡ﾃεｩxﾃｯ窶｢ﾃ‡ﾂ｢ﾃｨﾃ崚｣ﾂｵﾃ‡ï｣ｿﾃ②ﾃｮNﾃｬxﾃｯﾂ ﾃ‡窶ｹﾃ‡ﾎｩﾃ‡ﾃ陛ｭhﾃ｢竏†ﾃｯﾂ ﾃ‡窶ｦﾃ･ﾃｼﾃｧﾄｱﾃ‡竏妥‡ﾃ暗‡竏†ﾃ‡ﾂｴﾃ‡窶ｦﾃｩgﾃｳpﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDownplay "Click Down"end mouseDown</script>
    </part>
    <content>
        <layer>background</layer>
        <id>20</id>
        <text>ﾃ‡窶 ﾃ‡ﾂ｢ﾃ‡ﾂｧﾃ‡ﾂｶﾃ‡ﾂｮ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>24</id>
        <text>ﾃ‡ﾂｩﾃ‡ﾂｴﾃ‡竕 ﾃ‡ﾃ˜ﾃ‡ﾂｱ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>25</id>
        <text>ﾃ‡竕･ﾃ‡ﾂｵﾃ‡竏‘ﾃ‡ﾏ\ﾃ‡ﾂｪ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>26</id>
        <text>ﾃ‡ﾎｩﾃ‡ﾃｸﾃ‡ﾂｬﾃ‡ﾆ’ﾃ‡竏†</text>
    </content>
    <content>
        <layer>background</layer>
        <id>27</id>
        <text>ﾃ‡ﾂｻﾃ‡窶ｦﾃ‡ﾂ ﾃ‡ﾃ\ﾃ‡ﾃƒ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>28</id>
        <text>ﾃ‡ﾃ•ﾃ‡窶“ﾃ‡窶ﾃ‡ﾃｷﾃ‡ﾅｸ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>29</id>
        <text>ﾃ‡窶ｹﾃ‡窶ｺﾃ‡ïｬﾃ‡ïｬ‚ﾃ‡窶｡</text>
    </content>
    <content>
        <layer>background</layer>
        <id>32</id>
        <text>ﾃ‡窶šﾃ‡窶ｰﾃ‡ﾃŠﾃ‡ﾃŒ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>39</id>
        <text>ﾃｬﾂｸﾃｳﾃ陛｢ﾂｬ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>53</id>
        <text>ﾃｯ窶｢ﾃｧﾃｻﾃｳﾃｸﾃ｣窶｡---------ﾃｯ窶｢ﾃｨoﾃ｣窶｡ﾃｪUﾃｫﾃｷﾃ｣窶｡</text>
    </content>
    <content>
        <layer>background</layer>
        <id>56</id>
        <text>ﾃ ﾃ崚ｧﾂｸﾃ⑴ﾃ｢ﾃ氾ｮﾃ氾嘉‡ﾃ…[ﾃ栄ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 ﾃ嘉‡ﾃ…[ﾃ栄ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ嘉‡ﾃ…[ﾃ栄</text>
    </content>
    <content>
        <layer>background</layer>
        <id>62</id>
        <text>ﾃ･Jﾃ｢zﾃｧﾃ‡</text>
    </content>
    <content>
        <layer>background</layer>
        <id>63</id>
        <text>ﾃｨﾂｨﾃ･v</text>
    </content>
    <content>
        <layer>background</layer>
        <id>78</id>
        <text>ﾃｩ{ﾃｩﾃ‚ ﾃｬﾃｸﾃｪﾃ湘｢竏†ﾃｧN</text>
    </content>
    <content>
        <layer>background</layer>
        <id>87</id>
        <text>0ﾃｭﾃ･</text>
    </content>
    <content>
        <layer>background</layer>
        <id>95</id>
        <text>ﾃｫﾃｧﾃ･v0ﾃ｢~</text>
    </content>
    <content>
        <layer>background</layer>
        <id>96</id>
        <text>ﾃｬﾃｸﾃｪﾃ湘｢竏†ﾃｧN</text>
    </content>
    <content>
        <layer>background</layer>
        <id>113</id>
        <text>5</text>
    </content>
    <content>
        <layer>background</layer>
        <id>76</id>
        <text>ﾃ｢ïｬづ｣ﾃｩﾃｭ窶 DATA2</text>
    </content>
    <content>
        <layer>background</layer>
        <id>119</id>
        <text>ﾃ‡窶 ﾃ‡ﾂｩﾃ‡竕･ﾃ‡ﾎｩﾃ‡ﾂｻﾃ‡ﾃ•ﾃ‡窶ｹﾃ‡窶š</text>
    </content>
    <content>
        <layer>background</layer>
        <id>120</id>
        <text>ﾃ ﾃ崚ｧﾂｸﾃ⑴ﾃ｢ﾃ氾ｮﾃ氾嘉‡ﾃ…[ﾃ栄</text>
    </content>
    <content>
        <layer>background</layer>
        <id>125</id>
        <text>1995</text>
    </content>
    <content>
        <layer>background</layer>
        <id>135</id>
        <text>ﾃｭhﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸﾃｩGﾃｩﾋ堙ｬﾂｸ--------------ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”ﾃｱ@ﾃｳvﾃｮﾃ”ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”ﾃｪlﾃ･ﾃｨﾃｮﾃ”ﾃ｢cﾃｫUﾃｨCﾃｳﾃｹﾃｮﾃ”ﾃｨﾃｮﾃｩGﾃｮﾃ”ﾃ｣竕･ﾃ｢ﾂｪﾃｮﾃ”ﾃ､ﾃ津ｯtﾃ｣窶｡ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”ﾃ･ﾋ†ﾃｫdﾃ･ﾋ†ﾃ｢竄ｬﾃ｢ﾃ氾｣cﾃｮﾃ”ﾃ､eﾃｩﾃ古ｯ竄ｬﾃ･ﾃ˜</text>
    </content>
    <content>
        <layer>background</layer>
        <id>136</id>
        <text>ﾃｱ@ﾃｳvﾃ⑿ﾃ｢竏†ﾃ⒀ﾃｫﾃｭﾃ｣Vﾃ⑿ﾃ｢竏†ﾃ⒀ﾃｯﾃ堙ｮ[ﾃ⑿ﾃ｢竏†ﾃ⒀ﾃｭnﾃｫ窶榲⑿ﾃ⒀ﾃ‡ﾂｮﾃｳﾃﾃ⑿ﾃ⒀ﾃｳﾃｲﾃｫﾃŸ---------------ﾃ｢窶˜ﾃｪﾃｿﾃｩﾃ‹ﾃ‡ﾃ陛‡邃｢ﾃ‡ﾂｴﾃｩ{ﾃｱ{ﾃｪﾂｸﾃｧﾃ…ﾃｬﾃ嘉ｮkﾃ･ﾏ\ﾃｪﾃšﾃ｢ﾅ津ｧ窶禿ｯ竄ｬﾃ･ﾃ˜ﾃ卯ﾃ厩ﾃｫ窶žﾃｬdﾃ｣Cﾃｫ窶žﾃｪﾃ姪ｬﾏ\ﾃｫ窶žﾃｬdﾃｲbﾃｫ窶žﾃｩﾃ崚ｪMﾃｳﾃｸﾃｪVﾃｯ竏妥ｫ窶žﾃ卯ﾃ噂ﾃ嘉､ﾃ嘉ｬﾃｫ窶žﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>149</id>
        <text>1994/4/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧﾃ‡ﾃｪﾃｴﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,97000,,ﾃ…ﾃｮ,1994/4/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ･~ﾃ 窶ｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,200000,,ﾃ…ﾃｮ,1994/4/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪﾃ湘ｱﾃ湘｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,91000,,ﾃ…ﾃｮ,1994/4/7,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｺﾃ｢Yﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,83000,,ﾃ…ﾃｮ,1994/4/17,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｬ窶｡ﾃ､Cﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,85000,,ﾃ…ﾃｮ,1994/4/24,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｺﾃｱ{ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,36000,,ﾃ…ﾃｮ,1994/4/28,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｨﾃｳ窶氾｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,65000,,ﾃ…ﾃｮ,1994/5/6,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧKﾃｱﾃ湘｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,100000,,ﾃ…ﾃｮ,1994/5/8,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｩ竕 ﾃｱﾃ湘｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,115000,,ﾃ…ﾃｮ,1994/5/8,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｱﾃ湘･ﾋ堙｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,100000,,ﾃ…ﾃｮ,1994/5/22,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ｢~ﾃｨﾃ暗ｩﾃｵﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,156000,,ﾃ…ﾃｮ,1994/6/1,10,ﾃｫﾃｭﾃ｣Vﾃ⑿ﾃｪ竏妥｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,680000,,ﾃ…ﾃｮ,1994/6/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧﾃｯﾃｫﾃ堙｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,89000,,ﾃ…ﾃｮ,1994/6/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｩsﾃｪﾃ湘｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,47000,,ﾃ…ﾃｮ,1994/6/18,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｫKﾃｨﾃ催｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,60000,,ﾃ…ﾃｮ,1994/6/23,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｩﾃｵﾃｱ{ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,130000,,ﾃ…ﾃｮ,1994/6/23,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ｣ﾂ･ﾃｱ{ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,130000,,ﾃ…ﾃｮ,1994/6/26,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪﾂｺﾃｩRﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,173000,,ﾃ…ﾃｮ,1994/6/28,10,ﾃｫﾃｭﾃ｣Vﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,800000,,ﾃ…ﾃｮ,1994/7/2,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪ竏妥｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,73000,,ﾃ…ﾃｮ,1994/7/2,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｱﾃ湘･ﾋ堙｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,56000,,ﾃ…ﾃｮ,1994/7/2,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,90000,,ﾃ…ﾃｮ,1994/7/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ､窶堙ｧﾃ凝｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,139000,,ﾃ…ﾃｮ,1994/7/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪﾂｺﾃｩRﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,67000,,ﾃ…ﾃｮ,1994/7/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｫﾃづ｣vﾃｯ竄ｬﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,95000,,ﾃ…ﾃｮ,1994/7/5,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪXﾃｱ{ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,44000,,ﾃ…ﾃｮ,1994/7/10,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,50000,,ﾃ…ﾃｮ,1994/7/16,10,ﾃｫﾃｭﾃ｣Vﾃ⑿ﾃ｢Oﾃ 窶ｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,1350000,,ﾃ…ﾃｮ,1994/7/31,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾃｮﾃ 窶ｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,70000,,ﾃ…ﾃｮ,1994/8/4,10,ﾃｩuﾃｮ[ﾃ｣窶｡ﾃ⑿ﾃｧ竕､ﾃｬﾂｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,100000,,ﾃ…ﾃｮ,1994/8/7,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,82000,,ﾃ…ﾃｮ,1994/7/15,10,ﾃｱ~ﾃｩﾋ堙ｬﾂｸ,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,480000,,ﾃ…ﾃｮ,1994/8/21,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ｢Oﾃ 窶ｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,156000,,ﾃ…ﾃｮ,1994/8/23,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｨﾃｪXﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,50000,,ﾃ…ﾃｮ,1994/9/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｯ窶禿ｱﾃ湘｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,66000,,ﾃ…ﾃｮ,1994/9/23,10,ﾃｮïｬﾃ､窶ｺﾃｩﾋ堙ｬﾂｸ,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,67300,,ﾃ…ﾃｮ,1994/10/2,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪﾅ津 窶ｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,80000,,ﾃ…ﾃｮ,1994/10/8,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ｣ﾂ･ﾃｱ{ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,85000,,ﾃ…ﾃｮ,1994/10/9,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｬ窶｡ﾃｩRﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,75000,,ﾃ…ﾃｮ,1994/10/9,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,59000,,ﾃ…ﾃｮ,1994/10/12,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ｣gﾃｫ竏ｫﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,53000,,ﾃ…ﾃｮ,1994/10/12,10,ﾃｯﾃ堙ｮ[ﾃ⑿ﾃ｣gﾃｫ竏ｫﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,50000,,ﾃ…ﾃｮ,1994/10/15,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪﾃｴﾃｱ{ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,60000,,ﾃ…ﾃｮ,1994/10/16,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｬnﾃ｢ﾃ氾｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,68000,,ﾃ…ﾃｮ,1994/10/20,10,ﾃｫﾃｭﾃ｣Vﾃ⑿ﾃｪ{ﾃｬcﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,500000,,ﾃ…ﾃｮ,1994/10/23,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｨﾃｮﾂｮﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,65000,,ﾃ…ﾃｮ,1994/10/26,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｺﾃ｢Yﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,84000,,ﾃ…ﾃｮ,1994/10/26,10,ﾃｬﾃ嘉ｮkﾃ｣ﾃｼﾃｳ{ﾃ⑿ﾃｧﾂｰﾃ 窶ｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,15000,,ﾃ…ﾃｮ,1994/10/31,10,ﾃｯﾃ堙ｮ[ﾃ⑿ﾃ ﾂｿﾃｧ]ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,7500000,,ﾃ…ﾃｮ,1994/11/6,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｫﾃづｭﾃ\ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,40000,,ﾃ…ﾃｮ,1994/11/13,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｨﾂｨﾃｱﾃ湘｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,76000,,ﾃ…ﾃｮ,1994/11/20,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧ竕､ﾃｬﾂｰﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,190000,,ﾃ…ﾃｮ,1994/11/20,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,61000,,ﾃ…ﾃｮ,1994/11/23,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪzﾃｱKﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,83000,,ﾃ…ﾃｮ,1994/11/23,10,ﾃｱ@ﾃｳvﾃ⑿ﾃ ﾂｿﾃｧﾃｷﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,85000,,ﾃ…ﾃｮ,1994/11/25,10,ﾃｫﾃｭﾃ｣Vﾃ⑿ﾃｫOﾃｬcﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,850000,,ﾃ…ﾃｮ,1994/11/27,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｯ竄ｬﾃｧ窶堙｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,95000,,ﾃ…ﾃｮ,1994/12/3,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪ{ﾃｬcﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,120000,,ﾃ…ﾃｮ,1994/12/4,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧ竕､ﾃ…Xﾃｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,53000,,ﾃ…ﾃｮ,1994/12/17,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｫOﾃｬcﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,85000,,ﾃ…ﾃｮ,1995/1/15,10,ﾃｱ@ﾃｳvﾃ⑿ ﾃｫﾃづｭﾃ\ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,50000,,ﾃ…ﾃｮ,1995/1/17,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｪ{ﾃｬcﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,62000,,ﾃ…ﾃｮ,1995/1/22,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧ竕､ﾃ･ﾂ･ﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,62000,,ﾃ…ﾃｮ,1995/1/22,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｳﾃ暗ｱﾃｿﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,20000,,ﾃ…ﾃｮ,1995/2/4,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｯ窶禿ｯﾎｩﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,23000,,ﾃ…ﾃｮ,1995/2/12,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｧ笳甘ｬcﾃ｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,75000,,ﾃ…ﾃｮ,1995/2/18,10,ﾃｱ@ﾃｳvﾃ⑿ﾃｫﾃづｪﾅ津｢竏†ﾃ⒀,ﾃｭdﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ,138000,,ﾃ…ﾃｮ,1994/4/28,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/6/1,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/6/30,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/4/28,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,30842,,ﾃ…ﾃｮ,1994/6/30,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1994/7/29,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1994/8/2,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/8/30,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/9/30,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/10/30,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/8/22,11,ﾃｳﾃｲﾃｫﾃŸ,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,305,,ﾃ…ﾃｮ,1994/8/31,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1994/8/31,11,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/9/30,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1994/9/30,11,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/10/31,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1994/10/31,11,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/12/1,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/12/31,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24108,,ﾃ…ﾃｮ,1994/11/30,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1994/12/29,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1995/1/30,11,ﾃｭnﾃｫ窶榲⑿ﾃ姥ﾃ宇ﾃ韻ﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,39532,,ﾃ…ﾃｮ,1995/1/30,11,ﾃｭnﾃｫ窶榲⑿ﾃｳﾃ暗ｱﾃｿﾃ⒀,ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ,24109,,ﾃ…ﾃｮ,1994/4/5,12,ﾃ‡ﾂｮﾃｳﾃﾃ⑿ﾃｱﾃｦﾃｩﾂｰﾃｧﾂｿﾃ⒀,ﾃｩGﾃｩﾋ堙ｬﾂｸ,5971,,ﾃ…ﾃｮ,1994/4/18,12,ﾃｪﾅ津｢ﾃ†ﾃ‡ﾂｮﾃｳﾃ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,200000,,ﾃ…ﾃｮ,1994/4/28,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/5/31,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/6/30,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/7/30,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/9/4,12,ﾃ‡ﾂｮﾃｳﾃﾃ⑿ﾃｪﾅ津‡窶堙⒀,ﾃｩGﾃｩﾋ堙ｬﾂｸ,100000,,ﾃ…ﾃｮ,1994/11/21,12,ﾃ‡ﾂｮﾃｳﾃﾃ⑿ﾃ‡窶敕‡竏づ‡ﾂｻﾃ‡ﾂｮﾃ⒀,ﾃｩGﾃｩﾋ堙ｬﾂｸ,4750,,ﾃ…ﾃｮ,1994/11/30,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/12/30,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1995/1/30,12,ﾃ･ﾄｱﾃｮMﾃｮﾃ氾ｩﾋ堙ｬﾂｸ,ﾃｩGﾃｩﾋ堙ｬﾂｸ,30000,,ﾃ…ﾃｮ,1994/4/4,20,ﾃｳpﾃｩﾃœ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,1957,ﾃ…ﾃｮ,1994/4/23,20,ﾃ穎ﾃ…[ﾃ栄ﾃ映ﾃ隠ﾃ厩ﾃ丑,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,186700,ﾃ…ﾃｮ,1994/4/26,20,ﾃ‡ﾃ陛‡邃｢ﾃ‡ﾂｴﾃｪﾃｿﾃｩﾃ‹,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,6500,ﾃ…ﾃｮ,1994/5/4,20,ﾃ嘘ﾃ嘉ｬﾃ鋭ﾃ嘉姪…[ﾃ運ﾃｯﾃｮﾃｯi,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,17364,ﾃ…ﾃｮ,1994/5/25,20,ﾃｳpﾃｩﾃ愿②ﾃｯﾃｯﾃｬﾃｵ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,2451,ﾃ…ﾃｮ,1994/6/10,20,ﾃｯﾅｸﾃ･ﾃ湘ｩmﾃ･竅„ﾃｱ窶堙ｳﾃｸ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,31571,ﾃ…ﾃｮ,1994/4/4,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/4/15,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,14302,ﾃ…ﾃｮ,1994/4/20,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,68005,ﾃ…ﾃｮ,1994/4/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,11958,ﾃ…ﾃｮ,1994/5/6,20,ﾃｪﾃ姪ｬﾏ\ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,13455,ﾃ…ﾃｮ,1994/5/6,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/5/17,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,34847,ﾃ…ﾃｮ,1994/5/18,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,8889,ﾃ…ﾃｮ,1994/5/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,11061,ﾃ…ﾃｮ,1994/5/31,20,ﾃｬdﾃｲbﾃｫ窶ž(DDI),ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,648,ﾃ…ﾃｮ,1994/6/6,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/6/15,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,5534,ﾃ…ﾃｮ,1994/6/15,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,21034,ﾃ…ﾃｮ,1994/6/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,9722,ﾃ…ﾃｮ,1994/6/20,20,ﾃｬdﾃｲbﾃｫ窶ž(DDI),ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,1081,ﾃ…ﾃｮ,1994/7/6,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/7/15,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,5101,ﾃ…ﾃｮ,1994/7/15,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,28970,ﾃ…ﾃｮ,1994/7/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,7755,ﾃ…ﾃｮ,1994/7/20,20,ﾃｬdﾃｲbﾃｫ窶ž(DDI),ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,607,ﾃ…ﾃｮ,1994/5/29,20,ﾃｳpﾃｩﾃœ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,1545,ﾃ…ﾃｮ,1994/8/11,20,ﾃ曳ﾃ永ﾃ…[,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,20600,ﾃ…ﾃｮ,1994/8/11,20,ﾃ噂ﾃ液ﾃ曳,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10000,ﾃ…ﾃｮ,1994/10/20,20,ﾃｳpﾃｩﾃœ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,1545,ﾃ…ﾃｮ,1994/8/4,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/8/15,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,4019,ﾃ…ﾃｮ,1994/8/16,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,54405,ﾃ…ﾃｮ,1994/8/22,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,3687,ﾃ…ﾃｮ,1994/8/22,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,3852,ﾃ…ﾃｮ,1994/8/22,20,ﾃｬdﾃｲbﾃｫ窶ž(DDI),ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,1751,ﾃ…ﾃｮ,1994/9/5,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/9/6,20,ﾃｪﾃ姪ｬﾏ\ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,43529,ﾃ…ﾃｮ,1994/9/16,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,4019,ﾃ…ﾃｮ,1994/9/16,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,57960,ﾃ…ﾃｮ,1994/9/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,8105,ﾃ…ﾃｮ,1994/9/20,20,ﾃｬdﾃｲbﾃｫ窶ž(DDI),ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,7333,ﾃ…ﾃｮ,1994/10/18,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,4127,ﾃ…ﾃｮ,1994/10/4,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/10/18,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,32550,ﾃ…ﾃｮ,1994/10/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,8197,ﾃ…ﾃｮ,1994/10/20,20,ﾃｬdﾃｲbﾃｫ窶ž(DDI),ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,7333,ﾃ…ﾃｮ,1994/11/2,20,ﾃｮNﾃ｢ﾃ催‡ﾃ陛‡邃｢ﾃ‡ﾂｴ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,20800,ﾃ…ﾃｮ,1994/12/2,20,ﾃ液ﾃ羽ﾃ嘉ｬﾃ曳ﾃ瓜ﾃ叡ﾃ曳,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,33300,ﾃ…ﾃｮ,1994/12/20,20,ﾃｯﾅｸﾃ･ﾃ湘ｩmﾃ･竅„ﾃｱ窶堙ｳﾃｸ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,29823,ﾃ…ﾃｮ,1994/12/20,20,ﾃｯﾃ淌｣竕･ﾃ運ﾃ韻ﾃ嘉„ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,18000,ﾃ…ﾃｮ,1994/12/28,20,ﾃｳpﾃｩﾃœ,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,3296,ﾃ…ﾃｮ,1994/11/4,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/11/7,20,ﾃｪﾃ姪ｬﾏ\ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,20459,ﾃ…ﾃｮ,1994/11/16,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,6508,ﾃ…ﾃｮ,1994/11/16,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,23519,ﾃ…ﾃｮ,1994/11/21,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,8177,ﾃ…ﾃｮ,1994/11/21,20,DDI,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,2224,ﾃ…ﾃｮ,1994/12/5,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1994/12/15,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,11271,ﾃ…ﾃｮ,1994/12/15,20,ﾃｬdﾃ｣Cﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,50184,ﾃ…ﾃｮ,1994/12/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,8646,ﾃ…ﾃｮ,1994/12/20,20,DDI,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,4439,ﾃ…ﾃｮ,1995/1/4,20,ﾃｬdﾃｲbﾃ嘉､ﾃ…[ﾃ厩,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,10609,ﾃ…ﾃｮ,1995/1/6,20,ﾃｪﾃ姪ｬﾏ\ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,32523,ﾃ…ﾃｮ,1995/1/19,20,ﾃ卯ﾃ厩ﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,18200,ﾃ…ﾃｮ,1995/1/20,20,ﾃｬdﾃｲbﾃｫ窶ž,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,9754,ﾃ…ﾃｮ,1995/1/20,20,DDI,ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”,,4130,ﾃ…ﾃｮ,1994/4/3,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/4/15,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,8500,ﾃ…ﾃｮ,1994/4/23,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/4/28,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/5/13,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/5/22,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/5/25,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,19000,ﾃ…ﾃｮ,1994/6/1,21,ﾃ嘉ｧﾃ…[ﾃ噂ﾃ丑ﾃ②ﾃｪﾂｸﾃｧﾃ…,ﾃｱ@ﾃｳvﾃｮﾃ”,,3039,ﾃ…ﾃｮ,1994/6/2,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/6/3,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,1500,ﾃ…ﾃｮ,1994/6/14,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,6000,ﾃ…ﾃｮ,1994/6/13,21,ﾃｪﾂｸﾃｧﾃ…,ﾃｱ@ﾃｳvﾃｮﾃ”,,31415,ﾃ…ﾃｮ,1994/6/22,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/7/1,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/7/1,21,ﾃｱ@ﾃ ïｬづ｣ﾃｻﾃｪﾃ凖‡ﾂ｢,ﾃｱ@ﾃｳvﾃｮﾃ”,,7210,ﾃ…ﾃｮ,1994/7/9,21,ﾃｮïｬﾃ､窶ｺﾃｳpﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,96000,ﾃ…ﾃｮ,1994/7/9,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/7/26,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1994/7/31,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/8/7,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/8/20,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1994/9/2,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1994/9/2,21,ﾃｪﾂｸﾃｧﾃ…,ﾃｱ@ﾃｳvﾃｮﾃ”,,23690,ﾃ…ﾃｮ,1994/9/11,21,ﾃｬﾃ嘉ｮk,ﾃｱ@ﾃｳvﾃｮﾃ”,,100000,ﾃ…ﾃｮ,1994/9/19,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1994/9/19,21,ﾃｱ~ﾃｳpﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,53000,ﾃ…ﾃｮ,1994/9/30,21,ﾃｪﾃｮﾃｩﾃ,ﾃｱ@ﾃｳvﾃｮﾃ”,,15000,ﾃ…ﾃｮ,1994/10/1,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1994/10/7,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/10/15,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,8000,ﾃ…ﾃｮ,1994/10/22,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/11/5,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1994/11/17,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,5500,ﾃ…ﾃｮ,1994/11/19,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,3000,ﾃ…ﾃｮ,1994/12/2,21,ﾃｱ@ﾃ ïｬづｪﾃ凖ｫﾃ›,ﾃｱ@ﾃｳvﾃｮﾃ”,,5665,ﾃ…ﾃｮ,1994/12/5,21,ﾃｮïｬﾃ､窶ｺﾃｳpﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,96000,ﾃ…ﾃｮ,1994/12/6,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,30000,ﾃ…ﾃｮ,1994/12/16,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1994/12/3,21,ﾃｱ@ﾃ ïｬづ鰻ﾃ円ﾃｮ竕､ﾃ‡ﾂｴ,ﾃｱ@ﾃｳvﾃｮﾃ”,,12000,ﾃ…ﾃｮ,1994/12/27,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,2500,ﾃ…ﾃｮ,1994/12/30,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,10300,ﾃ…ﾃｮ,1995/1/14,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1995/2/3,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,7000,ﾃ…ﾃｮ,1995/2/13,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,3000,ﾃ…ﾃｮ,1995/2/17,21,ﾃ｢窶˜,ﾃｱ@ﾃｳvﾃｮﾃ”,,4000,ﾃ…ﾃｮ,1995/2/17,21,ﾃｪﾂｸﾃｧﾃ…,ﾃｱ@ﾃｳvﾃｮﾃ”,,23690,ﾃ…ﾃｮ,1994/4/28,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/5/26,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/6/14,22,ﾃｩﾃ崚ｪMﾃｳﾃｸ,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,2740,ﾃ…ﾃｮ,1994/6/28,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/7/31,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/8/10,22,ﾃｩﾃ崚ｪMﾃｳﾃｸ,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,2740,ﾃ…ﾃｮ,1994/8/28,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/10/8,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/10/30,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/11/15,22,ﾃｩﾃ崚ｪMﾃｳﾃｸ,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,2740,ﾃ…ﾃｮ,1994/11/28,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1994/12/8,22,ﾃｩﾃ崚ｪMﾃｳﾃｸ,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,2740,ﾃ…ﾃｮ,1994/12/25,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1995/1/30,22,ﾃｪVﾃｯ竏妥ｫ窶ž,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,3850,ﾃ…ﾃｮ,1995/2/5,22,ﾃｪVﾃｮNﾃ｢ﾃ”,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,82810,ﾃ…ﾃｮ,1995/2/11,22,ﾃｩﾃ崚ｪMﾃｳﾃｸ,ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”,,2740,ﾃ…ﾃｮ,1994/4/7,23,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｨCﾃｳﾃｹ,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,109592,ﾃ…ﾃｮ,1994/5/6,23,ﾃ卯ﾃ噂ﾃ嘉､ﾃ嘉ｬﾃｫ窶ž,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,32430,ﾃ…ﾃｮ,1994/5/30,23,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｪ竕ˆ,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,76500,ﾃ…ﾃｮ,1994/5/31,23,ﾃ卯ﾃ噂ﾃ嘉､ﾃ嘉ｬﾃｫ窶ž,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,4122,ﾃ…ﾃｮ,1994/6/10,23,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚･ﾃ†,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,2974,ﾃ…ﾃｮ,1994/10/12,23,ﾃ卯ﾃ噂ﾃ嘉､ﾃ嘉ｬﾃｫ窶ž,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,41835,ﾃ…ﾃｮ,1994/10/24,23,ﾃｨCﾃｳﾃｹ,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,37360,ﾃ…ﾃｮ,1994/11/11,23,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｨCﾃｳﾃｹ,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,38450,ﾃ…ﾃｮ,1994/11/29,23,ﾃｩ窶佚･ﾃｼ,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,365991,ﾃ…ﾃｮ,1994/11/28,23,ﾃｯ竄ｬﾃ･ﾃ˜,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,122320,ﾃ…ﾃｮ,1994/12/20,23,ﾃｨCﾃｳﾃｹ,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,2410,ﾃ…ﾃｮ,1995/2/7,23,ﾃ卯ﾃ噂ﾃ嘉､ﾃ嘉ｬﾃｫ窶ž,ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”,,47257,ﾃ…ﾃｮ,1994/4/28,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/5/31,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/6/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/7/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/8/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/9/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/10/31,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/11/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/12/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1995/1/30,24,ﾃｨZﾃｪEﾃ｣ﾃ｣ﾃｳﾃｸ,ﾃｪlﾃ･ﾃｨﾃｮﾃ”,,400000,ﾃ…ﾃｮ,1994/4/5,25,ﾃ･ﾃｶﾃ｣ﾃ氾ｨCﾃｳﾃｹ,ﾃ｢cﾃｫUﾃｨCﾃｳﾃｹﾃｮﾃ”,,67980,ﾃ…ﾃｮ,1994/11/28,25,ﾃｱ{ﾃｬ竏榲･窶ｦﾃｳﾂｰﾃｨCﾃｫU,ﾃ｢cﾃｫUﾃｨCﾃｳﾃｹﾃｮﾃ”,,2230542,ﾃ…ﾃｮ,1994/12/7,25,ﾃ 窶ｰﾃ･ﾃ\ﾃｧHﾃｩﾃｱ,ﾃ｢cﾃｫUﾃｨCﾃｳﾃｹﾃｮﾃ”,,7210,ﾃ…ﾃｮ,1994/4/26,26,ﾃｨﾂｷﾃｩqﾃ‡窶敕‡竏妥‡窶ｹﾃｭﾂ｣ﾃ‡ﾃ凝ｫﾃｷﾃ‡ﾂｶ,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,39140,ﾃ…ﾃｮ,1994/6/11,26,ﾃ厭ﾃ叡ﾃ曳,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,9270,ﾃ…ﾃｮ,1994/7/28,26,ﾃｪAﾃｱﾃｿﾃ｢ﾃ†,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,146200,ﾃ…ﾃｮ,1994/8/22,26,ﾃｩﾃｱﾃｱﾂｱﾃｩ竏ｫﾃ雨ﾃ…[ﾃ影ﾃ嘉ｬ,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,180868,ﾃ…ﾃｮ,1994/9/22,26,ﾃ姥ﾃ嘉嘉…[ﾃ運ﾃ雨,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,24720,ﾃ…ﾃｮ,1994/9/22,26,ﾃ雨ﾃ嘉･ﾃ嘉ｬﾃ雲ﾃ…[,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,17450,ﾃ…ﾃｮ,1994/10/24,26,ﾃｫeﾃｫﾃづ唄ﾃ円,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,2700,ﾃ…ﾃｮ,1994/10/27,26,ﾃｪAﾃｱﾃｿﾃ｢ﾃ†,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,190500,ﾃ…ﾃｮ,1994/12/15,26,ﾃｧﾅ津ｯﾃˆ,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,8858,ﾃ…ﾃｮ,1994/12/29,26,ﾃｪAﾃｱﾃｿﾃ｢ﾃ†,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,236000,ﾃ…ﾃｮ,1994/12/28,26,ﾃ丑ﾃ嘉､ﾃ…[ﾃ永ﾃ…[,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,17304,ﾃ…ﾃｮ,1994/12/30,26,ﾃ｢hﾃ･ﾄｱﾃｬﾃｮﾃ⑥ﾃｮzﾃｪﾂｸﾃｬﾃｴ,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,20929,ﾃ…ﾃｮ,1994/12/30,26,ﾃ…Yﾃｬﾃ催‡ﾂｻﾃ‡ﾂｫ,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,8750,ﾃ…ﾃｮ,1995/1/3,26,ﾃｱï｣ｿﾃ ﾄｱﾃｪVﾃｮNﾃ｢ﾃ”,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,39860,ﾃ…ﾃｮ,1995/1/9,26,ﾃｬﾃｮﾃｱﾋš,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,4680,ﾃ…ﾃｮ,1995/2/20,26,ﾃｬﾃｮﾃｱﾋš,ﾃｨﾃｮﾃｩGﾃｮﾃ”,,4680,ﾃ…ﾃｮ,1994/9/22,27,ﾃｩ{ﾃｱ{,ﾃ｣竕･ﾃ｢ﾂｪﾃｮﾃ”,,3620,ﾃ…ﾃｮ,1994/12/20,27,ﾃｩ{ﾃｱ{,ﾃ｣竕･ﾃ｢ﾂｪﾃｮﾃ”,,3620,ﾃ…ﾃｮ,1994/5/22,28,ﾃｪ_ﾃｩ窶禿ｨﾃ｢ﾃｯ窶ｰﾃｳﾃｸ,ﾃ､ﾃ津ｯtﾃ｣窶｡,,10000,ﾃ…ﾃｮ,1994/11/1,28,ﾃ･ﾃ｣ﾃ､jﾃｳ¥ﾃｱhﾃ｢ﾃ”,ﾃ､ﾃ津ｯtﾃ｣窶｡,,5000,ﾃ…ﾃｮ,1994/4/23,29,ﾃｫﾃづｧﾃ凝ｯﾃ淌｣竕･ﾃ｢ﾃ氾｢ﾃ氾ｮﾃ”,ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”,,20000,ﾃ…ﾃｮ,1994/5/26,29,ﾃｫﾃづｧﾃ凝ｯﾃ淌｣竕･ﾃ｢ﾃ氾ｫﾃｧﾃ｢ﾃ氾ｮﾃ”,ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”,,10000,ﾃ…ﾃｮ,1994/8/15,29,ﾃ｣ﾂｧﾃ｢hﾃ｢ﾃ”,ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”,,21000,ﾃ…ﾃｮ,1994/9/29,29,ﾃｫﾃづｧﾃ凝ｯﾃ淌｣竕･ﾃ｢ﾃ氾･ﾂｧﾃｨCﾃ｢ﾃ氾ｮﾃ”,ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”,,30000,ﾃ…ﾃｮ,1994/12/17,29,ﾃｫﾃづｧﾃ凝ｯﾃ淌｣竕･ﾃ｢ﾃ”,ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”,,20000,ﾃ…ﾃｮ,1994/5/30,30,ﾃ･竕暗ｭﾃ凝ｩﾃｫﾃｩYﾃｪ竕ˆ,ﾃ･ﾋ†ﾃｫdﾃ･ﾋ†ﾃ｢竄ｬ,,942500,ﾃ…ﾃｮ,1994/7/7,30,ﾃ･ﾏ\ﾃｪﾃš,ﾃ･ﾋ†ﾃｫdﾃ･ﾋ†ﾃ｢竄ｬ,,108913,ﾃ…ﾃｮ,1995/1/6,30,ﾃ･ﾏ\ﾃｪﾃš,ﾃ･ﾋ†ﾃｫdﾃ･ﾋ†ﾃ｢竄ｬ,,108913,ﾃ…ﾃｮ,1994/7/4,32,ﾃ｢ﾅ津ｧ窶禿ｯ竄ｬﾃ･ﾃ˜,ﾃ､eﾃｩﾃ古ｯ竄ｬﾃ･ﾃ˜,,33820,ﾃ…ﾃｮ,1994/11/1,32,ﾃｯ竄ｬﾃ･ﾃ˜,ﾃ､eﾃｩﾃ古ｯ竄ｬﾃ･ﾃ˜,,885670,ﾃ…ﾃｮ,</text>
    </content>
    <content>
        <layer>background</layer>
        <id>16</id>
        <text>06/03/21</text>
    </content>
    <content>
        <layer>background</layer>
        <id>157</id>
        <text>1003</text>
    </content>
    <content>
        <layer>background</layer>
        <id>178</id>
        <text>ﾃｩgﾃｳpﾃｩ窶œﾃ‡ﾂｪﾃ‡ﾃεｫﾂｺ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>179</id>
        <text>200030004000500060007000800090001000011000120001300014000</text>
    </content>
    <content>
        <layer>background</layer>
        <id>184</id>
        <text>1ﾃｩﾂｸﾃ､ﾄｱ3ﾃｩﾂｸﾃ､ﾄｱ7ﾃ｢ﾃ津､ﾄｱ13ﾃ｢ﾃ津､ﾄｱ17ﾃ｢ﾃ津､ﾄｱ23ﾃ｢ﾃ津､ﾄｱ27ﾃ｢ﾃ津､ﾄｱ33ﾃ｢ﾃ津､ﾄｱ37ﾃ｢ﾃ津､ﾄｱ43ﾃ｢ﾃ津､ﾄｱ47ﾃ｢ﾃ津､ﾄｱ50ﾃ｢ﾃ津､ﾄｱ-----------ﾃｮNﾃ｢ﾃ津ｯ¥ﾃｧﾃ湘ｪﾂｨ</text>
    </content>
    <content>
        <layer>background</layer>
        <id>158</id>
        <text>ﾃｱLﾃｪbﾃｨGﾃ｣gﾃｬﾃｸﾃｪﾃ湘｢竏†ﾃｧNﾃｪDﾃｬcﾃｪMﾃｭ竏‘</text>
    </content>
    <content>
        <layer>background</layer>
        <id>138</id>
        <text>1</text>
    </content>
    <content>
        <layer>background</layer>
        <id>66</id>
        <text>1003</text>
    </content>
    <content>
        <layer>background</layer>
        <id>230</id>
        <text>(ﾃ･ﾃｼ) ﾃｭhﾃｪMﾃｬkﾃｩ{ﾃｩﾋ堙ｬﾂｸ(ﾃ･ﾃｼ) ﾃｩﾃｫﾃｩYﾃｩﾋ堙ｬﾂｸ(ﾃ･ﾃｼ) ﾃｩGﾃｩﾋ堙ｬﾂｸ-----------------(ﾃ･ﾃｼ) ﾃｩﾃｵﾃｱﾂｱﾃｮﾃ”(ﾃ･ﾃｼ) ﾃｱ@ﾃｳvﾃｮﾃ”(ﾃ･ﾃｼ) ﾃｭdﾃｪMﾃｬkﾃｪ竅„ﾃｫ窶愿ｮﾃ”(ﾃ･ﾃｼ) ﾃｩﾂｩﾃｬﾃ†ﾃｩ窶佚ｮﾃ”(ﾃ･ﾃｼ) ﾃｪlﾃ･ﾃｨﾃｮﾃ”(ﾃ･ﾃｼ) ﾃ｢cﾃｫUﾃｨCﾃｳﾃｹﾃｮﾃ”(ﾃ･ﾃｼ) ﾃｨﾃｮﾃｩGﾃｮﾃ”(ﾃ･ﾃｼ) ﾃ｣竕･ﾃ｢ﾂｪﾃｮﾃ”(ﾃ･ﾃｼ) ﾃ､ﾃ津ｯtﾃ｣窶｡(ﾃ･ﾃｼ) ﾃｨﾃｮﾃ｢ﾃ氾ｮﾃ”(ﾃ･ﾃｼ) ﾃ･ﾋ†ﾃｫdﾃ･ﾋ†ﾃ｢竄ｬ(ﾃ･ﾃｼ) ﾃ｢ﾃ氾｣cﾃｮﾃ”(ﾃ･ﾃｼ) ﾃ､eﾃｩﾃ古ｯ竄ｬﾃ･ﾃ˜</text>
    </content>
    <content>
        <layer>background</layer>
        <id>14</id>
        <text>ﾃｱLﾃｪbﾃｨGﾃ｣gﾃｬﾃｸﾃｪﾃ湘｢竏†ﾃｧNﾃｪDﾃｬcﾃｪMﾃｭ竏‘</text>
    </content>
    <content>
        <layer>background</layer>
        <id>139</id>
        <text>on mouseUp  answer "ﾃ‡ﾂｱﾃ‡ﾃεｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ‡ï｣ｿﾃ｣Lﾃｭ窶 ﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③" with "Cancel" or "OK"  if it is "Cancel" then    answer "ﾃ｣Lﾃｭ窶 ﾃｬoﾃｲ^ﾃ‡邃｢ﾃ鵜ﾃ嘉嘉嘉ｬﾃ瓜ﾃ嘉｣ﾃ‡竕･ﾃ‡ﾃ催‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩﾃ③ﾃｧﾂｰﾃ液ﾃ隠ﾃ…[ﾃ嘉｣ﾃ栄ﾃ‡窶ｦﾃ｣Lﾃｭ窶 ﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡ﾃ暗映ﾃ…[ﾃ運ﾃ‡窶｡ﾃｨﾂ｡ﾃ｣ﾃｩﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cancel" or "OK"    if it is "OK" then      set lockScreen to true      put empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"      put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"      put empty into fld "C"      put empty into fld "D"      put empty into fld "E"      put empty into fld "F"      disable me      exit mouseUp    else      exit mouseUp    end if  end if  put the date into M  put char 1 to 4 of M into J      answer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"  if it is "NO" then    ask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"    put it into WW  else    put "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WW  end if  set lockScreen to true  set cursor to busy  put the number of lines of field "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into YU  put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["  repeat with L = 1 to YU    put line L of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™" into line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    put "," & line L of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    put "," & line L of fld "C" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    put "," & line L of fld "D" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    put "," & line L of fld "E" after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    put "," & line L of fld "F" & ",ﾃ…ﾃｮ," after line L of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["  end repeat  put the destination into WHERE  get number of chars of WHERE  put char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Q  open file Q  put the number of lines of field "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into L  write return to file Q at end  write fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" to file Q at end  close file Q  put "ﾃ､mﾃｮF" into fld "ﾃ､mﾃｮF"  put empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"  put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"  put empty into fld "C"  put empty into fld "D"  put empty into fld "E"  put empty into fld "F"  disable me  play "Expired"  put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["end mouseUpon mouseWithin  Inflate "text" , "ﾃ｣Lﾃｭ窶 ﾃ‡竕･ﾃ‡ﾃ催‡ﾎｩﾃ映ﾃ…[ﾃ運ﾃ‡ï｣ｿﾃ ﾃ催､ﾃ｡ﾃ‡窶ｦﾃｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③ﾃ‡窶ｹﾃ‡竏†ﾃ‡ïｬづ‡ﾆ津ｬoﾃｲ^ﾃ‡ﾂｵﾃ‡ﾎｩﾃｯﾋ堙‡邃｢ﾃ･ﾂｯﾃｳﾂｶﾃｬIﾃ‡竕暗‡竏‘"end mouseWithinon mouseDown  play "Click Down"end mouseDown</text>
    </content>
    <content>
        <layer>background</layer>
        <id>173</id>
        <text>on mouseUp  answer "ﾃ｢ﾃ氾ｮﾃ氾‡ï｣ｿﾃｬoﾃｲ^ﾃ‡ï｣ｿﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥‡ﾂｩﾃ⑨" with "Cansel" or "OK"  if it is "Cansel" then    exit mouseUp  end if  get number of lines of fld "as"  if it is "0" then    put "ﾃ映ﾃ…[ﾃ運ﾃ‡邃｢ﾃ‡ﾂｻﾃ‡ﾃ佚‡ﾃ催‡ﾅ津②ﾃｬoﾃｲ^ﾃｨoﾃｳﾃ ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ津③" into MSG    exit mouseUp  end if  put the date into M  put char 1 to 4 of M into J  put char 6 to 7 of M into Q    answer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"  if it is "NO" then    ask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"    put it into WW  else    put "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WW  end if  set LockScreen to true  set cursor to 4  put number of lines of fld "as" into L  put item 5 of line 1 of fld "as" into SHOUKEIS  repeat with i = 2 to L    add item 5 of line i of fld "as" to SHOUKEIS  end repeat  put SHOUKEIS into fld "ﾃｨﾂｨﾃ･v"  get number of chars of fld "ﾃｫﾃｧﾃ･v"  repeat with i = 1 to it    if char i of fld "ﾃｫﾃｧﾃ･v" is "," then put "" into char i of fld "ﾃｫﾃｧﾃ･v"  end repeat  add SHOUKEIS to fld "ﾃｫﾃｧﾃ･v"  put fld "ﾃｫﾃｧﾃ･v" into suji  put kuraidori (suji) into fld "ﾃｫﾃｧﾃ･v"  put fld "ﾃｨﾂｨﾃ･v" into suji  put kuraidori (suji) into fld "ﾃｨﾂｨﾃ･v"  put number of lines of fld "as" into L  put the destination into WHERE  get number of chars of WHERE  put char 1 to it - 5 of WHERE & ":ﾃ｢ﾃ氾ｮﾃ氾液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW into QFILE  open file QFILE  put number of lines of fld "as" into L  repeat with i = 1 to L    write line i of fld "as" & return to file QFILE at end  end repeat  close file QFILE  put empty into fld "as"  play "Expired"  answer "ﾃ｢ﾃ氾ｮﾃ氾ｬoﾃｲ^ﾃ‡ï｣ｿﾃ､ﾃ†ﾃｳﾏ\ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡ﾂｵﾃ‡ﾎｩ"  disable bkgnd button "ﾃｯ[ﾃｬoﾃｲ^"end mouseUpon mouseWithin  Inflate "text" , "ﾃｪUﾃｫﾃｷﾃｭﾂ ﾃｭmﾃｯ[ﾃ‡竏†ﾃｬﾂｸﾃｳﾃ陛‡竕･ﾃ‡ﾃ催‡ﾎｩﾃｧ竏づ‡ﾃεｯ[ﾃ‡ï｣ｿﾃｨ竏†ﾃｧﾃ｡ﾃ‡ﾃεｨ窶榲②ﾃ､窶佚 ﾂｷﾃ‡ﾂ｢ﾃ‡邃｢ﾃ‡ﾂｻﾃ‡ﾃ佚‡ﾃ催‡ﾅ津ｬoﾃｲ^ﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDown  play "Click Down"end mouseDown</text>
    </content>
    <content>
        <layer>background</layer>
        <id>140</id>
        <text>on mouseUp  ask "ﾃ･ﾃｼﾃｧﾄｱﾃ‡竏妥‡ﾃ暗･ﾃｩﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津‡竕 ﾃ‡ﾃｦﾃ‡竕･ﾃ‡ﾂ｢ﾃ⑿ﾃｬﾃ津･ﾃ姪‡竕暗⒀"  if it is empty then exit mouseUp  put it into PMONTH  set cursor to 4  set LockScreen to true  put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["  put the destination into WHERE  put the date into M  put char 1 to 4 of M into J  put char 6 to 7 of M into Q    answer "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬxﾃ‡竕暗‡竏妥‡ﾂｩﾃ⑨"  with "NO" or "YES"  if it is "NO" then    ask "ﾃｮNﾃｬxﾃ‡ï｣ｿﾃｬﾂｸﾃ‡ﾃ催‡ﾆ津｢竏ｫﾃ‡竕･ﾃ‡ﾂ｢ﾃ③" with "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx"    put it into WW  else    put "ﾃｯﾎｩ" & J - 1988 & "ﾃｮNﾃｬx" into WW  end if  set cursor to 4  set LockScreen to true  put the destination into WHERE  get number of chars of WHERE  put char 1 to it - 5 of WHERE & ":ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[ﾃ液ﾃ羽ﾃ嘉｣ﾃ雲:" & WW & "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into QFILE  open file QFILE  repeat    Read from file QFILE until ""    put it after fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    if it is empty then exit repeat  end repeat  close file QFILE  sort lines of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" dateTime by word 1 of each  put "ﾃ､mﾃｮF" into fld "ﾃ､mﾃｮF"  put "/" & PMONTH & "/" into FindMonthA  find FindMonthA in fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["  if the result is not empty then    answer "ﾃ‡ﾂｪﾃ‡ﾃε･ﾃｩﾃ‡ﾃ陛‡窶ｹﾃ‡ﾃｦﾃ｣Lﾃｬﾂｸﾃ‡竕･ﾃ‡ﾃ催‡ﾆ津‡ﾂ｢ﾃ‡窶ｹﾃ‡ﾏ\ﾃ‡ﾃ’"    put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["    exit mouseUp  end if  put the foundLine into MLINE  put word 2 of MLINE into ALINE  put "1" into LINES  put empty into fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"  put empty into fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"  put empty into fld "C"  put empty into fld "D"  put empty into fld "E"  put empty into fld "F"  repeat    put item 1 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "ﾃｮNﾃ･ﾃｩﾃｬﾋ™"    put char 6 to 7 of item 1 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Z    put item 2 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "ﾃ｢ﾂｻﾃｱ竅„ﾃ嘘ﾃ…[ﾃ栄"    put item 2 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into Num    put item 3 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "C"    put item 4 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "D"    put item 5 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "E"    put item 6 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" into line LINES of fld "F"    add 1 to ALINE    if char 6 to 7 of item 1 of line ALINE of fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ[" is not Z then exit repeat    add 1 to LINES  end repeat  put empty into fld "CC"  put empty into fld "DD"  put empty into fld "EE"  put number of lines of fld "E" into W  put line 1 of fld "E" into KK  repeat with i = 2 to W    add line i of fld "E" to KK  end repeat  put KK into suji  put kuraidori (suji) into fld "DD"  if fld "DD" is "0" then put empty into fld "DD"  put number of lines of fld "F" into W  put line 1 of fld "F" into K  repeat with i = 2 to W    add line i of fld "F" to K  end repeat  put K into suji  put kuraidori (suji) into fld "CC"  if fld "CC" is "0" then put empty into fld "CC"  put KK - K into suji  put kuraidori (suji) into fld "EE"  show fld "DD"  show fld "CC"  show fld "EE"  put empty into fld "ﾃｬﾂｸﾃｨoﾃｬ`ﾃｯ["  play "Ding"end mouseUpon mouseWithin  Inflate "text" , "ﾃ･ﾃｩﾃ‡ﾃε･ﾃｼﾃｧﾄｱﾃ‡窶ｦﾃｩgﾃｳpﾃ‡ﾂｵﾃ‡窶ｹﾃ‡竏妥③"end mouseWithinon mouseDown  play "Click Down"end mouseDown</text>
    </content>
    <name></name>
    <script>on SIMEIKENSAKUglobal Fset LockScreen to trueput empty into fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"go to second cardfind char 1 of F in fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ"put "1 " into Lrepeatput fld "ﾃｩﾃ…ﾃｱﾂｺ" into line L of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ"put fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" into Rget the number of cardsif number of this card is it then exit repeatgo to nextif R is not fld "ﾃｬ邃｢ﾃｯ竏づｩﾃｶ" then exit repeatadd 1 to Lend repeatput line 1 of fld "ﾃｩﾃ…ﾃｱﾂｺﾃ･ﾃｼﾃｧﾄｱ" into FIfind FI in fld "ﾃｩﾃ…ﾃｱﾂｺ"end SIMEIKENSAKU</script>
</background>