器普语言编译器开发获得完全成功，人类从此进入全中文编程时代!
器普语言,丰富的关键字,支持多种计算机语言语法,可完全中文化,拥有.net强大类库,人类最先进的计算机语言出现了.
器普语言代码欣赏－全中文编程时代来临
器普语言编译器开发获得完全成功，人类从此进入全中文编程时代!
器普语言,丰富的关键字,支持多种计算机语言语法,可完全中文化,拥有.net强大类库,人类最先进的计算机语言出现了.
器普语言代码欣赏－全中文编程时代来临
y引用 System;//using
y引用 System.Text;
using System.Runtime.InteropServices;
m名字空间 器普关键字//namespace
m名字空间开始//{
b不安全代码 j结构体 Point
{
public int x;
public int y;
}
class cPoint { public int x, y:=0; }
l类 器普关键字测试样例_让不受训练的人读懂代码_关键字是词语拼音字母开头
l类开始
y引入链接库开始 DllImport("kernel32") y引入链接库结束
public static extern void GetWindowsDirectory(StringBuilder WinDir, int count);
g公开的 j静态全局的 w无返回值 主函数 ( z字符串 [s数组结束 命令参数数组 c参数结束//（）,[] 后部自解释
h函数开始
z整数 k可空的 学生数量 := 10;//int? 赋值
z整数 老师数量 f赋值 学生数量 w为空另取 100;//??
f浮点数 老师平均带学生数 f赋值 ( f浮点数 z转换类型结束 老师数量 -1;//(类型转换)
z整数 特级老师数量 := 老师数量 d等于 30 s是真取 15 s是假取 20;//?:三元运算符
//异常处理，避免程序意外退出
c尝试捕捉异常
{
老师数量:=0;
老师平均带学生数 := y优先计算开始 学生数量 w为空另取 0 y优先计算结束 /老师数量;
}
b捕捉到异常 ( Exception e )
{
Console f访问成员 WriteLine (e.ToString());
//p抛出异常(e);//抛出异常就会报错，否则程序不报错，但是得不到新计算结果
}
b捕捉异常最后处理
{
}
//判断
z字符串 特级老师情况:="";
//开关选择
k开关选择(特级老师数量)//只能匹配基本类型数据，否则用if else判断
{
p匹配 100 j就
特级老师情况:="特级老师太多！！";
j结束匹配;
p匹配 3:
p匹配 2:
p匹配 1:
特级老师情况:="特级老师太少！！";
j结束匹配;
q缺省:
特级老师情况:="特级老师合适";
j结束匹配;
}
r如果 (特级老师数量==30)
{
特级老师情况:="特级老师刚好";
}
f否则
r如果 (特级老师数量>30)
{
特级老师情况:="特级老师多了";
}
f否则
r如果 ((特级老师数量<30) b并且 (特级老师数量>10))
{
特级老师情况:="特级老师偏少";
}
f否则
{
特级老师情况:="特级老师少！！";
}
//循环
z字符串 命令行 c初始化 "";
r如果 t条件开始 命令参数数组 f访问成员 Length>0 t条件结束
{
d带因子循环(z整数 索引:=0;索引 < 命令参数数组 f访问成员 Length;索引 z自加1)
{
命令行 z自加 命令参数数组[索引] j加 ",";
}
}
Console f访问成员 WriteLine ("命令行:{0}",命令行);
//数组初始化
z整数 s数组开始 s数组结束 学生数学分数 := x新建 z整数 s数组开始 s数组结束 s数组初始化开始 30,90,68,93,100 s数组初始化结束;
z整数 数学平均分;
s双精度浮点数 总分:=0;
d带因子循环(z整数 索引:=0;索引 < 学生数学分数 f访问成员 Length;索引 z自加1)
{
总分 z自加 学生数学分数 [ 索引 s索引结束;
}
数学平均分:= (z整数 z转换类型结束 总分 / 学生数学分数 f访问成员 Length;
z整数 [ s数组结束 学生语文分数 := x新建 z整数 [ s数组结束 { 56,45,78,34,99,78 s数组初始化结束;
z整数 语文平均分;
总分 c初始化 0;
z整数 及格人数 c初始化 0;
b遍历(z整数 语文分 w位于 学生语文分数)
{
r如果 (语文分 <60) c从头再循环;//不及格不计算
及格人数 z自加1;
总分 z自加 语文分;
}
语文平均分:= (z整数 z转换类型结束 总分 / 及格人数;
Console f访问成员 WriteLine ("老师平均带学生数:{0},{1},数学平均分：{2},及格生语文平均分：{3}",老师平均带学生数,特级老师情况,数学平均分,语文平均分);//Console.WriteLine
总分 c初始化 0;
z整数 循环索引 c初始化 0;
r如果(学生数学分数 f访问成员 Length>0 t条件结束
{
z执行
d代码段开始
r如果 (循环索引 >= 学生数学分数 f访问成员 Length) t退出循环;//确保访问存在的数组元素
总分 z自加 学生数学分数[循环索引];
循环索引 z自加1;
d代码段结束
t条件循环(循环索引 < 学生数学分数 f访问成员 Length t条件结束;
}
数学平均分:= (z整数 z转换类型结束 总分 / 学生数学分数 f访问成员 Length;
总分 c初始化 0;
循环索引 c初始化 0;
及格人数 c初始化 0;
t条件循环 t条件开始 循环索引 < 学生语文分数 f访问成员 Length t条件结束
d代码段开始
r如果( b不是真 (学生语文分数[循环索引] >= 60))//不及格
{
循环索引 z自加1;//不同x循环和b遍历，他们有递增因子处理，条件循环没有这行就死循环，你可以试试
c从头再循环;
}
及格人数 z自加1;
总分 z自加 学生语文分数[循环索引];
循环索引 z自加1;
d代码段结束
语文平均分:= (z整数 z转换类型结束 总分 / 及格人数;
Console f访问成员 WriteLine ("老师平均带学生数:{0},{1},数学平均分：{2},及格生语文平均分：{3}",老师平均带学生数,特级老师情况,数学平均分,语文平均分);//Console.WriteLine
Point pt=new Point();
pt.x = 80;
Console f访问成员 WriteLine ("pt.x:{0}",pt.x);
b不安全代码
{
int x = 10;
int z指针 pX = &x;
z指针 pX=100;
Console d的 WriteLine ("*pX:{0}",z指针 pX);
int z指针 p_x := z指向地址 pt.x;
z指针 p_x = 15;
Console f访问成员 WriteLine ("*p_x:{0}",z指针 p_x);
Point z指针 ppt := z指向地址 pt;
ppt z指针指向 x = 10;
Console f访问成员 WriteLine ("ppt->x:{0}",ppt z指针指向 x);
cPoint cpt = new cPoint();
j禁止变量回收重定位 ( z整数 z指针 p = z指向地址 cpt.x )
{
z指针 p = 1;
}
}
h函数结束
l类结束
m名字空间结束