开启辅助访问
 找回密码
 立即注册
查看: 907|回复: 32
收起左侧

GOM-GEE-hero传奇玩家后台在线人数IP统计系统-全服地图统计-全服等级统计-九五论坛

[复制链接]
  • TA的每日心情
    开心
    2018-4-21 20:41
  • 签到天数: 135 天

    连续签到: 1 天

    [LV.7]常住居民III

    admin 发表于 2017-9-23 11:51:35 | 显示全部楼层 |阅读模式

    GOM-GEE-hero传奇玩家后台在线人数IP统计系统-全服地图统计-全服等级统计-九五论坛
    免费下载地址回复可以见《》
    游客,如果您要查看本帖隐藏内容请回复




    IMG00032.jpg



    1.jpg 2.jpg 3.jpg 4.jpg 5.jpg


    [@main]
    #IF
    #ACT
    CALCVAR HUMAN  httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    CALCVAR HUMAN httj-模式显示1 = <【查看等级统计】/@main>
    CALCVAR HUMAN httj-模式显示2 = <【查看地图统计】/@查看地图统计>
    GOTO @显示等级


    [@显示界面]
    #ACT
    CreateFile ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\统计重复IP.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\统计重复IP.txt
    CALCVAR GLOBAL httj-全服人数 = 0
    CALCVAR GLOBAL httj-全服IP  = 0
    GMEXECUTE 开始提问 @sf1995.com统计全服
    #SAY
    <【全服在线人数】:/SCOLOR=6><$GLOBAL(httj-全服人数)>人   <【全服在线IP】:/SCOLOR=6><$GLOBAL(httj-全服IP)>个  \
    <$HUMAN(httj-统计编号1)>.<$HUMAN(httj-统计显示1)>\
    <$HUMAN(httj-统计编号2)>.<$HUMAN(httj-统计显示2)>\
    <$HUMAN(httj-统计编号3)>.<$HUMAN(httj-统计显示3)>\
    <$HUMAN(httj-统计编号4)>.<$HUMAN(httj-统计显示4)>\
    <$HUMAN(httj-统计编号5)>.<$HUMAN(httj-统计显示5)>\
     \
    <$HUMAN(httj-模式显示1)> <$HUMAN(httj-模式显示2)>\
    <当前:><第><$HUMAN(httj-当前页数)><页>   <[上一页]/@上一页>   <[下一页]/@下一页>       <《返回第一页》/@返回第一页>




    [@上一页]
    #if
    CHECKVAR HUMAN httj-当前页数 > 1
    #act
    CALCVAR HUMAN httj-当前页数 - 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @<$HUMAN(httj-触发代码)>
    [@下一页]
    #act
    CALCVAR HUMAN httj-当前页数 + 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @<$HUMAN(httj-触发代码)>
    [@返回第一页]
    #act
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @<$HUMAN(httj-触发代码)>



    [@显示等级]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-触发代码 = 显示等级
    CALCVAR HUMAN httj-页数计算 = 5
    CALCVAR HUMAN httj-页数计算 * <$HUMAN(httj-当前页数)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号5 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号4 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号3 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号2 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号1 = <$HUMAN(httj-页数计算)>
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com等级.txt 0 S90 N90
    CALCVAR HUMAN httj-等级总数量 = <$STR(N90)>

    #if
    CHECKVAR HUMAN httj-等级总数量 > <$HUMAN(httj-统计编号1)>
    #act
    CALCVAR HUMAN httj-统计编号1 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com等级.txt <$HUMAN(httj-统计编号1)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C1 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 1
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A1 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B1 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C1)>
    SetStringBlank S85 5 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)>级 
    MOV S85 <$HUMAN(httj-临时记录A1)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物1> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B1)>个
    INC S91 <(详细查看)/@查看IP1>
    CALCVAR HUMAN httj-统计显示1 = <$STR(S91)>
    #elseact
    CALCVAR HUMAN httj-统计编号1 + 1

    #if
    CHECKVAR HUMAN httj-等级总数量 > <$HUMAN(httj-统计编号2)>
    #act
    CALCVAR HUMAN httj-统计编号2 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com等级.txt <$HUMAN(httj-统计编号2)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C2 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 2
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A2 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B2 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C2)>
    SetStringBlank S85 5 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)>级 
    MOV S85 <$HUMAN(httj-临时记录A2)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物2> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B2)>个
    INC S91 <(详细查看)/@查看IP2>
    CALCVAR HUMAN httj-统计显示2 = <$STR(S91)>
    #elseact
    CALCVAR HUMAN httj-统计编号2 + 1


    #if
    CHECKVAR HUMAN httj-等级总数量 > <$HUMAN(httj-统计编号3)>
    #act
    CALCVAR HUMAN httj-统计编号3 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com等级.txt <$HUMAN(httj-统计编号3)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C3 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 3
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A3 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C3)>
    SetStringBlank S85 5 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)>级 
    MOV S85 <$HUMAN(httj-临时记录A3)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物3> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B3)>个
    INC S91 <(详细查看)/@查看IP3>
    CALCVAR HUMAN httj-统计显示3 = <$STR(S91)>
    #elseact
    CALCVAR HUMAN httj-统计编号3 + 1


    #if
    CHECKVAR HUMAN httj-等级总数量 > <$HUMAN(httj-统计编号4)>
    #act
    CALCVAR HUMAN httj-统计编号4 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com等级.txt <$HUMAN(httj-统计编号4)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C4 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 4
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A4 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B4 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C4)>
    SetStringBlank S85 5 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)>级 
    MOV S85 <$HUMAN(httj-临时记录A4)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物4> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B4)>个
    INC S91 <(详细查看)/@查看IP4>
    CALCVAR HUMAN httj-统计显示4 = <$STR(S91)>
    #elseact
    CALCVAR HUMAN httj-统计编号4 + 1


    #if
    CHECKVAR HUMAN httj-等级总数量 > <$HUMAN(httj-统计编号5)>
    #act
    CALCVAR HUMAN httj-统计编号5 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com等级.txt <$HUMAN(httj-统计编号5)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C5 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 5
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时等级数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A5 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B5 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C5)>
    SetStringBlank S85 5 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)>级 
    MOV S85 <$HUMAN(httj-临时记录A5)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物5> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B5)>个
    INC S91 <(详细查看)/@查看IP5>
    CALCVAR HUMAN httj-统计显示5 = <$STR(S91)>
    #elseact
    CALCVAR HUMAN httj-统计编号5 + 1

    #if
    CHECKLEVELEX > 0
    #act
    GOTO @显示界面



    [@查看人物1]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C1)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-等级
    [@查看人物2]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C2)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-等级
    [@查看人物3]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C3)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-等级
    [@查看人物4]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C4)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-等级
    [@查看人物5]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C5)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-等级

    [@详细信息查看-等级]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-触发代码 = 详细信息查看-等级
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$HUMAN(httj-详细信息记录)>
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt **不要删除次行** 0
    CALCVAR GLOBAL httj-临时记录 = <$USERNAME>
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt **不要删除次行**
    CALCVAR HUMAN httj-详细信息总数量 = <$STR(N0)>
    CALCVAR HUMAN httj-页数计算 = 5
    CALCVAR HUMAN httj-页数计算 * <$HUMAN(httj-当前页数)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号5 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号4 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号3 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号2 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号1 = <$HUMAN(httj-页数计算)>

    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号1)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号1)> S90
    CALCVAR HUMAN httj-统计显示1 = {<$STR(S90)>/SCOLOR=243}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号2)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号2)> S90
    CALCVAR HUMAN httj-统计显示2 = {<$STR(S90)>/SCOLOR=242}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号3)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号3)> S90
    CALCVAR HUMAN httj-统计显示3 = {<$STR(S90)>/SCOLOR=245}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号4)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号4)> S90
    CALCVAR HUMAN httj-统计显示4 = {<$STR(S90)>/SCOLOR=250}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号5)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号5)> S90
    CALCVAR HUMAN httj-统计显示5 = {<$STR(S90)>/SCOLOR=254}

    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-统计编号1 + 1
    CALCVAR HUMAN httj-统计编号2 + 1
    CALCVAR HUMAN httj-统计编号3 + 1
    CALCVAR HUMAN httj-统计编号4 + 1
    CALCVAR HUMAN httj-统计编号5 + 1
    GOTO @显示界面




    [@查看IP1]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C1)>
    CALCVAR HUMAN httj-临时N变量 = 1
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP
    [@查看IP2]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C2)>
    CALCVAR HUMAN httj-临时N变量 = 2
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP
    [@查看IP3]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C3)>
    CALCVAR HUMAN httj-临时N变量 = 3
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP
    [@查看IP4]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C4)>
    CALCVAR HUMAN httj-临时N变量 = 4
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP
    [@查看IP5]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-详细信息记录 = <$HUMAN(httj-临时记录C5)>
    CALCVAR HUMAN httj-临时N变量 = 5
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP

    [@详细信息查看-IP]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-触发代码 = 详细信息查看-IP
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$HUMAN(httj-详细信息记录)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-检测IP = <$USERNAME>
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$IPADDR>.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$IPADDR>.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量<$HUMAN(httj-临时N变量)>.txt **不要删除次行**
    CALCVAR HUMAN httj-详细信息总数量 = <$STR(N0)>
    CALCVAR HUMAN httj-页数计算 = 5
    CALCVAR HUMAN httj-页数计算 * <$HUMAN(httj-当前页数)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号5 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号4 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号3 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号2 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号1 = <$HUMAN(httj-页数计算)>
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号1)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量<$HUMAN(httj-临时N变量)>.txt <$HUMAN(httj-统计编号1)> S90
    GetStringPos  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$STR(S90)>.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录D1 = <$STR(S90)>
    MOV S85 <$STR(S90)>
    SetStringBlank S85 17 1
    MOV S91  <$STR(S85)>
    INC S91 <所包含的在线人物:/SCOLOR=254>
    MOV S85 <$STR(N0)>人
    SetStringBlank S85 5 1
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看IP人物1> 
    CALCVAR HUMAN httj-统计显示1 = <$STR(S91)>


    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号2)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量<$HUMAN(httj-临时N变量)>.txt <$HUMAN(httj-统计编号2)> S90
    GetStringPos  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$STR(S90)>.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录D2 = <$STR(S90)>
    MOV S85 <$STR(S90)>
    SetStringBlank S85 17 1
    MOV S91  <$STR(S85)>
    INC S91 <所包含的在线人物:/SCOLOR=254>
    MOV S85 <$STR(N0)>人
    SetStringBlank S85 5 1
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看IP人物2> 
    CALCVAR HUMAN httj-统计显示2 = <$STR(S91)>


    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号3)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量<$HUMAN(httj-临时N变量)>.txt <$HUMAN(httj-统计编号3)> S90
    GetStringPos  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$STR(S90)>.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录D3 = <$STR(S90)>
    MOV S85 <$STR(S90)>
    SetStringBlank S85 17 1
    MOV S91  <$STR(S85)>
    INC S91 <所包含的在线人物:/SCOLOR=254>
    MOV S85 <$STR(N0)>人
    SetStringBlank S85 5 1
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看IP人物3> 
    CALCVAR HUMAN httj-统计显示3 = <$STR(S91)>


    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号4)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量<$HUMAN(httj-临时N变量)>.txt <$HUMAN(httj-统计编号4)> S90
    GetStringPos  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$STR(S90)>.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录D4 = <$STR(S90)>
    MOV S85 <$STR(S90)>
    SetStringBlank S85 17 1
    MOV S91  <$STR(S85)>
    INC S91 <所包含的在线人物:/SCOLOR=254>
    MOV S85 <$STR(N0)>人
    SetStringBlank S85 5 1
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看IP人物4> 
    CALCVAR HUMAN httj-统计显示4 = <$STR(S91)>


    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号5)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量<$HUMAN(httj-临时N变量)>.txt <$HUMAN(httj-统计编号5)> S90
    GetStringPos  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$STR(S90)>.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录D5 = <$STR(S90)>
    MOV S85 <$STR(S90)>
    SetStringBlank S85 17 1
    MOV S91  <$STR(S85)>
    INC S91 <所包含的在线人物:/SCOLOR=254>
    MOV S85 <$STR(N0)>人
    SetStringBlank S85 5 1
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看IP人物5> 
    CALCVAR HUMAN httj-统计显示5 = <$STR(S91)>


    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-统计编号1 + 1
    CALCVAR HUMAN httj-统计编号2 + 1
    CALCVAR HUMAN httj-统计编号3 + 1
    CALCVAR HUMAN httj-统计编号4 + 1
    CALCVAR HUMAN httj-统计编号5 + 1
    GOTO @显示界面






    [@查看IP人物1]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR GLOBAL httj-检测IP = <$HUMAN(httj-临时记录D1)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP人物
    [@查看IP人物2]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR GLOBAL httj-检测IP = <$HUMAN(httj-临时记录D2)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP人物
    [@查看IP人物3]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR GLOBAL httj-检测IP = <$HUMAN(httj-临时记录D3)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP人物
    [@查看IP人物4]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR GLOBAL httj-检测IP = <$HUMAN(httj-临时记录D4)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP人物
    [@查看IP人物5]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR GLOBAL httj-检测IP = <$HUMAN(httj-临时记录D5)>
    CALCVAR HUMAN httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    GOTO @详细信息查看-IP人物

    [@详细信息查看-IP人物]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-触发代码 = 详细信息查看-IP人物
    CALCVAR GLOBAL httj-临时记录 = <$USERNAME>
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计IP人物数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt **不要删除次行**
    CALCVAR HUMAN httj-详细信息总数量 = <$STR(N0)>
    CALCVAR HUMAN httj-页数计算 = 5
    CALCVAR HUMAN httj-页数计算 * <$HUMAN(httj-当前页数)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号5 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号4 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号3 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号2 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号1 = <$HUMAN(httj-页数计算)>
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号1)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号1)> S90
    CALCVAR HUMAN httj-统计显示1 = {<$STR(S90)>/SCOLOR=243}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号2)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号2)> S90
    CALCVAR HUMAN httj-统计显示2 = {<$STR(S90)>/SCOLOR=242}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号3)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号3)> S90
    CALCVAR HUMAN httj-统计显示3 = {<$STR(S90)>/SCOLOR=245}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号4)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号4)> S90
    CALCVAR HUMAN httj-统计显示4 = {<$STR(S90)>/SCOLOR=250}
    #if
    CHECKVAR HUMAN httj-详细信息总数量 > <$HUMAN(httj-统计编号5)>
    #act
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时信息.txt <$HUMAN(httj-统计编号5)> S90
    CALCVAR HUMAN httj-统计显示5 = {<$STR(S90)>/SCOLOR=254}


    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-统计编号1 + 1
    CALCVAR HUMAN httj-统计编号2 + 1
    CALCVAR HUMAN httj-统计编号3 + 1
    CALCVAR HUMAN httj-统计编号4 + 1
    CALCVAR HUMAN httj-统计编号5 + 1
    GOTO @显示界面


    [@查看地图统计]
    #IF
    #ACT
    CALCVAR HUMAN  httj-当前页数 = 1
    CALCVAR HUMAN httj-统计显示1 =  
    CALCVAR HUMAN httj-统计显示2 =  
    CALCVAR HUMAN httj-统计显示3 =  
    CALCVAR HUMAN httj-统计显示4 =  
    CALCVAR HUMAN httj-统计显示5 =  
    CALCVAR HUMAN httj-模式显示1 = <【查看等级统计】/@main>
    CALCVAR HUMAN httj-模式显示2 = <【查看地图统计】/@查看地图统计>
    GOTO @开始查看地图统计

    [@开始查看地图统计]
    #if
    CHECKLEVELEX > 0
    #act
    CALCVAR HUMAN httj-触发代码 = 开始查看地图统计
    CALCVAR HUMAN httj-页数计算 = 5
    CALCVAR HUMAN httj-页数计算 * <$HUMAN(httj-当前页数)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号5 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号4 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号3 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号2 = <$HUMAN(httj-页数计算)>
    CALCVAR HUMAN httj-页数计算 - 1
    CALCVAR HUMAN httj-统计编号1 = <$HUMAN(httj-页数计算)>
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com地图.txt 0 S90 N90
    CALCVAR HUMAN httj-地图总数量 = <$STR(N90)>

    #if
    CHECKVAR HUMAN httj-地图总数量 > <$HUMAN(httj-统计编号1)>
    #act
    CALCVAR HUMAN httj-统计编号1 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com地图.txt <$HUMAN(httj-统计编号1)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C1 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 1
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A1 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量1.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B1 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C1)>
    SetStringBlank S85 10 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)> 
    MOV S85 <$HUMAN(httj-临时记录A1)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物1> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B1)>个
    INC S91 <(详细查看)/@查看IP1>
    CALCVAR HUMAN httj-统计显示1 = <$STR(S91)>
    #ELSEACT
    CALCVAR HUMAN httj-统计编号1 + 1

    #if
    CHECKVAR HUMAN httj-地图总数量 > <$HUMAN(httj-统计编号2)>
    #act
    CALCVAR HUMAN httj-统计编号2 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com地图.txt <$HUMAN(httj-统计编号2)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C2 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 2
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A2 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量2.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B2 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C2)>
    SetStringBlank S85 10 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)> 
    MOV S85 <$HUMAN(httj-临时记录A2)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物2> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B2)>个
    INC S91 <(详细查看)/@查看IP2>
    CALCVAR HUMAN httj-统计显示2 = <$STR(S91)>
    #ELSEACT
    CALCVAR HUMAN httj-统计编号2 + 1

    #if
    CHECKVAR HUMAN httj-地图总数量 > <$HUMAN(httj-统计编号3)>
    #act
    CALCVAR HUMAN httj-统计编号3 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com地图.txt <$HUMAN(httj-统计编号3)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C3 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 3
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A3 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量3.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B3 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C3)>
    SetStringBlank S85 10 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)> 
    MOV S85 <$HUMAN(httj-临时记录A3)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物3> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B3)>个
    INC S91 <(详细查看)/@查看IP3>
    CALCVAR HUMAN httj-统计显示3 = <$STR(S91)>
    #ELSEACT
    CALCVAR HUMAN httj-统计编号3 + 1

    #if
    CHECKVAR HUMAN httj-地图总数量 > <$HUMAN(httj-统计编号4)>
    #act
    CALCVAR HUMAN httj-统计编号4 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com地图.txt <$HUMAN(httj-统计编号4)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C4 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 4
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A4 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量4.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B4 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C4)>
    SetStringBlank S85 10 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)> 
    MOV S85 <$HUMAN(httj-临时记录A4)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物4> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B4)>个
    INC S91 <(详细查看)/@查看IP4>
    CALCVAR HUMAN httj-统计显示4 = <$STR(S91)>
    #ELSEACT
    CALCVAR HUMAN httj-统计编号4 + 1

    #if
    CHECKVAR HUMAN httj-地图总数量 > <$HUMAN(httj-统计编号5)>
    #act
    CALCVAR HUMAN httj-统计编号5 + 1
    GetListString ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com地图.txt <$HUMAN(httj-统计编号5)> S90
    CALCVAR GLOBAL httj-<$USERNAME>-检测条件 = <$STR(S90)>
    CALCVAR HUMAN  httj-临时记录C5 = <$STR(S90)>
    CALCVAR GLOBAL httj-临时名字 = <$USERNAME>
    CALCVAR GLOBAL httj-临时记录 = ****
    CALCVAR GLOBAL httj-临时数值 = 5
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行** 0
    CreateFile     ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt
    ClearNameList ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt
    AddTextListex  ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt **不要删除次行** 0
    GMEXECUTE 开始提问 @sf1995.com统计详细数据
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时地图数量.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录A5 = <$STR(N0)>
    GetStringPos   ..\QuestDiary\sf1995.com九五版本库\sf1995-com后台统计系统\sf1995.com数据文件(开区清空)\<$USERNAME>-临时IP数量5.txt **不要删除次行**
    CALCVAR HUMAN httj-临时记录B5 = <$STR(N0)>
    MOV S85 <$HUMAN(httj-临时记录C5)>
    SetStringBlank S85 10 0
    MOV S91  <全服/SCOLOR=250>
    INC S91 <$STR(S85)> 
    MOV S85 <$HUMAN(httj-临时记录A5)>人
    SetStringBlank S85 6 1
    INC S91 <在线人物:/SCOLOR=254>
    INC S91 <$STR(S85)>
    INC S91 <(详细查看)/@查看人物5> 
    INC S91 <IP数:/SCOLOR=253>
    INC S91 <$HUMAN(httj-临时记录B5)>个
    INC S91 <(详细查看)/@查看IP5>
    CALCVAR HUMAN httj-统计显示5 = <$STR(S91)>
    #ELSEACT
    CALCVAR HUMAN httj-统计编号5 + 1

    #if
    CHECKLEVELEX > 0
    #act
    GOTO @显示界面







    该用户从未签到

    成追忆 发表于 2017-9-23 11:54:59 来自手机 | 显示全部楼层
    GEE的版本数量快超过GOM的了
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    elfweio 发表于 2017-9-23 18:38:41 | 显示全部楼层
    现在传奇一条龙开服还好开吗?
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2018-7-10 19:20
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]偶尔看看I

    7755798 发表于 2017-9-23 19:31:02 | 显示全部楼层
    传奇私服论坛九五论坛
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    擦汗
    7 天前
  • 签到天数: 139 天

    连续签到: 1 天

    [LV.7]常住居民III

    sotper 发表于 2017-9-23 21:26:57 | 显示全部楼层
    九五论坛回归老域名sf1995
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    wasd1986 发表于 2017-9-24 12:35:51 来自手机 | 显示全部楼层
    想学习传奇方面的技术,不知道现在哪个引擎好学呢,
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2018-9-17 21:06
  • 签到天数: 72 天

    连续签到: 1 天

    [LV.6]常住居民II

    天总会晴 发表于 2017-9-24 15:35:20 | 显示全部楼层
    55555555555555555555555555555555555
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    ZG3 发表于 2017-9-25 17:31:34 | 显示全部楼层
    现在传奇一条龙开服还好开吗?
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    传奇爱好者 发表于 2017-9-25 22:43:40 来自手机 | 显示全部楼层
    想学习传奇方面的技术,不知道现在哪个引擎好学呢,
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    2017-9-16 00:34
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]初来乍到

    swatyet 发表于 2017-9-26 00:02:54 | 显示全部楼层
    下载备用,谢谢楼主
    回复 支持 反对

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则



    QQ|传奇爱好者|传奇版本|手机版|传奇一条龙|九五论坛

    GMT+8, 2018-10-21 17:46 , Processed in 1.638003 second(s), 31 queries , Gzip On.

    快速回复 返回顶部 返回列表