mainmenu.mpr

这是一款非常实用的福彩3D彩票统计分析软件,实现各种代码走势图的查看,以及按照相应统计指标进行统计分析、浏览报表、打印报表

*       *********************************************************
*       *                                                         
*       * 05/18/08            MAINMENU.MPR              07:00:16  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (C) 2008 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                      Menu Definition                    
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _2df0f0h91 OF _MSYSMENU PROMPT "数据维护(\<F)" COLOR SCHEME 3 ;
	KEY ALT+F, ""
DEFINE PAD _2df0f0h92 OF _MSYSMENU PROMPT "图形走势(\<T)" COLOR SCHEME 3 ;
	KEY ALT+T, ""
DEFINE PAD _2df0f0h93 OF _MSYSMENU PROMPT "数据查询(\<S)" COLOR SCHEME 3 ;
	KEY ALT+S, ""
DEFINE PAD _2df0f0h94 OF _MSYSMENU PROMPT "万能六码(\<W)" COLOR SCHEME 3 ;
	KEY ALT+W, ""
DEFINE PAD _2df0f0h95 OF _MSYSMENU PROMPT "走势图报表(\<R)" COLOR SCHEME 3 ;
	KEY ALT+R, ""
DEFINE PAD _2df0f0h96 OF _MSYSMENU PROMPT "统计A区(\<A)" COLOR SCHEME 3 ;
	KEY ALT+A, ""
DEFINE PAD _2df0f0h97 OF _MSYSMENU PROMPT "统计B区(\<B)" COLOR SCHEME 3 ;
	KEY ALT+B, ""
DEFINE PAD _2df0f0h98 OF _MSYSMENU PROMPT "统计C区(\<C)" COLOR SCHEME 3 ;
	KEY ALT+C, ""
DEFINE PAD _2df0f0h99 OF _MSYSMENU PROMPT "退出系统(\<Q)" COLOR SCHEME 3 ;
	KEY ALT+Q, ""
DEFINE PAD _2df0f0h9a OF _MSYSMENU PROMPT "帮助(\<H)" COLOR SCHEME 3 ;
	KEY ALT+H, ""
ON PAD _2df0f0h91 OF _MSYSMENU ACTIVATE POPUP 数据维护f
ON PAD _2df0f0h92 OF _MSYSMENU ACTIVATE POPUP 图形走势t
ON PAD _2df0f0h93 OF _MSYSMENU ACTIVATE POPUP 数据查询s
ON PAD _2df0f0h94 OF _MSYSMENU ACTIVATE POPUP 万能六码十
ON PAD _2df0f0h95 OF _MSYSMENU ACTIVATE POPUP 走势图报表
ON PAD _2df0f0h96 OF _MSYSMENU ACTIVATE POPUP 统计报表a
ON PAD _2df0f0h97 OF _MSYSMENU ACTIVATE POPUP 统计报表b
ON PAD _2df0f0h98 OF _MSYSMENU ACTIVATE POPUP 统计报表c
ON SELECTION PAD _2df0f0h99 OF _MSYSMENU ;
	DO _2df0f0h9b ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON PAD _2df0f0h9a OF _MSYSMENU ACTIVATE POPUP 帮助h

DEFINE POPUP 数据维护f MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 数据维护f PROMPT "\-"
DEFINE BAR 2 OF 数据维护f PROMPT "数据录入1(\<I)" ;
	PICTURE "icons\53.ico"
DEFINE BAR 3 OF 数据维护f PROMPT "\-"
DEFINE BAR 4 OF 数据维护f PROMPT "数据录入2(\<P)" ;
	PICTURE "icons\55.ico"
DEFINE BAR 5 OF 数据维护f PROMPT "\-"
DEFINE BAR 6 OF 数据维护f PROMPT "数据库生成(\<S)" ;
	PICTURE "icons\35.ico"
DEFINE BAR 7 OF 数据维护f PROMPT "\-"
DEFINE BAR 8 OF 数据维护f PROMPT "生成库管理(\<G)" ;
	PICTURE "icons\actxocx.ico"
DEFINE BAR 9 OF 数据维护f PROMPT "\-"
DEFINE BAR 10 OF 数据维护f PROMPT "清空生成库(\<C)" ;
	PICTURE "icons\9.ico"
