API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Sep 18th, 2017
347
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Blitz3D 62.32 KB | None | 0 0
raw download clone embed print report
  1. ;////////////////////////////
  2. ;/                          /
  3. ;/                          /              
  4. ;/      Dank                /               ;this is a rather large program making it somewhat hard to navigate
  5. ;/          Souls II        /               ;so I made labels to help smooth the process
  6. ;/                          /               ;check the labels tab over there ------------------->
  7. ;/      John Hallman        /               ;also read comments to help explain different functions incase you need to fix a bug
  8. ;/                          /          
  9. ;////////////////////////////
  10.  
  11.  
  12.  
  13.  
  14. SeedRnd MilliSecs()
  15. .start
  16. khealth%=200
  17. thealth%=70
  18. shealth%=120
  19. kstam%=150                          ;values
  20. tstam%=100
  21. smana%=100
  22. ability%=2
  23. enemy1hp%=200
  24. enemy2hp%=250
  25. enemy3hp%=300                                                      
  26. enemy4hp%=350
  27. bosshp%=700
  28. kdamage%=30
  29. tdamage%=60
  30. sdamage%=40
  31. enemy1dam%=30   ;The Gatekeeper (Finished) K-Rest heals for 10hp more | T-Cloak deal more damage when cloaked | S-Equil. stronger mana restore
  32. enemy2dam%=35   ;The Roaming Knight(Finished) K-deal more damage |T- Cloak heals more | S-More accurate
  33. enemy3dam%=40   ;The Goliath (Finished) K-Higher chance for enemy to miss|T-Cloak restores 70 stamina (or up to cap)|S-Equil.stronger health restore
  34. enemy4dam%=45   ;The Pyromancer(Finished) K- 20 more base healh | T-10 more base health | S-15 more base health
  35. bossdam%=50     ;The Dragon Lord (Finished)
  36. score%=0
  37.  
  38.                                    
  39. Graphics 1000,800
  40.  
  41.  
  42.  
  43.  
  44.  
  45. Print "------------------------------------"
  46. Print "Welcome to Dank Souls II"
  47. Delay 1000
  48. name$=Input("What is your name? ")
  49. Delay 1000
  50. Print "Greetings " + name$  
  51. Delay 1000
  52. Print "you can choose from one of 3 classes"
  53. Delay 1000
  54. .classselect
  55. class$=Input("1. Knight 2. Thief 3. Sorcerer 4. Show Class Descriptions ")  ;game start
  56.     If class$ = "1" Then
  57.         Print "You have chosen knight"
  58.         Delay 1000
  59.         Goto kgame
  60.     ElseIf class$ = "2" Then
  61.         Print "You have chosen theif"
  62.         Delay 1000
  63.         Goto tgame
  64.     ElseIf class$= "3"
  65.         Print "You have chosen sorcerer"
  66.         Delay 1000
  67.         Goto sgame
  68.     ElseIf class$ = "4" Then
  69.         Goto cdes
  70.     Else
  71.         Print "sorry that is not a valid selection"
  72.         Goto classselect
  73.     EndIf
  74.        
  75.        
  76.        
  77.        
  78.        
  79. .kgame  ;Knight's Game
  80. gatekeeper()
  81. .gatekeeperknight
  82. ;-----------------------------------------------------------------------------------------------------
  83.  Print "--------------------------------------"
  84.  Print "you have " + khealth% + " health"
  85.  Print "you have " + ability% + " rests left" ;live stats
  86.  Print "you have " + kstam% + " stamina left"
  87.  Print "The Gatekeeper has " + enemy1hp% + " health"
  88.  Print "--------------------------------------"
  89. While enemy1hp% > 0
  90.  If khealth% <= 0 Then
  91.  Goto endprompt ;death
  92.  EndIf
  93.  
  94.  
  95.  If ability% <= 0 Then
  96.  Goto k1attack
  97.  EndIf
  98.  
  99.  
  100.  kskill$=Input("would you like to use your ability?(rest) " )
  101.  If ability% > 0 Then
  102.  If kskill$="yes" Then
  103.  Print "you used your ability (rest) to heal and restore your stamina" ;ability
  104.  
  105.  ability%=ability%-1
  106.  khealth%=khealth%+30
  107.  kstam%=150
  108.  Print "--------------------------------------"
  109.  Print "you have " + khealth% + " health"
  110.  Print "you have " + ability% + " rests left" ;live stats
  111.  Print "you have " + kstam% + " stamina left"
  112.  Print "The Gatekeeper has " + enemy1hp% + " health"
  113.  Print "--------------------------------------"
  114.  
  115.  Else Print "you chose to not use your ability (rest)"
  116.  EndIf
  117.  EndIf
  118.  
  119.  
  120.  .k1attack  
  121.   sword%=Input("how much stamina would you like to use? ") ;attack
  122.   If sword% = 0 Then
  123.     Print "you skipped your turn to gain 30 stamina"
  124.      
  125.     kstam%=kstam%+30
  126.     Goto k1hostile
  127.     EndIf
  128.    
  129.  
  130.  If sword% > kstam% Then
  131.  Print "you do not have that much stamina"
  132.  Goto k1attack
  133.  EndIf
  134.  If sword% < 0 Then
  135.  Print "you cannot use that value of stamina"
  136.  Goto k1attack
  137.  EndIf
  138.  kstam%=kstam%-sword%
  139.  
  140.  Delay 1000
  141.  kroll%=Rnd (1,60)
  142.  
  143.  
  144. If sword% > kroll% Then  
  145. Print "you hit The Gatekeeper with " + kdamage% + " damage"
  146.  
  147. enemy1hp%=enemy1hp%-kdamage%
  148. kcrit%=Rnd(1,100)
  149. If kcrit% > 90 Then
  150. Print "you hit a critical of " + sword% + " damage" ;crit
  151. enemy1hp%=enemy1hp%-sword%
  152. EndIf
  153.                                                             ;hit/miss
  154.  
  155. Else Print "you missed"
  156.  
  157. EndIf
  158.  Delay 1000
  159.  Print "--------------------------------------"                                                     ;The Gatekeeper
  160.  .k1hostile
  161.  If enemy1hp% > 0 Then
  162.  Print "The Gatekeeper is about to attack"
  163.  Delay 2000
  164.  e1roll%=Rnd (1,100)
  165.  If e1roll% > 60                                            ;enemy attack
  166.  Print "The Gatekeeper hit you with " + enemy1dam% + " damage"
  167.  
  168.  khealth%=khealth%-enemy1dam%
  169.  Else Print "The Gatekeeper missed"
  170.  
  171. EndIf
  172.  Print "--------------------------------------"
  173. Print "--------------------------------------"
  174.  Print "you have " + khealth% + " health"
  175.  Print "you have " + ability% + " rests left" ;live stats
  176.  Print "you have " + kstam% + " stamina left"
  177.  Print "The Gatekeeper has " + enemy1hp% + " health"
  178.  Print "--------------------------------------"
  179. Delay 1000
  180. EndIf
  181. Wend
  182. Print "you killed The Gatekeeper"           ;enemy dead
  183. Delay 2000
  184. score%=score%+ability%+100
  185. score%=score%+khealth%
  186. ;-----------------------------------------------------------------------------------------------------
  187. Print "------------------------------------------"
  188. Print "Now that The Gatekeeper is dead you are able to enter the castle"
  189. Delay 1000
  190. Print "Once you enter you find a well that resets your health and stamina and more abilities"
  191.  
  192. khealth%=200
  193. kstam%=150
  194. ability%=ability%+2
  195. Delay 1000
  196. Print "You turn to your left and notice a dark corridor"
  197. Delay 1000
  198. Print "As you walk down the corridor you notice a small gem on the ground"
  199. Delay 1000
  200. Print "As you pick up the gem you grow stronger"
  201. Delay 1000
  202. Print "------------------------------------------"
  203. Print "Your (Rest) now heals you for 10hp more!"
  204. Print "------------------------------------------"
  205. Delay 1000
  206. Print "When you look up from picking up the gem you see a roaming knight"
  207. Delay 8000
  208.  
  209.  
  210. .roamingknightknight
  211. roamingknight()
  212. ;-----------------------------------------------------------------------------------------------------
  213.  Print "--------------------------------------"
  214.  Print "you have " + khealth% + " health"
  215.  Print "you have " + ability% + " rests left" ;live stats
  216.  Print "you have " + kstam% + " stamina left"
  217.  Print "The Roaming Knight has " + enemy2hp% + " health"
  218.  Print "--------------------------------------"
  219. While enemy2hp% > 0
  220.  If khealth% <= 0 Then
  221.  Goto endprompt ;death
  222.  EndIf
  223.  
  224.  
  225.  If ability% <= 0 Then
  226.  Goto k2attack
  227.  EndIf
  228.  
  229.  
  230.  kskill$=Input("would you like to use your ability?(rest) " )
  231.  If ability% > 0 Then
  232.  If kskill$="yes" Then
  233.  Print "you used your ability (rest) to heal and restore your stamina" ;ability
  234.  
  235.  ability%=ability%-1
  236.  khealth%=khealth%+40
  237.  kstam%=150
  238.  Print "--------------------------------------"
  239.  Print "you have " + khealth% + " health"
  240.  Print "you have " + ability% + " rests left" ;live stats
  241.  Print "you have " + kstam% + " stamina left"
  242.  Print "The Roaming Knight has " + enemy2hp% + " health"
  243.  Print "--------------------------------------"
  244.  
  245.  Else Print "you chose to not use your ability (rest)"
  246.  EndIf
  247.  EndIf
  248.  
  249.  
  250.  .k2attack  
  251.   sword%=Input("how much stamina would you like to use? ") ;attack
  252.   If sword% = 0 Then
  253.     Print "you skipped your turn to gain 30 stamina"
  254.      
  255.     kstam%=kstam%+30
  256.     Goto k2hostile
  257.     EndIf
  258.      
  259.  If sword% > kstam% Then
  260.  Print "you do not have that much stamina"
  261.  Goto k2attack
  262.  EndIf
  263.  If sword% < 0 Then
  264.  Print "you cannot use that value of stamina"
  265.  Goto k2attack
  266.  EndIf
  267.  kstam%=kstam%-sword%
  268.  
  269.  Delay 1000
  270.  kroll%=Rnd (1,60)
  271.  
  272.  
  273. If sword% > kroll% Then  
  274. Print "you hit The Roaming Knight with " + kdamage% + " damage"
  275.  
  276. enemy2hp%=enemy2hp%-kdamage%
  277. kcrit%=Rnd(1,100)
  278. If kcrit% > 90 Then
  279. Print "you hit a critical of " + sword% + " damage" ;crit
  280. enemy2hp%=enemy2hp%-sword%
  281. EndIf                                                           ;hit/miss
  282.  
  283. Else Print "you missed"
  284.  
  285. EndIf
  286.  Delay 1000
  287.  Print "--------------------------------------"                                                     ;The Roaming Knight
  288.  .k2hostile
  289.  If enemy2hp% > 0 Then
  290.  Print "The Roaming Knight is about to attack"
  291.  Delay 2000
  292.  e2roll%=Rnd (1,100)
  293.  If e2roll% > 60 Then                                           ;enemy attack
  294.  Print "The Roaming Knight hit you with " + enemy2dam% + " damage"
  295.  
  296.  khealth%=khealth%-enemy2dam%
  297.  Else Print "The Roaming Knight missed"
  298.  
  299. EndIf
  300.  Print "--------------------------------------"
  301. Print "--------------------------------------"
  302.  Print "you have " + khealth% + " health"
  303.  Print "you have " + ability% + " rests left" ;live stats
  304.  Print "you have " + kstam% + " stamina left"
  305.  Print "The Roaming Knight has " + enemy2hp% + " health"
  306.  Print "--------------------------------------"
  307. Delay 1000
  308. EndIf
  309. Wend
  310. Print "you killed The Roaming Knight"           ;enemy dead
  311. Delay 2000
  312. score%=score%+ability%+200
  313. score%=score%+khealth%
  314. ;-----------------------------------------------------------------------------------------------------
  315.  
  316. Print "------------------------------------------"
  317. Print "Now that The Roaming Knight is dead you can continue into the castle"
  318. Delay 1000
  319. Print "you look to your right and you see a door"
  320. Delay 1000
  321. Print "when you open the door you find another well that resets your health and stamina and gives you +2 more ability uses"
  322.  
  323. khealth%=200
  324. kstam%=150
  325. ability%=ability%+2
  326.  
  327.  
  328. Print "------------------------------------------"
  329. Print "On the wall of the room you see a painting"
  330. Delay 1000
  331. Print "The painting falls off of the wall revealing a button and another gem"
  332. Delay 1000
  333. Print "As you pick up the gem you grow stronger"
  334. Print "------------------------------------------"
  335. Print "You now deal more base damage!"
  336. Print "------------------------------------------"
  337. Delay 1000
  338. Print "You press button to reveal the portal being blocked by The Goliath"
  339. Delay 8000
  340.  
  341.  
  342. .goliathknight
  343. goliath()
  344. ;-----------------------------------------------------------------------------------------------------
  345.   kdamage%=kdamage%+10
  346.  
  347.  Print "--------------------------------------"
  348.  Print "you have " + khealth% + " health"
  349.  Print "you have " + ability% + " rests left" ;live stats
  350.  Print "you have " + kstam% + " stamina left"
  351.  Print "The Goliath has " + enemy3hp% + " health"
  352.  Print "--------------------------------------"
  353. While enemy3hp% > 0
  354.  If khealth% <= 0 Then
  355.  Goto endprompt ;death
  356.  EndIf
  357.  
  358.  
  359.  If ability% <= 0 Then
  360.  Goto k3attack
  361.  EndIf
  362.  
  363.  
  364.  kskill$=Input("would you like to use your ability?(rest) " )
  365.  If ability% > 0 Then
  366.  If kskill$="yes" Then
  367.  Print "you used your ability (rest) to heal and restore your stamina" ;ability
  368.  
  369.  ability%=ability%-1
  370.  khealth%=khealth%+40
  371.  kstam%=150
  372.  Print "--------------------------------------"
  373.  Print "you have " + khealth% + " health"
  374.  Print "you have " + ability% + " rests left" ;live stats
  375.  Print "you have " + kstam% + " stamina left"
  376.  Print "The Goliath has " + enemy3hp% + " health"
  377.  Print "--------------------------------------"
  378.  
  379.  Else Print "you chose to not use your ability (rest)"
  380.  EndIf
  381.  EndIf
  382.  
  383.  .k3attack  
  384.   sword%=Input("how much stamina would you like to use? ") ;attack
  385.   If sword% = 0 Then
  386.     Print "you skipped your turn to gain 30 stamina"
  387.      
  388.     kstam%=kstam%+30
  389.     Goto k3hostile
  390.     EndIf
  391.      
  392.  If sword% > kstam% Then
  393.  Print "you do not have that much stamina"
  394.  Goto k3attack
  395.  EndIf
  396.  If sword% < 0 Then
  397.  Print "you cannot use that value of stamina"
  398.  Goto k3attack
  399.  EndIf
  400.  kstam%=kstam%-sword%
  401.  
  402.  Delay 1000
  403.  kroll%=Rnd (1,60)
  404.  
  405.  
  406. If sword% > kroll% Then  
  407. Print "you hit The Goliath with " + kdamage% + " damage"
  408.  
  409. enemy3hp%=enemy3hp%-kdamage%
  410. kcrit%=Rnd(1,100)
  411. If kcrit% > 90 Then
  412. Print "you hit a critical of " + sword% + " damage" ;crit
  413. enemy3hp%=enemy3hp%-sword%
  414. EndIf                                                           ;hit/miss
  415.  
  416. Else Print "you missed"
  417.  
  418. EndIf
  419.  Delay 1000
  420.  Print "--------------------------------------"                                                     ;The Goliath
  421.  .k3hostile
  422.  If enemy3hp% > 0 Then
  423.  Print "The Goliath is about to attack"
  424.  Delay 2000
  425.  e3roll%=Rnd (1,100)
  426.  If e3roll% > 60 Then                                           ;enemy attack
  427.  Print "The Goliath hit you with " + enemy3dam% + " damage"
  428.  
  429.  khealth%=khealth%-enemy3dam%
  430.  Else Print "The Goliath missed"
  431.  
  432. EndIf
  433.  Print "--------------------------------------"
  434. Print "--------------------------------------"
  435.  Print "you have " + khealth% + " health"
  436.  Print "you have " + ability% + " rests left" ;live stats
  437.  Print "you have " + kstam% + " stamina left"
  438.  Print "The Goliath has " + enemy3hp% + " health"
  439.  Print "--------------------------------------"
  440. Delay 1000
  441. EndIf
  442. Wend
  443. Print "you killed The Goliath"          ;enemy dead
  444. Delay 2000
  445. score%=score%+ability%+300
  446. score%=score%+khealth%
  447. ;-----------------------------------------------------------------------------------------------------
  448. Print "------------------------------------------"
  449. Print "Now that The Goliath is dead you can now enter the portal to the Dragonlords realm"
  450. Delay 1000
  451. Print "As you enter you see another well that resets your health and stamina and gives you +3 more ability uses"
  452.  
  453. khealth%=200
  454. kstam%=150
  455. ability%=ability%+3
  456.  
  457.  
  458. Print "------------------------------------------"
  459. Print "you see a tower where The Dragonlord is perched on top"
  460. Delay 1000
  461. Print "you enter the tower and find another gem"
  462. Delay 1000
  463. Print "as you pick up the gem you grow stronger"
  464. Delay 1000
  465. Print "------------------------------------------"
  466. Print "The enemy now has a higher chance to miss you"
  467. Print "------------------------------------------"
  468. Print "you climb up the spiral staircase and are confronted by The Pyromancer"
  469. Delay 8000
  470.  
  471.  
  472. .pyromancerknight
  473. pyromancer()
  474. ;-----------------------------------------------------------------------------------------------------
  475.  
  476.  
  477.  Print "--------------------------------------"
  478.  Print "you have " + khealth% + " health"
  479.  Print "you have " + ability% + " rests left" ;live stats
  480.  Print "you have " + kstam% + " stamina left"
  481.  Print "The Pyromancer has " + enemy4hp% + " health"
  482.  Print "--------------------------------------"
  483. While enemy4hp% > 0
  484.  If khealth% <= 0 Then
  485.  Goto endprompt ;death
  486.  EndIf
  487.  
  488.  
  489.  If ability% <= 0 Then
  490.  Goto k4attack
  491.  EndIf
  492.  
  493.  
  494.  kskill$=Input("would you like to use your ability?(rest) " )
  495.  If ability% > 0 Then
  496.  If kskill$="yes" Then
  497.  Print "you used your ability (rest) to heal and restore your stamina" ;ability
  498.  
  499.  ability%=ability%-1
  500.  khealth%=khealth%+40
  501.  kstam%=150
  502.  Print "--------------------------------------"
  503.  Print "you have " + khealth% + " health"
  504.  Print "you have " + ability% + " rests left" ;live stats
  505.  Print "you have " + kstam% + " stamina left"
  506.  Print "The Pyromancer has " + enemy4hp% + " health"
  507.  Print "--------------------------------------"
  508.  
  509.  Else Print "you chose to not use your ability (rest)"
  510.  EndIf
  511.  EndIf
  512.  
  513.  .k4attack  
  514.   sword%=Input("how much stamina would you like to use? ") ;attack
  515.   If sword% = 0 Then
  516.     Print "you skipped your turn to gain 30 stamina"
  517.     kstam%=kstam%+30
  518.     Goto k4hostile
  519.     EndIf
  520.    
  521.  If sword% > kstam% Then
  522.  Print "you do not have that much stamina"
  523.  Goto k4attack
  524.  EndIf
  525.  If sword% < 0 Then
  526.  Print "you cannot use that value of stamina"
  527.  Goto k4attack
  528.  EndIf
  529.  kstam%=kstam%-sword%
  530.  
  531.  Delay 1000
  532.  kroll%=Rnd (1,60)
  533.  
  534.  
  535. If sword% > kroll% Then  
  536. Print "you hit The Pyromancer with " + kdamage% + " damage"
  537.  
  538. enemy4hp%=enemy4hp%-kdamage%
  539. kcrit%=Rnd(1,100)
  540. If kcrit% > 90 Then
  541. Print "you hit a critical of " + sword% + " damage" ;crit
  542. enemy4hp%=enemy4hp%-sword%
  543. EndIf                                                           ;hit/miss
  544.  
  545. Else Print "you missed"
  546.  
  547. EndIf
  548.  Delay 1000
  549.  Print "--------------------------------------"                                                     ;The Pyromancer
  550.  .k4hostile
  551.  If enemy4hp% > 0 Then
  552.  Print "The Pyromancer is about to attack"
  553.  Delay 2000
  554.  e4roll%=Rnd (1,100)
  555.  If e4roll% > 60 Then                                           ;enemy attack
  556.  Print "The Pyromancer hit you with " + enemy4dam% + " damage"
  557.  
  558.  khealth%=khealth%-enemy4dam%
  559.  Else Print "The Pyromancer missed"
  560.  
  561. EndIf
  562.  Print "--------------------------------------"
  563. Print "--------------------------------------"
  564.  Print "you have " + khealth% + " health"
  565.  Print "you have " + ability% + " rests left" ;live stats
  566.  Print "you have " + kstam% + " stamina left"
  567.  Print "The Pyromancer has " + enemy4hp% + " health"
  568.  Print "--------------------------------------"
  569. Delay 1000
  570. EndIf
  571. Wend
  572. Print "you killed The Pyromancer"           ;enemy dead
  573. Delay 2000
  574. score%=score%+ability%+400
  575. score%=score%+khealth%
  576. ;-----------------------------------------------------------------------------------------------------
  577.  
  578. Print "------------------------------------------"
  579. Print "now that The Pyromancer is dead you can now attack The Dragonlord"
  580. Delay 1000
  581. Print "as you climb further up the spiral staircase you find a super well"
  582. Delay 1000
  583. Print "the super well  resets your health and stamina and gives you +5 more ability uses"
  584. Delay 1000
  585. Print "the super well also raises your health cap"
  586.  
  587. khealth%=200
  588. kstam%=150
  589. ability%=ability%+5
  590.  
  591.  
  592. Delay 1000
  593. Print "you finish your climb to the top of the tower and you now are ready to face The Dragonlord"
  594. Delay 8000
  595.  
  596.  
  597. .dragonlordknight
  598. dragonlord()
  599. ;-----------------------------------------------------------------------------------------------------
  600.   khealth%=khealth% + 20
  601.  
  602.  Print "--------------------------------------"
  603.  Print "you have " + khealth% + " health"
  604.  Print "you have " + ability% + " rests left" ;live stats
  605.  Print "you have " + kstam% + " stamina left"
  606.  Print "The Dragonlord has " + bosshp% + " health"
  607.  Print "--------------------------------------"
  608. While bosshp% > 0
  609.  If khealth% <= 0 Then
  610.  Goto endprompt ;death
  611.  EndIf
  612.  
  613.  
  614.  If ability% <= 0 Then
  615.  Goto k5attack
  616.  EndIf
  617.  
  618.  
  619.  kskill$=Input("would you like to use your ability?(rest) " )
  620.  If ability% > 0 Then
  621.  If kskill$="yes" Then
  622.  Print "you used your ability (rest) to heal and restore your stamina" ;ability
  623.  
  624.  ability%=ability%-1
  625.  khealth%=khealth%+40
  626.  kstam%=150
  627.  Print "--------------------------------------"
  628.  Print "you have " + khealth% + " health"
  629.  Print "you have " + ability% + " rests left" ;live stats
  630.  Print "you have " + kstam% + " stamina left"
  631.  Print "The Dragonlord has " + bosshp% + " health"
  632.  Print "--------------------------------------"
  633.  
  634.  Else Print "you chose to not use your ability (rest)"
  635.  EndIf
  636.  EndIf
  637.  
  638.  .k5attack  
  639.   sword%=Input("how much stamina would you like to use? ") ;attack
  640.    If sword% = 0 Then
  641.     Print "you skipped your turn to gain 30 stamina"
  642.     kstam%=kstam%+30
  643.     Goto k5hostile
  644.     EndIf
  645.    
  646.  If sword% > kstam% Then
  647.  Print "you do not have that much stamina"
  648.  Goto k5attack
  649.  EndIf
  650.  If sword% < 0 Then
  651.  Print "you cannot use that value of stamina"
  652.  Goto k5attack
  653.  EndIf
  654.  kstam%=kstam%-sword%
  655.  
  656.  Delay 1000
  657.  kroll%=Rnd (1,60)
  658.  
  659.  
  660. If sword% > kroll% Then  
  661. Print "you hit The Dragonlord with " + kdamage% + " damage"
  662.  
  663. bosshp%=bosshp%-kdamage%
  664. kcrit%=Rnd(1,100)
  665. If kcrit% > 90 Then
  666. Print "you hit a critical of " + sword% + " damage" ;crit
  667. bosshp%=bosshp%-sword%
  668. EndIf                                                           ;hit/miss
  669.  
  670. Else Print "you missed"
  671.  
  672. EndIf
  673.  Delay 1000
  674.  Print "--------------------------------------"                                                     ;The Dragon Lord
  675.  .k5hostile
  676.  If bosshp% > 0 Then
  677.  
  678.  If bosshp% < 60 Then
  679.  Print "The Dragonlord healed himself because he had critical health"
  680.  Delay 1000
  681.  bosshp%=bosshp%+50
  682.  Print "The Dragonlord now has " + bosshp%      ;boss heal
  683.  EndIf
  684.  
  685.  Print "The Dragonlord is about to attack"
  686.  Delay 2000
  687.  e5roll%=Rnd (1,100)
  688.  If e5roll% > 60 Then                                           ;enemy attack
  689.  Print "The Dragonlord hit you with " + bossdam% + " damage"
  690.  
  691.  khealth%=khealth%-bossdam%
  692.  Else Print "The Dragonlord missed"
  693.  
  694. EndIf
  695.  Print "--------------------------------------"
  696. Print "--------------------------------------"
  697.  Print "you have " + khealth% + " health"
  698.  Print "you have " + ability% + " rests left" ;live stats
  699.  Print "you have " + kstam% + " stamina left"
  700.  Print "The Dragonlord has " + bosshp% + " health"
  701.  Print "--------------------------------------"
  702. Delay 1000
  703. EndIf
  704. Wend
  705. Print "you killed The Dragonlord"           ;enemy dead
  706. Delay 2000
  707. score%=score%+ability%+1000
  708. score%=score%+khealth%
  709. ;-----------------------------------------------------------------------------------------------------
  710. Goto victory
  711.  
  712.  
  713.  
  714.  
  715.  
  716.  
  717.  
  718.  
  719.  
  720.  
  721.  
  722.  
  723.  
  724.  
  725.  
  726.  
  727.  
  728.  
  729.  
  730.  
  731.  
  732.  
  733.  
  734.  
  735. .tgame ; Thief's Game
  736.  gatekeeper()
  737. .gatekeeperthief
  738. ;-----------------------------------------------------------------------------------------------------
  739.  Print "--------------------------------------"
  740.  Print "you have " + thealth% + " health"
  741.  Print "you have " + ability% + " cloaks left" ;live stats
  742.  Print "you have " + tstam% + " stamina left"
  743.  Print "The Gatekeeper has " + enemy1hp% + " health"
  744.  Print "--------------------------------------"
  745. While enemy1hp% > 0
  746.  If thealth% <= 0 Then
  747.  Goto endprompt ;death
  748.  EndIf  
  749.  If ability% <= 0 Then
  750.  Goto t1attack
  751.  EndIf
  752.  tskill$=Input("would you like to use your ability?(cloak) " )
  753.  
  754.  If tskill$="yes" Then
  755.  Print "you used your ability (cloak) to heal and regen some stamina and go invisible"  ;ability
  756.  
  757.     If tstam% <=50 Then
  758.     tstam%=tstam%+ 50
  759.     ElseIf  tstam > 50 Then
  760.     tstam%=100
  761.     EndIf
  762.     thealth%=thealth%+10
  763.     ability%=ability%-1
  764.  
  765.  Print "--------------------------------------"
  766.  Print "you have " + thealth% + " health"
  767.  Print "you have " + ability% + " cloaks left" ;live stats
  768.  Print "you have " + tstam% + " stamina left"
  769.  Print "The Gatekeeper has " + enemy1hp% + " health"
  770.  Print "--------------------------------------"
  771.  
  772.  Else Print "you chose to not use your ability (cloak)"
  773.  EndIf
  774.  
  775.  
  776.  .t1attack  
  777.   dagger%=Input("how much stamina would you like to use? ")     ;attack
  778.   If dagger% = 0 Then
  779.     Print "you skipped your turn to gain 30 stamina"
  780.      
  781.     tstam%=tstam%+30
  782.     Goto t1hostile
  783.     EndIf
  784.    
  785.  If dagger% > tstam% Then
  786.  Print "you do not have that much stamina"
  787.  Goto t1attack
  788.  EndIf
  789.  If dagger% < 0 Then
  790.  Print "you cannot use that value of stamina"
  791.  Goto t1attack
  792.  EndIf
  793.  tstam%=tstam%-dagger%
  794.  
  795.  Delay 1000
  796.  troll%=Rnd (1,60)
  797.  
  798.  
  799. If dagger% > troll% Then  
  800. Print "you hit The Gatekeeper with " + tdamage% + " damage"
  801.  
  802. enemy1hp%=enemy1hp%-tdamage%
  803. tcrit%=Rnd(1,100)
  804. If tcrit% > 80 Then
  805. Print "you hit a critical of " + dagger% + " damage" ;crit
  806. enemy1hp%=enemy1hp%-dagger%
  807. EndIf                                                               ;hit/miss
  808.  
  809. Else Print "you missed"
  810.  
  811. EndIf
  812.  .t1hostile
  813. If enemy1hp% > 0 Then
  814.  Delay 1000
  815.  Print "--------------------------------------"                                                     ;The Gatekeeper
  816.  
  817.  Print "The Gatekeeper is about to attack"
  818.  Delay 2000
  819.  
  820.  If ability% > 0 Then
  821.  If tskill$="yes" Then
  822.  Print "you were invisible and The Gatekeeper couldnt attack"
  823.  Goto invis1 ;invis to avoid attack
  824.  EndIf                                                          ;enemy attack
  825.  EndIf
  826.  e1roll%=Rnd (1,100)
  827.  If e1roll% > 60
  828.  Print "The Gatekeeper hit you with " + enemy1dam% + " damage"
  829.  
  830.  thealth%=thealth%-enemy1dam%
  831.  Else Print "The Gatekeeper missed"
  832.  
  833. EndIf
  834.  Print "--------------------------------------"
  835.  .invis1
  836. Print "--------------------------------------"
  837.  Print "you have " + thealth% + " health"
  838.  Print "you have " + ability% + " cloaks left" ;live stats
  839.  Print "you have " + tstam% + " stamina left"
  840.  Print "The Gatekeeper has " + enemy1hp% + " health"
  841.  Print "--------------------------------------"
  842. Delay 1000
  843.  
  844. EndIf
  845. Wend
  846. Print "you killed The Gatekeeper"   ;enemy dead
  847. Delay 2000
  848.  
  849. t1score%=thealth%*2.85
  850. score%=score%+ability%+100
  851. score%=score%+t1score%
  852. ;-----------------------------------------------------------------------------------------------------
  853.  
  854. Print "------------------------------------------"
  855. Print "Now that The Gatekeeper is dead you are able to enter the castle"
  856. Delay 1000
  857. Print "Once you enter you find a well that resets your health and stamina and more abilities"
  858.  
  859. thealth%=70
  860. tstam%=100
  861. ability%=ability%+2
  862. Delay 1000
  863. Print "You turn to your left and notice a dark corridor"
  864. Delay 1000
  865. Print "As you walk down the corridor you notice a small gem on the ground"
  866. Delay 1000
  867. Print "As you pick up the gem you grow stronger"
  868. Delay 1000
  869. Print "------------------------------------------"
  870. Print "You now deal more damage when cloaked!"
  871. Print "------------------------------------------"
  872. Delay 1000
  873. Print "When you look up from picking up the gem you see a roaming knight"
  874. Delay 8000
  875.  
  876.  
  877.  
  878.  
  879. .roamingknightthief
  880. roamingknight()
  881. ;-----------------------------------------------------------------------------------------------------
  882.  Print "--------------------------------------"
  883.  Print "you have " + thealth% + " health"
  884.  Print "you have " + ability% + " cloaks left" ;live stats
  885.  Print "you have " + tstam% + " stamina left"
  886.  Print "The Roaming Knight has " + enemy2hp% + " health"
  887.  Print "--------------------------------------"
  888. While enemy2hp% > 0
  889.  If thealth% <= 0 Then
  890.  Goto endprompt ;death
  891.  EndIf  
  892.  If ability% <= 0 Then
  893.  Goto t2attack
  894.  EndIf
  895.  tskill$=Input("would you like to use your ability?(cloak) " )
  896.  
  897.  If tskill$="yes" Then
  898.  Print "you used your ability (cloak) to heal and regen some stamina and go invisible"  ;ability
  899.  
  900.     If tstam% <=50 Then
  901.     tstam%=tstam%+ 50
  902.     ElseIf  tstam > 50 Then
  903.     tstam%=100
  904.     EndIf
  905.     thealth%=thealth%+10
  906.     ability%=ability%-1
  907.  
  908.  Print "--------------------------------------"
  909.  Print "you have " + thealth% + " health"
  910.  Print "you have " + ability% + " cloaks left" ;live stats
  911.  Print "you have " + tstam% + " stamina left"
  912.  Print "The Roaming Knight has " + enemy2hp% + " health"
  913.  Print "--------------------------------------"
  914.  
  915.  Else Print "you chose to not use your ability (cloak)"
  916.  EndIf
  917.  
  918.  
  919.  .t2attack  
  920.   dagger%=Input("how much stamina would you like to use? ")     ;attack
  921.     If dagger% = 0 Then
  922.     Print "you skipped your turn to gain 30 stamina"
  923.      
  924.     tstam%=tstam%+30
  925.     Goto t2hostile
  926.     EndIf
  927.    
  928.  If dagger% > tstam% Then
  929.  Print "you do not have that much stamina"
  930.  Goto t2attack
  931.  EndIf
  932.  If dagger% < 0 Then
  933.  Print "you cannot use that value of stamina"
  934.  Goto t2attack
  935.  EndIf
  936.  tstam%=tstam%-dagger%
  937.  
  938.  Delay 1000
  939.  troll%=Rnd (1,60)
  940.  
  941.  
  942.  
  943. If dagger% > troll% Then  
  944. Print "you hit The Roaming Knight with " + tdamage% + " damage"
  945. enemy2hp%=enemy2hp%-tdamage%
  946. If ability% > 0 Then
  947. If tskill$="yes" Then
  948. enemy2hp%=enemy2hp%-20
  949. Print "you delt an additional 20 damage because you had (cloak) activated!"
  950. EndIf
  951. EndIf
  952. tcrit%=Rnd(1,100)
  953. If tcrit% > 80 Then
  954. Print "you hit a critical of " + dagger% + " damage" ;crit
  955. enemy2hp%=enemy2hp%-dagger%
  956. EndIf
  957.                                                                 ;hit/miss
  958.  
  959. Else Print "you missed"
  960.  
  961. EndIf
  962.  .t2hostile
  963.  If enemy2hp% > 0 Then
  964.  Delay 1000
  965.  Print "--------------------------------------"                                                     ;The Roaming Knight
  966.  
  967.  Print "The Roaming Knight is about to attack"
  968.  Delay 2000
  969.  
  970.  If ability% > 0 Then
  971.  If tskill$="yes" Then
  972.  Print "you were invisible and The Roaming Knight couldnt attack"
  973.  Goto invis2 ;invis to avoid attack
  974.  EndIf                                                          ;enemy attack
  975.  EndIf
  976.  e2roll%=Rnd (1,100)
  977.  If e2roll% > 60 Then
  978.  Print "The Roaming Knight hit you with " + enemy2dam% + " damage"
  979.  
  980.  thealth%=thealth%-enemy2dam%
  981.  Else Print "The Roaming Knight missed"
  982.  
  983. EndIf
  984.  Print "--------------------------------------"
  985.  .invis2
  986. Print "--------------------------------------"
  987.  Print "you have " + thealth% + " health"
  988.  Print "you have " + ability% + " cloaks left" ;live stats
  989.  Print "you have " + tstam% + " stamina left"
  990.  Print "The Roaming Knight has " + enemy2hp% + " health"
  991.  Print "--------------------------------------"
  992. Delay 1000
  993.  
  994. EndIf
  995. Wend
  996. Print "you killed The Roaming Knight"   ;enemy dead
  997. Delay 2000
  998.  
  999. t2score%=thealth%*2.85
  1000. score%=score%+t2score%
  1001. score%=score%+ability%+200
  1002.  
  1003. ;-----------------------------------------------------------------------------------------------------
  1004. Print "------------------------------------------"
  1005. Print "Now that The Roaming Knight is dead you can continue into the castle"
  1006. Delay 1000
  1007. Print "you look to your right and you see a door"
  1008. Delay 1000
  1009. Print "when you open the door you find another well that resets your health and stamina and gives you +2 more ability uses"
  1010.  
  1011.  
  1012. thealth%=70
  1013. tstam%=100
  1014. ability%=ability%+2
  1015.  
  1016. Print "------------------------------------------"
  1017. Print "On the wall of the room you see a painting"
  1018. Delay 1000
  1019. Print "The painting falls off of the wall revealing a button and another gem"
  1020. Delay 1000
  1021. Print "As you pick up the gem you grow stronger"
  1022. Print "------------------------------------------"
  1023. Print "Your (cloak) heals more!"
  1024. Print "------------------------------------------"
  1025. Delay 1000
  1026. Print "You press button to reveal the portal being blocked by The Goliath"
  1027. Delay 8000
  1028.  
  1029.  
  1030.  
  1031.  
  1032.  
  1033. .goliaththief
  1034. goliath()
  1035. ;-----------------------------------------------------------------------------------------------------
  1036.  Print "--------------------------------------"
  1037.  Print "you have " + thealth% + " health"
  1038.  Print "you have " + ability% + " cloaks left" ;live stats
  1039.  Print "you have " + tstam% + " stamina left"
  1040.  Print "The Goliath has " + enemy3hp% + " health"
  1041.  Print "--------------------------------------"
  1042. While enemy3hp% > 0
  1043.  If thealth% <= 0 Then
  1044.  Goto endprompt ;death
  1045.  EndIf  
  1046.  If ability% <= 0 Then
  1047.  Goto t3attack
  1048.  EndIf
  1049.  tskill$=Input("would you like to use your ability?(cloak) " )
  1050.  
  1051.  If tskill$="yes" Then
  1052.  Print "you used your ability (cloak) to heal and regen some stamina and go invisible"  ;ability
  1053.  
  1054.     If tstam% <=50 Then
  1055.     tstam%=tstam%+ 50
  1056.     ElseIf  tstam > 50 Then
  1057.     tstam%=100
  1058.     EndIf
  1059.     thealth%=thealth%+20
  1060.     ability%=ability%-1
  1061.  
  1062.  Print "--------------------------------------"
  1063.  Print "you have " + thealth% + " health"
  1064.  Print "you have " + ability% + " cloaks left" ;live stats
  1065.  Print "you have " + tstam% + " stamina left"
  1066.  Print "The Goliath has " + enemy3hp% + " health"
  1067.  Print "--------------------------------------"
  1068.  
  1069.  Else Print "you chose to not use your ability (cloak)"
  1070.  EndIf
  1071.  
  1072.  
  1073.  .t3attack  
  1074.   dagger%=Input("how much stamina would you like to use? ")     ;attack
  1075.     If dagger% = 0 Then
  1076.     Print "you skipped your turn to gain 30 stamina"
  1077.      
  1078.     tstam%=tstam%+30
  1079.     Goto t3hostile
  1080.     EndIf
  1081.    
  1082.  If dagger% > tstam% Then
  1083.  Print "you do not have that much stamina"
  1084.  Goto t3attack
  1085.  EndIf
  1086.  If dagger% < 0 Then
  1087.  Print "you cannot use that value of stamina"
  1088.  Goto t3attack
  1089.  EndIf
  1090.  tstam%=tstam%-dagger%
  1091.  
  1092.  Delay 1000
  1093.  troll%=Rnd (1,60)
  1094.  
  1095.  
  1096.  
  1097. If dagger% > troll% Then  
  1098. Print "you hit The Goliath with " + tdamage% + " damage"
  1099. enemy3hp%=enemy3hp%-tdamage%
  1100. If ability% > 0 Then
  1101. If tskill$="yes" Then
  1102. enemy3hp%=enemy3hp%-20
  1103. Print "you delt an additional 20 damage because you had (cloak) activated!"
  1104. EndIf
  1105. EndIf
  1106. tcrit%=Rnd(1,100)
  1107. If tcrit% > 80 Then
  1108. Print "you hit a critical of " + dagger% + " damage" ;crit
  1109. enemy3hp%=enemy3hp%-dagger%
  1110. EndIf
  1111.                                                                 ;hit/miss
  1112.  
  1113. Else Print "you missed"
  1114.  
  1115. EndIf
  1116.  .t3hostile
  1117.  If enemy3hp% > 0 Then
  1118.  Delay 1000
  1119.  Print "--------------------------------------"                                                     ;The Goliath
  1120.  
  1121.  Print "The Goliath is about to attack"
  1122.  Delay 2000
  1123.  
  1124.  If ability% > 0 Then
  1125.  If tskill$="yes" Then
  1126.  Print "you were invisible and The Goliath couldnt attack"
  1127.  Goto invis3 ;invis to avoid attack
  1128.  EndIf                                                          ;enemy attack
  1129.  EndIf
  1130.  e3roll%=Rnd (1,100)
  1131.  If e3roll% > 50 Then
  1132.  Print "The Goliath hit you with " + enemy3dam% + " damage"
  1133.  
  1134.  thealth%=thealth%-enemy3dam%
  1135.  Else Print "The Goliath missed"
  1136.  
  1137. EndIf
  1138.  Print "--------------------------------------"
  1139.  .invis3
  1140. Print "--------------------------------------"
  1141.  Print "you have " + thealth% + " health"
  1142.  Print "you have " + ability% + " cloaks left" ;live stats
  1143.  Print "you have " + tstam% + " stamina left"
  1144.  Print "The Goliath has " + enemy3hp% + " health"
  1145.  Print "--------------------------------------"
  1146. Delay 1000
  1147.  
  1148. EndIf
  1149. Wend
  1150. Print "you killed The Goliath"  ;enemy dead
  1151. Delay 2000
  1152.  
  1153. t3score%=thealth%*2.85
  1154. score%=score%+t3score%
  1155. score%=score%+ability%+300
  1156. ;-----------------------------------------------------------------------------------------------------
  1157. Print "------------------------------------------"
  1158. Print "Now that The Goliath is dead you can now enter the portal to the Dragonlords realm"
  1159. Delay 1000
  1160. Print "As you enter you see another well that resets your health and stamina and gives you +3 more ability uses"
  1161.  
  1162.  
  1163.  
  1164. thealth%=70
  1165. tstam%=100
  1166. ability%=ability%+3
  1167.  
  1168.  
  1169. Print "------------------------------------------"
  1170. Print "you see a tower where The Dragonlord is perched on top"
  1171. Delay 1000
  1172. Print "you enter the tower and find another gem"
  1173. Delay 1000
  1174. Print "as you pick up the gem you grow stronger"
  1175. Delay 1000
  1176. Print "------------------------------------------"
  1177. Print "your (cloak) can now restore up to 70 stamina"
  1178. Print "------------------------------------------"
  1179. Print "you climb up the spiral staircase and are confronted by The Pyromancer"
  1180. Delay 8000
  1181.  
  1182.  
  1183.  
  1184. .pyromancerthief
  1185. pyromancer()
  1186. ;-----------------------------------------------------------------------------------------------------
  1187.  Print "--------------------------------------"
  1188.  Print "you have " + thealth% + " health"
  1189.  Print "you have " + ability% + " cloaks left" ;live stats
  1190.  Print "you have " + tstam% + " stamina left"
  1191.  Print "The Pyromancer has " + enemy4hp% + " health"
  1192.  Print "--------------------------------------"
  1193. While enemy4hp% > 0
  1194.  If thealth% <= 0 Then
  1195.  Goto endprompt ;death
  1196.  EndIf  
  1197.  If ability% <= 0 Then
  1198.  Goto t4attack
  1199.  EndIf
  1200.  tskill$=Input("would you like to use your ability?(cloak) " )
  1201.  
  1202.  If tskill$="yes" Then
  1203.  Print "you used your ability (cloak) to heal and regen some stamina and go invisible"  ;ability
  1204.  
  1205.     If tstam% <=30 Then
  1206.     tstam%=tstam%+ 70
  1207.     ElseIf  tstam > 30 Then
  1208.     tstam%=100
  1209.     EndIf
  1210.     thealth%=thealth%+20
  1211.     ability%=ability%-1
  1212.  
  1213.  Print "--------------------------------------"
  1214.  Print "you have " + thealth% + " health"
  1215.  Print "you have " + ability% + " cloaks left" ;live stats
  1216.  Print "you have " + tstam% + " stamina left"
  1217.  Print "The Pyromancer has " + enemy4hp% + " health"
  1218.  Print "--------------------------------------"
  1219.  
  1220.  Else Print "you chose to not use your ability (cloak)"
  1221.  EndIf
  1222.  
  1223.  
  1224.  .t4attack  
  1225. dagger%=Input("how much stamina would you like to use? ")       ;attack
  1226.     If dagger% = 0 Then
  1227.     Print "you skipped your turn to gain 30 stamina"
  1228.      
  1229.     tstam%=tstam%+30
  1230.     Goto t4hostile
  1231.     EndIf
  1232.    
  1233.  If dagger% > tstam% Then
  1234.  Print "you do not have that much stamina"
  1235.  Goto t4attack
  1236.  EndIf
  1237.  If dagger% < 0 Then
  1238.  Print "you cannot use that value of stamina"
  1239.  Goto t4attack
  1240.  EndIf
  1241.  tstam%=tstam%-dagger%
  1242.  
  1243.  Delay 1000
  1244.  troll%=Rnd (1,60)
  1245.  
  1246.  
  1247.  
  1248. If dagger% > troll% Then  
  1249. Print "you hit The Pyromancer with " + tdamage% + " damage"
  1250. enemy4hp%=enemy4hp%-tdamage%
  1251. If ability% > 0 Then
  1252. If tskill$="yes" Then
  1253. enemy4hp%=enemy4hp%-20
  1254. Print "you delt an additional 20 damage because you had (cloak) activated!"
  1255. EndIf
  1256. EndIf
  1257. tcrit%=Rnd(1,100)
  1258. If tcrit% > 80 Then
  1259. Print "you hit a critical of " + dagger% + " damage" ;crit
  1260. enemy4hp%=enemy4hp%-dagger%
  1261. EndIf
  1262.                                                                 ;hit/miss
  1263.  
  1264. Else Print "you missed"
  1265.  
  1266. EndIf
  1267.  .t4hostile
  1268. If enemy4hp% > 0 Then
  1269.  Delay 1000
  1270.  Print "--------------------------------------"                                                     ;The Pyromancer
  1271.  
  1272.  Print "The Pyromancer is about to attack"
  1273.  Delay 2000
  1274.  
  1275.  If ability% > 0 Then
  1276.  If tskill$="yes" Then
  1277.  Print "you were invisible and The Pyromancer couldnt attack"
  1278.  Goto invis4 ;invis to avoid attack
  1279.  EndIf                                                          ;enemy attack
  1280.  EndIf
  1281.  e4roll%=Rnd (1,100)
  1282.  If e4roll% > 55 Then
  1283.  Print "The Pyromancer hit you with " + enemy4dam% + " damage"
  1284.  
  1285.  thealth%=thealth%-enemy4dam%
  1286.  Else Print "The Pyromancer missed"
  1287.  
  1288. EndIf
  1289.  Print "--------------------------------------"
  1290.  .invis4
  1291. Print "--------------------------------------"
  1292.  Print "you have " + thealth% + " health"
  1293.  Print "you have " + ability% + " cloaks left" ;live stats
  1294.  Print "you have " + tstam% + " stamina left"
  1295.  Print "The Pyromancer has " + enemy4hp% + " health"
  1296.  Print "--------------------------------------"
  1297. Delay 1000
  1298.  
  1299. EndIf
  1300. Wend
  1301. Print "you killed The Pyromancer"   ;enemy dead
  1302. Delay 2000
  1303. t4score%=thealth%*2.85
  1304. score%=score%+t4score%
  1305. score%=score%+ability%+400
  1306. ;-----------------------------------------------------------------------------------------------------
  1307. Print "------------------------------------------"
  1308. Print "now that The Pyromancer is dead you can now attack The Dragonlord"
  1309. Delay 1000
  1310. Print "as you climb further up the spiral staircase you find a super well"
  1311. Delay 1000
  1312. Print "the super well  resets your health and stamina and gives you +5 more ability uses"
  1313. Delay 1000
  1314. Print "the super well also raises your health cap"
  1315.  
  1316.  
  1317.  
  1318. thealth%=70
  1319. tstam%=100
  1320. ability%=ability%+5
  1321.  
  1322.  
  1323.  
  1324. Delay 1000
  1325. Print "you finish your climb to the top of the tower and you now are ready to face The Dragonlord"
  1326. Delay 8000
  1327.  
  1328. .dragonlordthief
  1329. dragonlord()
  1330. thealth%=thealth%+10
  1331. ;-----------------------------------------------------------------------------------------------------
  1332.  Print "--------------------------------------"
  1333.  Print "you have " + thealth% + " health"
  1334.  Print "you have " + ability% + " cloaks left" ;live stats
  1335.  Print "you have " + tstam% + " stamina left"
  1336.  Print "The Dragonlord has " + bosshp% + " health"
  1337.  Print "--------------------------------------"
  1338. While bosshp% > 0
  1339.  If thealth% <= 0 Then
  1340.  Goto endprompt ;death
  1341.  EndIf  
  1342.  If ability% <= 0 Then
  1343.  Goto t5attack
  1344.  EndIf
  1345.  tskill$=Input("would you like to use your ability?(cloak) " )
  1346.  
  1347.  If tskill$="yes" Then
  1348.  Print "you used your ability (cloak) to heal and regen some stamina and go invisible"  ;ability
  1349.  
  1350.     If tstam% <=30 Then
  1351.     tstam%=tstam%+ 70
  1352.     ElseIf  tstam > 30 Then
  1353.     tstam%=100
  1354.     EndIf
  1355.     thealth%=thealth%+20
  1356.     ability%=ability%-1
  1357.  
  1358.  Print "--------------------------------------"
  1359.  Print "you have " + thealth% + " health"
  1360.  Print "you have " + ability% + " cloaks left" ;live stats
  1361.  Print "you have " + tstam% + " stamina left"
  1362.  Print "The Dragonlord has " + bosshp% + " health"
  1363.  Print "--------------------------------------"
  1364.  
  1365.  Else Print "you chose to not use your ability (cloak)"
  1366.  EndIf
  1367.  
  1368.  
  1369.  .t5attack  
  1370.   dagger%=Input("how much stamina would you like to use? ")     ;attack
  1371.    If dagger% = 0 Then
  1372.     Print "you skipped your turn to gain 30 stamina"
  1373.      
  1374.     tstam%=tstam%+30
  1375.     Goto t5hostile
  1376.     EndIf
  1377.      
  1378.  If dagger% > tstam% Then
  1379.  Print "you do not have that much stamina"
  1380.  Goto t5attack
  1381.  EndIf
  1382.  If dagger% < 0 Then
  1383.  Print "you cannot use that value of stamina"
  1384.  Goto t5attack
  1385.  EndIf
  1386.  tstam%=tstam%-dagger%
  1387.  
  1388.  Delay 1000
  1389.  troll%=Rnd (1,60)
  1390.  
  1391.  
  1392.  
  1393. If dagger% > troll% Then  
  1394. Print "you hit The Dragonlord with " + tdamage% + " damage"
  1395. bosshp%=bosshp%-tdamage%
  1396. If ability% > 0 Then
  1397. If tskill$="yes" Then
  1398. bosshp%=bosshp%-20
  1399. Print "you delt an additional 20 damage because you had (cloak) activated!"
  1400. EndIf
  1401. EndIf
  1402. tcrit%=Rnd(1,100)
  1403. If tcrit% > 80 Then
  1404. Print "you hit a critical of " + dagger% + " damage" ;crit
  1405. bosshp%=bosshp%-dagger%
  1406. EndIf
  1407.                                                                 ;hit/miss
  1408.  
  1409. Else Print "you missed"
  1410.  
  1411. EndIf
  1412.  .t5hostile
  1413.  If bosshp% > 0 Then
  1414.  
  1415.  If bosshp% < 60 Then
  1416.  Print "The Dragonlord healed himself because he had critical health"
  1417.  Delay 1000
  1418.  bosshp%=bosshp%+50
  1419.  Print "The Dragonlord now has " + bosshp% ;boss heal
  1420.  EndIf
  1421.  
  1422.  Delay 1000
  1423.  Print "--------------------------------------"                                                     ;The Dragonlord
  1424.  
  1425.  Print "The Dragonlord is about to attack"
  1426.  Delay 2000
  1427.  If ability% > 0 Then
  1428.  If tskill$="yes" Then
  1429.  Print "you were invisible and The Dragonlord couldnt attack"
  1430.  Goto invis5 ;invis to avoid attack
  1431.  EndIf  
  1432.  EndIf                                                      ;enemy attack
  1433.  e5roll%=Rnd (1,100)
  1434.  If e5roll% > 40 Then
  1435.  Print "The Dragonlord hit you with " + bossdam% + " damage"
  1436.  
  1437.  thealth%=thealth%-bossdam%
  1438.  Else Print "The Dragonlord missed"
  1439.  
  1440. EndIf
  1441.  Print "--------------------------------------"
  1442.  .invis5
  1443. Print "--------------------------------------"
  1444.  Print "you have " + thealth% + " health"
  1445.  Print "you have " + ability% + " cloaks left" ;live stats
  1446.  Print "you have " + tstam% + " stamina left"
  1447.  Print "The Dragonlord has " + bosshp% + " health"
  1448.  Print "--------------------------------------"
  1449. Delay 1000
  1450.  
  1451. EndIf
  1452. Wend
  1453. Print "you killed The Dragonlord"   ;enemy dead
  1454. Delay 2000
  1455.  
  1456. t5score%=thealth%*2.85
  1457. score%=score%+t5score%
  1458. score%=score%+ability%+1000
  1459. ;-----------------------------------------------------------------------------------------------------
  1460. Goto victory
  1461.  
  1462.  
  1463.  
  1464.  
  1465.  
  1466.  
  1467.  
  1468.  
  1469.  
  1470.  
  1471.  
  1472.  
  1473.  
  1474.  
  1475.  
  1476.  
  1477.  
  1478.  
  1479.  
  1480.  
  1481.  
  1482.  
  1483. .sgame ;Sorcerer's Game
  1484.  gatekeeper()
  1485. .gatekeepersorc
  1486. ;-----------------------------------------------------------------------------------------------------
  1487.  Print "--------------------------------------"
  1488.  Print "you have " + shealth% + " health"
  1489.  Print "you have " + ability% + " equilibriums left" ;live stats
  1490.  Print "you have " + smana% + " mana left"
  1491.  Print "The Gatekeeper has " + enemy1hp% + " health"
  1492.  Print "--------------------------------------"
  1493. While enemy1hp% > 0
  1494.  If shealth% <= 0 Then
  1495.  Goto endprompt ;death
  1496.  EndIf
  1497.  If ability% <= 0 Then
  1498.  Goto s1attack
  1499.  EndIf
  1500.  sskill$=Input("would you like to use your ability?(equilibrium) " )
  1501.  If ability% > 0 Then                                                                       ;ability
  1502.  If sskill$="yes" Then
  1503.  Print "you charged your next shot with (equilibruium)"
  1504.   ability%=ability%-1
  1505.  
  1506.  Print "--------------------------------------"
  1507.  Print "you have " + shealth% + " health"
  1508.  Print "you have " + ability% + " equilibriums left" ;live stats
  1509.  Print "you have " + smana% + " mana left"
  1510.  Print "The Gatekeeper has " + enemy1hp% + " health"
  1511.  If sskill$="yes" Then
  1512.  Print "your shot is charged with equilibrium"
  1513.  EndIf
  1514.  Print "--------------------------------------"
  1515.  
  1516.  Else Print "you chose to not use your ability (equilibruim)"
  1517.  EndIf
  1518.  EndIf
  1519.  
  1520.  .s1attack  
  1521.  staff%=Input("how much mana would you like to use? ")  ;attack
  1522.     If staff% = 0 Then
  1523.     Print "you skipped your turn to gain 30 mana"
  1524.      
  1525.     smana%=smana%+30
  1526.     Goto s1hostile
  1527.     EndIf
  1528.    
  1529.  If staff% > smana% Then
  1530.  Print "you do not have that much mana"
  1531.  Goto s1attack
  1532.  EndIf
  1533.  If staff% < 0 Then
  1534.  Print "you cannot use that value of mana"
  1535.  Goto s1attack
  1536.  EndIf
  1537.  smana%=smana%-staff%
  1538.  
  1539.  Delay 1000
  1540.  sroll%=Rnd (1,30)
  1541.  
  1542.  
  1543. If staff% > sroll% Then  
  1544. Print "you hit The Gatekeeper with " + sdamage% + " damage"     ;hit/miss
  1545.  
  1546. enemy1hp%=enemy1hp%-sdamage%
  1547. scrit%=Rnd(1,100)
  1548. If scrit% > 70 Then
  1549. Print "you hit a critical of " + staff% + " damage" ;crit
  1550. enemy1hp%=enemy1hp%-staff%
  1551. EndIf
  1552.    
  1553.    
  1554.    
  1555.     If ability% > 0 Then
  1556.     If sskill$= "yes"
  1557.                                                            
  1558.     shealth%=shealth%+sdamage%  ;equilibrium's +mana +heath
  1559.     smana%=smana%+sdamage%
  1560.     EndIf
  1561.     EndIf
  1562.  
  1563. Else Print "you missed"
  1564.  
  1565. EndIf
  1566.  .s1hostile
  1567.  If enemy1hp% > 0 Then
  1568.  Delay 1000
  1569.  Print "--------------------------------------"                                                     ;The Gatekeeper
  1570.  
  1571.  Print "The Gatekeeper is about to attack"
  1572.  Delay 2000
  1573.  e1roll%=Rnd (1,100)                            ;enemy attack
  1574.  If e1roll% > 60
  1575.  Print "The Gatekeeper hit you with " + enemy1dam% + " damage"
  1576.  
  1577.  shealth%=shealth%-enemy1dam%
  1578.  Else Print "The Gatekeeper missed"
  1579.  
  1580. EndIf
  1581.  Print "--------------------------------------"
  1582. Print "--------------------------------------"
  1583.  Print "you have " + shealth% + " health"
  1584.  Print "you have " + ability% + " equilibriums left" ;live stats
  1585.  Print "you have " + smana% + " mana left"
  1586.  Print "The Gatekeeper has " + enemy1hp% + " health"
  1587.  Print "--------------------------------------"
  1588. Delay 1000
  1589. EndIf
  1590. Wend
  1591. Print "you killed The Gatekeeper"   ;enemy dead
  1592. Delay 2000
  1593.  
  1594. s1score%=shealth%*1.66
  1595. score%=score%+s1score%
  1596. score%=score%+ability%+100
  1597. ;-----------------------------------------------------------------------------------------------------
  1598.  
  1599. Print "------------------------------------------"
  1600. Print "Now that The Gatekeeper is dead you are able to enter the castle"
  1601. Delay 1000
  1602. Print "Once you enter you find a well that resets your health and mana and gives you +2 more ability uses"
  1603.  
  1604. shealth%=120
  1605. smana%=100
  1606. ability%=ability%+2
  1607.  
  1608. Delay 1000
  1609. Print "You turn to your left and notice a dark corridor"
  1610. Delay 1000
  1611. Print "As you walk down the corridor you notice a small gem on the ground"
  1612. Delay 1000
  1613. Print "As you pick up the gem you grow stronger"
  1614. Delay 1000
  1615. Print "------------------------------------------"
  1616. Print "Your (Equilibrium)'s mana restore is now stronger!"
  1617. Print "------------------------------------------"
  1618. Delay 1000
  1619. Print "When you look up from picking up the gem you see a roaming knight"
  1620. Delay 8000
  1621.  
  1622.  
  1623. .roamingknightsorc
  1624. roamingknight()
  1625. ;-----------------------------------------------------------------------------------------------------
  1626.  Print "--------------------------------------"
  1627.  Print "you have " + shealth% + " health"
  1628.  Print "you have " + ability% + " equilibriums left" ;live stats
  1629.  Print "you have " + smana% + " mana left"
  1630.  Print "The Roaming Knight has " + enemy2hp% + " health"
  1631.  Print "--------------------------------------"
  1632. While enemy2hp% > 0
  1633.  If shealth% <= 0 Then
  1634.  Goto endprompt ;death
  1635.  EndIf
  1636.  If ability% <= 0 Then
  1637.  Goto s2attack
  1638.  EndIf
  1639.  sskill$=Input("would you like to use your ability?(equilibrium) " )
  1640.  If ability% > 0 Then                                                                       ;ability
  1641.  If sskill$="yes" Then
  1642.  Print "you charged your next shot with (equilibruium)"
  1643.   ability%=ability%-1
  1644.  
  1645.  Print "--------------------------------------"
  1646.  Print "you have " + shealth% + " health"
  1647.  Print "you have " + ability% + " equilibriums left" ;live stats
  1648.  Print "you have " + smana% + " mana left"
  1649.  Print "The Roaming Knight has " + enemy2hp% + " health"
  1650.  If sskill$="yes" Then
  1651.  Print "your shot is charged with equilibrium"
  1652.  EndIf
  1653.  Print "--------------------------------------"
  1654.  
  1655.  Else Print "you chose to not use your ability (equilibruim)"
  1656.  EndIf
  1657.  EndIf
  1658.  
  1659.  .s2attack  
  1660. staff%=Input("how much mana would you like to use? ")   ;attack
  1661.     If staff% = 0 Then
  1662.     Print "you skipped your turn to gain 30 mana"
  1663.      
  1664.     smana%=smana%+30
  1665.     Goto s2hostile
  1666.     EndIf
  1667.      
  1668.  If staff% > smana% Then
  1669.  Print "you do not have that much mana"
  1670.  Goto s2attack
  1671.  EndIf
  1672.  If staff% < 0 Then
  1673.  Print "you cannot use that value of mana"
  1674.  Goto s2attack
  1675.  EndIf
  1676.  smana%=smana%-staff%
  1677.  
  1678.  Delay 1000
  1679.  sroll%=Rnd (1,30)
  1680.  
  1681.  
  1682. If staff% > sroll% Then  
  1683. Print "you hit The Roaming Knight with " + sdamage% + " damage"     ;hit/miss
  1684.  
  1685. enemy2hp%=enemy2hp%-sdamage%
  1686. scrit%=Rnd(1,100)
  1687. If scrit% > 70 Then
  1688. Print "you hit a critical of " + staff% + " damage" ;crit
  1689. enemy2hp%=enemy2hp%-staff%
  1690. EndIf
  1691.     If ability% > 0 Then
  1692.     If sskill$= "yes"
  1693.                                                            
  1694.     shealth%=shealth%+sdamage%  ;equilibrium's +mana +heath
  1695.     smana%=smana%+sdamage% + 10
  1696.     EndIf
  1697.     EndIf
  1698.  
  1699. Else Print "you missed"
  1700.  
  1701. EndIf
  1702.  .s2hostile
  1703.  If enemy2hp% > 0 Then
  1704.  Delay 1000
  1705.  Print "--------------------------------------"                                                     ;The Roaming Knight
  1706.  
  1707.  Print "The Roaming Knight is about to attack"
  1708.  Delay 2000
  1709.  e2roll%=Rnd (1,100)                            ;enemy attack
  1710.  If e2roll% > 60 Then
  1711.  Print "The Roaming Knight hit you with " + enemy2dam% + " damage"
  1712.  
  1713.  shealth%=shealth%-enemy2dam%
  1714.  Else Print "The Roaming Knight missed"
  1715.  
  1716. EndIf
  1717.  Print "--------------------------------------"
  1718. Print "--------------------------------------"
  1719.  Print "you have " + shealth% + " health"
  1720.  Print "you have " + ability% + " equilibriums left" ;live stats
  1721.  Print "you have " + smana% + " mana left"
  1722.  Print "The Roaming Knight has " + enemy2hp% + " health"
  1723.  Print "--------------------------------------"
  1724. Delay 1000
  1725. EndIf
  1726. Wend
  1727. Print "you killed The Roaming Knight"   ;enemy dead
  1728. Delay 2000
  1729. s2score%=shealth%*1.66
  1730. score%=score%+s2score%
  1731. score%=score%+ability%+200
  1732. ;-----------------------------------------------------------------------------------------------------
  1733. Print "------------------------------------------"
  1734. Print "Now that The Roaming Knight is dead you can continue into the castle"
  1735. Delay 1000
  1736. Print "you look to your right and you see a door"
  1737. Delay 1000
  1738. Print "when you open the door you find another well that resets your health and mana and gives you +2 more ability uses"
  1739.  
  1740.  
  1741.  
  1742. shealth%=120
  1743. smana%=100
  1744. ability%=ability%+2
  1745.  
  1746. Print "------------------------------------------"
  1747. Print "On the wall of the room you see a painting"
  1748. Delay 1000
  1749. Print "The painting falls off of the wall revealing a button and another gem"
  1750. Delay 1000
  1751. Print "As you pick up the gem you grow stronger"
  1752. Print "------------------------------------------"
  1753. Print "You are now even more accurate!"
  1754. Print "------------------------------------------"
  1755. Delay 1000
  1756. Print "You press button to reveal the portal being blocked by The Goliath"
  1757. Delay 8000
  1758.  
  1759. .goliathsorc
  1760. goliath()
  1761. ;-----------------------------------------------------------------------------------------------------
  1762.  Print "--------------------------------------"
  1763.  Print "you have " + shealth% + " health"
  1764.  Print "you have " + ability% + " equilibriums left" ;live stats
  1765.  Print "you have " + smana% + " mana left"
  1766.  Print "The Goliath has " + enemy3hp% + " health"
  1767.  Print "--------------------------------------"
  1768. While enemy3hp% > 0
  1769.  If shealth% <= 0 Then
  1770.  Goto endprompt ;death
  1771.  EndIf
  1772.  If ability% <= 0 Then
  1773.  Goto s3attack
  1774.  EndIf
  1775.  sskill$=Input("would you like to use your ability?(equilibrium) " )
  1776.  If ability% > 0 Then                                                                       ;ability
  1777.  If sskill$="yes" Then
  1778.  Print "you charged your next shot with (equilibruium)"
  1779.   ability%=ability%-1
  1780.  
  1781.  Print "--------------------------------------"
  1782.  Print "you have " + shealth% + " health"
  1783.  Print "you have " + ability% + " equilibriums left" ;live stats
  1784.  Print "you have " + smana% + " mana left"
  1785.  Print "The Goliath has " + enemy3hp% + " health"
  1786.  If sskill$="yes" Then
  1787.  Print "your shot is charged with equilibrium"
  1788.  EndIf
  1789.  Print "--------------------------------------"
  1790.  
  1791.  Else Print "you chose to not use your ability (equilibruim)"
  1792.  EndIf
  1793.  EndIf
  1794.  
  1795.  .s3attack  
  1796. staff%=Input("how much mana would you like to use? ")   ;attack
  1797.       If staff% = 0 Then
  1798.     Print "you skipped your turn to gain 30 mana"
  1799.      
  1800.     smana%=smana%+30
  1801.     Goto s3hostile
  1802.     EndIf
  1803.    
  1804.  If staff% > smana% Then
  1805.  Print "you do not have that much mana"
  1806.  Goto s3attack
  1807.  EndIf
  1808.  If staff% < 0 Then
  1809.  Print "you cannot use that value of mana"
  1810.  Goto s3attack
  1811.  EndIf
  1812.  smana%=smana%-staff%
  1813.  
  1814.  Delay 1000
  1815.  sroll%=Rnd (1,20)
  1816.  
  1817.  
  1818. If staff% > sroll% Then  
  1819. Print "you hit The Goliath with " + sdamage% + " damage"    ;hit/miss
  1820.  
  1821. enemy3hp%=enemy3hp%-sdamage%
  1822. scrit%=Rnd(1,100)
  1823. If scrit% > 70 Then
  1824. Print "you hit a critical of " + staff% + " damage" ;crit
  1825. enemy3hp%=enemy3hp%-staff%
  1826. EndIf
  1827.    
  1828.     If ability% > 0 Then
  1829.     If sskill$= "yes"
  1830.                                                            
  1831.     shealth%=shealth%+sdamage%  ;equilibrium's +mana +heath
  1832.     smana%=smana%+sdamage% + 10
  1833.     EndIf
  1834.     EndIf
  1835.  
  1836. Else Print "you missed"
  1837.  
  1838. EndIf
  1839.  .s3hostile
  1840.  If enemy3hp% > 0 Then
  1841.  Delay 1000
  1842.  Print "--------------------------------------"                                                     ;The Golitah
  1843.  
  1844.  Print "The Goliath is about to attack"
  1845.  Delay 2000
  1846.  e3roll%=Rnd (1,100)                            ;enemy attack
  1847.  If e3roll% > 50 Then
  1848.  Print "The Goliath hit you with " + enemy3dam% + " damage"
  1849.  
  1850.  shealth%=shealth%-enemy3dam%
  1851.  Else Print "The Goliath missed"
  1852.  
  1853. EndIf
  1854.  Print "--------------------------------------"
  1855. Print "--------------------------------------"
  1856.  Print "you have " + shealth% + " health"
  1857.  Print "you have " + ability% + " equilibriums left" ;live stats
  1858.  Print "you have " + smana% + " mana left"
  1859.  Print "The Goliath has " + enemy3hp% + " health"
  1860.  Print "--------------------------------------"
  1861. Delay 1000
  1862. EndIf
  1863. Wend
  1864. Print "you killed The Goliath"  ;enemy dead
  1865. Delay 2000
  1866. s3score%=shealth%*1.66
  1867. score%=score%+s3score%
  1868. score%=score%+ability%+300
  1869. ;-----------------------------------------------------------------------------------------------------
  1870. Print "------------------------------------------"
  1871. Print "Now that The Goliath is dead you can now enter the portal to the Dragonlords realm"
  1872. Delay 1000
  1873. Print "As you enter you see another well that resets your health and mana and gives you +3 more ability uses"
  1874.  
  1875.  
  1876. shealth%=120
  1877. smana%=100
  1878. ability%=ability%+3
  1879.  
  1880. Print "------------------------------------------"
  1881. Print "you see a tower where The Dragonlord is perched on top"
  1882. Delay 1000
  1883. Print "you enter the tower and find another gem"
  1884. Delay 1000
  1885. Print "as you pick up the gem you grow stronger"
  1886. Delay 1000
  1887. Print "------------------------------------------"
  1888. Print "your (equilibrium)'s health restore is now stronger"
  1889. Print "------------------------------------------"
  1890. Print "you climb up the spiral staircase and are confronted by The Pyromancer"
  1891.  
  1892.  
  1893.  
  1894. .pyromancersorc
  1895. pyromancer()
  1896. ;-----------------------------------------------------------------------------------------------------
  1897.  Print "--------------------------------------"
  1898.  Print "you have " + shealth% + " health"
  1899.  Print "you have " + ability% + " equilibriums left" ;live stats
  1900.  Print "you have " + smana% + " mana left"
  1901.  Print "The Pyromancer has " + enemy4hp% + " health"
  1902.  Print "--------------------------------------"
  1903. While enemy4hp% > 0
  1904.  If shealth% <= 0 Then
  1905.  Goto endprompt ;death
  1906.  EndIf
  1907.  If ability% <= 0 Then
  1908.  Goto s4attack
  1909.  EndIf
  1910.  sskill$=Input("would you like to use your ability?(equilibrium) " )
  1911.  If ability% > 0 Then                                                                       ;ability
  1912.  If sskill$="yes" Then
  1913.  Print "you charged your next shot with (equilibruium)"
  1914.   ability%=ability%-1
  1915.  
  1916.  Print "--------------------------------------"
  1917.  Print "you have " + shealth% + " health"
  1918.  Print "you have " + ability% + " equilibriums left" ;live stats
  1919.  Print "you have " + smana% + " mana left"
  1920.  Print "The Pyromancer has " + enemy4hp% + " health"
  1921.  If sskill$="yes" Then
  1922.  Print "your shot is charged with equilibrium"
  1923.  EndIf
  1924.  Print "--------------------------------------"
  1925.  
  1926.  Else Print "you chose to not use your ability (equilibruim)"
  1927.  EndIf
  1928.  EndIf
  1929.  
  1930.  .s4attack  
  1931.  staff%=Input("how much mana would you like to use? ")  ;attack
  1932.     If staff% = 0 Then
  1933.     Print "you skipped your turn to gain 30 mana"
  1934.      
  1935.     smana%=smana%+30
  1936.     Goto s4hostile
  1937.     EndIf
  1938.      
  1939.  If staff% > smana% Then
  1940.  Print "you do not have that much mana"
  1941.  Goto s4attack
  1942.  EndIf
  1943.  If staff% < 0 Then
  1944.  Print "you cannot use that value of mana"
  1945.  Goto s4attack
  1946.  EndIf
  1947.  smana%=smana%-staff%
  1948.  
  1949.  Delay 1000
  1950.  sroll%=Rnd (1,20)
  1951.  
  1952.  
  1953. If staff% > sroll% Then  
  1954. Print "you hit The Pyromancer with " + sdamage% + " damage"     ;hit/miss
  1955.  
  1956. enemy4hp%=enemy4hp%-sdamage%
  1957. scrit%=Rnd(1,100)
  1958. If scrit% > 70 Then
  1959. Print "you hit a critical of " + staff% + " damage" ;crit
  1960. enemy4hp%=enemy4hp%-staff%
  1961. EndIf
  1962.     If ability% > 0 Then
  1963.     If sskill$= "yes"
  1964.                                                            
  1965.     shealth%=shealth%+sdamage% + 10 ;equilibrium's +mana +heath
  1966.     smana%=smana%+sdamage% + 10
  1967.     EndIf
  1968.     EndIf
  1969.  
  1970. Else Print "you missed"
  1971.  
  1972. EndIf
  1973.  .s4hostile
  1974.  If enemy4hp% > 0 Then
  1975.  Delay 1000
  1976.  Print "--------------------------------------"                                                     ;The Pyromancer
  1977.  
  1978.  Print "The Pyromancer is about to attack"
  1979.  Delay 2000
  1980.  e4roll%=Rnd (1,100)                            ;enemy attack
  1981.  If e4roll% > 55 Then
  1982.  Print "The Pyromancer hit you with " + enemy4dam% + " damage"
  1983.  
  1984.  shealth%=shealth%-enemy4dam%
  1985.  Else Print "The Pyromancer missed"
  1986.  
  1987. EndIf
  1988.  Print "--------------------------------------"
  1989. Print "--------------------------------------"
  1990.  Print "you have " + shealth% + " health"
  1991.  Print "you have " + ability% + " equilibriums left" ;live stats
  1992.  Print "you have " + smana% + " mana left"
  1993.  Print "The Pyromancer has " + enemy4hp% + " health"
  1994.  Print "--------------------------------------"
  1995. Delay 1000
  1996. EndIf
  1997. Wend
  1998. Print "you killed The Pyromancer"   ;enemy dead
  1999. Delay 2000
  2000.  
  2001. s4score%=shealth%*1.66
  2002. score%=score%+s4score%
  2003. score%=score%+ability%+400
  2004. ;-----------------------------------------------------------------------------------------------------
  2005.  
  2006. Print "------------------------------------------"
  2007. Print "now that The Pyromancer is dead you can now attack The Dragonlord"
  2008. Delay 1000
  2009. Print "as you climb further up the spiral staircase you find a super well"
  2010. Delay 1000
  2011. Print "the super well  resets your health and stamina and gives you +5 more ability uses"
  2012. Delay 1000
  2013. Print "the super well also raises your health cap"
  2014.  
  2015.  
  2016. shealth%=120
  2017. smana%=100
  2018. ability%=ability%+5
  2019.  
  2020. Delay 1000
  2021. Print "you finish your climb to the top of the tower and you now are ready to face The Dragonlord"
  2022. Delay 8000
  2023.  
  2024.  
  2025.  
  2026.  
  2027.  
  2028.  
  2029. .dragonlordsorc
  2030. dragonlord()
  2031. shealth%=shealth%+15
  2032. ;-----------------------------------------------------------------------------------------------------
  2033.  Print "--------------------------------------"
  2034.  Print "you have " + shealth% + " health"
  2035.  Print "you have " + ability% + " equilibriums left" ;live stats
  2036.  Print "you have " + smana% + " mana left"
  2037.  Print "The Dragonlord has " + bosshp% + " health"
  2038.  Print "--------------------------------------"
  2039. While bosshp% > 0
  2040.  If shealth% <= 0 Then
  2041.  Goto endprompt ;death
  2042.  EndIf
  2043.  If ability% <= 0 Then
  2044.  Goto s5attack
  2045.  EndIf
  2046.  sskill$=Input("would you like to use your ability?(equilibrium) " )
  2047.  If ability% > 0 Then                                                                       ;ability
  2048.  If sskill$="yes" Then
  2049.  Print "you charged your next shot with (equilibruium)"
  2050.   ability%=ability%-1
  2051.  
  2052.  Print "--------------------------------------"
  2053.  Print "you have " + shealth% + " health"
  2054.  Print "you have " + ability% + " equilibriums left" ;live stats
  2055.  Print "you have " + smana% + " mana left"
  2056.  Print "The Dragonlord has " + bosshp% + " health"
  2057.  If sskill$="yes" Then
  2058.  Print "your shot is charged with equilibrium"
  2059.  EndIf
  2060.  Print "--------------------------------------"
  2061.  
  2062.  Else Print "you chose to not use your ability (equilibruim)"
  2063.  EndIf
  2064.  EndIf
  2065.  
  2066.  .s5attack  
  2067. staff%=Input("how much mana would you like to use? ")   ;attack
  2068.     If staff% = 0 Then
  2069.     Print "you skipped your turn to gain 30 mana"
  2070.      
  2071.     smana%=smana%+30
  2072.     Goto s5hostile
  2073.     EndIf
  2074.      
  2075.  If staff% > smana% Then
  2076.  Print "you do not have that much mana"
  2077.  Goto s5attack
  2078.  EndIf
  2079.  If staff% < 0 Then
  2080.  Print "you cannot use that value of mana"
  2081.  Goto s5attack
  2082.  EndIf
  2083.  smana%=smana%-staff%
  2084.  
  2085.  Delay 1000
  2086.  sroll%=Rnd (1,20)
  2087.  
  2088.  
  2089. If staff% > sroll% Then  
  2090. Print "you hit The Dragonlord with " + sdamage% + " damage"     ;hit/miss
  2091.  
  2092. bosshp%=bosshp%-sdamage%
  2093. scrit%=Rnd(1,100)
  2094. If scrit% > 70 Then
  2095. Print "you hit a critical of " + staff% + " damage" ;crit
  2096. bosshp%=bosshp%-staff%
  2097. EndIf
  2098.     If ability% > 0 Then
  2099.     If sskill$= "yes"
  2100.                                                            
  2101.     shealth%=shealth%+sdamage% + 10 ;equilibrium's +mana +heath
  2102.     smana%=smana%+sdamage% + 10
  2103.     EndIf
  2104.     EndIf
  2105.  
  2106. Else Print "you missed"
  2107.  
  2108. EndIf
  2109.  
  2110.  
  2111.  
  2112.  .s5hostile
  2113.  If bosshp% > 0 Then
  2114.  
  2115.  If bosshp% < 60 Then
  2116.  Print "The Dragonlord healed himself because he had critical health"
  2117.  Delay 1000
  2118.  bosshp%=bosshp%+50
  2119.  Print "The Dragonlord now has " + bosshp% ;boss heal
  2120.  EndIf
  2121.  
  2122.  Delay 1000
  2123.  Print "--------------------------------------"                                                     ;The Dragonlord
  2124.  
  2125.  Print "The Dragonlord is about to attack"
  2126.  Delay 2000
  2127.  e5roll%=Rnd (1,100)                            ;enemy attack
  2128.  If e5roll% > 40 Then
  2129.  Print "The Dragonlord hit you with " + bossdam% + " damage"
  2130.  
  2131.  shealth%=shealth%-bossdam%
  2132.  Else Print "The Dragonlord missed"
  2133.  
  2134. EndIf
  2135.  Print "--------------------------------------"
  2136. Print "--------------------------------------"
  2137.  Print "you have " + shealth% + " health"
  2138.  Print "you have " + ability% + " equilibriums left" ;live stats
  2139.  Print "you have " + smana% + " mana left"
  2140.  Print "The Dragonlord has " + bosshp% + " health"
  2141.  Print "--------------------------------------"
  2142. Delay 1000
  2143. EndIf
  2144. Wend
  2145. Print "you killed The Dragonlord"   ;enemy dead
  2146. Delay 2000
  2147.  
  2148. s5score%=shealth%*1.66
  2149. score%=score%+s5score%
  2150. score%=score%+ability%+1000
  2151. ;-----------------------------------------------------------------------------------------------------
  2152. Goto victory
  2153.  
  2154.  
  2155.  
  2156.  
  2157.  
  2158.  
  2159.  
  2160.  
  2161.  
  2162.  
  2163.  
  2164.  
  2165.  
  2166.  
  2167.  
  2168.  
  2169.  
  2170.  
  2171.  
  2172.  
  2173.  
  2174.  
  2175.  
  2176. .cdes
  2177. Print "---------------------------------------------------------"
  2178. Print "1. Knight: The knight has more health than the other classes and their weapon of choice is a sword"
  2179. Delay 1000
  2180. Print "The knight's sword has a rather low damage compared to the Theif's and Sorcerer's weapons"
  2181. Delay 1000
  2182. Print "The knight's ability (Rest) allows the knight to heal himself and restore his stamina"
  2183. Print "---------------------------------------------------------"
  2184. Delay 1000
  2185. Print "---------------------------------------------------------"
  2186. Print "2. Thief: The thief has the lowest health of the classes but deals the most damage of all the classes"
  2187. Delay 1000
  2188. Print "The thief's weapon of choice is his dagger which has an average chance to hit but it deals alot of damage"
  2189. Delay 1000
  2190. Print "the theif's ability (Cloak) allows the thief to go invisible for a short period of time"
  2191. Delay 1000
  2192. Print "also when the thief is in this mode he cannot be harmed and he restores half of his base stamina and heals for 10hp"         ;Class Descriptions
  2193. Print "---------------------------------------------------------"
  2194. Delay 1000
  2195. Print "---------------------------------------------------------"
  2196. Print "3. Sorcerer: The sorcerer has average health and average damage but has the highest % chance to hit"
  2197. Delay 1000
  2198. Print "The sorcerer's weapon of choice is their staff and it has an insanly high % chance to hit their target"
  2199. Delay 1000
  2200. Print "The sorcerer's ability (Equilibrium) takes the damage from the next strike and adds that value to their health and mana"
  2201. Print "---------------------------------------------------------"
  2202. Delay 1000
  2203. Print "you may now choose your class"
  2204.  
  2205. Goto classselect
  2206.  
  2207.  
  2208.  
  2209.  
  2210.  
  2211.  
  2212.  
  2213.  
  2214.  
  2215.  
  2216.  
  2217.  
  2218. .endprompt
  2219. Print "game over"
  2220. Delay 1000
  2221. Print "you got a score of " + score%
  2222.  
  2223. replay$=Input("would you like to play again?")
  2224.  
  2225. If replay$ = "yes" Then
  2226. Goto start
  2227. Else End
  2228. EndIf
  2229.  
  2230.  
  2231.  
  2232.  
  2233.  
  2234.  
  2235.  
  2236.  
  2237.  
  2238.  
  2239.  
  2240.  
  2241.  
  2242.  
  2243.  
  2244.  
  2245.  
  2246.  
  2247.  
  2248. Function gatekeeper()
  2249.  Print "--------------------------------------"
  2250.  Print "Level 1"
  2251.  Print "The Gatekeeper"
  2252.  Delay 1000
  2253.  Print "you must kill The Gatekeeper to get inside the castle to begin your hunt to kill The Dragon Lord"
  2254.  Delay 1000
  2255.  End Function
  2256.  
  2257. Function roamingknight()
  2258.  Print "--------------------------------------"
  2259.  Print "Level 2"
  2260.  Print "The Roaming Knight"
  2261.  Delay 1000
  2262.  Print "you must defeat The Roaming Knight to continue your journey to kill The Dragon Lord"
  2263.  Delay 1000
  2264.  End Function
  2265.  
  2266.  
  2267. Function goliath()
  2268.  Print "--------------------------------------"
  2269.  Print "Level 3"
  2270.  Print "The Goliath"
  2271.  Delay 1000
  2272.  Print "you must defeat The Goliath guarding the portal to enter The Dragon Lord's realm"
  2273.  Delay 1000
  2274.  End Function
  2275.  
  2276.  
  2277.  
  2278.  
  2279. Function pyromancer()
  2280.  Print "--------------------------------------"
  2281.  Print "Level 4"
  2282.  Print "The Pyromancer"
  2283.  Delay 1000
  2284.  Print "you must defeat The Pyromancer to finally be able to confront The Dragon Lord"
  2285.  Delay 1000
  2286.  End Function
  2287.  
  2288.  
  2289. Function dragonlord()
  2290.  Print "--------------------------------------"
  2291.  Print "Final Level"
  2292.  Print "The Dragon Lord"
  2293.  Delay 1000
  2294.  Print "you must now defeat The Dragon Lord to save the world from a firey end"
  2295.  Delay 1000
  2296.  End Function
  2297.  
  2298.  
  2299.  
  2300.  
  2301.  
  2302. .victory
  2303.  
  2304. Print "congratulations!"
  2305. Delay 1000
  2306. Print "you killed the Dragonlord and saved the world from a fiery destruction"
  2307. Goto endprompt
  2308.  
  2309.  
  2310.  
  2311.  
  2312.  
  2313.  
  2314.  
  2315.  
  2316.  
  2317.  
  2318.  
  2319. .bottomtext
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!