## Boo Return

BEO TiriES="0" : WHILE TII1ER <F3:WEND'** DELAY EEFORE REHOUING CARD 630 LET A=A~3:IF A>70 THEN LET B=B+4:LET A =1:LET L1=L1 +1 640 IF Ll=5 THEN LET B=1:LET A=1:LET L1=0:CLS 650 LDCATE B, A: PRINT " (

BBO FOR I = B + l TO B + 5:LOCATE I, A: PRINT; "| | ":NEXT I

BBO LOCATE B + l,A + l:PR INT HIDSCUS,R,2) 690 LOCATE B+2,A + l:PR INT CHRSCJ) 700 LOCATE B+4,A+9:PRINT CHRSCJ) 710 LOCATE 0+5,A+S:PRINT MIDSCY1S,R,2) 720 LOCATE 18,1:SYSTEM

Tte program is made up of several separate parts or subroutines which function together to create the visual effect you will see on the screen. I have received some questions from several magicians who are trying to write the programs on some thing otter than an IBM (TM) or Compatible. For this reason, below you will find a brief discussion of what each of the routines acconpl ishes.

Lines 10-40. These are comment lines which have no effect upon the program's execution. They provide the copyright information.

Lines 50-110. These lines set up tte parameters for the program. They tell the computer to watch for function buttons being pressed as well as set up tte strings which will be used to convert random numbers into random playing cards. Line 90 sets tte initial values for "A" and "B" which are used for cursor positioning. Be sure to type lines 100 and 110 exactly as written, including tte spaces.

Lines 120-190. This is tte mainline of tte program. Line 120 sets a "V" equal to a random number between 1 and 13 (ace through king) and "S" equal to random number between 1 and 4 (tte four suits). Line 160 adds two to tte random number held in "S" because tte ASCII values for tte four suits are 3 through 6 exclusive.

Lines 200-370. This is where tte program comes when tte [Fl] button is pressed. It prints tte force card on tte screen instead of a randomly generated card. When finished, it goes to Line 610.

Lines 380-400. This is where tte program comes when tte [Fl] button is pressed. It delays tte program for two seconds before continuing tte program's execution.

Lines 410-470. This routine prints tte borders of tte cards. It checks (lines 420 & 430) to see if you are at tte end of tte current line or if you are at tte end of tte page. To print tte borders, you will use tte extended ASCII codes. Tte upper left corner is #218, tte upper right corner is #191. Tte lower left corner is #192 and tte lower right corner is #217. Tte vertical line for tte left and right side of tte card is formed using #179. Finally, tte horizontal line for tte top and bottom edges is #196.

Lines 480-550. This routine prints tte indexes of tte playing cards using the random numbers and tte character strings found earlier in tte program.

Lines 560-600. This is where you can set tte value of tte suit and value of tte force card and tte delay between tte time tte [Fl] is pressed and tte force card vanishes from tte screen. For example, if you want tte force card to be tte ten of clubs, you would change line 570 to "Let Fl=10" and line 580 to "Let F2 = 5". If you want a twelve second delay before you remove the miniature force card from tte screen,, change line 590 to "Let F3=12".

Line 610-720. This is where tte program comes after tte selection is made. It pauses for however long you requested {line 590) and then removes tte force card from tte screen. Tte otter lines must be there to reconstruct tte card immediately below the force card. Without these lines, when the force card vanishes, so would part of tte card beneath it.

pressed before you want the force card to vanish from the screen. In line 610, you can set the amount of time in seconds.

On the disk, I use menus to set the time and the force cards because it's much more user friendly. However, it would be more difficult for you to have to keypunch in the menus and create the files which retain the information. For this reason, I put the keys for changing the program characteristics in the subroutine located at line 580.

While the most difficult part of this trick is the timing, you will find that using the same patter each time as well as in practice will greatly simplify the procedure.

For Experts. For those of you who are proficient with computers or have a friend who is, you can create the following batch file using COPY CON or EDLIN. This will allow you to execute the program without typing in BASICA before the program name. This takes away the feeling that the computer is doing everything for you. Place this batch in the same subdirectory with the program. It assumes the subdirectory is BASIC and the program is named "RANDOMCD".

1 ECHO OFF

2 CD\BASIC

3 BASICA RANDOMCD

Try the trick and see how effective a computerized card trick can be. It is visual, novel, baffling, and entertaining. What more could you want? (What more, that is, other than a secretary to keypunch all of this?)

