KGDstart.qsrc 579 B

12345678910111213141516171819202122232425262728293031323334353637
  1. # KGDstart
  2. ! WD: Miossing Code ~ Enemy Strings for fighting are never set
  3. '<center><b>Disopl</b></center>'
  4. ''
  5. if KGDsave > 0:act 'Load a saved game':gt 'KGDgame'
  6. act 'Play a new game':
  7. KGDsave = 1
  8. KGDmoney = 1000
  9. KGDHP = 100
  10. KGDlvl = 1
  11. KGDexp = 0
  12. KGDdam = 10
  13. KGDkarta = 5
  14. KGDsput2 = 0
  15. KGDsput3 = 0
  16. KGDsput4 = 0
  17. KGDsput5 = 0
  18. KGDsput6 = 0
  19. KGDday = 1
  20. KGDfarm = 0
  21. KGDlvlr = 0
  22. KGDlvlr2 = 0
  23. KGDlvlr3 = 0
  24. KGDlvlr4 = 0
  25. KGDlvlr5 = 0
  26. KGDlvlr6 = 0
  27. KGDpartyCreate = 0
  28. gt 'KGDgame'
  29. end
  30. act 'Leave':gt 'Komp', 'start'
  31. --- KGDstart ---------------------------------