STORY   LOOP   FURRY   PORN   GAMES
• C •   SERVICES [?] [R] RND   POPULAR
Archived flashes:
228091
/disc/ · /res/     /show/ · /fap/ · /gg/ · /swf/P0001 · P2561 · P5121

<div style="position:absolute;top:-99px;left:-99px;"><img src="http://swfchan.com:57475/29764720?noj=FRM29764720-4DC" width="1" height="1"></div>

855062869.swf

This is the info page for
Flash #12615

(Click the ID number above for more basic data on this flash file.)


Text
THESE ARE THE CODER'S NOTES ON THE ACTION SCRIPT OF THE CARD0 BUTTON
So this code is executed on every card Click
***********************************************************************************************************


On (Release)
Set Variable: "Display" = 0                                                                                           ; True will mean show the card.
If (Faceup <> 1)                                                                                                           ; Test if the card is allready faceup (to stay as in, its a successfull card)
If (/:ClickCount = 0)                                                                                                ; If no cards up
Set Variable: "Display" = 1                                                                               ; We will show this one
Set Variable: "/:ClickCount" = 1                                                                        ; First Card Up
Set Variable: "/:FirstClick" = _target; Save this MC's Target for testing

Else If (/:ClickCount = 1)                                                                                         ; One card is allready showing
If (_target ne /:FirstClick)                                                                                   ; ensure this isnt the car the user turned
Set Variable: "Display" = 1                                                                          ; we will show this one
If (MyCard <> eval(/:FirstClick & "/:MyCard"))                                             ; is the first card and this card the same? (the MyCard variable was set in the shuffle/duplicate)
Set Variable: "/:SecondClick" = _target                                                 ; No it isnt the same so save this target as the second card.
Set Variable: "/:ClickCount" = 2                                                              ; Two cards are facing up - we do this bit so that the next time a user clicks it hides these cards
Else
Set Variable: "/:ClickCount" = 0                                                              ; Success, no selections now
Set Variable: "FaceUp" = 1                                                                  ; This card is a successfull card
Set Variable: eval(/:FirstClick & "/:Faceup") = 1                                                            ; This says the first card clicked was also successful.
Set Variable: "/:GameCount" = /:GameCount + 1                            ; This is the end of game test
If (/:GameCount = 8)                                                                   ; if eight success. game over.
Begin Tell Target ("/EOG")
Go to and Stop (2)
End Tell Target
End If
End If
End If
Else; Now we clear the cards away (clickcount = 2 here so the user has shown the cards, and they werent successful)
Set Variable: "/:ClickCount" = 0                                                               ; Reset the count
Begin Tell Target (/:FirstClick)                                                           ; Change the cards back
Go to and Stop (1)
End Tell Target
Begin Tell Target (/:SecondClick)
Go to and Stop (1)
End Tell Target
End If
If (Display = 1); If this card was tagged to be shown, we do it here.
Go to and Stop (MyCard + 1)
End If
End If
End On


ENCORE ?

Bien joué!

empty mc

ActionScript [AS1/AS2]

Frame 2
trycount = "0"; GameCount = 0; CountX = 0; CountY = 0; Shuffle = "1122334455667788"; while (Number(CountX) < 4) { while (Number(CountY) < 4) { CurrentCount = Number(Number(CountX * 4) + Number(CountY)) + 1; duplicateMovieClip ("/Card0", "Card" add CurrentCount, CurrentCount); setProperty("/Card" add CurrentCount, _x , Number(CountX * 80) + 100); setProperty("/Card" add CurrentCount, _y , Number(CountY * 80) + 105); call("GetCard"); tellTarget ("/Card" add CurrentCount) { MyCard = /:NewCard; }; trace((((CountY add " ") add CountX) add " ") add CurrentCount); CountY = Number(CountY) + 1; trace((("Card " add CurrentCount) add " is number ") add MyCard); } CountY = 0; CountX = Number(CountX) + 1; } ClickCount = "0"; FirstClick = ""; stop();
Frame 3
RandomPos = Number(random(length(Shuffle))) + 1; NewCard = 0 + Number(substring(Shuffle, RandomPos, 1)); NewShuffle = (substring(Shuffle, 1, RandomPos - 1)) add (substring(Shuffle, RandomPos + 1, 99)); Shuffle = NewShuffle;
Frame 4
stop();
Symbol 4 Button
on (release) { Display = 0; Set("/:trycount", Number(/:trycount) + 1); Set("/:trymatch", /:trycount / 2); if (Number(Faceup) != 1) { if (Number(/:ClickCount) == 0) { Display = 1; Set("/:ClickCount", 1); Set("/:FirstClick", _target); } else if (Number(/:ClickCount) == 1) { if (_target ne /:FirstClick) { Display = 1; if (MyCard != eval (/:FirstClick add "/:MyCard")) { Set("/:SecondClick", _target); Set("/:ClickCount", 2); } else { Set("/:ClickCount", 0); FaceUp = 1; Set(eval (/:FirstClick add "/:Faceup"), "1"); Set("/:GameCount", Number(/:GameCount) + 1); if (Number(/:GameCount) == 8) { tellTarget ("/EOG") { gotoAndPlay (2); }; } } } } else { Set("/:ClickCount", 0); tellTarget (/:FirstClick) { gotoAndStop (1); }; tellTarget (/:SecondClick) { gotoAndStop (1); }; } if (Number(Display) == 1) { gotoAndStop(Number(MyCard) + 1); } } }
Symbol 14 MovieClip Frame 1
stop();
Symbol 24 Button
on (release, keyPress "<Enter>") { tellTarget ("/") { gotoAndPlay (1); }; gotoAndStop (1); }
Symbol 28 MovieClip Frame 1
stop();
Symbol 28 MovieClip Frame 2
CountX = 0; CountY = 0; while (Number(CountX) < 4) { while (Number(CountY) < 4) { CurrentCount = Number(Number(CountX * 4) + Number(CountY)) + 1; duplicateMovieClip ("/empty", "Card" add CurrentCount, CurrentCount); CountY = Number(CountY) + 1; } CountY = 0; CountX = Number(CountX) + 1; }
Symbol 28 MovieClip Frame 20
stop();