DEFINE BAR 11 OF 数据维护f PROMPT "\-"
DEFINE BAR 12 OF 数据维护f PROMPT "按周期统计(\<T)" ;
	PICTURE "icons\11.ico"
DEFINE BAR 13 OF 数据维护f PROMPT "\-"
ON SELECTION BAR 2 OF 数据维护f ;
	DO _2df0f0h9c ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 数据维护f do form 数据录入2
ON SELECTION BAR 6 OF 数据维护f ;
	DO _2df0f0h9d ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 8 OF 数据维护f do form 数据库管理
ON SELECTION BAR 10 OF 数据维护f do gldata
ON SELECTION BAR 12 OF 数据维护f do form 周期统计

DEFINE POPUP 图形走势t MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 图形走势t PROMPT "\-"
DEFINE BAR 2 OF 图形走势t PROMPT "(012路)代码走势图(\<M)" ;
	PICTURE "icons\list1.ico"
DEFINE BAR 3 OF 图形走势t PROMPT "\-"
DEFINE BAR 4 OF 图形走势t PROMPT "和值走势图(\<H)" ;
	PICTURE "icons\graph01.ico"
DEFINE BAR 5 OF 图形走势t PROMPT "\-"
DEFINE BAR 6 OF 图形走势t PROMPT "和值(012路)走势图(\<E)" ;
	PICTURE "icons\date.ico"
DEFINE BAR 7 OF 图形走势t PROMPT "\-"
DEFINE BAR 8 OF 图形走势t PROMPT "大小走势图(\<D)" ;
	PICTURE "icons\class.ico"
DEFINE BAR 9 OF 图形走势t PROMPT "\-"
DEFINE BAR 10 OF 图形走势t PROMPT "质合走势图(\<Z)" ;
	PICTURE "icons\dyg.ico"
DEFINE BAR 11 OF 图形走势t PROMPT "质合单双组合综合走势图(\<K)" ;
	PICTURE "icons\8.ico"
DEFINE BAR 12 OF 图形走势t PROMPT "\-"
DEFINE BAR 13 OF 图形走势t PROMPT "\-"
DEFINE BAR 14 OF 图形走势t PROMPT "(756)代码走势图(\<7)" ;
	PICTURE "icons\hz.ico"
DEFINE BAR 15 OF 图形走势t PROMPT "\-"
DEFINE BAR 16 OF 图形走势t PROMPT "(986)代码走势图(\<9)" ;
	PICTURE "icons\43.ico"
DEFINE BAR 17 OF 图形走势t PROMPT "\-"
DEFINE BAR 18 OF 图形走势t PROMPT "(147)代码走势图(\<1)" ;
	PICTURE "icons\10.ico"
DEFINE BAR 19 OF 图形走势t PROMPT "\-"
DEFINE BAR 20 OF 图形走势t PROMPT "(518)代码走势图(\<5)" ;
	PICTURE "icons\graph07.ico"
DEFINE BAR 21 OF 图形走势t PROMPT "\-"
DEFINE BAR 22 OF 图形走势t PROMPT "(301)代码走势图(\<3)" ;
	PICTURE "icons\note15.ico"
DEFINE BAR 23 OF 图形走势t PROMPT "\-"
ON SELECTION BAR 2 OF 图形走势t do form 出球号012路走势图1
ON SELECTION BAR 4 OF 图形走势t DO FORM 出球号和值走势图
ON SELECTION BAR 6 OF 图形走势t DO FORM 出球号和值走势图2
ON SELECTION BAR 8 OF 图形走势t DO FORM 出球号大小走势图
ON SELECTION BAR 10 OF 图形走势t DO FORM 出球号质合走势图
ON SELECTION BAR 11 OF 图形走势t DO FORM 出球号质单走势图
ON SELECTION BAR 14 OF 图形走势t DO FORM 出球号012路走势图2
ON SELECTION BAR 16 OF 图形走势t DO FORM 出球号012路走势图3
ON SELECTION BAR 18 OF 图形走势t DO FORM 出球号012路走势图4
ON SELECTION BAR 20 OF 图形走势t DO FORM 出球号012路走势图5
ON SELECTION BAR 22 OF 图形走势t DO FORM 出球号012路走势图6

DEFINE POPUP 数据查询s MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 数据查询s PROMPT "\-"
DEFINE BAR 2 OF 数据查询s PROMPT "综合查询(\<S)" ;
	PICTURE "icons\files04.ico"
