home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 - Expo 2000 / Image.iso / cserve / startnt3.exe / startnt3.dxr / DEVELOP.CST_1.ls < prev    next >
Encoding:
Text File  |  1996-12-09  |  1.5 KB  |  62 lines
  1. on caseStruct
  2.   global gMachine
  3.   case gMachine of
  4.     "WIN_16":
  5.     "WIN_32":
  6.     "MAC_68", "MAC_PPC":
  7.   end case
  8. end
  9.  
  10. on g
  11.   mShowGlobals()
  12. end
  13.  
  14. on mShowGlobals
  15.   global gMachine, gSound, gMultiSound, gIcon, gLevel, gExpert, gWeg_N, gZiel_N, gNode, gDirection, gDRoll
  16.   put "Maschinentyp            gMachine:         " & gMachine
  17.   put "Sound an?                gSound:             " & gSound
  18.   put "SoundkanΓÇ░le > 1        gMultiSound:     " & gMultiSound
  19.   put "ΓÇ╣ber Icon gelaufen        gIcon:                 " & gIcon
  20.   put "Anzahl der Tasks        gLevel:             " & gLevel
  21.   put "Expertenmodus            gExpert:             " & gExpert
  22.   put "???                        gWeg_N    :         " & gWeg_N
  23.   put "Zielknoten                gZiel_N:             " & gZiel_N
  24.   put "Aktueller Knoten        gNode:             " & gNode
  25.   put "Akt. Richtung            gDirection:         " & gDirection
  26.   put "DoubleRoll                gDRoll:             " & gDRoll
  27.   put "gSound: " & gSound
  28.   put "gSound: " & gSound
  29.   put "gSound: " & gSound
  30.   put "gSound: " & gSound
  31.   put "gSound: " & gSound
  32.   put "gSound: " & gSound
  33.   put "gSound: " & gSound
  34.   put "gSound: " & gSound
  35.   put "gSound: " & gSound
  36.   put "gSound: " & gSound
  37.   put "gSound: " & gSound
  38. end
  39.  
  40. on t
  41.   mTraceLogFile()
  42. end
  43.  
  44. on mTraceLogFile
  45.   set the traceLogFile to the pathName & "TRACE.TXT"
  46.   put "NEU --------- " & the date & "--------" & the time
  47. end
  48.  
  49. on c
  50.   set the traceLogFile to EMPTY
  51. end
  52.  
  53. on e
  54.   global ERR_01, ERR_02, ERR_03, ERR_04, ERR_05, ERR_06, ERR_07, ERR_08, ERR_09, ERR_10, ERR_11, ERR_12, ERR_13, ERR_14, ERR_15
  55.   repeat with i = 1 to 9
  56.     put "ERR_MSG_0" & i & "  " & "ERR_0" & i
  57.   end repeat
  58.   repeat with i = 10 to 15
  59.     put "ERR_MSG_" & i & "  " & "ERR_ " & i
  60.   end repeat
  61. end
  62.