📄 mainmenu.mpr
字号:
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 统计报表b MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 统计报表b PROMPT "\-"
DEFINE BAR 2 OF 统计报表b PROMPT "组选22分区统计表(\<A)" ;
PICTURE "icons\date.ico"
DEFINE BAR 3 OF 统计报表b PROMPT "组选10分区统计表(+质单组合统计)(\<B)" ;
PICTURE "icons\date1.ico"
DEFINE BAR 4 OF 统计报表b PROMPT "\-"
DEFINE BAR 5 OF 统计报表b PROMPT "大小单双出号统计表(\<C)" ;
PICTURE "icons\20.ico"
DEFINE BAR 6 OF 统计报表b PROMPT "\-"
DEFINE BAR 7 OF 统计报表b PROMPT "单双大小出号统计表(\<D)" ;
PICTURE "icons\21.ico"
DEFINE BAR 8 OF 统计报表b PROMPT "\-"
DEFINE BAR 9 OF 统计报表b PROMPT "质合单双出号统计表(\<E)" ;
PICTURE "icons\hz.ico"
DEFINE BAR 10 OF 统计报表b PROMPT "\-"
DEFINE BAR 11 OF 统计报表b PROMPT "质合大小单双/11分区统计表(\<1)" ;
PICTURE "icons\note04.ico"
DEFINE BAR 12 OF 统计报表b PROMPT "质合大小单双/11分区统计表(\<2)"
DEFINE BAR 13 OF 统计报表b PROMPT "\-"
DEFINE BAR 14 OF 统计报表b PROMPT "连号组合22分区统计表(\<H)" ;
PICTURE "icons\zhj30.ico"
DEFINE BAR 15 OF 统计报表b PROMPT "\-"
DEFINE BAR 16 OF 统计报表b PROMPT "单双点组合22分区统计表(\<I)" ;
PICTURE "icons\zhj21.ico"
DEFINE BAR 17 OF 统计报表b PROMPT "\-"
ON SELECTION BAR 2 OF 统计报表b ;
DO _2df0f0ha1 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 3 OF 统计报表b ;
DO _2df0f0ha2 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 5 OF 统计报表b ;
DO _2df0f0ha3 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 7 OF 统计报表b ;
DO _2df0f0ha4 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 9 OF 统计报表b ;
DO _2df0f0ha5 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 11 OF 统计报表b ;
DO _2df0f0ha6 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 12 OF 统计报表b ;
DO _2df0f0ha7 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 14 OF 统计报表b ;
DO _2df0f0ha8 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 16 OF 统计报表b ;
DO _2df0f0ha9 ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 统计报表c MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 统计报表c PROMPT "\-"
DEFINE BAR 2 OF 统计报表c PROMPT "出球号代码综合统计表(\<P)" ;
PICTURE "icons\11.ico"
DEFINE BAR 3 OF 统计报表c PROMPT "出球号代码质合大小奇偶综合统计表之二(\<X)" ;
PICTURE "icons\26.ico"
DEFINE BAR 4 OF 统计报表c PROMPT "\-"
DEFINE BAR 5 OF 统计报表c PROMPT "出号756代码……AAX……0路=790(\<A)" ;
PICTURE "icons\card3.ico"
DEFINE BAR 6 OF 统计报表c PROMPT "出号756代码……XAA……1路=5418(\<B)"
DEFINE BAR 7 OF 统计报表c PROMPT "出号756代码……AXA……2路=632(\<C)"
DEFINE BAR 8 OF 统计报表c PROMPT "\-"
DEFINE BAR 9 OF 统计报表c PROMPT "出号756代码……ZHX(\<D)"
DEFINE BAR 10 OF 统计报表c PROMPT "\-"
DEFINE BAR 11 OF 统计报表c PROMPT "新(20)区组合统计表(\<E)" ;
PICTURE "icons\42.ico"
DEFINE BAR 12 OF 统计报表c PROMPT "\-"
DEFINE BAR 13 OF 统计报表c PROMPT "出号986代码……AA0……0路=9510(\<1)" ;
PICTURE "icons\27.ico"
DEFINE BAR 14 OF 统计报表c PROMPT "出号986代码……0AA……1路=873(\<2)"
DEFINE BAR 15 OF 统计报表c PROMPT "出号986代码……A0A……2路=642(\<3)"
DEFINE BAR 16 OF 统计报表c PROMPT "\-"
DEFINE BAR 17 OF 统计报表c PROMPT "出号986代码……ZHX(\<4)"
DEFINE BAR 18 OF 统计报表c PROMPT "\-"
DEFINE BAR 19 OF 统计报表c PROMPT "出球号位差统计表(\<J)" ;
PICTURE "icons\font02.ico"
DEFINE BAR 20 OF 统计报表c PROMPT "\-"
DEFINE BAR 21 OF 统计报表c PROMPT "出号147代码……AA0……0=1389(\<S)" ;
PICTURE "icons\graph07.ico"
DEFINE BAR 22 OF 统计报表c PROMPT "出号147代码……0AA……1=450(\<X)"
DEFINE BAR 23 OF 统计报表c PROMPT "出号147代码……A0A……2=762(\<F)"
DEFINE BAR 24 OF 统计报表c PROMPT "\-"
DEFINE BAR 25 OF 统计报表c PROMPT "出号147代码……ZHX(\<Z)"
DEFINE BAR 26 OF 统计报表c PROMPT "\-"
DEFINE BAR 27 OF 统计报表c PROMPT "出号518代码……AA*……0路=563(\<Q)" ;
PICTURE "icons\books05.ico"
DEFINE BAR 28 OF 统计报表c PROMPT "出号518代码……*AA……1路=1207(\<W)"
DEFINE BAR 29 OF 统计报表c PROMPT "出号518代码……A*A……2路=894(\<E)"
DEFINE BAR 30 OF 统计报表c PROMPT "\-"
DEFINE BAR 31 OF 统计报表c PROMPT "出号518代码……ZHX(\<R)"
DEFINE BAR 32 OF 统计报表c PROMPT "\-"
DEFINE BAR 33 OF 统计报表c PROMPT "出号301代码……TTX……0=357" ;
PICTURE "icons\note03.ico"
DEFINE BAR 34 OF 统计报表c PROMPT "出号301代码……XTT……1=0249"
DEFINE BAR 35 OF 统计报表c PROMPT "出号301代码……TXT……2=168"
DEFINE BAR 36 OF 统计报表c PROMPT "\-"
DEFINE BAR 37 OF 统计报表c PROMPT "出号301代码……XXX……"
DEFINE BAR 38 OF 统计报表c PROMPT "\-"
ON SELECTION BAR 2 OF 统计报表c DO FORM 出球号代码综合统计表
ON SELECTION BAR 3 OF 统计报表c DO FORM 出球号代码综合统计表2
ON SELECTION BAR 5 OF 统计报表c ;
DO _2df0f0haa ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 6 OF 统计报表c ;
DO _2df0f0hab ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 7 OF 统计报表c ;
DO _2df0f0hac ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 9 OF 统计报表c ;
DO _2df0f0had ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 11 OF 统计报表c ;
DO _2df0f0hae ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 13 OF 统计报表c ;
DO _2df0f0haf ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 14 OF 统计报表c ;
DO _2df0f0hag ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 15 OF 统计报表c ;
DO _2df0f0hah ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 17 OF 统计报表c ;
DO _2df0f0hai ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 19 OF 统计报表c ;
DO _2df0f0haj ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 21 OF 统计报表c ;
DO _2df0f0hak ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 22 OF 统计报表c ;
DO _2df0f0hal ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 23 OF 统计报表c ;
DO _2df0f0ham ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 25 OF 统计报表c ;
DO _2df0f0han ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 27 OF 统计报表c ;
DO _2df0f0hao ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 28 OF 统计报表c ;
DO _2df0f0hap ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 29 OF 统计报表c ;
DO _2df0f0haq ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 31 OF 统计报表c ;
DO _2df0f0har ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 33 OF 统计报表c ;
DO _2df0f0has ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 34 OF 统计报表c ;
DO _2df0f0hat ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 35 OF 统计报表c ;
DO _2df0f0hau ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 37 OF 统计报表c ;
DO _2df0f0hav ;
IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
DEFINE POPUP 帮助h MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 帮助h PROMPT "\-"
DEFINE BAR 2 OF 帮助h PROMPT "常用图表(\<B)" ;
PICTURE "icons\czbk.ico"
DEFINE BAR 3 OF 帮助h PROMPT "\-"
DEFINE BAR 4 OF 帮助h PROMPT "直选代码表(\<Z)" ;
PICTURE "icons\excel.ico"
DEFINE BAR 5 OF 帮助h PROMPT "\-"
DEFINE BAR 6 OF 帮助h PROMPT "投注速查表(\<S)" ;
PICTURE "icons\18.ico"
DEFINE BAR 7 OF 帮助h PROMPT "\-"
DEFINE BAR 8 OF 帮助h PROMPT "关于(\<A)" ;
PICTURE "icons\zhj7.ico"
DEFINE BAR 9 OF 帮助h PROMPT "\-"
DEFINE BAR 10 OF 帮助h PROMPT "生成筛选工具库(\<F)" ;
PICTURE "icons\35.ico"
DEFINE BAR 11 OF 帮助h PROMPT "\-"
DEFINE BAR 12 OF 帮助h PROMPT "3D选号器(\<X)" ;
PICTURE "icons\files03a.ico"
DEFINE BAR 13 OF 帮助h PROMPT "\-"
ON SELECTION BAR 2 OF 帮助h do form 常用图表
ON SELECTION BAR 4 OF 帮助h do form 直选代码表
ON SELECTION BAR 6 OF 帮助h do form 速算表
ON SELECTION BAR 8 OF 帮助h do form 版本信息
ON SELECTION BAR 10 OF 帮助h do datazh2000
ON SELECTION BAR 12 OF 帮助h do form 选号器
* *********************************************************
* *
* * _2DF0F0H9B ON SELECTION PAD
* *
* * Procedure Origin:
* *
* * From Menu: MAINMENU.MPR, Record: 237
* * Called By: ON SELECTION PAD
* * Prompt: 退出系统(Q)
* * Snippet: 1
* *
* *********************************************************
*
PROCEDURE _2df0f0h9b
tuichu=MESSAGEBOX('您确定要退出本系统吗？',4+32+0,'数字3游戏分析系统')
if tuichu=6 &&如果要退出系统
close all database
close all
clear events
quit
endif
* *********************************************************
* *
* * _2DF0F0H9C ON SELECTION BAR 2 OF POPUP 数据维护f
* *
* * Procedure Origin:
* *
* * From Menu: MAINMENU.MPR, Record: 7
* * Called By: ON SELECTION BAR 2 OF POPUP 数据维护f
* * Prompt: 数据录入1(I)
* * Snippet: 2
* *
* *********************************************************
*
PROCEDURE _2df0f0h9c
SET TALK OFF
do form 数据录入.scx
RETURN
* *********************************************************
* *
* * _2DF0F0H9D ON SELECTION BAR 6 OF POPUP 数据维护f
* *
* * Procedure Origin:
* *
* * From Menu: MAINMENU.MPR, Record: 13
* * Called By: ON SELECTION BAR 6 OF POPUP 数据维护f
* * Prompt: 数据库生成(S)
* * Snippet: 3
* *
* *********************************************************
*
PROCEDURE _2df0f0h9d
set talk off
messagebox("执行生成图表数据和完成数据统计操作,这可能需要几分钟的时间,请耐心等候！",0+48,"提示信息")
do datazh &&数据转换操作
do datazh2008 &&查询库生成
do zztong_10 &&完成统计数据库
messagebox("恭喜！您已经完成了数据转换和数据统计操作！",0+48,"提示信息")
Return
* *********************************************************
* *
* * _2DF0F0H9E ON SELECTION BAR 2 OF POPUP 数据查询s
* *
* * Procedure Origin:
* *
* * From Menu: MAINMENU.MPR, Record: 66
* * Called By: ON SELECTION BAR 2 OF POPUP 数据查询s
* * Prompt: 综合查询(S)
* * Snippet: 4
* *
* *********************************************************
*
PROCEDURE _2df0f0h9e
set talk off
do form 通用查询器
* *********************************************************
* *
* * _2DF0F0H9F ON SELECTION BAR 4 OF POPUP 数据查询s
* *
* * Procedure Origin:
* *
* * From Menu: MAINMENU.MPR, Record: 69
* * Called By: ON SELECTION BAR 4 OF POPUP 数据查询s
* * Prompt: 万能六码查询(W)
* * Snippet: 5
* *
* *********************************************************
*
PROCEDURE _2df0f0h9f
do form 万能六码查询
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -