044_strelba 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993
  1. # strelba
  2. <<<<<<< 044_strelba
  3. !gunpricel = 0 не прицельно
  4. !gunpricel = 1 прицельно
  5. !gunpricel = 2 очень точно
  6. !gunpower урон от оружия
  7. !buu количество выстрелов
  8. !shoot навык стрельбы
  9. :markstrelba
  10. !рейты попадания
  11. buurand = rand(0,100)
  12. if buu = 0: xgt 'fight','sta'
  13. if shoot = 0:
  14. if gunpricel = 0:
  15. if buurand = 100:
  16. damage = gunpower
  17. jump 'markstelokpopal'
  18. end
  19. if buurand < 100:
  20. buu -= 1
  21. 'bloomer'
  22. jump 'markstrelba'
  23. end
  24. end
  25. if gunpricel = 1:
  26. if buurand >= 95:
  27. damage = gunpower
  28. jump 'markstelokpopal'
  29. end
  30. if buurand < 95:
  31. buu -= 1
  32. 'bloomer'
  33. jump 'markstrelba'
  34. end
  35. end
  36. if gunpricel = 2:
  37. if buurand >= 90:
  38. damage = gunpower
  39. jump 'markstelokpopal'
  40. end
  41. if buurand < 90:
  42. buu -= 1
  43. 'bloomer'
  44. jump 'markstrelba'
  45. end
  46. end
  47. end
  48. if shoot > 0 and shoot < 20:
  49. if gunpricel = 0:
  50. if buurand >= 95:
  51. damage = gunpower
  52. jump 'markstelokpopal'
  53. end
  54. if buurand < 95:
  55. buu -= 1
  56. 'bloomer'
  57. jump 'markstrelba'
  58. end
  59. end
  60. if gunpricel = 1:
  61. if buurand >= 90:
  62. damage = gunpower
  63. jump 'markstelokpopal'
  64. end
  65. if buurand < 90:
  66. buu -= 1
  67. 'bloomer'
  68. jump 'markstrelba'
  69. end
  70. end
  71. if gunpricel = 2:
  72. if buurand >= 85:
  73. damage = gunpower
  74. jump 'markstelokpopal'
  75. end
  76. if buurand < 85:
  77. buu -= 1
  78. 'bloomer'
  79. jump 'markstrelba'
  80. end
  81. end
  82. end
  83. if shoot >= 20 and shoot < 40:
  84. if gunpricel = 0:
  85. if buurand >= 90:
  86. damage = gunpower
  87. jump 'markstelokpopal'
  88. end
  89. if buurand < 90:
  90. buu -= 1
  91. 'bloomer'
  92. jump 'markstrelba'
  93. end
  94. end
  95. if gunpricel = 1:
  96. if buurand >= 85:
  97. damage = gunpower
  98. jump 'markstelokpopal'
  99. end
  100. if buurand < 85:
  101. buu -= 1
  102. 'bloomer'
  103. jump 'markstrelba'
  104. end
  105. end
  106. if gunpricel = 2:
  107. if buurand >= 80:
  108. damage = gunpower
  109. jump 'markstelokpopal'
  110. end
  111. if buurand < 80:
  112. buu -= 1
  113. 'bloomer'
  114. jump 'markstrelba'
  115. end
  116. end
  117. end
  118. if shoot >= 40 and shoot < 60:
  119. if gunpricel = 0:
  120. if buurand >= 85:
  121. damage = gunpower
  122. jump 'markstelokpopal'
  123. end
  124. if buurand < 85:
  125. buu -= 1
  126. 'bloomer'
  127. jump 'markstrelba'
  128. end
  129. end
  130. if gunpricel = 1:
  131. if buurand >= 80:
  132. damage = gunpower
  133. jump 'markstelokpopal'
  134. end
  135. if buurand < 80:
  136. buu -= 1
  137. 'bloomer'
  138. jump 'markstrelba'
  139. end
  140. end
  141. if gunpricel = 2:
  142. if buurand >= 75:
  143. damage = gunpower
  144. jump 'markstelokpopal'
  145. end
  146. if buurand < 75:
  147. buu -= 1
  148. 'bloomer'
  149. jump 'markstrelba'
  150. end
  151. end
  152. end
  153. if shoot >= 60 and shoot < 80:
  154. if gunpricel = 0:
  155. if buurand >= 80:
  156. damage = gunpower
  157. jump 'markstelokpopal'
  158. end
  159. if buurand < 80:
  160. buu -= 1
  161. 'bloomer'
  162. jump 'markstrelba'
  163. end
  164. end
  165. if gunpricel = 1:
  166. if buurand >= 75:
  167. damage = gunpower
  168. jump 'markstelokpopal'
  169. end
  170. if buurand < 75:
  171. buu -= 1
  172. 'bloomer'
  173. jump 'markstrelba'
  174. end
  175. end
  176. if gunpricel = 2:
  177. if buurand >= 70:
  178. damage = gunpower
  179. jump 'markstelokpopal'
  180. end
  181. if buurand < 70:
  182. buu -= 1
  183. 'bloomer'
  184. jump 'markstrelba'
  185. end
  186. end
  187. end
  188. if shoot >= 80 and shoot < 100:
  189. if gunpricel = 0:
  190. if buurand >= 75:
  191. damage = gunpower
  192. jump 'markstelokpopal'
  193. end
  194. if buurand < 75:
  195. buu -= 1
  196. 'bloomer'
  197. jump 'markstrelba'
  198. end
  199. end
  200. if gunpricel = 1:
  201. if buurand >= 70:
  202. damage = gunpower
  203. jump 'markstelokpopal'
  204. end
  205. if buurand < 70:
  206. buu -= 1
  207. 'bloomer'
  208. jump 'markstrelba'
  209. end
  210. end
  211. if gunpricel = 2:
  212. if buurand >= 65:
  213. damage = gunpower
  214. jump 'markstelokpopal'
  215. end
  216. if buurand < 65:
  217. buu -= 1
  218. 'bloomer'
  219. jump 'markstrelba'
  220. end
  221. end
  222. end
  223. if shoot >= 100 and shoot < 150:
  224. if gunpricel = 0:
  225. if buurand >= 70:
  226. damage = gunpower
  227. jump 'markstelokpopal'
  228. end
  229. if buurand < 70:
  230. buu -= 1
  231. 'bloomer'
  232. jump 'markstrelba'
  233. end
  234. end
  235. if gunpricel = 1:
  236. if buurand >= 65:
  237. damage = gunpower
  238. jump 'markstelokpopal'
  239. end
  240. if buurand < 65:
  241. buu -= 1
  242. 'bloomer'
  243. jump 'markstrelba'
  244. end
  245. end
  246. if gunpricel = 2:
  247. if buurand >= 60:
  248. damage = gunpower
  249. jump 'markstelokpopal'
  250. end
  251. if buurand < 60:
  252. buu -= 1
  253. 'bloomer'
  254. jump 'markstrelba'
  255. end
  256. end
  257. end
  258. if shoot >= 150 and shoot < 200:
  259. if gunpricel = 0:
  260. if buurand >= 65:
  261. damage = gunpower
  262. jump 'markstelokpopal'
  263. end
  264. if buurand < 65:
  265. buu -= 1
  266. 'bloomer'
  267. jump 'markstrelba'
  268. end
  269. end
  270. if gunpricel = 1:
  271. if buurand >= 60:
  272. damage = gunpower
  273. jump 'markstelokpopal'
  274. end
  275. if buurand < 60:
  276. buu -= 1
  277. 'bloomer'
  278. jump 'markstrelba'
  279. end
  280. end
  281. if gunpricel = 2:
  282. if buurand >= 55:
  283. damage = gunpower
  284. jump 'markstelokpopal'
  285. end
  286. if buurand < 55:
  287. buu -= 1
  288. 'bloomer'
  289. jump 'markstrelba'
  290. end
  291. end
  292. end
  293. if shoot >= 200 and shoot < 300:
  294. if gunpricel = 0:
  295. if buurand >= 60:
  296. damage = gunpower
  297. jump 'markstelokpopal'
  298. end
  299. if buurand < 60:
  300. buu -= 1
  301. 'bloomer'
  302. jump 'markstrelba'
  303. end
  304. end
  305. if gunpricel = 1:
  306. if buurand >= 55:
  307. damage = gunpower
  308. jump 'markstelokpopal'
  309. end
  310. if buurand < 55:
  311. buu -= 1
  312. 'bloomer'
  313. jump 'markstrelba'
  314. end
  315. end
  316. if gunpricel = 2:
  317. if buurand >= 45:
  318. damage = gunpower
  319. jump 'markstelokpopal'
  320. end
  321. if buurand < 45:
  322. buu -= 1
  323. 'bloomer'
  324. jump 'markstrelba'
  325. end
  326. end
  327. end
  328. if shoot >= 300 and shoot < 400:
  329. if gunpricel = 0:
  330. if buurand >= 55:
  331. damage = gunpower
  332. jump 'markstelokpopal'
  333. end
  334. if buurand < 55:
  335. buu -= 1
  336. 'bloomer'
  337. jump 'markstrelba'
  338. end
  339. end
  340. if gunpricel = 1:
  341. if buurand >= 50:
  342. damage = gunpower
  343. jump 'markstelokpopal'
  344. end
  345. if buurand < 50:
  346. buu -= 1
  347. 'bloomer'
  348. jump 'markstrelba'
  349. end
  350. end
  351. if gunpricel = 2:
  352. if buurand >= 45:
  353. damage = gunpower
  354. jump 'markstelokpopal'
  355. end
  356. if buurand < 45:
  357. buu -= 1
  358. 'bloomer'
  359. jump 'markstrelba'
  360. end
  361. end
  362. end
  363. if shoot >= 400 and shoot < 500:
  364. if gunpricel = 0:
  365. if buurand >= 50:
  366. damage = gunpower
  367. jump 'markstelokpopal'
  368. end
  369. if buurand < 50:
  370. buu -= 1
  371. 'bloomer'
  372. jump 'markstrelba'
  373. end
  374. end
  375. if gunpricel = 1:
  376. if buurand >= 45:
  377. damage = gunpower
  378. jump 'markstelokpopal'
  379. end
  380. if buurand < 45:
  381. buu -= 1
  382. 'bloomer'
  383. jump 'markstrelba'
  384. end
  385. end
  386. if gunpricel = 2:
  387. if buurand >= 40:
  388. damage = gunpower
  389. jump 'markstelokpopal'
  390. end
  391. if buurand < 40:
  392. buu -= 1
  393. 'bloomer'
  394. jump 'markstrelba'
  395. end
  396. end
  397. end
  398. if shoot >= 500:
  399. if gunpricel = 0:
  400. if buurand >= 45:
  401. damage = gunpower
  402. jump 'markstelokpopal'
  403. end
  404. if buurand < 45:
  405. buu -= 1
  406. 'bloomer'
  407. jump 'markstrelba'
  408. end
  409. end
  410. if gunpricel = 1:
  411. if buurand >= 40:
  412. damage = gunpower
  413. jump 'markstelokpopal'
  414. end
  415. if buurand < 40:
  416. buu -= 1
  417. 'bloomer'
  418. jump 'markstrelba'
  419. end
  420. end
  421. if gunpricel = 2:
  422. if buurand >= 35:
  423. damage = gunpower
  424. jump 'markstelokpopal'
  425. end
  426. if buurand < 35:
  427. buu -= 1
  428. 'bloomer'
  429. jump 'markstrelba'
  430. end
  431. end
  432. end
  433. :markstelokpopal
  434. !если попал
  435. !расчет урона
  436. if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
  437. if dospehV > 0: set damage -= dospehDefV & set dospehEnV -= 1
  438. if damage < 0: set damage = 0
  439. Set healthV -= damage
  440. Gcrimein += 1
  441. '<B><font color = green>harmed <<damage>> units</font></B>'
  442. if zerkaloV > 0:
  443. set zerkaloV -= 1
  444. set health -= damage
  445. '<B><font color = red><<$nameV>> reflected damage and you got <<damage>> points of damage</font></B>'
  446. end
  447. if buu = 0: xgt 'fight','sta'
  448. if buu > 0: buu -= 1 & jump 'markstrelba'
  449. end
  450. if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
  451. Set defenceV -= damage
  452. '<B><font color = green>Protection enemy harmed <<damage>> units</font></B>'
  453. if buu = 0: xgt 'fight','sta'
  454. if buu > 0: buu -= 1 & jump 'markstrelba'
  455. end
  456. if klonV > 0 and unmaterialV <= 0:
  457. set klonV -= 1
  458. '<B><font color = green>Clone destroyed enemy, he still had <<KlonV>> clones</font></B>'
  459. if buu = 0: xgt 'fight','sta'
  460. if buu > 0: buu -= 1 & jump 'markstrelba'
  461. end
  462. if unmaterialV > 0:
  463. set unmaterialV -= 1
  464. '<B><font color = red>Your bullet went straight through the opponent´s body. <<$nameV>> none Materials</font></B>'
  465. if buu = 0: xgt 'fight','sta'
  466. if buu > 0: buu -= 1 & jump 'markstrelba'
  467. end
  468. if barierV > 0:
  469. !барьер именитета для урона
  470. if barierV >= damage:
  471. '<B><font color = red><<$nameV>> easily withstood hit</font></B>'
  472. if buu = 0: xgt 'fight','sta'
  473. if buu > 0: buu -= 1 & jump 'markstrelba'
  474. end
  475. if barierV < damage:
  476. Set healthV -= damage
  477. Gcrimein += 1
  478. '<B><font color = green>harmed <<damage>> units</font></B>'
  479. if zerkaloV > 0:
  480. set zerkaloV -= 1
  481. set health -= damage
  482. '<B><font color = red><<$nameV>> reflected damage and you got <<damage>> points of damage</font></B>'
  483. end
  484. end
  485. if buu = 0: xgt 'fight','sta'
  486. if buu > 0: buu -= 1 & jump 'markstrelba'
  487. end
  488. =======
  489. !gunpricel=0 no sighting
  490. !gunpricel=1 sighting
  491. !gunpricel=2 very accurate
  492. !gunpower Weapon damage
  493. !buu the number of shots
  494. !shoot shooting skills
  495. :markstrelba
  496. !Reita hit
  497. buurand=rand(0,100)
  498. if buu=0:xgt'fight','sta'
  499. if shoot=0:
  500. if gunpricel=0:
  501. if buurand=100:
  502. damage=gunpower
  503. jump'markstelokpopal'
  504. end
  505. if buurand<100:
  506. buu-=1
  507. 'bloomer'
  508. jump'markstrelba'
  509. end
  510. end
  511. if gunpricel=1:
  512. if buurand>=95:
  513. damage=gunpower
  514. jump'markstelokpopal'
  515. end
  516. if buurand<95:
  517. buu-=1
  518. 'bloomer'
  519. jump'markstrelba'
  520. end
  521. end
  522. if gunpricel=2:
  523. if buurand>=90:
  524. damage=gunpower
  525. jump'markstelokpopal'
  526. end
  527. if buurand<90:
  528. buu-=1
  529. 'bloomer'
  530. jump'markstrelba'
  531. end
  532. end
  533. end
  534. if shoot>0 and shoot<20:
  535. if gunpricel=0:
  536. if buurand>=95:
  537. damage=gunpower
  538. jump'markstelokpopal'
  539. end
  540. if buurand<95:
  541. buu-=1
  542. 'bloomer'
  543. jump'markstrelba'
  544. end
  545. end
  546. if gunpricel=1:
  547. if buurand>=90:
  548. damage=gunpower
  549. jump'markstelokpopal'
  550. end
  551. if buurand<90:
  552. buu-=1
  553. 'bloomer'
  554. jump'markstrelba'
  555. end
  556. end
  557. if gunpricel=2:
  558. if buurand>=85:
  559. damage=gunpower
  560. jump'markstelokpopal'
  561. end
  562. if buurand<85:
  563. buu-=1
  564. 'bloomer'
  565. jump'markstrelba'
  566. end
  567. end
  568. end
  569. if shoot>=20 and shoot<40:
  570. if gunpricel=0:
  571. if buurand>=90:
  572. damage=gunpower
  573. jump'markstelokpopal'
  574. end
  575. if buurand<90:
  576. buu-=1
  577. 'bloomer'
  578. jump'markstrelba'
  579. end
  580. end
  581. if gunpricel=1:
  582. if buurand>=85:
  583. damage=gunpower
  584. jump'markstelokpopal'
  585. end
  586. if buurand<85:
  587. buu-=1
  588. 'bloomer'
  589. jump'markstrelba'
  590. end
  591. end
  592. if gunpricel=2:
  593. if buurand>=80:
  594. damage=gunpower
  595. jump'markstelokpopal'
  596. end
  597. if buurand<80:
  598. buu-=1
  599. 'bloomer'
  600. jump'markstrelba'
  601. end
  602. end
  603. end
  604. if shoot>=40 and shoot<60:
  605. if gunpricel=0:
  606. if buurand>=85:
  607. damage=gunpower
  608. jump'markstelokpopal'
  609. end
  610. if buurand<85:
  611. buu-=1
  612. 'bloomer'
  613. jump'markstrelba'
  614. end
  615. end
  616. if gunpricel=1:
  617. if buurand>=80:
  618. damage=gunpower
  619. jump'markstelokpopal'
  620. end
  621. if buurand<80:
  622. buu-=1
  623. 'bloomer'
  624. jump'markstrelba'
  625. end
  626. end
  627. if gunpricel=2:
  628. if buurand>=75:
  629. damage=gunpower
  630. jump'markstelokpopal'
  631. end
  632. if buurand<75:
  633. buu-=1
  634. 'bloomer'
  635. jump'markstrelba'
  636. end
  637. end
  638. end
  639. if shoot>=60 and shoot<80:
  640. if gunpricel=0:
  641. if buurand>=80:
  642. damage=gunpower
  643. jump'markstelokpopal'
  644. end
  645. if buurand<80:
  646. buu-=1
  647. 'bloomer'
  648. jump'markstrelba'
  649. end
  650. end
  651. if gunpricel=1:
  652. if buurand>=75:
  653. damage=gunpower
  654. jump'markstelokpopal'
  655. end
  656. if buurand<75:
  657. buu-=1
  658. 'bloomer'
  659. jump'markstrelba'
  660. end
  661. end
  662. if gunpricel=2:
  663. if buurand>=70:
  664. damage=gunpower
  665. jump'markstelokpopal'
  666. end
  667. if buurand<70:
  668. buu-=1
  669. 'bloomer'
  670. jump'markstrelba'
  671. end
  672. end
  673. end
  674. if shoot>=80 and shoot<100:
  675. if gunpricel=0:
  676. if buurand>=75:
  677. damage=gunpower
  678. jump'markstelokpopal'
  679. end
  680. if buurand<75:
  681. buu-=1
  682. 'bloomer'
  683. jump'markstrelba'
  684. end
  685. end
  686. if gunpricel=1:
  687. if buurand>=70:
  688. damage=gunpower
  689. jump'markstelokpopal'
  690. end
  691. if buurand<70:
  692. buu-=1
  693. 'bloomer'
  694. jump'markstrelba'
  695. end
  696. end
  697. if gunpricel=2:
  698. if buurand>=65:
  699. damage=gunpower
  700. jump'markstelokpopal'
  701. end
  702. if buurand<65:
  703. buu-=1
  704. 'bloomer'
  705. jump'markstrelba'
  706. end
  707. end
  708. end
  709. if shoot>=100 and shoot<150:
  710. if gunpricel=0:
  711. if buurand>=70:
  712. damage=gunpower
  713. jump'markstelokpopal'
  714. end
  715. if buurand<70:
  716. buu-=1
  717. 'bloomer'
  718. jump'markstrelba'
  719. end
  720. end
  721. if gunpricel=1:
  722. if buurand>=65:
  723. damage=gunpower
  724. jump'markstelokpopal'
  725. end
  726. if buurand<65:
  727. buu-=1
  728. 'bloomer'
  729. jump'markstrelba'
  730. end
  731. end
  732. if gunpricel=2:
  733. if buurand>=60:
  734. damage=gunpower
  735. jump'markstelokpopal'
  736. end
  737. if buurand<60:
  738. buu-=1
  739. 'bloomer'
  740. jump'markstrelba'
  741. end
  742. end
  743. end
  744. if shoot>=150 and shoot<200:
  745. if gunpricel=0:
  746. if buurand>=65:
  747. damage=gunpower
  748. jump'markstelokpopal'
  749. end
  750. if buurand<65:
  751. buu-=1
  752. 'bloomer'
  753. jump'markstrelba'
  754. end
  755. end
  756. if gunpricel=1:
  757. if buurand>=60:
  758. damage=gunpower
  759. jump'markstelokpopal'
  760. end
  761. if buurand<60:
  762. buu-=1
  763. 'bloomer'
  764. jump'markstrelba'
  765. end
  766. end
  767. if gunpricel=2:
  768. if buurand>=55:
  769. damage=gunpower
  770. jump'markstelokpopal'
  771. end
  772. if buurand<55:
  773. buu-=1
  774. 'bloomer'
  775. jump'markstrelba'
  776. end
  777. end
  778. end
  779. if shoot>=200 and shoot<300:
  780. if gunpricel=0:
  781. if buurand>=60:
  782. damage=gunpower
  783. jump'markstelokpopal'
  784. end
  785. if buurand<60:
  786. buu-=1
  787. 'bloomer'
  788. jump'markstrelba'
  789. end
  790. end
  791. if gunpricel=1:
  792. if buurand>=55:
  793. damage=gunpower
  794. jump'markstelokpopal'
  795. end
  796. if buurand<55:
  797. buu-=1
  798. 'bloomer'
  799. jump'markstrelba'
  800. end
  801. end
  802. if gunpricel=2:
  803. if buurand>=45:
  804. damage=gunpower
  805. jump'markstelokpopal'
  806. end
  807. if buurand<45:
  808. buu-=1
  809. 'bloomer'
  810. jump'markstrelba'
  811. end
  812. end
  813. end
  814. if shoot>=300 and shoot<400:
  815. if gunpricel=0:
  816. if buurand>=55:
  817. damage=gunpower
  818. jump'markstelokpopal'
  819. end
  820. if buurand<55:
  821. buu-=1
  822. 'bloomer'
  823. jump'markstrelba'
  824. end
  825. end
  826. if gunpricel=1:
  827. if buurand>=50:
  828. damage=gunpower
  829. jump'markstelokpopal'
  830. end
  831. if buurand<50:
  832. buu-=1
  833. 'bloomer'
  834. jump'markstrelba'
  835. end
  836. end
  837. if gunpricel=2:
  838. if buurand>=45:
  839. damage=gunpower
  840. jump'markstelokpopal'
  841. end
  842. if buurand<45:
  843. buu-=1
  844. 'bloomer'
  845. jump'markstrelba'
  846. end
  847. end
  848. end
  849. if shoot>=400 and shoot<500:
  850. if gunpricel=0:
  851. if buurand>=50:
  852. damage=gunpower
  853. jump'markstelokpopal'
  854. end
  855. if buurand<50:
  856. buu-=1
  857. 'bloomer'
  858. jump'markstrelba'
  859. end
  860. end
  861. if gunpricel=1:
  862. if buurand>=45:
  863. damage=gunpower
  864. jump'markstelokpopal'
  865. end
  866. if buurand<45:
  867. buu-=1
  868. 'bloomer'
  869. jump'markstrelba'
  870. end
  871. end
  872. if gunpricel=2:
  873. if buurand>=40:
  874. damage=gunpower
  875. jump'markstelokpopal'
  876. end
  877. if buurand<40:
  878. buu-=1
  879. 'bloomer'
  880. jump'markstrelba'
  881. end
  882. end
  883. end
  884. if shoot>=500:
  885. if gunpricel=0:
  886. if buurand>=45:
  887. damage=gunpower
  888. jump'markstelokpopal'
  889. end
  890. if buurand<45:
  891. buu-=1
  892. 'bloomer'
  893. jump'markstrelba'
  894. end
  895. end
  896. if gunpricel=1:
  897. if buurand>=40:
  898. damage=gunpower
  899. jump'markstelokpopal'
  900. end
  901. if buurand<40:
  902. buu-=1
  903. 'bloomer'
  904. jump'markstrelba'
  905. end
  906. end
  907. if gunpricel=2:
  908. if buurand>=35:
  909. damage=gunpower
  910. jump'markstelokpopal'
  911. end
  912. if buurand<35:
  913. buu-=1
  914. 'bloomer'
  915. jump'markstrelba'
  916. end
  917. end
  918. end
  919. :markstelokpopal
  920. !if hit
  921. !calculation of damage
  922. if defenceV <= 0 and klonV <= 0 and unmaterialV <= 0 and barierV <= 0:
  923. if dospehV > 0:set damage = damage - dospehDefV&set dospehEnV = dospehEnV - 1
  924. if damage < 0:set damage = 0
  925. Set healthV = healthV - damage
  926. Gcrimein+=1
  927. '<B><font color=green>harmed <<damage>> units</font></B>'
  928. if zerkaloV > 0:
  929. set zerkaloV = zerkaloV - 1
  930. set health = health - damage
  931. '<B><font color=red><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></B>'
  932. end
  933. if buu=0:xgt'fight','sta'
  934. if buu>0:buu-=1&jump'markstrelba'
  935. end
  936. if defenceV > 0 and klonV <= 0 and unmaterialV <= 0:
  937. Set defenceV = defenceV - damage
  938. '<B><font color=green>Protection of the enemy suffered damage <<damage>> units</font></B>'
  939. if buu=0:xgt'fight','sta'
  940. if buu>0:buu-=1&jump'markstrelba'
  941. end
  942. if klonV > 0 and unmaterialV <= 0:
  943. set klonV = klonV - 1
  944. '<B><font color=green>Destroyed enemy clone, he still had <<KlonV>> clones</font></B>'
  945. if buu=0:xgt'fight','sta'
  946. if buu>0:buu-=1&jump'markstrelba'
  947. end
  948. if unmaterialV > 0:
  949. set unmaterialV = unmaterialV - 1
  950. '<B><font color=red>Your bullet flew right through the opponent`s body. <<$nameV>> not material</font></B>'
  951. if buu=0:xgt'fight','sta'
  952. if buu>0:buu-=1&jump'markstrelba'
  953. end
  954. if barierV > 0:
  955. !imeniteta barrier for damage
  956. if barierV >= damage:
  957. '<B><font color=red><<$nameV>> easily withstood hit</font></B>'
  958. if buu=0:xgt'fight','sta'
  959. if buu>0:buu-=1&jump'markstrelba'
  960. end
  961. if barierV < damage:
  962. Set healthV = healthV - damage
  963. Gcrimein+=1
  964. '<B><font color=green>harmed <<damage>> units</font></B>'
  965. if zerkaloV > 0:
  966. set zerkaloV = zerkaloV - 1
  967. set health = health - damage
  968. '<B><font color=red><<$nameV>> reflected the damage and you got <<damage>> points of damage</font></B>'
  969. end
  970. end
  971. if buu=0:xgt'fight','sta'
  972. if buu>0:buu-=1&jump'markstrelba'
  973. end
  974. >>>>>>> 044_strelba
  975. --- strelba ---------------------------------