批处理勇士大闯关改中医许阳批处理的Emacs可能1

zzz19760225

一楼祭天
123456789

1. http://zzz19760225.ysepan.com/

复制代码

隔一段时间建10楼一页面，其首位是具体内容，其余杂想或空置。
15楼一页？

20250627，换成perl为文字信息处理考虑，这样在以后自制和linux版国产操作系统，也会有perl吧
20250901，换成perl的Tk桌面图形模式
20251206，换成C语言SDL2图形考虑
20260113，换回perl+Tk的图形考虑（perl+Tk+ImageMagick+ffmpeg）
20260306，增加emacs lisp考虑。

1. 
   
2. $a=<STDIN>;print "$a";
   
3. a123:;print "123";goto a123;
   
4. $a==123?"456":"789";
   

复制代码

1. 
   
2. a123:
   
3. print "请输入：";$a=<STDIN>;
   
4. $a==456?print "789":goto a123;
   
5. 显
   
6. 请输入：123
   
7. 请输入：456
   
8. 789
   
9. Press any keys to exit
   

复制代码

1. 
   
2. 文字游戏
   
3. 1游戏开始和结束，命令行执行文件和鼠标点击可执行文件，启动开始页面，开始游戏+游戏说明+退出游戏，ctrl+d,ctrl+c，关闭游戏窗口x，游戏过程中的退出，意外故障退出。
   
4. 2玩家用户帐号的建增减删看，建立在程序文章里的#数据行，增减数据行，从开始游戏进入这个选择范围，游戏过程中随时调用这个模块。
   
5. 3本体结构，从开始结束和帐号，进入菜菜城的前面部分，后面是以菜菜城和其他的名义居住地为中心，向外的相对移动选择。
   
6. 4其外向外是重复流水线，流水线结构选择的通用和专用组合度数量。
   
7. 5向外重复流水线的可选项内容，是设置的地图世界容器，每个容器里有其自身剧情设置的选择通用+专用度。
   

复制代码

1. 
   
2. 山海经，山河经，地星村：
   
3. 四海：东海(太平洋)，南海(印度洋)，西海(大西洋)，北海(北冰洋)；
   
4. 八洲：北洲(格陵兰岛)，风洲(北美洲)，木洲(南美洲)，南洲(南极洲)，金洲(大洋洲)，土洲(亚洲)，水洲(欧洲)，火洲(非洲)；
   
5. 土洲(亚洲)往东7000公里=14000里，1万4千里，是东海（太平洋）；1一
   
6. 东海(太平洋)往东7000公里=14000里，1万4千里，是风洲（北美洲）；2壹
   
7. 风洲(北美洲)往东5000公里=10000里，1万里，是西海（大西洋）；3二
   
8. 西海(大洋洲)往东5000公里=10000里，1万里，是水洲（欧洲）；4贰
   
9. 水洲(欧洲)往东7000公里=14000里，1万4千里，是土洲（亚洲）；5叁
   
10. 水洲(欧洲)往南5000公里=10000里，1万里，是火洲（非洲）；6肆
    
11. 土洲(亚洲)往南7000公里=14000里，1万4千里，是金洲（大洋洲）；7伍
    
12. 风洲(北美洲)往北5000公里=10000里，1万里，是北洲（格林兰岛）；8陆
    
13. 风洲(北美洲)往南7000公里=14000里，1万4千里，是木洲（南美洲）；9柒
    
14. 木洲(南美洲)往南7000公里=14000里，1万4千里，是南洲（南极洲）；10捌
    
15. 火洲(非洲)往东6000公里=12000里，1万2千里，是南海（印度洋）；11三
    
16. 南海(印度洋)往东6000公里=12000里，1万2千里，是金洲（大洋洲）；
    
17. 土洲(亚洲)往北6000公里=12000里，1万2千里，是北海（北冰洋）；12四
    

复制代码

