pronouns.qsrc 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101
  1. # pronouns
  2. if ARGS[0] = 0 or ARGS[0] = 3:
  3. $pronounTmp[0] = 'he'
  4. $pronounTmp[1] = 'He'
  5. $pronounTmp[2] = 'him'
  6. $pronounTmp[3] = 'Him'
  7. $pronounTmp[4] = 'his'
  8. $pronounTmp[5] = 'His'
  9. $pronounTmp[6] = 'his'
  10. $pronounTmp[7] = 'His'
  11. $pronounTmp[8] = 'himself'
  12. $pronounTmp[9] = 'Himself'
  13. elseif ARGS[0] = 1 or ARGS[0] = 2:
  14. $pronounTmp[0] = 'she'
  15. $pronounTmp[1] = 'She'
  16. $pronounTmp[2] = 'her'
  17. $pronounTmp[3] = 'Her'
  18. $pronounTmp[4] = 'her'
  19. $pronounTmp[5] = 'Her'
  20. $pronounTmp[6] = 'hers'
  21. $pronounTmp[7] = 'Hers'
  22. $pronounTmp[8] = 'herself'
  23. $pronounTmp[9] = 'Herself'
  24. else
  25. $pronounTmp[0] = 'xe'
  26. $pronounTmp[1] = 'Xe'
  27. $pronounTmp[2] = 'xem'
  28. $pronounTmp[3] = 'Xem'
  29. $pronounTmp[4] = 'xyr'
  30. $pronounTmp[5] = 'Xyr'
  31. $pronounTmp[6] = 'xyrs'
  32. $pronounTmp[7] = 'Xyrs'
  33. $pronounTmp[8] = 'xemself'
  34. $pronounTmp[9] = 'Xemself'
  35. end
  36. if $ARGS[1] = 'a':
  37. $xe1 = $pronounTmp[0]
  38. $xec1 = $pronounTmp[1]
  39. $xem1 = $pronounTmp[2]
  40. $xemc1 = $pronounTmp[3]
  41. $xyr1 = $pronounTmp[4]
  42. $xyrc1 = $pronounTmp[5]
  43. $xyrs1 = $pronounTmp[6]
  44. $xyrsc1 = $pronounTmp[7]
  45. $xemself1 = $pronounTmp[8]
  46. $xemselfc1 = $pronounTmp[9]
  47. elseif $ARGS[1] = 'b':
  48. $xe2 = $pronounTmp[0]
  49. $xec2 = $pronounTmp[1]
  50. $xem2 = $pronounTmp[2]
  51. $xemc2 = $pronounTmp[3]
  52. $xyr2 = $pronounTmp[4]
  53. $xyrc2 = $pronounTmp[5]
  54. $xyrs2 = $pronounTmp[6]
  55. $xyrsc2 = $pronounTmp[7]
  56. $xemself2 = $pronounTmp[8]
  57. $xemselfc2 = $pronounTmp[9]
  58. elseif $ARGS[1] = 'c':
  59. $xe3 = $pronounTmp[0]
  60. $xec3 = $pronounTmp[1]
  61. $xem3 = $pronounTmp[2]
  62. $xemc3 = $pronounTmp[3]
  63. $xyr3 = $pronounTmp[4]
  64. $xyrc3 = $pronounTmp[5]
  65. $xyrs3 = $pronounTmp[6]
  66. $xyrsc3 = $pronounTmp[7]
  67. $xemself3 = $pronounTmp[8]
  68. $xemselfc3 = $pronounTmp[9]
  69. elseif $ARGS[1] = 'd':
  70. $xe4 = $pronounTmp[0]
  71. $xec4 = $pronounTmp[1]
  72. $xem4 = $pronounTmp[2]
  73. $xemc4 = $pronounTmp[3]
  74. $xyr4 = $pronounTmp[4]
  75. $xyrc4 = $pronounTmp[5]
  76. $xyrs4 = $pronounTmp[6]
  77. $xyrsc4 = $pronounTmp[7]
  78. $xemself4 = $pronounTmp[8]
  79. $xemselfc4 = $pronounTmp[9]
  80. else
  81. iterat = ARGS[1]
  82. $xe[iterat] = $pronounTmp[0]
  83. $xec[iterat] = $pronounTmp[1]
  84. $xem[iterat] = $pronounTmp[2]
  85. $xemc[iterat] = $pronounTmp[3]
  86. $xyr[iterat] = $pronounTmp[4]
  87. $xyrc[iterat] = $pronounTmp[5]
  88. $xyrs[iterat] = $pronounTmp[6]
  89. $xyrsc[iterat] = $pronounTmp[7]
  90. $xemself[iterat] = $pronounTmp[8]
  91. $xemselfc[iterat] = $pronounTmp[9]
  92. end
  93. killvar '$pronounTmp'
  94. killvar 'iterat'
  95. --- pronouns ---------------------------------