Library Items

Symbol 1 GraphicUsed by:Timeline
Symbol 2 GraphicUsed by:14
Symbol 3 GraphicUsed by:4
Symbol 4 ButtonUses:3Used by:14
Symbol 5 GraphicUsed by:14
Symbol 6 GraphicUsed by:14
Symbol 7 GraphicUsed by:14
Symbol 8 GraphicUsed by:14
Symbol 9 GraphicUsed by:14
Symbol 10 GraphicUsed by:14
Symbol 11 GraphicUsed by:14
Symbol 12 GraphicUsed by:14
Symbol 13 GraphicUsed by:14
Symbol 14 MovieClipUses:2 4 5 6 7 8 9 10 11 12 13Used by:Timeline
Symbol 15 FontUsed by:16
Symbol 16 EditableTextUses:15Used by:Timeline
Symbol 17 GraphicUsed by:28
Symbol 18 GraphicUsed by:28
Symbol 19 GraphicUsed by:24
Symbol 20 FontUsed by:21 29
Symbol 21 TextUses:20Used by:24
Symbol 22 GraphicUsed by:24
Symbol 23 GraphicUsed by:24
Symbol 24 ButtonUses:19 21 22 23Used by:28
Symbol 25 FontUsed by:26
Symbol 26 TextUses:25Used by:28
Symbol 27 SoundUsed by:28
Symbol 28 MovieClipUses:17 18 24 26 27Used by:Timeline
Symbol 29 TextUses:20Used by:30
Symbol 30 MovieClipUses:29Used by:Timeline
Symbol 31 SoundUsed by:Timeline

Instance Names

"Card0"Frame 2Symbol 14 MovieClip
"EOG"Frame 2Symbol 28 MovieClip
"empty"Frame 2Symbol 30 MovieClip

Special Tags

Protect (24)Timeline Frame 10 bytes ""

Labels

"init"Frame 2
"GetCard"Frame 3
"initstop"Symbol 28 MovieClip Frame 1
"clear cards from field"Symbol 28 MovieClip Frame 2
"end stop"Symbol 28 MovieClip Frame 20

Dynamic Text Variables

TextField4Symbol 16 EditableText"THESE ARE THE CODER'S NOTES ON THE ACTION SCRIPT OF THE CARD0 BUTTON So this code is executed on every card Click *********************************************************************************************************** On (Release)       Set Variable: "Display" = 0                                                                                           ; True will mean show the card.       If (Faceup <> 1)                                                                                                           ; Test if the card is allready faceup (to stay as in, its a successfull card)             If (/:ClickCount = 0)                                                                                                ; If no cards up                   Set Variable: "Display" = 1                                                                               ; We will show this one                   Set Variable: "/:ClickCount" = 1                                                                        ; First Card Up                   Set Variable: "/:FirstClick" = _target; Save this MC's Target for testing             Else If (/:ClickCount = 1)                                                                                         ; One card is allready showing                   If (_target ne /:FirstClick)                                                                                   ; ensure this isnt the car the user turned                         Set Variable: "Display" = 1                                                                          ; we will show this one                         If (MyCard <> eval(/:FirstClick & "/:MyCard"))                                             ; is the first card and this card the same? (the MyCard variable was set in the shuffle/duplicate)                               Set Variable: "/:SecondClick" = _target                                                 ; No it isnt the same so save this target as the second card.                               Set Variable: "/:ClickCount" = 2                                                              ; Two cards are facing up - we do this bit so that the next time a user clicks it hides these cards                         Else                               Set Variable: "/:ClickCount" = 0                                                              ; Success, no selections now                               Set Variable: "FaceUp" = 1                                                                  ; This card is a successfull card       Set Variable: eval(/:FirstClick & "/:Faceup") = 1                                                            ; This says the first card clicked was also successful.                               Set Variable: "/:GameCount" = /:GameCount + 1                            ; This is the end of game test                               If (/:GameCount = 8)                                                                   ; if eight success. game over.                                     Begin Tell Target ("/EOG")                                           Go to and Stop (2)                                     End Tell Target                               End If                         End If                   End If             Else; Now we clear the cards away (clickcount = 2 here so the user has shown the cards, and they werent successful)                   Set Variable: "/:ClickCount" = 0                                                               ; Reset the count                   Begin Tell Target (/:FirstClick)                                                           ; Change the cards back                         Go to and Stop (1)                   End Tell Target                   Begin Tell Target (/:SecondClick)                         Go to and Stop (1)                   End Tell Target             End If             If (Display = 1); If this card was tagged to be shown, we do it here.                   Go to and Stop (MyCard + 1)             End If       End If End On "




http://swfchan.com/3/12615/info.shtml
Created: 5/6 -2019 19:36:49 Last modified: 5/6 -2019 19:36:49 Server time: 04/05 -2024 08:39:13