I have sensed growing resentment toward the use of magazine space to campaign for new subscribers. You don't have to hit me ever the head with a divided lady. Don't think those death threats were so subtle that I didn't notice them.

And, for that reason, I am not going to use this space like I normally would to ex toll the values of this publication and the benefits you receive by subscribing. I have decided not to waste the space. You are fairly intelligent and are old enough to make up your own mind. Either you want the magazine or you don't. It isn't fair to take up valuable space which could be used for tricks (if I had any more) just to carry on business.

After all, you have already paid for this issue. Making you read renewal information would be like charging you for watching tele/ision commercials. It just isn't right.

So, forget the pleas for subscribers that normally occupy this page. They aren't here. There is no mention any where that if you don't renew, I am going to have to sell the van which my kids love so dearly. (Did I mention Casey is now three and a half and Michelle is now one and a half?)

Don't waste time looking for the digs on other magazines. They aren't here. For example, no where on this page will I tell you that my daughter's preschool newspaper will probably reach 10,000 subscribers

I'm not even going high cost of living in know that. You know I

before Geni i. to mention the Raleigh. You just sign your renewal checks over to the printer. It would bring tears to your eyes if you realized just how close he is to garnishing my regular paycheck. But you won't read about it here. No sir!

I won't mention the ever-increasing postage since you have probably already read in the newspaper that the next hike is due in March. You know that I just sign your renewal checks over to the Post office.

I don't want to burden you with the outrageous advertising costs incurred by this magazine. You have no doubt seen the two minute spots I have taken out during the halftime of the NFL playoff games which air on Japanese television. I personally feel that \$400,000 per minute is not too much for the special people in my life. Did I mention that I just sign your renewal checks over to the networks?

I hope you are starting to get the picture now. No gadgets, no gimmicks, no contests, and no come-ons. There will be no subscription information in this issue. I can't afford the space and you don't have the time.

You won't have Steve Beam to pick on any more. Never again will you see the statement, "Make your \$2 5.00 check for 4 issues plus The Annual, payable to The Trapdoor and send it to:

TRAPDOOR PRODUCTIONS 407 CARRINGTON DRIVE KNIGHTDALE, NC 27545 PHONE (919) 2 66-7900"

Now, with all of this in mind, if you would like to continue with a magazine which is so responsive to your feelings, make your \$2 5.00 check for 4 issues plus The Annual, payable to The Trapdoor and send it to:

TRAPDOOR PRODUCTIONS 407 CARRINGTON DRIVE KNIGHTDALE, NC 27545 PHONE (919) 2 66-7900

Ups and Downs

John Riggs

John has been getting a lot of use out of Upside Down from issue number one. He is using patter similar to the "Good news / bad news" jokes. For those of you who are having trouble writing your own lines, he has sent several along to get you started.

"On the up side, I just found out my wife got a cat to keep her company when I am out of town doing magic shows. On the down side, the cat is six feet eight inches and plays basketball for the Boston Celtics."

"On the up side, my wife decided not to run off with her lover. On the down side, my girlfriend did."

"On the up side, my wife just found a picture worth \$10,000. On the down side, it's a picture of my girlfriend and me coming out of a motel room."

"On the down side, I just found out my kid is a shoplifter. On the up side, everything he brought home fits me."

"On the up side, my wife just gave birth to a beautiful, blonde, blue-eyed baby." Wait for the applause. "On the down side, I'm an eskimo."

On the up side, John contributed the above to get you warmed up. On the down side, that was the last one.

If, on the other hand, he switches with somebody else, go to the new person and ask, "Do you want us to use your card, or do you want to switch with somebody else?" It's a subtlety, but you are following the force card around the room while apparently giving everyone a free choice as to which card they want to use.

If he says he wants you to use that card, build up the fact that the last guy wanted to switch and that this guy wanted to keep his card. There is no way you could have predicted who would have done what. Take the force card from him and proceed with the trick.

If he decides to switch, me to the new holder of the force card, and this time be a little more forceful. "Do you want us to use your card, or are you going to waste more of this audience's precious time?" Note that he still has the option to switch, but now you have very subtly remcved some of the motivation.

Repeat the above procedure until you arrive at the force card or until you are the only one left in the room. If everyone does leave, forget that you missed the force. Just take your rubber hand out of your briefcase and glue it to the wall. Try it one more time with someone you like.

0 0