DEFINE BAR 3 OF 数据查询s PROMPT "\-"
DEFINE BAR 4 OF 数据查询s PROMPT "万能六码查询(\<W)" ;
	PICTURE "icons\15.ico"
DEFINE BAR 5 OF 数据查询s PROMPT "\-"
ON SELECTION BAR 2 OF 数据查询s ;
	DO _2df0f0h9e ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 数据查询s ;
	DO _2df0f0h9f ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")

DEFINE POPUP 万能六码十 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 万能六码十 PROMPT "\-"
DEFINE BAR 2 OF 万能六码十 PROMPT "万能六码出号查询(\<S)" ;
	PICTURE "icons\12.ico"
DEFINE BAR 3 OF 万能六码十 PROMPT "\-"
DEFINE BAR 4 OF 万能六码十 PROMPT "万能六码出号表浏览(\<B)" ;
	PICTURE "icons\19.ico"
DEFINE BAR 5 OF 万能六码十 PROMPT "\-"
DEFINE BAR 6 OF 万能六码十 PROMPT "万能六码统计表(\<T)" ;
	PICTURE "icons\hz.ico"
DEFINE BAR 7 OF 万能六码十 PROMPT "\-"
ON SELECTION BAR 2 OF 万能六码十 ;
	DO _2df0f0h9g ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 万能六码十 ;
	DO _2df0f0h9h ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 6 OF 万能六码十 ;
	DO _2df0f0h9i ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")

DEFINE POPUP 走势图报表 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 走势图报表 PROMPT "\-"
DEFINE BAR 2 OF 走势图报表 PROMPT "库文件复制(\<K)" ;
	PICTURE "icons\disks04.ico"
DEFINE BAR 3 OF 走势图报表 PROMPT "\-"
DEFINE BAR 4 OF 走势图报表 PROMPT "质合大小奇偶综合走势图(\<X)" ;
	PICTURE "icons\copy.ico"
DEFINE BAR 5 OF 走势图报表 PROMPT "\-"
DEFINE BAR 6 OF 走势图报表 PROMPT "012路走势报表(\<A)" ;
	PICTURE "icons\date.ico"
DEFINE BAR 7 OF 走势图报表 PROMPT "\-"
DEFINE BAR 8 OF 走势图报表 PROMPT "大小奇偶走势报表(\<B)" ;
	PICTURE "icons\note06.ico"
DEFINE BAR 9 OF 走势图报表 PROMPT "\-"
DEFINE BAR 10 OF 走势图报表 PROMPT "和数值走势报表(\<C)" ;
	PICTURE "icons\sinewave.ico"
DEFINE BAR 11 OF 走势图报表 PROMPT "\-"
DEFINE BAR 12 OF 走势图报表 PROMPT "大小走势图报表(\<D)" ;
	PICTURE "icons\graph15.ico"
DEFINE BAR 13 OF 走势图报表 PROMPT "\-"
DEFINE BAR 14 OF 走势图报表 PROMPT "质合走势图报表(\<Z)" ;
	PICTURE "icons\note07.ico"
DEFINE BAR 15 OF 走势图报表 PROMPT "\-"
DEFINE BAR 16 OF 走势图报表 PROMPT "012路代码走势图(\<M)" ;
	PICTURE "icons\11.ico"
DEFINE BAR 17 OF 走势图报表 PROMPT "\-"
DEFINE BAR 18 OF 走势图报表 PROMPT "756代码走势图(\<7)" ;
	PICTURE "icons\books04.ico"
DEFINE BAR 19 OF 走势图报表 PROMPT "\-"
DEFINE BAR 20 OF 走势图报表 PROMPT "986代码走势图(\<9)" ;
	PICTURE "icons\graph07.ico"
DEFINE BAR 21 OF 走势图报表 PROMPT "\-"
DEFINE BAR 22 OF 走势图报表 PROMPT "147代码走势图(\<1)" ;
	PICTURE "icons\list1.ico"
DEFINE BAR 23 OF 走势图报表 PROMPT "\-"
DEFINE BAR 24 OF 走势图报表 PROMPT "518代码走势图(\<5)" ;
	PICTURE "icons\zhj21.ico"
DEFINE BAR 25 OF 走势图报表 PROMPT "\-"
DEFINE BAR 26 OF 走势图报表 PROMPT "301代码走势图(\<3)" ;
	PICTURE "icons\wen.ico"
