Otherware/Otherware_1_SB_Development.iso/mac/hypercar/game/iconinva.cpt/Jon Gary's Icon Invasion/Invasion (Play me in B&W)/cards.xml

Text File | 1991-06-26 | 14.2 KB | 339 lines

card_3658.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>3658</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2585</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3321.css" />
    <part>
        <id>2</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>142</left>
            <top>200</top>
            <right>163</right>
            <bottom>216</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>1000</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Hand</name>
        <script></script>
    </part>
    <part>
        <id>3</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>116</left>
            <top>72</top>
            <right>150</right>
            <bottom>111</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>2000</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>bomb</name>
        <script></script>
    </part>
    <part>
        <id>4</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>85</left>
            <top>23</top>
            <right>119</right>
            <bottom>62</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3060</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>i3</name>
        <script></script>
    </part>
    <part>
        <id>5</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>51</left>
            <top>23</top>
            <right>85</right>
            <bottom>62</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3030</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>i2</name>
        <script></script>
    </part>
    <part>
        <id>6</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>17</left>
            <top>23</top>
            <right>51</right>
            <bottom>62</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3070</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>i1</name>
        <script></script>
    </part>
    <part>
        <id>7</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>119</left>
            <top>23</top>
            <right>153</right>
            <bottom>62</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3029</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>i4</name>
        <script></script>
    </part>
    <part>
        <id>8</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>153</left>
            <top>23</top>
            <right>187</right>
            <bottom>62</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3060</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>i5</name>
        <script></script>
    </part>
    <part>
        <id>9</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>2</left>
            <top>1</top>
            <right>36</right>
            <bottom>18</bottom>
        </rect>
        <style>shadow</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>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <name>play</name>
        <script>on mouseUpgameend mouseUp</script>
    </part>
    <part>
        <id>10</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>37</left>
            <top>0</top>
            <right>288</right>
            <bottom>18</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>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>cookie</name>
        <script></script>
    </part>
    <part>
        <id>11</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>0</left>
            <top>60</top>
            <right>288</right>
            <bottom>205</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>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>cookieList</name>
        <script>on enterInFieldhide meend enterInField</script>
    </part>
    <content>
        <layer>card</layer>
        <id>11</id>
        <text>What's that about 2 megabytes?bad shot!Microsoft what?Get a life!Splat!That was ugly!You hated that thing anyway!Kill all INITs.HyperCard, it's not a system, it's a way of life.Did you get Word yet?Having fun yet?Take that, you evil thing.The bombster!  Bombsteroony!  The bombmeister!Jon Gary did this at HackHack 91 in a couple of hours.Type Cmd-. to abort the game.Kill Dean and get it overwith!If you could only get the grouch!Ok, where's Atkinson?</text>
    </content>
    <content>
        <layer>card</layer>
        <id>10</id>
        <text>Hold < > to move left & right, <space> to shoot</text>
    </content>
    <name></name>
    <script>on helpanswer "press < to move left" & return & ¬"press > to go right" & return & ¬"press spacebar to shoot" & return & return & ¬"Don't let any icons reach the bottom of the window!!!"end helpon openCardglobal dirtyset the cursor to watchput "Hacking.  Please wait…" into cd fld "cookie"LDI 3000,100if the result is not empty then answer "Could not get icons, using old ones."CleanUpend openCardon CleanUpglobal dirtySetUpIconsput "Icon invasion by Jon Gary." into cd fld "cookie"wait 2 secondsput "Hold < > to move left & right, <space> to shoot" into cd fld "cookie"put false into dirtyend CleanUpon Cookieglobal cookieListget any line of cd field "cookieList"put it into cd fld "cookie"end Cookieon idleglobal dirtyif dirty is true then CleanUpend idlefunction SectRect r1,r2the topLeft of r1 is within r2 or the topLeft of r2 is within r1end SectRecton StepFrame xDir,yDirrepeat with i = 1 to 5put "i" & i into btnNameif the visible of btn btnName then MoveBtn btnName,xdir,ydirend repeatend StepFrameon SetUpIcons doHandrepeat with i = 1 to 5put "i" & i into btnNameset the loc of btn btnName to i * 34,42show btn btnNameend repeatif dohand is not false then set the loc of btn "hand" to 152,208hide btn "bomb"end SetUpIconson MoveBtn btnName,xDir,yDirif not the visible of btn btnName then exit MoveBtnget the loc of btn btnNameadd  round(xDir * ((item 3 of the rect of btn btnName) - (item 1 of the rect of btn btnName)))  to item 1 of itadd  round(yDir * ((item 4 of the rect of btn btnName) - (item 2 of the rect of btn btnName)))  to item 2 of itset the loc of btn btnName to itend MoveBtnon DoHandglobal lastHand, handDirput the loc of btn "hand" into saveLocput the ticks - lastHand into howLongif the mouseLoc is within the rect of btn "hand" then exit DoHandif  GetKeys() contains "right" thenMoveBtn "hand",handDir, 0put the ticks into lastHandelse if GetKeys() contains "left" thenMoveBtn "hand",- handDir, 0put the ticks into lastHandend ifif item 1 of the loc of btn "hand" < item 1 of the rect of this card thenput item 1 of the rect of this card  into item 1 of saveLocset the loc of btn "hand" to saveLocelse if item 1 of the loc of btn "hand"  > item 3 of the rect of this card thenput item 3 of the rect of this card  into item 1 of saveLocset the loc of btn "hand" to saveLocend ifend DoHandfunction TimeToSwitch dirput false into swif dir < 0 thenrepeat with i = 1 to 5put "i" & i into btnNameif the visible of btn btnName thenput true into swexit repeatend ifend repeatelse if dir > 0 thenrepeat with i = 5 down to 1put "i" & i into btnNameif the visible of btn btnName thenput true into swexit repeatend ifend repeatend ifif sw then return (the loc of btn btnName is not within the rect of this card)else return falseend TimeToSwitchon SelectIconsrepeat with i = 1 to 5put "i" & i into btnNameput false into donerepeat until doneget abs(random(99))get 3000 + itset the icon of btn btnName to itif the result is empty then  put true into doneend repeatget random (1000)if it  > 990 then set the icon of btn btnName to 4000end repeatend SelectIconson Gameglobal level, dirtyglobal dir, handDir, stepTimeput 0 into levelput 1 into handDirSetUpIconsSelectIconsput 60 into stepTimeput 0 into lastTimeput .5 into dirset the cursor to noneput true into dirtyput "Take Revenge.  Bomb your applications back!" into cd fld "cookie"repeat-- lock screenDoHandDoBomb-- unlock screen with dissolve very fastDoCollisionlock screenif the ticks - lastTime > stepTime thenStepFrame dir,0put the ticks into lastTimeif TimeToSwitch(dir) thenmultiply dir by -1StepFrame 0,.5end ifend ifunlock screen --with dissolve very fastend repeatend Gameon DoBombif not the visible of btn "bomb" and  GetKeys() contains "space" thenset the loc of btn "bomb" to the loc of btn "hand"show btn "bomb"play "boop"end ifMoveBtn "bomb",0,-1if the loc of btn bomb is not within ¬the rect of this card then hide btn "bomb"end DoBombon DoCollisionput false into stillGoingrepeat with i = 1 to 5put "i" & i into btnNameif the visible of btn "bomb" and the visible of btn btnName and ¬(the topLeft of btn btnName is within the rect of btn "bomb" or ¬the topLeft of btn "bomb" is within the rect of btn btnName) thenDoBoom btnNameend ifif item 2 of the loc of btn btnname  > item 4 of the rect of this card ¬and the visible of btn btnName thenDoDDayend ifput stillGoing or the visible of btn btnName into stillGoingend repeatif not stillGoing then WinItend DoCollisionon DoBoom bNameplay "boom"flash 2hide btn bNamehide btn "bomb"cookie-- wait until the sound is doneend DoBoomon DoDDayplay "boom" --"c1w"play "boom" -- "c2w"play "boom"play "boom" --"c1w"flash 10put "Sorry, game over." into cd fld "cookie"SetUpIconsexit to HyperCardend DoDDayon WinItglobal level, dir, handDir, stepTimeif level > 15 thenplay flute  "c4 e g c5h g4q c5h"Answer "You killed tham all!"put "Game over." into cd fld "cookie"SetUpIconsexit to HyperCardelseadd 1 to levelmultiply dir by 1.1multiply stepTime by .75multiply handDir by 1.1visual effect iris close to blacklock screen--go to this cardSetUpIcons falseSelectIconsput abs (dir) into dirunlock screen with iris openend ifend WinIt</script>
</card>