皇帝游戏和大航海游戏，1女母氏族部落人数超出太多，就分族外迁（女娲和西王母），父系氏族的炎黄等三皇五帝，2周对外分封的信息，对临近可能土地再分封的扩大，3秦统一后的对外延续，4五胡乱华等外租压迫下，崛起后的汉族对外陆海殖民，5宋明大商业的地主和资本家对外。（或者解放模式也可以，结合墨家概念平等，法家概念平等，儒家概念的大一统统一，私有化统一与公有度统一，都是可选项，但是不是游戏全部制作出来，而有那个可以制作的简单工具，玩家自己可以去逐渐增加点滴，积累成为游戏模块。或者大禹和夏启的能力工作权力极私独占奴隶制也可以，炎黄的养民）
1一天的容器模块，
2地星村外天文的模块（相对地球的日照光线形象学几何学为主），
3地星村内的年循环左升右降热量相对增减四季模块，
4整体的本体和环境，
5个体的本体和环境，
6整体与个体之间的进制联系组合关系一体化。
骑goto：
制造用文字游戏信息机器，
制=时空量化，人物增减量化，一个自动独立运行的信息机器世界，参与操作驾驶这个世界的玩家玩法
造=goto跑一遍标签阵列，完成一遍游戏后，再加入量化
用=？
浏览器下载300MB的Strawberry Perl的perl文件会断掉，迅雷拖着下载。要Strawberry Perl，方便网络下载什么的。或者不要下载吧，本身集成了，没搞懂。
安装Tk很慢，很久。
程序文件pl，要绑定perl53211.exe，不要绑定旁边的perl.exe。
ActivePerl自带Tk?
ADODB.Stream读取内存？
basic(qb语句）=qb64，freebaisc
在深度deepin linux下可以终端运行，就建立终端运行文件sh。

1. 
   
2. #!/bin/bash
   
3. chmod +x perlTkgif.pl
   
4. perl perlTkgif.pl
   

复制代码

鼠标双击终端文件sh，通过这个终端文件打开pl，运行pl程序。(终端可运行，也许权限那句可以不需要了=chmod。

集成块硬件图形中文，逻辑电平与图形中文电平之间的翻译，在图形中文上抽象代表出来，成为中文编程或中文DOS的假设。

一，应该是道混沌无空能量在，
二，然后是能量形态和万物，走到表明太极阴阳相对关系，之后是圆自转，重复，循环的有序，顺序，排序=产生量。表面现象之量，到其内里之王的内因因果理，化学编程的能量自转自传锁定自私基因（？）。
三，1量（使用色点阵组合代表，总之组合的数量空间很大），
四，2类（声<声波，音乐>，色<图，文>），
五，3类组合（影视，有声有色的信息人模拟人与拟人拟物）。
但是如果中文编程，并不需要前面两者，只要后面三者。

第一，组合的法（进制法重复模式），这个法的数量要出来，并且这个数量是有序简单组合重复完成的。这个数量的代表形式，代数，代量，代字或代词。
第二，数量的排序序数序号提取。
第三，数量排序序数序号提取的单元容器，其内容具体组合的是什么。就是做这三步走。
1组合（单元太极阴阳相对联系关系组合），
2排序太集集合容器（同元排序=具有相同元的组合排序，异位排序=在不同的方位上有差异的组合排序），
3单元太集集合容器的具体组合内容。

三个概念部分渐进到数字化世界，每个部分又各自有其内部分类，最后到排序序数序号代表。
一个是抽象道，在，实，
二个是识别需求产生的排序，混沌，开天辟地，无，有，冇，空，不，0等，太极太集阴阳相对，
三个是太极太集阴阳相对为根源的太单元，相对联系关系组合形成的地图或联系关系体。相对这个关系一体的组构和解构，选择所需的模拟拟人拟物内容，并且使用排序数量来代表概念空间，完成模拟模仿。这个模拟模仿扩大了人的实选择空间，可以倍增探索尝试试验名范围的人概念空间，促进人的世界扩大。
有用制造用机器，通用制造用机器。

C语言SDL2图形考虑，两个部分：
1，图形部分的石坚白，存在即有象，内象外象本象，不论心意识/唯心或唯物，其可知可见的大概内容之一，与信息流编织成旋玑图全组合地图；
2，信息流的文本容器集合，以一个十进制16数字集自拍基本出发和中心区域，基本逻辑是太极容器的内外分解阴阳相对关系的组合聚散=开关。
3，声色两信息，色分为图画里的单图形文字，单图形图画，多图形图画，影视。信息分类，执行到类信息，就自动寻找对应的功能程序执行该信息内容，并且句柄管道开关输出到同一个页面容器里。

0，1，2，3，4，5，6，7，8，9，a，[，]，[；]，[：]，[。]。
1，2，3，4，5，6，7，8，9，0，a，[，]，[；]，[：]，[。]。
1，2，3，4，5，6，7，8，9，0，回，[，]，[；]，[：]，[。]。


1信息单元组合无限地图世界，2地图里的一次编程，3一次编程基础上的二次编程（AI自动信息自转自传）。

tty的zhcon需要fbset(修改操作framebuffer)
sudo apt install fbset
sudo usermod -aG video $USER     #/dev/fb0 通常属于 video 组，加入获取权限的执行。
重启以获取权限。
fbset -i    # 查看详细 framebuffer 模式

1. 
   
2. mode "1440x900-60"
   
3.     geometry 1440 900 1440 900 32
   
4.     timings 0 0 0 0 0 0 0
   
5.     rgba 8/16,8/8,8/0,0/0
   
6. endmode
   

复制代码

tty下中文：tty+zhcon（二合一，中文显示和中文全拼输入法）+ollama run qwen:0.5b（可以中文问答）+tty下图形编程
tty下记录script session.log 需要命令行做一个exit退出动作后（不会退出账户），才会输入到session.log文本。
tty C语言操作fb0的图形内容，先在桌面下编译好，处理了出错信息后，再转到tty下执行。
tty下输入：tty
/dev/fb0    （需要的内容）
/dev/pts/0 （图形界面，无法看到被图形界面覆盖了的输出图形，需要exit，会退出去。可能是zhcon的图形启动？）
tty，fb0，无限圈层级里，已有有限屏幕的极限位图，全组合的点阵字符集或点阵组合集。

重置密码
grub的选项栏，
按e，进入编辑内容，
在linux那一行的行尾，去掉最后两个单词quiet splas，加上systemd.unit=rescue.target
F10运行
出现运行页面，按一下按钮，出现root@帐号输入等待
输入mount -o remount,rw /
输入passwd+帐号
输入新密码，再次输入新密码
输入exec /sbin/init重新启动，进入用户和输入密码的图形页面(这一步就可以tty了)

在tty下安装图形
linux mint22.2图形界面桌面问题：
sudo dpkg --configure -a
# 5. 安装 Linux Mint 桌面
sudo apt install linuxmint-keyring
sudo apt install mint-meta-cinnamon    # 或 mint-meta-mate / mint-meta-xfce

tty+C语言+framebuffer，色象代表信息，信息代表声色。
tty+gas汇编+framebuffer+(多维数组的变量，中文显示和中文输入，鼠标等单多输入端口接口，页面浏览器文本，文字，动静帧图片，声音，影视)

在C语言SDL2图形库的程序代码中，最后一行注释编译和执行命令，对应防止忘记。

只有一个机器容器，，然后逐渐的增量。不是主板，而是键盘或鼠标开关。
键盘鼠标。
键盘鼠标+屏幕。
键盘鼠标+ 屏幕+电器主板功能。
键盘鼠标+屏幕+主板+内存。
键盘鼠标+屏幕+主板+内存+外存（算盘位移记录，打孔卡，钢，粉磁盘）。
键盘鼠标+屏幕+主板+内存+外存+芯片自动加工厂。

自动信息AI，通义：C语言SDL2制作一个虚拟机，LINUXMINT22.2
通义：C语言SDL2制作一个微软DOS下的debug.exe，LINUXMINT22.2

问题：在64位字节中，使用32位程序执行，能不能使用余下的32位存东西。按照说法是不可以的，执行文件是固化的，那么换成其他解释类语言呢。

中医许阳的基本中医部分，或菜菜城里的中医堂明心堂什么的，分为1基本理论，2基本看病，3基本治病三类集合。从冇逐渐增量的理论和实践，两者名实渐增，随着学习进步。

zzz19760225

1234567890
已有emacs的内容一般平常简化，主要是操作习惯上。其余基本不需要做，就算有需求，也分为可做和做不到的，可做的也排在已有简化之后。
鼠标一般的文本复制粘贴，在emacs上的模式套路。emacs页面上，鼠标右键点击的选项组。
game-emnu.el

1. 
   
2. ;;; game-menu.el --- 简单的游戏菜单系统 -*- lexical-binding: t; -*-
   
3. 
   
4. ;;; Commentary:
   
5. ;; 一个简单的游戏菜单演示程序
   
6. 
   
7. ;;; Code:
   
8. 
   
9. (defvar game-menu--timer nil
   
10.   "用于消息显示的定时器。")
    
11. 
    
12. (defvar game-menu--current-page 1
    
13.   "当前页面编号：1-主菜单，2-介绍页面，3-昵称输入页面。")
    
14. 
    
15. (defvar game-menu--nickname ""
    
16.   "存储玩家输入的昵称。")
    
17. 
    
18. (defun game-menu-show-page1 ()
    
19.   "显示第一个页面：主菜单。"
    
20.   (interactive)
    
21.   (setq game-menu--current-page 1)
    
22.   (let ((buf (get-buffer-create "*游戏菜单*")))
    
23.     (with-current-buffer buf
    
24.       ;; 取消只读模式以便修改
    
25.       (setq buffer-read-only nil)
    
26.       (erase-buffer)
    
27.       (insert "\n\n")
    
28.       (insert "            === 勇者大闯关 ===\n\n\n")
    
29.       
    
30.       ;; 创建可点击的菜单项
    
31.       (game-menu--insert-button "开始游戏" 'game-menu-start-game)
    
32.       (insert "\n\n")
    
33.       (game-menu--insert-button "介绍游戏" 'game-menu-show-intro-page)
    
34.       (insert "\n\n")
    
35.       (game-menu--insert-button "结束游戏" 'game-menu-exit)
    
36.       
    
37.       ;; 设置缓冲区为只读，防止意外修改
    
38.       (setq buffer-read-only t)
    
39.       (goto-char (point-min))
    
40.       (forward-line 3))  ;; 移动到中间位置
    
41.     (switch-to-buffer buf)))
    
42. 
    
43. (defun game-menu-show-intro-page ()
    
44.   "显示介绍页面，3秒后自动返回主菜单。"
    
45.   (interactive)
    
46.   (setq game-menu--current-page 2)
    
47.   (let ((buf (get-buffer-create "*游戏菜单*")))
    
48.     (with-current-buffer buf
    
49.       (setq buffer-read-only nil)
    
50.       (erase-buffer)
    
51.       (insert "\n\n")
    
52.       (insert "            === 游戏介绍 ===\n\n\n")
    
53.       (insert "       这是勇者大闯关游戏！\n\n")
    
54.       (insert "  这是一个简单的游戏菜单演示程序。\n\n")
    
55.       (insert "  你可以通过鼠标点击来导航不同的页面。\n\n\n\n")
    
56.       (insert "       3秒后自动返回主菜单...")
    
57.       
    
58.       ;; 设置介绍文字样式
    
59.       (goto-char (point-min))
    
60.       (forward-line 4)
    
61.       (put-text-property (point) (line-end-position) 'face '(:foreground "green" :height 1.2))
    
62.       
    
63.       (setq buffer-read-only t)
    
64.       (goto-char (point-min)))
    
65.     (switch-to-buffer buf))
    
66.   
    
67.   ;; 取消之前的定时器（如果存在）
    
68.   (when (timerp game-menu--timer)
    
69.     (cancel-timer game-menu--timer))
    
70.   
    
71.   ;; 设置3秒后返回主菜单
    
72.   (setq game-menu--timer
    
73.         (run-with-timer 3 nil
    
74.                         (lambda ()
    
75.                           (when (buffer-live-p (get-buffer "*游戏菜单*"))
    
76.                             (game-menu-show-page1)
    
77.                             (message "返回主菜单"))
    
78.                           (setq game-menu--timer nil)))))
    
79. 
    
80. (defun game-menu-show-page2 ()
    
81.   "显示第二个页面：昵称输入页面。"
    
82.   (interactive)
    
83.   (setq game-menu--current-page 3)
    
84.   (let ((buf (get-buffer-create "*游戏菜单*")))
    
85.     (with-current-buffer buf
    
86.       (setq buffer-read-only nil)
    
87.       (erase-buffer)
    
88.       (insert "\n\n")
    
89.       (insert "            === 输入昵称 ===\n\n\n")
    
90.       (insert "你的昵称：")
    
91.       
    
92.       ;; 创建输入区域
    
93.       (let ((start (point)))
    
94.         (insert " [点击这里输入昵称] ")
    
95.         (put-text-property start (point) 'face '(:background "gray80" :foreground "black"))
    
96.         (put-text-property start (point) 'mouse-face '(:background "yellow"))
    
97.         ;; 使用更简单的方法绑定点击事件
    
98.         (insert-button "[点击输入]"
    
99.                       'action (lambda (_) (game-menu--input-nickname))
    
100.                       'follow-link t
     
101.                       'face '(:foreground "blue" :underline t)))
     
102.       
     
103.       (insert "\n\n\n")
     
104.       
     
105.       ;; 如果已经有昵称，显示出来
     
106.       (when (not (string= game-menu--nickname ""))
     
107.         (insert "当前昵称: ")
     
108.         (insert game-menu--nickname)
     
109.         (insert "\n\n\n"))
     
110.       
     
111.       (game-menu--insert-button "返回菜单" 'game-menu-show-page1)
     
112.       (insert "\n\n")
     
113.       (game-menu--insert-button "去菜菜城" 'game-menu-to-caicai)
     
114.       
     
115.       (setq buffer-read-only t)
     
116.       (goto-char (point-min)))
     
117.     (switch-to-buffer buf)))
     
118. 
     
119. (defun game-menu--input-nickname ()
     
120.   "输入昵称。"
     
121.   (interactive)
     
122.   (let ((new-nick (read-string "请输入你的昵称: " game-menu--nickname)))
     
123.     (when (not (string= new-nick ""))
     
124.       (setq game-menu--nickname new-nick)
     
125.       ;; 刷新页面2以显示新昵称
     
126.       (game-menu-show-page2)
     
127.       (message "昵称已设置为: %s" game-menu--nickname))))
     
128. 
     
129. (defun game-menu--insert-button (text callback)
     
130.   "插入一个按钮，显示TEXT，点击时调用CALLBACK。"
     
131.   (let ((start (point)))
     
132.     (insert text)
     
133.     ;; 设置按钮样式
     
134.     (put-text-property start (point) 'face '(:foreground "blue" :underline t :weight bold))
     
135.     (put-text-property start (point) 'mouse-face '(:background "yellow"))
     
136.     (put-text-property start (point) 'help-echo (format "鼠标点击: %s" text))
     
137.     ;; 创建简单的按键映射
     
138.     (let ((map (make-sparse-keymap)))
     
139.       (define-key map [mouse-1]
     
140.         (lambda () (interactive)
     
141.           (when (functionp callback)
     
142.             (funcall callback))))
     
143.       (put-text-property start (point) 'keymap map))))
     
144. 
     
145. (defun game-menu-start-game ()
     
146.   "开始游戏 - 进入昵称输入页面。"
     
147.   (interactive)
     
148.   (game-menu-show-page2))
     
149. 
     
150. (defun game-menu-exit ()
     
151.   "结束游戏 - 关闭菜单缓冲区。"
     
152.   (interactive)
     
153.   (when (y-or-n-p "确定要退出游戏吗？")
     
154.     (kill-buffer "*游戏菜单*")
     
155.     (message "游戏结束，欢迎下次再来！")))
     
156. 
     
157. (defun game-menu-to-caicai ()
     
158.   "去菜菜城 - 当前功能空置，仅显示提示。"
     
159.   (interactive)
     
160.   (message "去菜菜城功能正在开发中，敬请期待...")
     
161.   ;; 让提示停留3秒
     
162.   (sit-for 3))
     
163. 
     
164. ;;;###autoload
     
165. (defun game-menu ()
     
166.   "启动游戏菜单。"
     
167.   (interactive)
     
168.   (game-menu-show-page1)
     
169.   (message "欢迎来到勇者大闯关！使用鼠标点击菜单项开始游戏。"))
     
170. 
     
171. (provide 'game-menu)
     
172. 
     
173. ;;; game-menu.el ends here
     

复制代码

alt+x，类似秘籍输入框，输入eval-buffer，就是加载文件，生成game-menu。
alt+x，类似秘籍输入框，输入game-menu就是执行文件。
显示菜单名和开始，介绍，结束游戏三行文字。
鼠标点击介绍游戏，下面可以显示一行文字3秒，这是勇士大闯关游戏。点击结束游戏，会弹出退出游戏是否选项。开始游戏的鼠标点击，出现等待输入昵称，返回菜单，进入菜菜城三个内容。

zzz19760225

1234567890

zzz19760225

1234567890

zzz19760225

1234567890