People have requested my sims.I have sent out copies of indybs.This is the official Source Code for UWEsim.For Mac users save as .bas file.Windows users copy and paste to Chipmunk Basic for Windows available at The Chipmunk Basic Homepage.
www.nicholson.com/rhn/basic2 cls
4 print "∞∞∞Ultimate Wrestling Experience Sim∞∞∞™"
6 input "Type <p> to play or <q> to quit - ",pl$ : cls
8 if pl$ = "p" then goto 11
10 if pl$ = "q" then print "Thanks for playing!" : end
11 input "What is wrestler 1's name - ",w1$
12 input "What is wrestler 1's Hometown - ",ht1$
13 input "What is wrestler 1's Finishing Move - ",f1$
14 print ""
15 input "What is wrestler 2's name - ",w2$
16 input "What is wrestler 2's Hometown - ",ht2$
17 input "What is wrestler 2's Finishing Move - ",f2$
18 print ""
19 print ""
20 print w1$ " vs " w2$
21 print "Announcer Shaylene Tanner:"
22 print "In the Red Corner... "
23 print "From " ht1$ "..." w1$ "!"
24 print "And in the Blue Corner... "
25 print "Wrestling out of " ht2$ "..." w2$ "!"
29 print "DING DING DING"
30 randomize timer
31 move1 = rnd(10)+1
32 if move1 = 1 then
33 print w1$ " and " w2$ " start out in a Collar & Elbow Tieup!"
34 print "A lot of pushing and pulling but,no one gets an advantage."
35 print "They push off,but remain toe to toe."
36 endif
38 if move1 = 2 then
40 print w2$ " and " w1$ " lockup."
41 print w1$ " tries to turn it into a hiptoss!"
42 print "But," w2$ " blocks it."
43 endif
44 if move1 = 3 then
46 print w1$ " and " w2$ " hookup in a Greco Roman knucklelock!"
47 print "They go shoulder to shoulder trying to get an advantage."
48 print w1$ " falls back and monkey flips " w2$ "!"
49 endif
50 if move1 = 4 then
51 print w2$ " grabs on with a Greco Roman knucklelock!"
52 print "Stepover & roll," w2$ " turns it into a shortarm scissors."
53 print w1$ " quickly manuvers out of the hold."
54 endif
56 if move1 = 5 then
57 print w1$ " and " w2$ " lockup."
58 print w1$ " grabs on to a side headlock."
59 print w2$ " pushes " w1$ " off into the ropes to escape the hold!"
60 endif
61 if move1 = 6 then
62 print w2$ " goes from a collar & elbow to a waistlock!"
63 print "Standing switch,another switch " w2$ " gets the advantage."
64 print w2$ " turns it into a hammerlock,stepout," w1$ " tries a Salto Suplex."
65 print "But," w2$ " blocks and cinches up on a headlock! " w1$ " escapes."
66 endif
68 if move1 = 7 then
70 print w1$ " and " w2$ " lockup!"
71 print "Headlock," w1$ " switches it into a chinlock."
72 print w1$ " hangs on...a quick shot to the ribs and " w2$ " escapes."
73 endif
74 if move1 = 8 then
75 print w2$ " and " w1$ " lockup!"
76 print "Armhook," w2$ " veals " w1$ " across the ring!"
78 endif
80 if move1 = 9 then
81 print w1$ " shows off some great chain wrestling moves!"
82 print w2$ " hooks up with a top wristlock."
83 print w1$ " powers out and " w2$ " goes tumbling on the mat!"
84 endif
86 if move1 = 10 then
87 print w2$ " with an armbar,into a top wristlock...legtrip!"
88 print w1$ " counters with a legsweep into a double leglock!"
89 print w2$ " powers out,neither wrestler has the advantage."
90 endif
92 move2 = rnd(10)+1
94 if move2 = 1 then
96 print w2$ " has " w1$ " up...bodyslam!"
98 endif
100 if move2 = 2 then
102 print w1$ " hooks " w2$ "'s arm...hiptoss!"
104 endif
106 if move2 = 3 then
108 print w2$ " flings " w1$ " into the ropes!"
110 print "Criss Cross!"
112 print w2$ " with a drop toehold!"
114 endif
116 if move2 = 4 then
118 print w1$ " whips " w2$ " into the ropes!"
120 print "Criss Cross!"
122 print w1$ " takes " w2$ " down with an armdrag!"
124 endif
126 if move2 = 5 then
127 print w2$ " throws " w1$ " into the ropes!"
128 print "Duck down,attempted back bodydrop..."
129 print "Ooh...Kick in the face,you can't telegraph your moves!"
130 endif
131 if move2 = 6 then
132 print w1$ " throws " w2$ " into the ropes!"
133 print "Armhook...switch..." w2$ " with a reverse Russian Legsweep!"
136 endif
138 if move2 = 7 then
140 print w2$ " tackles " w1$ "!They fight for the advantage!"
142 print "Half nelson by " w1$ "!"
144 print w2$ " scoots around and grabs a front facelock."
146 print w1$ " escapes with a snapmare!"
148 endif
150 if move2 = 8 then
152 print w1$ " with a Scoop Slam!"
154 print w2$ " is up quickly an retaliates with an open hand chop."
156 print w1$ " pushes " w2$ " into the corner...vealtoss!"
158 print w2$ " gets up quickly!Both wrestlers look a little frustrated."
160 endif
161 if move2 = 9 then
162 print w2$ " armdrags " w1$ "...Legdrop into a side headlock."
163 print w1$ " gets up and pushes " w2$ " off."
164 print "Launch off the ropes..." w1$ " hits a shoulderblock!"
166 endif
168 if move2 = 10 then
169 print w1$ " misses a shoulderblock!" w2$ " drops an elbow..."
170 print w1$ " grabs on with a hammerlock...sit out..." w2$ " gets away!"
171 endif
172 move3 = rnd(10)+1
173 if move3 = 1 then
174 print w1$ " drops " w2$ " with a running lariat!"
175 print "Kneedrop,another...fistdrop!"
176 print w1$ " tries to wear down " w2$ "!"
180 endif
182 if move3 = 2 then
183 print w2$ " drops " w1$ " with an elbow between the eyes!"
184 print "Elbowdrop,again and again!Jumping heeldrop!"
185 print w2$ " tries to slow " w1$ " down!"
186 endif
188 if move3 = 3 then
190 print w1$ " uses a Japanese Armdrag to take " w2$ " down!"
191 print "Thez Press and couple of forearms for good measure!"
192 endif
194 if move3 = 4 then
195 print w2$ " chops " w1$ " chops back!"
196 print "They're trading chops! " w2$ " rakes the eyes!"
197 print "A hard knife edge chop knocks " w1$ " down!"
198 endif
200 if move3 = 5 then
201 print w1$ " clamps on an armbar,dropdown,roll..." w2$ " goes down!"
204 endif
206 if move3 = 6 then
208 print w2$ " gets " w1$ " in an Abdominal Stretch!But " w1$ " gets to the ropes!"
210 endif
212 if move3 = 7 then
214 print w1$ " with a headlock!"
216 print "Modified bulldog..." w2$ " with an eyepoke...good desperation move!"
218 print "Clubbing forearm to the back of the head!"
220 print w1$ " comes back with a couple of forearm shots!"
222 endif
224 if move3 = 8 then
226 print w2$ " scrambles " w1$ "'s brains with a headbutt!"
228 print "Wait..." w2$ " is staggering too!"
230 print w1$ " with a whip...no it's reversed!"
232 print w1$ " crashes into the turnbuckles!"
234 endif
236 if move3 = 9 then
238 print w1$ " gets " w2$ " with a standing dropkick!"
240 print w1$ " goes for a jumping elbowdrop..."
242 print w2$ " rolls out of the way at the last second!"
244 endif
246 if move3 = 10 then
248 print w2$ " with a hard bodyslam!"
250 print "Launch off the ropes for a splash..."
252 print "Nothing but canvas!NOBODY HOME!"
254 endif
256 move4 = rnd(10)+1
258 if move4 = 1 then
260 print w2$ " follows " w1$ " into the corner with a lariat!"
262 endif
264 if move4 = 2 then
266 print w1$ " ties " w2$ " up in the corner...open hand chop!"
268 endif
270 if move4 = 3 then
272 print w2$ " tries to wear down " w1$ " with a front facelock!"
274 endif
276 if move4 = 4 then
278 print w1$ " catches " w2$ " with a knee in the side."
280 endif
282 if move4 = 5 then
284 print w2$ " hits " w1$ " with a lariat!"
286 endif
288 if move4 = 6 then
290 print w1$ " comes down on " w2$ " with a kneedrop!"
292 endif
294 if move4 = 7 then
296 print w2$ " wears " w1$ " down with a reverse chancery."
298 endif
300 if move4 = 8 then
302 print w1$ " takes " w2$ " down with a Jiu Jitsu throw!"
304 endif
306 if move4 = 9 then
308 print w2$ " with a Drop Toehold!"
310 endif
312 if move4 = 10 then
314 print w1$ " takes " w2$ " down with a Single Leg Pickup!"
316 endif
318 move5 = rnd(10)+1
320 if move5 = 1 then
322 print w1$ " stuns " w2$ " with a hard shot to the head!"
323 print "Scoop Slam!"
324 endif
326 if move5 = 2 then
328 print w2$ " locks up with " w1$ ",they fight for position!"
329 print w2$ " with a Front facelock into a modified Facejammer!"
330 endif
332 if move5 = 3 then
334 print w1$ " swings at " w2$ " but,misses..."
336 print w1$ " doesn't miss with a spinkick!"
338 endif
340 if move5 = 4 then
341 print w2$ " gets " w1$ " in a headlock!"
342 print "There's a switch and " w1$ " gets a DDT!"
343 print w1$ " staggers a few steps then takes a nosedive!"
344 endif
346 if move5 = 5 then
348 print w1$ " with an armdrag and a quick legdrop!"
350 endif
352 if move5 = 6 then
354 print w2$ " nails " w1$ " with an atomic drop! "
356 print w1$ " is down!"
358 endif
360 if move5 = 7 then
361 print w1$ " sends " w2$ " into the turnbuckles..."
362 print w1$ " runs from half way across the ring..."
363 print "A beautiful reverse elbow " w2$ " slumps in the corner!"
364 endif
366 if move5 = 8 then
368 print w2$ " throws " w1$ " into the ropes...backdrop!"
370 endif
372 if move5 = 9 then
374 print w1$ " has " w2$ " up...Spinning Scoop Slam! "
376 print w2$ " goes down hard!"
378 endif
380 if move5 = 10 then
382 print w2$ " gets " w1$ " in an Airplane Spin."
383 print w2$ " drops " w1$ " face 1st onto the canvas...elbowdrop!"
384 endif
386 moves6 = rnd(10)+1
388 if move6 = 1 then
390 print w2$ " with a big chop! " w1$ " is reeling!"
392 endif
394 if move6 = 2 then
396 print w1$ " goes up,attempts a Moonsault!"
398 print "No! " w2$ " rolls out of the way!"
400 endif
402 if move6 = 3 then
404 print w2$ " rocks " w1$ " with a big right hand!"
406 endif
408 if move6 = 4 then
410 print w1$ " catches " w2$ " with a jiu jitsu throw!"
412 endif
414 if move6 = 5 then
416 print w2$ " socks " w1$ " in the face!"
418 endif
420 if move6 = 6 then
422 print w1$ " brains " w2$ " with a walkover DDT."
424 endif
426 if move6 = 7 then
428 print w2$ " pounds " w1$ " with lefts and rights!"
430 endif
432 if move6 = 8 then
434 print w1$ " gets " w2$ " up...Samoan Drop!"
436 endif
438 if move6 = 9 then
440 print w2$ " clotheslines " w1$ "!"
442 endif
444 if move6 = 10 then
446 print w1$ " clamps on a sleeperhold... "
448 print w2$ " counters with a jawbreaker!"
450 endif
452 move7 = rnd(10)+1
454 if move7 = 1 then
456 print w1$ " applies a front facelock... "
458 print w2$ " is getting worn out! "
459 print w1$ " holds on! " w2$ " backs into the corner to break the hold!"
460 endif
462 if move7 = 2 then
464 print w2$ " stomps " w1$ " then executes a kneedrop!"
466 endif
468 if move7 = 3 then
470 print w1$ " gets " w2$ " in Leg Grapevine!"
471 print "A kick in the chest frees " w2$ "!"
472 endif
474 if move7 = 4 then
476 print w2$ ",Russian Legsweep on " w1$ "."
478 endif
480 if move7 = 5 then
482 print w1$ " clocks " w2$ " with a Double Underhook DDT!"
484 endif
486 if move7 = 6 then
488 print w2$ " with a flying lariat."
490 endif
492 if move7 = 7 then
494 print w1$ " with a swinging neckbreaker. " w2$ " is dazed."
496 endif
498 if move7 = 8 then
500 print w2$ " gets " w1$;" in a chokehold... "
502 print "The Referee counts 1.2.3.4... "
504 print w2$;" breaks the hold!"
506 endif
508 if move7 = 9 then
510 print w1$ " chokes " w2$ "! "
512 print "The Referee gets between them... "
514 print w1$ " breaks the hold!"
516 endif
518 if move7 = 10 then
520 print w2$ ",Reverse Neckbreaker on " w1$ "."
522 endif
524 move8 = rnd(10)+1
525 if move8 = 1 then
526 print w2$ " plants " w1$ " with a Tombstone Piledriver!"
527 print "1..."
528 print "2..."
529 print w1$ " gets a shoulder up just in time!"
530 endif
531 if move8 = 2 then
532 print w1$ " connects with a cresent kick!It floors " w2$ "!"
533 print "1..."
534 print "2..."
535 print "NO...Only a Two Count!"
536 endif
538 if move8 = 3 then
540 print w2$ " with a Salto Suplex!"
542 endif
544 if move8 = 4 then
546 print w1$ " with a Press Slam!"
548 print "1..."
549 print "Kickout!"
550 endif
552 if move8 = 5 then
554 print w2$ " executes a gutwrench suplex on " w1$ "."
556 endif
558 if move8 = 6 then
560 print w1$ " goes up and...flattens " w2$ " with a flying shoulderblock!"
562 endif
564 if move8 = 7 then
566 print w2$ " attempts a Frog Splash but... " w1$;" Gorilla Slams " w2$ "!"
568 endif
570 if move8 = 8 then
572 print w1$ " smashes " w2$ " with a running splash!"
574 endif
576 if move8 = 9 then
578 print w2$ " attempts a move from the top but, " w1$ " dropkicks " w2$ "!"
580 endif
582 if move8 = 10 then
584 print w1$ " nails " w2$ " with a Flying Axehandle!"
586 endif
588 move9 = rnd(10)+1
590 if move9 = 1 then
592 print w2$ " goes for a Flying Axehandle but, " w1$ " counters with a Gorilla Slam!"
594 endif
596 if move9 = 2 then
598 print w1$ " climbs to the top,but... " w2$ " gets up and shakes the ropes!"
600 print w1$ " topples into the ring!"
602 endif
603 if move9 = 3 then
604 print w2$ " executes a Headscissors Takedown!"
605 print "1..."
606 print "2..."
607 print "TWO!It was only a two count!"
608 endif
610 if move9 = 4 then
612 print w1$ " goes for a leglock but... " w2$ " powers out of the hold!"
614 endif
616 if move9 = 5 then
617 print w2$ ",Superplex! " w1$ " can't get up!"
618 print "1..."
619 print "How do you kickout from a move like that?!?!"
620 endif
622 if move9 = 6 then
624 print w1$ " tosses " w2$ " out of the ring!"
626 print w1$;" slams " w2$ "'s head into the ringpost!"
627 print w1$ " throws " w2$ " back into the ring!"
628 endif
630 if move9 = 7 then
631 print w2$ " catches " w1$ " with a Flying Forearm!"
632 print "1..."
633 print w2$ " can't hold " w1$ "!"
634 endif
636 if move9 = 8 then
638 print w1$ " attempts a Hiptoss but... " w2$ " counters with a quick elbow!"
640 endif
642 if move9 = 9 then
643 print w2$ " with a Brainbuster!"
644 print "1..."
645 print w1$ " kicks out!"
646 endif
648 if move9 = 10 then
650 print w1$ " gets " w2$;" in a Scorpian Deathlock!"
651 print w2$ " is in pain but crawls towards the ropes..."
652 print w2$ " grabs the middle rope,The Referee makes " w1$ " break the hold!"
653 goto 656
654 endif
655 move10 = rnd(10)+1
656 if move10 = 51 then
657 print w2$ " Chokeslams " w1$ "!"
658 print "1..."
659 print "2..."
660 print "DENIED! " w1$ " just barely got a shoulder up!"
662 endif
664 if move10 = 52 then
666 print w1$ " gouges " w2$ "'s eyes.The Referee warns " w1$ "."
668 endif
670 if move10 = 53 then
672 print w2$ " gets " w1$ " in a Abdominal Stretch. " w1$ " grabs the ropes."
674 print "The Referee counts 1.2.3! " w2$ " breaks the hold!"
676 endif
678 if move10 = 54 then
680 print w1$ " nails " w2$ " with a reverse heelkick!"
682 endif
683 if move10 = 55 then
684 print w2$ " with a plancha on " w1$ "."
685 print "1..."
686 print "2..."
687 print "Almost a three count,just a half count away!"
688 endif
690 if move10 = 56 then
691 print w1$ " with a springboard moonsault"
692 print w1$ " rolls " w2$ " up!"
693 print "NO! " w1$ " cannot hold " w2$ "!"
694 endif
696 if move10 = 57 then
697 print w2$ " with a Hotshot on " w1$ "!"
698 print "There's a cover...NO!"
699 print "Somehow " w1$ " manages to kickout!"
700 endif
701 if move10 = 58 then
702 print w1$ " connects with a corkscrew plancha!"
703 print "1..."
704 print "2..."
705 print w2$ " will not be pinned this time!"
706 endif
708 if move10 = 59 then
710 print w2$ " dropkicks " w1$ " into the turnbuckles!"
712 endif
714 if move10 = 60 then
715 print w1$ " hits a Missile Dropkick! "
716 print w2$ " caught it right on the jaw!"
717 print "1..."
718 print "2..."
719 print "NO! " w2$ " got a shoulder up!"
720 endif
722 move11 = rnd(20)+1
724 if move11 = 1 then
726 print w2$ " gets flattened with a Powerslam!"
728 print w1$ " rolls " w2$ " up..."
730 print "The Referee counts!"
732 print "1..."
734 print "2..."
736 print "3..."
737 print "DING DING DING"
738 print w1$ " gets the win over " w2$ "!"
740 end
742 endif
744 if move11 = 2 then
746 print w2$ " with an Inside Cradle!"
748 print "The Referee counts!"
750 print "1..."
752 print "2..."
754 print "3..."
755 print "DING DING DING"
756 print w2$ " defeats " w1$ " by pinfall!"
758 end
760 endif
762 if move11 = 3 then
764 print w1$ " gets " w2$ " in an Abdominal Stretch!"
766 print "It looks like..."
768 print "No not yet..."
770 print "YES!" w2$ " taps out!"
771 print "DING DING DING"
772 print w1$ " wins this one by submission!"
774 end
776 endif
778 if move11 = 4 then
780 print w2$ " puts " w1$ " in a Sharpshooter!"
782 print w1$ " tries to make it to the ropes,but gets dragged back by " w2$ "!"
784 print w1$ " hangs on..."
786 print w1$ " can't take the pain & submits!"
787 print "DING DING DING"
788 print w2$ " gets a submission win over " w1$ "!"
790 end
792 endif
794 if move11 = 5 then
796 print f1$ " by " w1$ "!"
798 print w1$ " rolls " w2$ " up handful of tights!"
800 print "The Referee counts!"
802 print "1..."
804 print "2..."
806 print "3..."
807 print "DING DING DING"
808 print w1$ " gets the win!"
810 end
812 endif
814 if move11 = 6 then
816 print w1$ " just got nailed with " w2$ "'s," f2$ "!"
818 print w1$ " is clearly shaken...another " f2$ "!"
820 print "The Referee counts!"
822 print "1..."
824 print "2..."
826 print "3..."
827 print "DING DING DING"
828 print w2$ " destroys " w1$ " with 2 " f2$ "s & wins the match!"
830 end
832 endif
834 if move11 = 7 then
836 print w1$ " with a quick rollup!FEET ON THE ROPES!"
838 print "The Referee counts!"
840 print "1..."
842 print "2..."
844 print "3..."
845 print "DING DING DING"
846 print w1$ " is your winner!"
848 end
850 endif
852 if move11 = 8 then
854 print w1$ " takes a Super Kick in the head!"
856 print w2$ " with a pin!Handful of tights!"
858 print "The Referee counts!"
860 print "1..."
862 print "2..."
864 print "3..."
865 print "DING DING DING"
866 print w2$ " gets the win!"
868 end
870 endif
872 if move11 = 9 then
874 print w1$ " with a " f1$ "!" w2$ " didn't see it coming!"
876 print "The Referee counts!"
878 print "1..."
880 print "2..."
882 print "3..."
883 print "DING DING DING"
884 print w1$ " hammered " w2$ " with a " f1$ " & gets the win!"
886 end
888 endif
890 if move5 = 10 then
892 print w2$ " blasts " w1$ " with a " f2$ "!"
894 print "The Referee counts!"
896 print "1..."
898 print "2..."
900 print "3..."
901 print "DING DING DING"
902 print w2$ " wins this one with a " f2$ "!"
904 end
906 endif
908 if move11 = 11 then
910 print w1$ " gets " w2$ " in a Small Package!"
912 print "The Referee counts..."
914 print "1..."
916 print "2..."
918 print "3..."
919 print "DING DING DING"
920 print w1$ " is your winner!"
922 end
924 endif
926 if move11 = 12 then
928 print w2$ " with a Backslide!"
930 print "The Referee counts..."
932 print "1..."
934 print "2..."
936 print "3..."
937 print "DING DING DING"
938 print w2$ " is your winner!"
940 end
942 endif
944 if move11 = 13 then
946 print "Double Leglock by " w1$ "!"
948 print w2$ " refuses to tap out!"
950 print w1$ " yanks on it!"
952 print w2$ " can't take the pain & submits!"
953 print "DING DING DING"
954 print w1$ " wins by submission!"
956 end
958 endif
960 if move11 = 14 then
962 print w2$ " sits down on a Scorpian Deathlock!"
964 print w1$ " is in agony!"
966 print w1$ " tells the Referee,NO!"
968 print w2$ " applies the presure... " w1$ " TAPS!"
969 print "DING DING DING"
970 print w2$ " Wins this one by submission!"
972 end
974 endif
976 if move11 = 15 then
978 print w1$ " flies and connects!It's a trainwreck!"
980 print "A dazed " w1$ " crawls over & lays an arm over " w2$ "!"
982 print "The Referee counts..."
984 print "1..."
986 print "2..."
988 print "3..."
989 print "DING DING DING"
990 print "The winner is... " w1$ "!"
992 end
994 endif
996 if move11 = 16 then
998 print "5 Star Frog Splash by " w2$ "!"
1000 print w2$ " is hurt by the impact but manages to put a hand on " w1$ "!"
1002 print "The Referee counts..."
1004 print "1..."
1006 print "2..."
1008 print "3..."
1009 print "DING DING DING"
1010 print "This is a BIG win for " w2$ "!"
1012 end
1014 endif
1016 if move11 = 17 then
1018 print w1$ " gets " w2$ " with a " f1$ "!"
1020 print "And another and another!Three " f1$ "s in a row!"
1022 print "The Referee counts..."
1024 print "1..."
1026 print "2..."
1028 print "3..."
1029 print "DING DING DING"
1030 print w1$ " gets the win!"
1032 end
1034 endif
1036 if move11 = 18 then
1038 print w2$ " has " w1$ " dazed!Crescent Kick! " f2$ " this one is done!"
1040 print "The Referee counts..."
1042 print "1..."
1044 print "2..."
1046 print "3..."
1047 print "DING DING DING"
1048 print w2$ " gets the win!"
1050 end
1052 endif
1054 if move11 = 19 then
1056 print w1$ " jams a knee into " w2$ "'s face!Scissors Kick!!!"
1058 print "The Referee counts..."
1060 print "1..."
1062 print "2..."
1064 print "3..."
1065 print "DING DING DING"
1066 print w1$ " gets a huge win over " w2$ "!"
1068 end
1070 endif
1072 if move11 = 20 then
1074 print "Hard shot to the jaw!!!"
1076 print w1$ " is KOed!"
1078 print w2$ " with a cover..."
1080 print "The Referee counts..."
1082 print "1..."
1084 print "2..."
1086 print "3..."
1087 print "DING DING DING"
1088 print w2$ " gets a huge win over " w1$ "!"
1090 end
1092 endif