多年前做的课程设计,今天在电脑里发现,分享出来供需要参考的同学查看。文件是C语言编写,注意源代码后缀名是.c,不要用visual studio编译。
/*
Curriculum Design Programme SCL-90
要点
1.二级权限 2.用户基本信息 3.答题成绩
4.做题输入方法 '1~5' 5.整体界面 6.函数模块化
7.文件储存与读取
基本结构体
1.测试用户信息表
2.测试成绩信息
基本函数
清屏函数 system("cls");
清空输入缓存 fflush(stdin);
*/
#include "stdio.h"
#include "conio.h"
#include "string.h"
#include "malloc.h"
#include "time.h"
typedef struct UserScore
{
int QES[90];
int SumScore;
int Female_Num;
int Male_Num;
double Somatization;//躯体化1,4,12,27,40,42,48,49,52,53,56,58
double Obsessive_Compulsive;//3,9,10,28,38,45,46,51,55,65
double Interpersonal_Sensitivity;//6,21,34,36,37,41,61,69,73
double Depression;//5,14,15,20,22,26,29,30,3l,32,54,7l,79
double Anxiety;//2,17,23,33,39,57,72,78,80,86
double Hostility;//11,24,63,67,74,8l
double Photic_Anxiety;//13,25,47,50,70,75,82
double Paranoididefition;//8,18,43,68,76,83
double Psychotieism;//7,16,35,62,77,84,85,87,88,90
double Others;//19,44,59,60,64,66,89
double Male_Average;//(总分-阴性项目数)/阳性项目数
char Severity_YN;
}UserScore;
typedef struct TestUser
{
char name[40];
char sex;
int age;
UserScore *score;
struct TestUser *next;
}TestUser;
char *Question[90]={
"头痛",
"神经过敏,心中不踏实",
"头脑中有不必要的想法或字句盘旋",
"头晕或晕倒",
"对异性的兴趣减退",
"对旁人责备求全",
"感到别人能控制您的思想",
"责怪别人制造麻烦",
"忘性大",
"担心自己的衣饰整齐及仪态的端正",
"容易烦恼和激动",
"胸痛",
"害怕空旷的场所或街道",
"感到自己的精力下降,活动减慢",
"想结束自己的生命",
"听到旁人听不到的声音",
"发抖",
"感到大多数人都不可信任",
"胃口不好",
"容易哭泣",
"同异性相处时感到害羞不自在",
"感到受骗,中了圈套或有人想抓住您",
"无缘无故地突然感到害怕",
"自己不能控制地大发脾气",
"怕单独出门",
"经常责怪自己",
"腰痛",
"感到难以完成任务",
"感到孤独",
"感到苦闷",
"过分担忧",
"对事物不感兴趣",
"感到害怕",
"您的感情容易受到伤害",
"旁人能知道您的私下想法",
"感到别人不理解您、不同情您",
"感到人们对您不友好,不喜欢您",
"做事必须做得很慢以保证做得正确",
"心跳得很厉害",
"恶心或胃部不舒服",
"感到比不上他人",
"肌肉酸痛",
"感到有人在监视您、谈论您",
"难以入睡",
"做事必须反复检查",
"难以做出决定",
"怕乘电车、公共汽车、地铁或火车",
"呼吸有困难",
"一阵阵发冷或发热",
"因为感到害怕而避开某些东西、场合或活动",
"脑子变空了",
"身体发麻或刺痛",
"喉咙有梗塞感",
"感到前途没有希望",
"不能集中注意力",
"感到身体的某一部分软弱无力",
"感到紧张或容易紧张",
"感到手或脚发重",
"想到死亡的事",
"吃得太多",
"当别人看着您或谈论您时感到不自在",
"有一些不属于您自己的想法",
"有想打人或伤害他人的冲动",
"醒得太早",
"必须反复洗手、点数",
"睡得不稳不深",
"有想摔坏或破坏东西的想法",
"有一些别人没有的想法",
"感到对别人神经过敏",
"在商店或电影院等人多的地方感到不自在",
"感到任何事情都很困难",
"一阵阵恐惧或惊恐",
"感到公共场合吃东西很不舒服",
"经常与人争论",
"单独一人时神经很紧张",
"别人对您的成绩没有做出恰当的评价",
"即使和别人在一起也感到孤单",
"感到坐立不安心神不定",
"感到自己没有什么价值",
"感到熟悉的东西变成陌生或不像是真的",
"大叫或摔东西",
"害怕会在公共场合晕倒",
"感到别人想占您的便宜",
"为一些有关性的想法而很苦恼",
"您认为应该因为自己的过错而受到惩罚",
"感到要很快把事情做完",
"感到自己的身体有严重问题",
"从未感到和其他人很亲近",
"感到自己有罪",
"感到自己的脑子有毛病"
};
//Questions
int InterfacialOut