DEFINE BAR 27 OF 走势图报表 PROMPT "\-"
ON SELECTION BAR 2 OF 走势图报表 ;
	DO _2df0f0h9j ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 走势图报表 DO FORM 出球号质合大小奇偶综合走势图
ON SELECTION BAR 6 OF 走势图报表 ;
	DO _2df0f0h9k ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 8 OF 走势图报表 ;
	DO _2df0f0h9l ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 10 OF 走势图报表 ;
	DO _2df0f0h9m ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 12 OF 走势图报表 ;
	DO _2df0f0h9n ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 14 OF 走势图报表 ;
	DO _2df0f0h9o ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 16 OF 走势图报表 do form 出球号012路走势图1S
ON SELECTION BAR 18 OF 走势图报表 DO FORM 出球号012路走势图2S
ON SELECTION BAR 20 OF 走势图报表 DO FORM 出球号012路走势图3S
ON SELECTION BAR 22 OF 走势图报表 DO FORM 出球号012路走势图4S
ON SELECTION BAR 24 OF 走势图报表 DO FORM 出球号012路走势图5S
ON SELECTION BAR 26 OF 走势图报表 DO FORM 出球号012路走势图6S

DEFINE POPUP 统计报表a MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 统计报表a PROMPT "\-"
DEFINE BAR 2 OF 统计报表a PROMPT "跨度和值组合统计表(\<K)" ;
	PICTURE "icons\40.ico"
DEFINE BAR 3 OF 统计报表a PROMPT "\-"
DEFINE BAR 4 OF 统计报表a PROMPT "和值统计表(\<H)"
DEFINE BAR 5 OF 统计报表a PROMPT "和尾统计表(\<E)"
DEFINE BAR 6 OF 统计报表a PROMPT "和组选16分区统计表(\<F)"
DEFINE BAR 7 OF 统计报表a PROMPT "和值012路统计表(\<T)"
DEFINE BAR 8 OF 统计报表a PROMPT "\-"
DEFINE BAR 9 OF 统计报表a PROMPT "新和跨值统计表(\<N)" ;
	PICTURE "icons\23.ico"
DEFINE BAR 10 OF 统计报表a PROMPT "\-"
DEFINE BAR 11 OF 统计报表a PROMPT "大小奇偶组合统计表(\<D)" ;
	PICTURE "icons\chat.ico"
DEFINE BAR 12 OF 统计报表a PROMPT "奇偶大小组合统计表(\<J)" ;
	PICTURE "icons\mail14.ico"
DEFINE BAR 13 OF 统计报表a PROMPT "\-"
DEFINE BAR 14 OF 统计报表a PROMPT "出号012路……AA*_统计表(\<1)" ;
	PICTURE "icons\books04.ico"
DEFINE BAR 15 OF 统计报表a PROMPT "出号012路……*AA_统计表(\<2)" ;
	PICTURE "icons\hz.ico"
DEFINE BAR 16 OF 统计报表a PROMPT "\-"
DEFINE BAR 17 OF 统计报表a PROMPT "出号012路……A*A_统计表(\<3)" ;
	PICTURE "icons\mail01a.ico"
DEFINE BAR 18 OF 统计报表a PROMPT "出号012路……ZHX_统计表(\<4)" ;
	PICTURE "icons\sample.ico"
DEFINE BAR 19 OF 统计报表a PROMPT "\-"
ON SELECTION BAR 2 OF 统计报表a ;
	DO _2df0f0h9p ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 4 OF 统计报表a ;
	DO _2df0f0h9q ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 5 OF 统计报表a ;
	DO _2df0f0h9r ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 6 OF 统计报表a ;
	DO _2df0f0h9s ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 7 OF 统计报表a ;
	DO _2df0f0h9t ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 9 OF 统计报表a ;
	DO _2df0f0h9u ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 11 OF 统计报表a ;
	DO _2df0f0h9v ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 12 OF 统计报表a ;
	DO _2df0f0h9w ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 14 OF 统计报表a ;
	DO _2df0f0h9x ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 15 OF 统计报表a ;
	DO _2df0f0h9y ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 17 OF 统计报表a ;
	DO _2df0f0h9z ;
	IN LOCFILE("\FC3D\MAINMENU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MAINMENU?")
ON SELECTION BAR 18 OF 统计报表a ;
	DO _2df0f0ha0 ;