437_FSstart 1.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130
  1. # FSstart
  2. <<<<<<< 437_FSstart
  3. minut += 1
  4. nosave = 1
  5. gs 'stat'
  6. =======
  7. minut+=1
  8. nosave=1
  9. gs'stat'
  10. >>>>>>> 437_FSstart
  11. '<center><B>Albida</B></center>'
  12. '.'
  13. <<<<<<< 437_FSstart
  14. '<B>Your current character</B>'
  15. =======
  16. '<B>Your character is a valid</B>'
  17. >>>>>>> 437_FSstart
  18. '<<$FSpers>>'
  19. <<<<<<< 437_FSstart
  20. if FSpers = 1: act 'Load a saved game': gt 'KGZgame'
  21. act 'Play a new game':
  22. cls
  23. FSfemin = 0
  24. FSfigur = 0
  25. FScolor = 0
  26. FSface = 0
  27. FSskin = 0
  28. FShvost = 0
  29. dicktipe = 0
  30. FSdick = 18
  31. FSvagina = 0
  32. FStits = 0
  33. FStitsLine = 0
  34. FSpers = 1
  35. FSday = 0
  36. FShour = 8
  37. FSsup = 1
  38. FSplace = 0
  39. FSgem = 0
  40. FSmedkit = 0
  41. FSlvl = 1
  42. FSexp = 0
  43. FSstren = 10
  44. FSspeed = 10
  45. FSagil = 10
  46. FSreakt = 10
  47. FSvital = 10
  48. FSHP = FSvital * 10
  49. FSbrona = 0
  50. FSweaponDam = 0
  51. $FSname = input("Enter nickname")
  52. if $FSname <= 0:$FSname = 'Player'
  53. 'Character Name <<$FSname>>'
  54. act 'Play': gt 'FSgame'
  55. =======
  56. if FSpers=1:act 'Load a saved game':gt'KGZgame'
  57. act 'Play new game':
  58. cls
  59. FSfemin=0
  60. FSfigur=0
  61. FScolor=0
  62. FSface=0
  63. FSskin=0
  64. FShvost=0
  65. dicktipe=0
  66. FSdick=18
  67. FSvagina=0
  68. FStits=0
  69. FStitsLine=0
  70. FSpers=1
  71. FSday=0
  72. FShour=8
  73. FSsup=1
  74. FSplace=0
  75. FSgem=0
  76. FSmedkit=0
  77. FSlvl=1
  78. FSexp=0
  79. FSstren=10
  80. FSspeed=10
  81. FSagil=10
  82. FSreakt=10
  83. FSvital=10
  84. FSHP=FSvital*10
  85. FSbrona=0
  86. FSweaponDam=0
  87. $FSname=input("enter your nickname")
  88. if $FSname<=0:$FSname='player'
  89. 'character Name <<$FSname>>'
  90. act 'play':gt'FSgame'
  91. >>>>>>> 437_FSstart
  92. end
  93. <<<<<<< 437_FSstart
  94. act 'Exit': nosave = 0 & gt 'Komp','start'
  95. =======
  96. act 'Go_Out':nosave=0&gt'Komp','start'
  97. >>>>>>> 437_FSstart
  98. --- FSstart ---------------------------------