datazh2000.prg

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

          
      IF M="643".OR.M="843".OR.M="654".OR.M="854".OR.M="764".OR.M="873".OR.M="983".OR.M="754".OR.M="954".OR.M="765"          
           s(32)="⑧"
          ENDIF
      
      IF M="874".or.M="984".or.M="865".or.M="876".or.M="986".or.M="965".or.M="875".or.M="985".or.M="976".or.M="987"          
           s(32)="⑨"
          ENDIF
      
      IF M="111".or.M="333".or.M="555".or.M="777".or.M="999".or.M="000".or.M="222".or.M="444".or.M="666".or.M="888"          
           s(32)="⑩"
          ENDIF
      
      IF M="300".or.M="500".or.M="700".or.M="311".or.M="511".or.M="200".or.M="400".or.M="600".or.M="800".or.M="411"          
          s(32)="11"
          ENDIF
      
      IF M="711".or.M="911".or.M="522".or.M="722".or.M="922".or.M="611".or.M="811".or.M="220".or.M="422".or.M="622"          
         s(32)="12"
          ENDIF
      
      IF M="331".or.M="533".or.M="733".or.M="933".or.M="441".or.M="822".or.M="330".or.M="633".or.M="833".or.M="440"          
           s(32)="13"
          ENDIF
      
      
      IF M="744".or.M="944".or.M="551".or.M="553".or.M="755".or.M="442".or.M="644".or.M="844".or.M="550".or.M="552"          
          s(32)="14"
          ENDIF
          
      IF M="955".or.M="661".or.M="663".or.M="966".or.M="771".or.M="855".or.M="660".or.M="662".or.M="664".or.M="866"       
          s(32)="15"
          ENDIF
          
       IF M="773".or.M="775".or.M="977".or.M="881".or.M="883".or.M="770".or.M="772".or.M="774".or.M="880".or.M="882"          
           s(32)="16"
          ENDIF
          
       IF M="885".or.M="991".or.M="993".or.M="995".or.M="997".or.M="884".or.M="886".or.M="992".or.M="994".or.M="996"          
          s(32)="17"
          ENDIF   

       IF M="520".or.M="720".or.M="630".or.M="830".or.M="740".or.M="420".or.M="620".or.M="820".or.M="530".or.M="730"          
         s(32)="18"
          ENDIF   

       IF M="850".or.M="531".or.M="731".or.M="931".or.M="641".or.M="640".or.M="840".or.M="750".or.M="860".or.M="631"          
         s(32)="19"
          ENDIF
          
       IF M="841".or.M="751".or.M="951".or.M="861".or.M="971".or.M="831".or.M="741".or.M="941".or.M="851".or.M="961"          
          s(32)="20"
          ENDIF      
        
       IF M="742".or.M="942".or.M="852".or.M="962".or.M="753".or.M="642".or.M="842".or.M="752".or.M="952".or.M="862"          
           s(32)="21"
          ENDIF
       
       IF M="953".or.M="863".or.M="973".or.M="964".or.M="975".or.M="972".or.M="853".or.M="963".or.M="864".or.M="974"          
           s(32)="22"
          ENDIF
       ****************************************** 插入区3  s(47)
       IF M="100".OR.M="900".OR.M="221".OR.M="322".OR.M="443".OR.M="110".OR.M="211".OR.M="332".OR.M="433".OR.M="554"          
           s(47)="1"
          ENDIF
                  
      IF M="544".OR.M="665".OR.M="766".OR.M="887".OR.M="988".OR.M="655".OR.M="776".OR.M="877".OR.M="990".OR.M="998"          
          s(47)="2"
          ENDIF
      
      IF M="210".OR.M="410".OR.M="610".OR.M="810".OR.M="320".OR.M="310".OR.M="510".OR.M="710".OR.M="910".OR.M="930"          
         s(47)="3"
          ENDIF
      
      IF M="920".OR.M="430".OR.M="540".OR.M="940".OR.M="650".OR.M="950".OR.M="970".OR.M="321".OR.M="521".OR.M="721"          
          s(47)="4"
          ENDIF
      
      IF M="760".OR.M="960".OR.M="870".OR.M="980".OR.M="421".OR.M="921".OR.M="431".OR.M="541".OR.M="651".OR.M="761"          
         s(47)="5"
          ENDIF
      
      IF M="621".OR.M="821".OR.M="432".OR.M="632".OR.M="832".OR.M="871".OR.M="981".OR.M="532".OR.M="732".OR.M="932"          
          s(47)="6"
          ENDIF
      
      IF M="542".OR.M="652".OR.M="762".OR.M="872".OR.M="982".OR.M="543".OR.M="743".OR.M="943".OR.M="653".OR.M="763"          
          s(47)="7"
          ENDIF
          
      IF M="643".OR.M="843".OR.M="654".OR.M="854".OR.M="764".OR.M="873".OR.M="983".OR.M="754".OR.M="954".OR.M="765"          
           s(47)="8"
          ENDIF
      
      IF M="874".or.M="984".or.M="865".or.M="876".or.M="986".or.M="965".or.M="875".or.M="985".or.M="976".or.M="987"          
           s(47)="9"
          ENDIF
      
      IF M="111".or.M="333".or.M="555".or.M="777".or.M="999".or.M="000".or.M="222".or.M="444".or.M="666".or.M="888"          
           s(47)="10"
          ENDIF
      
      IF M="300".or.M="500".or.M="700".or.M="311".or.M="511".or.M="200".or.M="400".or.M="600".or.M="800".or.M="411"          
          s(47)="11"
          ENDIF
      
      IF M="711".or.M="911".or.M="522".or.M="722".or.M="922".or.M="611".or.M="811".or.M="220".or.M="422".or.M="622"          
         s(47)="12"
          ENDIF
      
      IF M="331".or.M="533".or.M="733".or.M="933".or.M="441".or.M="822".or.M="330".or.M="633".or.M="833".or.M="440"          
           s(47)="13"
          ENDIF
      
      
      IF M="744".or.M="944".or.M="551".or.M="553".or.M="755".or.M="442".or.M="644".or.M="844".or.M="550".or.M="552"          
          s(47)="14"
          ENDIF
          
      IF M="955".or.M="661".or.M="663".or.M="966".or.M="771".or.M="855".or.M="660".or.M="662".or.M="664".or.M="866"       
          s(47)="15"
          ENDIF
          
       IF M="773".or.M="775".or.M="977".or.M="881".or.M="883".or.M="770".or.M="772".or.M="774".or.M="880".or.M="882"          
           s(47)="16"
          ENDIF
          
       IF M="885".or.M="991".or.M="993".or.M="995".or.M="997".or.M="884".or.M="886".or.M="992".or.M="994".or.M="996"          
          s(47)="17"
          ENDIF   

       IF M="520".or.M="720".or.M="630".or.M="830".or.M="740".or.M="420".or.M="620".or.M="820".or.M="530".or.M="730"          
         s(47)="18"
          ENDIF   

       IF M="850".or.M="531".or.M="731".or.M="931".or.M="641".or.M="640".or.M="840".or.M="750".or.M="860".or.M="631"          
         s(47)="19"
          ENDIF
          
       IF M="841".or.M="751".or.M="951".or.M="861".or.M="971".or.M="831".or.M="741".or.M="941".or.M="851".or.M="961"          
          s(47)="20"
          ENDIF      
        
       IF M="742".or.M="942".or.M="852".or.M="962".or.M="753".or.M="642".or.M="842".or.M="752".or.M="952".or.M="862"          
           s(47)="21"
          ENDIF
       
       IF M="953".or.M="863".or.M="973".or.M="964".or.M="975".or.M="972".or.M="853".or.M="963".or.M="864".or.M="974"          
           s(47)="22"
          ENDIF
   
       
       ***************************************插入区4 s(48)
        IF M="111".OR.M="333".OR.M="555".OR.M="777".OR.M="999".OR.M="000".OR.M="222".OR.M="444".OR.M="666".OR.M="888"          
          s(48)="1"
          ENDIF
                  
      IF M="100".OR.M="300".OR.M="500".OR.M="700".OR.M="900".OR.M="200".OR.M="400".OR.M="600".OR.M="800".OR.M="110"          
          s(48)="2"
          ENDIF
      
      IF M="311".OR.M="511".OR.M="711".OR.M="911".OR.M="221".OR.M="211".OR.M="411".OR.M="611".OR.M="811".OR.M="220"          
         s(48)="3"
          ENDIF
      
      IF M="322".OR.M="522".OR.M="722".OR.M="922".OR.M="331".OR.M="422".OR.M="622".OR.M="822".OR.M="330".OR.M="332"          
          s(48)="4"
          ENDIF
      
      IF M="533".OR.M="733".OR.M="933".OR.M="441".OR.M="443".OR.M="433".OR.M="633".OR.M="440".OR.M="833".OR.M="442"          
          s(48)="5"
          ENDIF
      
      IF M="544".OR.M="744".OR.M="944".OR.M="551".OR.M="553".OR.M="644".OR.M="844".OR.M="550".OR.M="552".OR.M="554"          
          s(48)="6"
          ENDIF
      
      IF M="755".OR.M="955".OR.M="661".OR.M="663".OR.M="665".OR.M="655".OR.M="855".OR.M="660".OR.M="662".OR.M="664"          
          s(48)="7"
          ENDIF
          
      IF M="766".OR.M="966".OR.M="771".OR.M="773".OR.M="775".OR.M="866".OR.M="770".OR.M="772".OR.M="774".OR.M="776"          
          s(48)="8"
          ENDIF
      
      IF M="977".or.M="881".or.M="863".or.M="885".or.M="887".or.M="877".or.M="880".or.M="882".or.M="884".or.M="886"          
         s(48)="9"
          ENDIF
      
      IF M="988".or.M="991".or.M="993".or.M="995".or.M="997".or.M="990".or.M="992".or.M="994".or.M="996".or.M="998"          
           s(48)="10"
          ENDIF
      
      IF M="210".or.M="410".or.M="610".or.M="810".or.M="320".or.M="310".or.M="510".or.M="710".or.M="910".or.M="420"          
           s(48)="11"
          ENDIF
      
      IF M="520".or.M="720".or.M="920".or.M="430".or.M="630".or.M="620".or.M="820".or.M="530".or.M="730".or.M="930"          
          s(48)="12"
          ENDIF
      
      IF M="830".or.M="540".or.M="740".or.M="940".or.M="650".or.M="640".or.M="840".or.M="750".or.M="950".or.M="860"          
          s(48)="13"
          ENDIF
      
      
      IF M="850".or.M="760".or.M="960".or.M="870".or.M="980".or.M="970".or.M="321".or.M="521".or.M="721".or.M="921"          
           s(48)="14"
          ENDIF
          
      IF M="421".or.M="621".or.M="821".or.M="531".or.M="731".or.M="431".or.M="631".or.M="831".or.M="541".or.M="741"       
           s(48)="15"
          ENDIF
          
       IF M="931".or.M="641".or.M="841".or.M="751".or.M="951".or.M="941".or.M="651".or.M="851".or.M="761".or.M="961"          
          s(48)="16"
          ENDIF
          
       IF M="861".or.M="971".or.M="432".or.M="632".or.M="832".or.M="871".or.M="981".or.M="532".or.M="732".or.M="932"          
          s(48)="17"
          ENDIF   

       IF M="542".or.M="742".or.M="942".or.M="652".or.M="852".or.M="642".or.M="842".or.M="752".or.M="952".or.M="862"          
          s(48)="18"
          ENDIF   

       IF M="762".or.M="962".or.M="872".or.M="982".or.M="643".or.M="972".or.M="543".or.M="743".or.M="943".or.M="653"          
          s(48)="19"
          ENDIF
          
       IF M="843".or.M="753".or.M="953".or.M="863".or.M="973".or.M="853".or.M="763".or.M="963".or.M="873".or.M="983"          
          s(48)="20"
          ENDIF      
        
       IF M="654".or.M="854".or.M="764".or.M="964".or.M="874".or.M="754".or.M="954".or.M="864".or.M="974".or.M="765"          
         s(48)="21"
          ENDIF
       
       IF M="984".or.M="865".or.M="975".or.M="876".or.M="986".or.M="965".or.M="875".or.M="985".or.M="976".or.M="987"          
           s(48)="22"
          ENDIF
       
       
       
       ***********************************s(33)
      IF M="111".OR.M="333".OR.M="555".OR.M="777".OR.M="999".OR.M="000".OR.M="222".OR.M="444".OR.M="666".OR.M="888"          
          s(33)="①"
          ENDIF
                  
      IF M="100".OR.M="300".OR.M="500".OR.M="700".OR.M="900".OR.M="200".OR.M="400".OR.M="600".OR.M="800".OR.M="110"          
          s(33)="②"
          ENDIF
      
      IF M="311".OR.M="511".OR.M="711".OR.M="911".OR.M="221".OR.M="211".OR.M="411".OR.M="611".OR.M="811".OR.M="220"          
         s(33)="③"
          ENDIF
      
      IF M="322".OR.M="522".OR.M="722".OR.M="922".OR.M="331".OR.M="422".OR.M="622".OR.M="822".OR.M="330".OR.M="332"          
          s(33)="④"
          ENDIF
      
      IF M="533".OR.M="733".OR.M="933".OR.M="441".OR.M="443".OR.M="433".OR.M="633".OR.M="440".OR.M="833".OR.M="442"          
          s(33)="⑤"
          ENDIF
      
      IF M="544".OR.M="744".OR.M="944".OR.M="551".OR.M="553".OR.M="644".OR.M="844".OR.M="550".OR.M="552".OR.M="554"          
          s(33)="⑥"
          ENDIF
      
      IF M="755".OR.M="955".OR.M="661".OR.M="663".OR.M="665".OR.M="655".OR.M="855".OR.M="660".OR.M="662".OR.M="664"          
          s(33)="⑦"
          ENDIF
          
      IF M="766".OR.M="966".OR.M="771".OR.M="773".OR.M="775".OR.M="866".OR.M="770".OR.M="772".OR.M="774".OR.M="776"          
          s(33)="⑧"
          ENDIF
      
      IF M="977".or.M="881".or.M="863".or.M="885".or.M="887".or.M="877".or.M="880".or.M="882".or.M="884".or.M="886"          
         s(33)="⑨"
          ENDIF
      
      IF M="988".or.M="991".or.M="993".or.M="995".or.M="997".or.M="990".or.M="992".or.M="994".or.M="996".or.M="998"          
           s(33)="⑩"
          ENDIF
      
      IF M="210".or.M="410".or.M="610".or.M="810".or.M="320".or.M="310".or.M="510".or.M="710".or.M="910".or.M="420"          
           s(33)="11"
          ENDIF
      
      IF M="520".or.M="720".or.M="920".or.M="430".or.M="630".or.M="620".or.M="820".or.M="530".or.M="730".or.M="930"          
          s(33)="12"
          ENDIF
      
      IF M="830".or.M="540".or.M="740".or.M="940".or.M="650".or.M="640".or.M="840".or.M="750".or.M="950".or.M="860"          
          s(33)="13"
          ENDIF
      
      
      IF M="850".or.M="760".or.M="960".or.M="870".or.M="980".or.M="970".or.M="321".or.M="521".or.M="721".or.M="921"          
           s(33)="14"
          ENDIF
          
      IF M="421".or.M="621".or.M="821".or.M="531".or.M="731".or.M="431".or.M="631".or.M="831".or.M="541".or.M="741"       
           s(33)="15"
          ENDIF
          
       IF M="931".or.M="641".or.M="841".or.M="751".or.M="951".or.M="941".or.M="651".or.M="851".or.M="761".or.M="961"          
          s(33)="16"
          ENDIF
          
       IF M="861".or.M="971".or.M="432".or.M="632".or.M="832".or.M="871".or.M="981".or.M="532".or.M="732".or.M="932"          
          s(33)="17"
          ENDIF   

       IF M="542".or.M="742".or.M="942".or.M="652".or.M="852".or.M="642".or.M="842".or.M="752".or.M="952".or.M="862"          
          s(33)="18"
          ENDIF   

       IF M="762".or.M="962".or.M="872".or.M="982".or.M="643".or.M="972".or.M="543".or.M="743".or.M="943".or.M="653"          
          s(33)="19"
          ENDIF
          
       IF M="843".or.M="753".or.M="953".or.M="863".or.M="973".or.M="853".or.M="763".or.M="963".or.M="873".or.M="983"