4 * Description: Additional gender/sexual preference/marital status options
6 * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
11 function morechoice_install() {
13 register_hook('gender_selector', 'addon/morechoice/morechoice.php', 'morechoice_gender_selector');
14 register_hook('sexpref_selector', 'addon/morechoice/morechoice.php', 'morechoice_sexpref_selector');
15 register_hook('marital_selector', 'addon/morechoice/morechoice.php', 'morechoice_marital_selector');
20 function morechoice_uninstall() {
22 unregister_hook('gender_selector', 'addon/morechoice/morechoice.php', 'morechoice_gender_selector');
23 unregister_hook('sexpref_selector', 'addon/morechoice/morechoice.php', 'morechoice_sexpref_selector');
24 unregister_hook('marital_selector', 'addon/morechoice/morechoice.php', 'morechoice_marital_selector');
28 // We aren't going to bother translating these to other languages.
30 function morechoice_gender_selector($a,&$b) {
31 if($a->config['system']['language'] == 'en') {
35 $b[] = 'Cross dresser';
39 $b[] = 'Gender fluid';
42 $b[] = 'Lipstick lesbian';
53 $b[] = 'Can\'t remember';
54 $b[] = 'Hard to tell these days';
58 function morechoice_sexpref_selector($a,&$b) {
59 if($a->config['system']['language'] == 'en') {
60 $b[] = 'Girls with big tits';
61 $b[] = 'Millionaires';
62 $b[] = 'Guys with big schlongs';
64 $b[] = 'People with impaired mobility';
66 $b[] = 'Statues, mannequins and immobility';
70 $b[] = 'Asphyxiation';
73 $b[] = 'Pretending to be male';
74 $b[] = 'Pretending to be female';
78 $b[] = 'Nappies/Diapers';
84 $b[] = 'Covered in insects';
85 $b[] = 'Turning a human being into furniture';
86 $b[] = 'Elderly people';
87 $b[] = 'Transgender people';
91 $b[] = 'Immersing genitals in liquids';
95 $b[] = 'Menstruation';
97 $b[] = 'Obscene language';
103 $b[] = 'Nonliving objects';
104 $b[] = 'Sleeping people';
106 $b[] = 'Eating people';
107 $b[] = 'Being eaten';
112 function morechoice_marital_selector($a,&$b) {
113 if($a->config['system']['language'] == 'en') {
114 $b[] = 'Married to my job';
116 $b[] = 'Half married';