home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Games / GameTracker / scripts / return.rc < prev    next >
Encoding:
Text File  |  2000-07-18  |  1.4 KB  |  72 lines
  1. stack 250000
  2. run <>nil: Play16 $returnsnd
  3.  
  4. requestchoice TITLE "GameTracker by SuRgEoN" BODY "" A-Refr Refr Conn Spec Rules "SQuery" Filter "MQuery" Quit >env:Input
  5.  
  6. run <>nil: Play16 $buttonsnd
  7.  
  8. if $Input eq 1
  9.    setenv qwbautoref 1
  10.    echo "autorefresh enabled: updating every $arefreshtime seconds ..."
  11.    run <nil: execute scripts/autorefresh.rc
  12.    execute scripts/autorefresh_pop.rc
  13. endif
  14.  
  15. if $Input eq 2
  16.    setenv qwbautoref 0
  17.    execute scripts/refresh.rc
  18. endif
  19.  
  20. if $Input eq 3
  21.    setenv qwbautoref 0
  22.    setenv spectator "+spectator 0"
  23.    execute $qwbpath
  24.    cd GameTracker:
  25.    execute scripts/return.rc
  26. endif
  27.  
  28. if $Input eq 4
  29.    setenv qwbautoref 0
  30.    setenv spectator "+spectator 1"
  31.    execute $qwbpath
  32.    cd GameTracker:
  33.    execute scripts/return.rc
  34. endif
  35.  
  36. if $Input eq 5
  37.    setenv qwbautoref 0
  38.    qstat -R -Ts templ/rules $qwbgame $Address
  39.    run <>nil: Play16 $qstatsnd
  40.    execute scripts/sqoptions.rc
  41. endif
  42.  
  43. if $Input eq 6
  44.    setenv qwbautoref 0
  45.    execute scripts/server.rc
  46. endif
  47.  
  48. if $Input eq 7
  49.    setenv qwbautoref 0
  50.    execute scripts/initfilters.rc
  51. endif
  52.  
  53. if $Input eq 8
  54.    setenv qwbautoref 0
  55.  IF $reqfilter EQ 0
  56.    execute scripts/userfilter_all.rc
  57.  ENDIF
  58.  IF $reqfilter EQ 1
  59.    execute scripts/userfilter_noempty.rc
  60.  ENDIF
  61. endif
  62.  
  63. if $Input eq 0
  64.    setenv qwbautoref 0
  65.    run <>nil: Play16 $quitsnd
  66.    execute scripts/cleanup.rc
  67.    cd ram:
  68.    assign GameTracker: remove >NIL:
  69.    delete ram:GameTracker ALL >NIL:
  70.    endcli
  71. endif
  72.