Advertisement
saxon564

Untitled

Aug 29th, 2019
189
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 19.79 KB | None | 0 0
  1. on *:TEXT:!Zombies:#: {
  2.   if ($chan == #Uno) {
  3.     halt
  4.   }
  5.   if ($chan == #La_Resistance) {
  6.     halt
  7.   }
  8.   else {
  9.     /set %player1.1 $nick
  10.     /msg $chan you ( $nick ) wake up in the middle of a corn field with no clue where you are. There are 3 options. Try to find the farmer, try to find the road, or sit there.
  11.     /msg $chan can you get to your house without getting killed?
  12.     /msg $chan to go and find the farmer type "!farmer" to find the road type "!road" to sit there type "!sit".
  13.     /set %zombies 1
  14.   }
  15. }
  16.  
  17.  
  18. on *:Text:!Farmer:#: {
  19.   if ($nick == %player1.1) && (%zombies == 1) {
  20.     /set %roul1 $rand(1,3)
  21.     if (%roul1 == 1) {
  22.       if (%farmer == 1) {
  23.         /msg $chan You found the farmers house but no one seems to be home, you do see a shotgun but it doesnt have any ammo. You can still contiune on and follow the road to the the left or to the right.
  24.         /msg $chan to pick up the shotgun type "!take shotgun" to go to the right type "!road right" to go to the left type "!road left".
  25.         /unset %roul1
  26.         halt
  27.       }
  28.       if (%farmer == 2) {
  29.         /msg $chan you found the farmer but he seem to be dead. as you turn around you find yourself surounded by zombies. do you want to try to fight or run?
  30.         /msg $chan to fight type "!fight" to run type "!run left" or "!run right".
  31.         /unset %roul1
  32.         halt
  33.       }
  34.       /msg $chan While you were walking through the field you were attacked and killed by the zombies.
  35.       /msg $chan the game has been reset.
  36.       /unset %player1.1
  37.       /unset %weapon
  38.       /unset %bullets
  39.       /unset %zombies
  40.       /unset %roul1
  41.       halt
  42.     }
  43.     if (%roul1 == 2) {
  44.       if (%farmer == 2) {
  45.         /msg $chan you found the farmer but he seem to be dead. as you turn around you find yourself surounded by zombies. do you want to try to fight or run?
  46.         /msg $chan to fight type "!fight" to run type "!run left" or "!run right".
  47.         /unset %roul1
  48.         halt
  49.       }
  50.       /msg $chan You found the farmers house but no one seems to be home, you do see a shotgun but it doesnt have any ammo. You can still contiune on and follow the road to the the left or to the right.
  51.       /msg $chan to pick up the shotgun type "!take shotgun" to go to the right type "!road right" to go to the left type "!road left".
  52.       /set %farmer 1
  53.       /unset %roul1
  54.       halt
  55.     }
  56.     if (%roul1 == 3) {
  57.       if (%farmer == 1) {
  58.         /msg $chan You found the farmers house but no one seems to be home, you do see a shotgun but it doesnt have any ammo. You can still contiune on and follow the road to the the left or to the right.
  59.         /msg $chan to pick up the shotgun type "!take shotgun" to go to the right type "!road right" to go to the left type "!road left".
  60.         /unset %roul1
  61.         halt
  62.       }
  63.       /msg $chan you found the farmer but he seem to be dead. as you turn around you find yourself surounded by zombies. do you want to try to fight or run?
  64.       /msg $chan to fight type "!fight" to run type "!run left" or "!run right".
  65.       /set %farmer 2
  66.       /unset %roul1
  67.       halt
  68.     }
  69.   }
  70. }
  71.  
  72.  
  73. on *:TEXT:!take shotgun:#: {
  74.   if ($nick == %player1.1) && (%farmer == 1) {
  75.     /set %roul1 $rand(1,2)
  76.     if (%roul1 == 1) {
  77.       if (%take == 2) {
  78.         /msg $chan you pick up the shotgun and realize that the house is unlocked but dark. you can eiter walk down the road or go inside.
  79.         /msg $chan to go inside type "!enter farmhouse" to follow the road type "!road right" or "!road left".
  80.         /unset %roul1
  81.         halt
  82.       }
  83.       /set %weapon shotgun
  84.       /msg $chan you turn around after picking up the shotgun and find a hoard of zombies. you can fight them or run.
  85.       /msg $chan to fight them type "!fight" to run type "!run right" or "!run left".
  86.       /unset %roul1
  87.       /set %take 1
  88.       halt
  89.     }
  90.     if (%roul1 == 2) {
  91.       if (%take == 1) {
  92.         /msg $chan you turn around after picking up the shotgun and find a hoard of zombies. you can fight them or run.
  93.         /msg $chan to fight them type "!fight" to run type "!run right" or "!run left".
  94.         /unset %roul1
  95.         halt
  96.       }
  97.       /set %weapon shotgun
  98.       /msg $chan you pick up the shotgun and realize that the house is unlocked but dark. you can eiter walk down the road or go inside.
  99.       /msg $chan to go inside type "!enter farmhouse" to follow the road type "!road right" or "!road left".
  100.       /unset %roul1
  101.       /set %take 2
  102.       halt
  103.     }
  104.   }
  105. }
  106.  
  107. on *:TEXT:!enter farmhouse:#: {
  108.   if ($nick == %player1.1) && (%take == 1) {
  109.     /set %roul1 $rand(1,3)
  110.     if (%roul1 == 1) {
  111.       if (%farmhouse == 2) {
  112.         /msg $chan you enter the farmhouse and find a gun in your face, its the farmer.
  113.         /msg $chan the farmer questions you, "what do you want?"
  114.         /msg $chan you can give 3 responces, "!shelter", "!your gun", or "!to kill zombies".
  115.         /unset %roul1
  116.         halt
  117.       }
  118.       /msg $chan you enter the farmhouse and find 2 bodies. they obviously arent zombies.
  119.       /msg $chan you can scavange the area to items, "!scavange", or leave the farmhouse, "!leave house"
  120.       /unset %roul1
  121.       /set %farmhouse 1
  122.       halt
  123.     }
  124.     if (%roul1 == 2) {
  125.       if (%farmhouse == 2) {
  126.         /msg $chan you enter the farmhouse and find a gun in your face, its the farmer.
  127.         /msg $chan the farmer questions you, "what do you want?"
  128.         /msg $chan you can give 3 responces, "!shelter", "!your gun", or "!to kill zombies".
  129.         /unset %roul1
  130.         halt
  131.       }
  132.       if (%farmhouse == 1) {
  133.         /msg $chan you enter the farmhouse and find 2 bodies. they obviously arent zombies.
  134.         /msg $chan you can scavange the area to items, "!scavange", or leave the farmhouse, "!leave house"
  135.         /unset %roul1
  136.         halt
  137.       }
  138.       /msg $chan the house is filled with zombies and you just got eaten.
  139.       /msg $chan the game has been reset
  140.       /unset %roul1
  141.       /unset %player1.1
  142.       /unset %weapon
  143.       /unset %bullets
  144.       /unset %zombies
  145.       /unset %farmer
  146.       /unset %take
  147.       halt
  148.     }
  149.     if (%roul1 == 3) {
  150.       if (%farmhouse == 1) {
  151.         /msg $chan you enter the farmhouse and find 2 bodies. they obviously arent zombies.
  152.         /msg $chan you can scavange the area to items, "!scavange", or leave the farmhouse, "!leave house"
  153.         /unset %roul1
  154.         halt
  155.       }
  156.       /msg $chan you enter the farmhouse and find a gun in your face, its the farmer.
  157.       /msg $chan the farmer questions you, "what do you want?"
  158.       /msg $chan you can give 3 responces, "!shelter", "!your gun", or "!to kill zombies".
  159.       /unset %roul1
  160.       /set %farmhouse 2
  161.     }
  162.   }
  163. }
  164.  
  165. on *:TEXT:!your gun:#: {
  166.   if ($nick == %player1.1) && (%farmhouse ==2) {
  167.     /set %roul1 $rand(1,3) {
  168.       if (%roul1 == 1) {
  169.         /msg $chan his reply: "Yeah right, I don't trust you."
  170.         /msg $chan the farmer pulls the trigger and shoots your head off.
  171.         /unset %roul1
  172.         /unset %player1.1
  173.         /unset %weapon
  174.         /unset %bullets
  175.         /unset %zombies
  176.         /unset %take
  177.         /unset %farmer
  178.         /unset %farmhouse
  179.         halt
  180.       }
  181.       if (%roul1 == 2) {
  182.         /msg $chan his reply: "You want my gun? I won't give it to you and im sorry i can't let you in but i can help you get away."
  183.         /msg $chan to choose your direction type "!farmer right" or "!farmer left".
  184.         /unset %roul1
  185.         /set %farm.gun 1
  186.         halt
  187.       }
  188.       if (%roul1 == 3) {
  189.         /msg $chan his reply: "I can't give you my gun but i do have some spare bullets."
  190.         /msg $chan type "!road right" or "!road left" to continue.
  191.         /set %incr.bullets $rand(1,16)
  192.         /set %bullet.inc $calc(%bullets( + %incr.bullets ))
  193.         /set %bullets %bullet.inc
  194.         /msg $chan the farmer hands you %bullets bullets
  195.         /unset %incr.bullets
  196.         /unset %bullet.inc
  197.         /set %farm.gun 2
  198.         halt
  199.       }
  200.     }
  201.   }
  202. }
  203.  
  204. on *:text:!shoot shotgun:#: {
  205.   /set %used.bullets $rand(1,%bullets)
  206.   /set %fired.bullets $calc(%bullets - %used.bullets )
  207.   /set %bullets %fired.bullets
  208.   /msg $chan you shot %used.bullets bullets.
  209.   /msg $chan you have %fired.bullets left.
  210.   /msg $chan you killed $rand(0,%used.bullets) zombies.
  211.   /unset %used.bullets
  212.   /unset %fired.bullets
  213. }
  214.  
  215. on *:TEXT:!pickup shells:#: {
  216.   /set %incr.bullets $rand(1,16)
  217.   /set %bullet.inc $calc(%bullets + %incr.bullets )
  218.   /set %bullets %bullet.inc
  219.   /msg $chan you pick up %incr.bullets bullets.
  220.   /msg $chan you now have %bullets buletts.
  221.   /unset %incr.bullets
  222.   /unset %bullet.inc
  223. }
  224.  
  225. on *:TEXT:!scavange:#: {
  226.   if ($nick == %player1.1) {
  227.     /set %roul1 $rand(1,2)
  228.     if (%roul1 == 1) {
  229.       /msg $chan you search the house and found nothing of use.
  230.       /msg $chan to leave the farmhouse type "!leave house".
  231.       /unset %roul1
  232.       halt
  233.     }
  234.     if (%roul1 == 2) {
  235.       /msg $chan you found a $read(C:\Documents and Settings\zak1\My Documents\farm items.txt)
  236.       /msg you can search again "!scavange" or leave the farmhouse "!leave house"
  237.     }
  238.   }
  239. }
  240.  
  241. on *:TEXT:!leave house:#: {
  242.   if ($nick == %player1.1) {
  243.     /set %roul1 $rand(1,3)
  244.     if (%roul1 == 1) {
  245.       /msg $chan you exit the house and find several zombies right outside and have to time to react.
  246.       /unset %roul1
  247.       /unset %player1.1
  248.       /unset %weapon
  249.       /unset %bullets
  250.       halt
  251.     }
  252.     if (%roul1 == 2) {
  253.       /msg $chan you exit the house to find one zombie.
  254.       /msg $chan you kill the zombie.
  255.       /msg $chan you can go to the right "!road right" ot left "!road left"
  256.       /unset %roul1
  257.       halt
  258.     }
  259.     if (%roul1 == 3) {
  260.       /msg $chan you exit the house and theres nothing there.
  261.       /msg $chan you can go to the right "!road right" ot left "!road left"
  262.       /unset %roul1
  263.       halt
  264.     }
  265.   }
  266. }
  267.  
  268. on *:TEXT:!fight:#: {
  269.   if ($nick == %player1.1) {
  270.     /set %roul1 $rand(1,2)
  271.     if (%roul1 == 1) {
  272.       /msg $chan you run at the zombies but realize you cant take them on and get over run.
  273.       /msg $chan the game has been reset.
  274.       /unset %roul1
  275.       /unset %player1.1
  276.       /unset %weapon
  277.       /unset %bullets
  278.       halt
  279.     }
  280.     if (%roul1 == 2) {
  281.       /msg $chan you run towrds to zombies.
  282.       /msg $chan "!use shotgun" to attack or "!use hands" to attack?
  283.       /unset %roul1
  284.       halt
  285.     }
  286.   }
  287. }
  288.  
  289. on *:TEXT:!use hands:#: {
  290.   if ($nick == %player1.1) {
  291.     /set %roul1 $rand(1,3)
  292.     if (%roul1 == 1) {
  293.       /msg $chan the zombies quickly over run you and you are dead.
  294.       /unset %roul1
  295.       /unset %player1.1
  296.       /unset %weapon
  297.       /unset %bullets
  298.       halt
  299.     }
  300.     if (%roul1 == 2) {
  301.       /msg $chan you start killing zombies but one manages to get behind you and kill you.
  302.       /unset %roul1
  303.       /unset %player1.1
  304.       /unset %weapon
  305.       /unset %bullets
  306.     }
  307.     if (%roul == 3) {
  308.       /msg $chan you managed to kill all the zombies.
  309.       /msg $chan now that all the zombies are dead you realize that the farmhouse is unlocked.
  310.       /msg $chan to enter "!enter farmhouse" to use the road "!road left" or "!road right.
  311.       /unset %roul1
  312.       halt
  313.     }
  314.   }
  315. }
  316.  
  317. on *:TEXT:!run right:#: {
  318.   if ($nick == %player1.1) {
  319.     /set %roul1 $rand(1,2)
  320.     if (%roul1 == 1) {
  321.       /msg $chan you run to the right but there are already zombies there.
  322.       /msg $chan the zombies get a hold of you and you die.
  323.       /msg $chan the game has been reset.
  324.       /unset %roul1
  325.       /unset %player1.1
  326.       /unset %weapon
  327.       /unset %bullets
  328.       halt
  329.     }
  330.     if (%roul1 == 2) {
  331.       /msg $chan you run off the to the right and around the corner of the house.
  332.       /msg $chan you you see the road and run to it, and the zombies arent following.
  333.       /msg $chan take the road left or right? "!road left" "!road right"
  334.       /unset %roul1
  335.     }
  336.   }
  337. }
  338.  
  339. on *:TEXT:!run left:#: {
  340.   if ($nick == %player1.1) {
  341.     /set %roul1 $rand(1,2)
  342.     if (%roul1 == 1) {
  343.       /msg $chan you run to the left but the zombies get there before you.
  344.       /msg $chan the zombies get a hold of you and eat you alive.
  345.       /msg $chan the game has been reset.
  346.       /unset %roul1
  347.       /unset %player1.1
  348.       /unset %weapon
  349.       /unset %bullets
  350.       halt
  351.     }
  352.     if (%roul1 == 2) {
  353.       /msg $chan you run off the to the left and around the corner of the house.
  354.       /msg $chan you you see the road and run to it, and the zombies arent following.
  355.       /msg $chan take the road left or right? "!road left" "!road right"
  356.       /unset %roul1
  357.     }
  358.   }
  359. }
  360.  
  361. on *:TEXT:!use shotgun:#: {
  362.   if ($nick == %player1.1) {
  363.     if (%weapon == shotgun) {
  364.       /set %roul1 $rand(1,3)
  365.       if (%roul1 == 1) {
  366.         /msg $chan you use the shotgun as a melee weapon and start swinging it at the zombies.
  367.         /msg $chan the zombies were smarter than you thought and surounded you and ate you.
  368.         /msg $chan the game has been reset.
  369.         /unset %roul1
  370.         /unset %player1.1
  371.         /unset %weapon
  372.         /unset %bullets
  373.         halt
  374.       }
  375.       if (%roul1 == 2) {
  376.         /msg $chan you attack the zombies with your shotgun, but when you pull the trigger nothing happens.
  377.         /msg $chan did you forget that you didnt have ammo? that mistake cost you your life.
  378.         /msg $chan the game has been reset.
  379.         /unset %roul1
  380.         /unset %player1.1
  381.         /unset %weapon
  382.         /unset %bullets
  383.         halt
  384.       }
  385.       if (%roul1 == 3) {
  386.         /msg $chan you figure that you can take the zombies so you start being smart.
  387.         /msg $chan you back into a spot where only 1 zombie can go at a time and kill them as they enter.
  388.         /msg $chan now that all the zombies are dead you realize that the farmhouse is unlocked.
  389.         /msg $chan to enter "!enter farmhouse" to use the road "!road left" or "!road right.
  390.         /unset %roul1
  391.         halt
  392.       }
  393.     }
  394.     else {
  395.       /msg $chan you do not have the shotgun yet.
  396.       halt
  397.     }
  398.   }
  399. }
  400.  
  401. on *:TEXT:!road left:#: {
  402.   if ($nick == %player1.1) {
  403.     /set %roul1 $rand(1,3)
  404.     if (%roul1 == 1) {
  405.       /msg $chan you start walking down the road to the left and get ambushed from the side with no time to react.
  406.       /msg $chan the game has been reset.
  407.       /unset %roul1
  408.       /unset %player1.1
  409.       /unset %weapon
  410.       /unset %bullets
  411.       halt
  412.     }
  413.     if (%roul1 == 2) {
  414.       /msg $chan the road to the left seems rugged but you go down it any way. while walking you find a large box.
  415.       /msg "!check box" to look inside it "!continue road left" to ignore it.
  416.       /unset %roul1
  417.       halt
  418.     }
  419.     if (%roul1 == 3) {
  420.       /msg $chan you starts walking down the road but hear a sound. you turn around and see a zombie following you.
  421.       /msg $chan "!fight zombie" to try to kill it or "!continue run left" to ignore it and try to lose it.
  422.       /unset %roul1
  423.       halt
  424.     }
  425.   }
  426. }
  427.  
  428. on *:TEXT:!road right:#: {
  429.   if ($nick == %player1.1) {
  430.     /set %roul1 $rand(1,3)
  431.     if (%roul1 == 1) {
  432.       /msg $chan you start walking down the road to the right and get ambushed from the side with no time to react.
  433.       /msg $chan the game has been reset.
  434.       /unset %roul1
  435.       /unset %player1.1
  436.       /unset %weapon
  437.       /unset %bullets
  438.       halt
  439.     }
  440.     if (%roul1 == 2) {
  441.       /msg $chan the road to the left seems rugged but you go down it any way. while walking you find a car parked on the side of the road.
  442.       /msg "!check car" to look inside it, "!continue road right" to ignore it.
  443.       /unset %roul1
  444.       halt
  445.     }
  446.     if (%roul1 == 3) {
  447.       /msg $chan you start walking down the road and find what looks like a dead zombie.
  448.       /msg $chan "!inspect zombie" to get a closer look at it or "!continue right" to ignore it and try to lose it.
  449.       /unset %roul1
  450.       halt
  451.     }
  452.   }
  453. }
  454.  
  455. on *TEXT:!fight zombie:#: {
  456.   if ($nick == %player1.1) {
  457.     if (%weapon == shotgun) {
  458.       /set %roul1 $rand(1,2)
  459.       if (%roul1 == 1) {
  460.         /msg $chan you attack the zombie with your shotgun but the zombie avoids the attack.
  461.         /msg $chan the zombie grabs you and kills you.
  462.         /msg $chan the game has been reset.
  463.         /unset %roul1
  464.         /unset %player1.1
  465.         /unset %weapon
  466.         /unset %bullets
  467.         halt
  468.       }
  469.       if (%roul1 == 2) {
  470.         /msg $chan you swing your shotgun at the zombie and hit it in the gut. then you smash its head.
  471.         /msg $chan to contiune type "!continue run Left".
  472.         /unsey %roul1
  473.       }
  474.     }
  475.   }
  476. }
  477.  
  478. on *:TEXT:!inspect zombie:#: {
  479.   if ($nick == %player1.1) {
  480.     /set %roul1 $rand(1,3)
  481.     if (%roul1 == 1) {
  482.       /msg $chan you touch the zombie, then it jumps up and kills you.
  483.       /msg $chan the game ha been reset.
  484.       /unset %roul1
  485.       /unset %weapon
  486.       /unset %player1.1
  487.       /unset %bullets
  488.       halt
  489.     }
  490.     if (%roul1 == 2) {
  491.       /msg $chan the zombie is dead.
  492.       /msg maybe there is another person out here somewhere.
  493.       /unset %roul1
  494.       halt
  495.     }
  496.     if (%roul1 == 3) {
  497.       /msg $chan the zombie jumps up but misses you.
  498.       /msg $chan you attack the zombie and knock off its head.
  499.       /unset %roul1
  500.       halt
  501.     }
  502.   }
  503. }
  504.  
  505. on *:TEXT:!road:#: {
  506.   if (%zombies == 1) {
  507.     if ($nick == %player1.1) {
  508.       /set %roul1 $rand(1,3)
  509.       if (%roul1 == 1) {
  510.         /msg $chan While you were talking through the field you were attacked and killed by the zombies.
  511.         /msg $chan the game has been reset
  512.         /unset %roul1
  513.         /unset %player1.1
  514.         /unset %weapon
  515.         /unset %bullets
  516.         halt
  517.       }
  518.       if (%roul1 == 2) {
  519.         /msg $chan You found the road and its clear, you do see a a driveway imideately to your right. You can still contiune on and follow the road to the the left or to the right.
  520.         /msg $chan to go to the right type "!road right" to go to the left type "!road left" to go down the drive way type "!driveway"
  521.         /unset %roul1
  522.         halt
  523.       }
  524.       if (%roul1 == 3) {
  525.         /msg  $chan you found the road but its crowded with Zombies. They turn and chase you. do you want to randomly run through the field or run in a certain direction?
  526.         /msg $chan to tun randomly type "!ramdom" to run right type "!run right" to run left type "!run left"
  527.         /unset %roul1
  528.         halt
  529.       }
  530.     }
  531.   }
  532. }
  533.  
  534. on *:TEXT:!sit:#: {
  535.   if ($nick == %player1.1) {
  536.     /set %roul1 $rand(1,2)
  537.     if (%roul1 == 1) {
  538.       /msg $chan while sitting the zombies found you and you because a nice dinner.
  539.       /msg $chan the game has been reset
  540.       /unset %roul1
  541.       /unset %player1.1
  542.       /unset %weapon
  543.       /unset %bullets
  544.       halt
  545.     }
  546.     if (%roul1 == 2) {
  547.       /msg $chan what do you think sitting here is going to accomplish?
  548.       /msg $chan either find the farmer "!farmer" or find the road "!road"
  549.       /unset %roul1
  550.       halt
  551.     }
  552.   }
  553. }
  554.  
  555. on *:TEXT:!quit:#: {
  556.   if ($chan == #Uno) {
  557.     halt
  558.   }
  559.   if ($nick isop $chan) {
  560.     /msg $chan you have quit playing zombies.
  561.     /msg $chan the game has been reset
  562.     /unset %roul1
  563.     /unset %player1.1
  564.     /unset %weapon
  565.     /unset %bullets
  566.     /unset %zombies
  567.     /unset %take
  568.     /unset %farmer
  569.     /unset %farmhouse
  570.     halt
  571.     halt
  572.   }
  573.   if ($nick == Rc-1136_Darman) {
  574.     /msg $chan you have quit playing zombies.
  575.     /msg $chan the game has been reset
  576.     /unset %roul1
  577.     /unset %player1.1
  578.     /unset %weapon
  579.     /unset %bullets
  580.     /unset %zombies
  581.     /unset %take
  582.     /unset %farmer
  583.     /unset %farmhouse
  584.     halt
  585.     halt
  586.   }
  587.   if ($nick ==  %player1.1) {
  588.     /msg $chan you have quit playing zombies.
  589.     /msg $chan the game has been reset
  590.     /unset %roul1
  591.     /unset %player1.1
  592.     /unset %weapon
  593.     /unset %bullets
  594.     /unset %zombies
  595.     /unset %take
  596.     /unset %farmer
  597.     /unset %farmhouse
  598.     halt
  599.   }
  600. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement