工具描述1

此工具可以通过代码自制客观题，并在讨论区分享给大家

（目前版本为b1.0.1，仅支持选择题）

阅读完介绍后请移步讨论区查看完整的模板代码！！！

更新内容

• 增加了防更改系统，如果daan成员被修改就无法进行anwser，同时daan成员会自动还原
• 修复了一些已知漏洞

创建模板：

xz name; // 创建名为name的客观题套
name.append(bh,title(默认值为空字符串)); // 在name中添加一个编号为bh，标题为title的题目(此方法也可用于重定义bh题，注意bh从0开始，每次须增加1
name.get(bh) // 获取编号为bh的题目指针
/*
   题目是个结构体
   name成员为标题
   xx[4]是ABCD四个选项，一个字符串数组
   daan是一个字符串，表示答案
   print()方法用于输出题目
   anwser()方法用于读取答案并反馈
*/
name.com() // 将所有题目打包成加密后的字符串（需要全部包括空格复制）
name.readforstring() // 从字符串读取所有题目（注意字符串后面要加上 " -1" ，不然程序会报错）

一定要在读取题目时，在打包加密的题目后面加上" -1"！！！

好 Van 的描述 2

这是个 Dw 整活的东西，只需#include "pascal++.h"，就可以体验一个啥也不是乱七八糟的滥用宏定义的编程语言了 部分关键字

START
	VAR a OK
	INPUT RIGHT a OK
	VAR LIST(o, a+1) OK
	LOOP FROM VAR i ASSIGN 0 OK i SOF a OK i PLUSOF TO
		BEGIN
			INPUT RIGHT o GET(i) OK
		END
	LOOP FROM VAR i ASSIGN 0 OK i SOF a REM 1 OK i PLUSOF TO
		BEGIN
		LOOP FROM VAR j ASSIGN 0 OK j SOF a REM 1 OK j PLUSOF TO
			BEGIN
				IF__THEN(o GET(j) BOF o GET(j ADD 1)) BEGIN
					VAR p ASSIGN o GET(j) OK
					o GET(j) ASSIGN o GET(j ADD 1) OK
					o GET(j ADD 1) ASSIGN p        OK
				END
			END
		END
	LOOP FROM VAR i ASSIGN 0 OK i SOF a OK i PLUSOF TO
		BEGIN
			OUTPUT LEFT o GET(i) LEFT ENDL OK
		END
	EXIT
END

输入n，并输入n个数，冒泡排序后输出排序后数组示例程序