home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / DND29C4.ZIP / SOURCE.ZIP / COMMON.INC < prev    next >
Encoding:
Text File  |  1992-12-24  |  6.5 KB  |  253 lines
  1.  Rem common.inc v2.9c
  2.  
  3. Common Shared_
  4.  Action.Prompt As String,_
  5.  Allow.Break As Integer,_
  6.  Auto.Break As Integer,_
  7.  Auto.Mode As Integer,_
  8.  Avatar.Code As Integer,_
  9.  BBS.Name As String,_
  10.  Blank.Menu As Integer,_
  11.  Blank.Screen As Integer,_
  12.  Break As Integer,_
  13.  Buffer As String,_
  14.  Bypass.CodeName As String,_
  15.  Bypass.Login As Integer,_
  16.  Bypass.Screen As Integer,_
  17.  Carriage.Input As Integer,_
  18.  Carriage.Return As Integer,_
  19.  Catalog.FileName As String,_
  20.  Chained As Integer,_
  21.  Chat As Integer,_
  22.  Chat.Annoy As Integer,_
  23.  Chat.Flag As Integer,_
  24.  Choice As Integer,_
  25.  CodeName.Temp As String,_
  26.  Color.Code As Integer,_
  27.  Color.Graphics As Integer,_
  28.  Column As Integer,_
  29.  Data.Error As Integer,_
  30.  Data.Path As String,_
  31.  Day.File.FileName As String,_
  32.  Day.Log.FileName As String,_
  33.  Direction As Integer,_
  34.  Disable.DM As Integer,_
  35.  DND.Path As String,_
  36.  Door.FileName As String,_
  37.  Door.Name As String,_
  38.  Door.Time As Single,_
  39.  DMhelp.Filename As String,_
  40.  DOS.Exit As String,_
  41.  Dungeon.Master As Integer,_
  42.  Dungeon.Master.Assistant As Integer,_
  43.  Echo As Integer,_
  44.  Extended.ANSI As Integer,_
  45.  FileName As String,_
  46.  Follow.Mode As Integer,_
  47.  Func.Buffer As String,_
  48.  Governor As Integer,_
  49.  Graphics.Off As Integer,_
  50.  Graphics.Status As Integer,_
  51.  Guild.Master As Integer,_
  52.  Help.FileName As String,_
  53.  HelpRecord1 As HelpType1,_
  54.  HelpRecord2 As HelpType2,_
  55.  Hidden.Player As Integer,_
  56.  Hide As Integer,_
  57.  Hint.FileName As String,_
  58.  Inregs As RegType,_
  59.  InregsX As RegTypeX,_
  60.  Inserting As Integer,_
  61.  Intoxicated As Integer,_
  62.  Invisible As Integer,_
  63.  Last.Command As String,_
  64.  Last.Command.Number As Integer,_
  65.  Last.Command.Type As Integer,_
  66.  Last.Monster As String,_
  67.  LastUser.FileName As String,_
  68.  Line.Length As Integer,_
  69.  Line.Limit As Integer,_
  70.  Line.Number As Integer,_
  71.  Lines.Scrolled As Integer,_
  72.  Local.Avatar As Integer,_
  73.  Local.Mode As Integer,_
  74.  Log.FileName As String,_
  75.  Logged.In As Integer,_
  76.  Logoff.FileName As String,_
  77.  Logon.Help.FileName As String,_
  78.  LogRecord As LogType,_
  79.  Lost.Carrier As Integer,_
  80.  Magic.Spell As Integer,_
  81.  Max.Lines As Integer,_
  82.  Max.Row As Integer,_
  83.  Message.Base As String,_
  84.  Message.Base.Name As String,_
  85.  Message.Base.Number As Integer,_
  86.  Message.Length As Integer,_
  87.  Message.Name As String,_
  88.  Message.Stat As String,_
  89.  Message.To As String,_
  90.  Message1 As String,_
  91.  MessageBaseRecord As MessageBaseType,_
  92.  MessageRecord As MessageType,_
  93.  MessWorkRecord1 As MessType1,_
  94.  MessWorkRecord2 As MessType2,_
  95.  Modem.Baud As Integer,_
  96.  Monclass As Integer,_
  97.  Monclass.Max As Integer,_
  98.  MonclassRecord As MonclassType,_
  99.  Monster.Cycle As Integer,_
  100.  Monster.Number As Integer,_
  101.  Monster.Rate1 As Integer,_
  102.  Monster.Rate2 As Integer,_
  103.  Monster.Temp As Integer,_
  104.  Monsters.Killed As Integer,_
  105.  MonsterRecord As MonsterType,_
  106.  MonsterTalkRecord As MonsterTalkType,_
  107.  Multiplier As Integer,_
  108.  New.Room As Integer,_
  109.  NewMessages As NewMessagesType,_
  110.  Next.Field As Integer,_
  111.  Next.Room As Integer,_
  112.  No As Integer,_
  113.  No.Echo As Integer,_
  114.  No.Input As Integer,_
  115.  No.Input.Echo As Integer,_
  116.  No.Input.Out As String,_
  117.  Node As Integer,_
  118.  Noden As Integer,_
  119.  Nonplayer.Number As Integer,_
  120.  Nonplyrs.Max As Integer,_
  121.  Normal.User As Integer,_
  122.  Notice.FileName As String,_
  123.  Number.Appearing As Integer,_
  124.  Number.Inventory As Integer,_
  125.  Number.Monsters As Integer,_
  126.  Number.MonstersMax As Integer,_
  127.  Number.Users As Integer,_
  128.  Number.UsersMax As Integer,_
  129.  Object.Index As Integer,_
  130.  Object.Number As Integer,_
  131.  ObjectRecord As ObjectType,_
  132.  Out2 As String,_
  133.  Out3 As String,_
  134.  Out4 As String,_
  135.  Out5 As String,_
  136.  Out6 As String,_
  137.  Out7 As String,_
  138.  Out8 As String,_
  139.  Out9 As STring,_
  140.  OutZ As String,_
  141.  Outregs As RegType,_
  142.  OutregsX As RegTypeX,_
  143.  Parse.Temp As Integer,_
  144.  Parsed.Command1 As String,_
  145.  Parsed.Command2 As String,_
  146.  Parser As Integer,_
  147.  Pass.Door As Integer,_
  148.  PassWord.Temp As String,_
  149.  Players.Killed As Integer,_
  150.  Port As Integer,_
  151.  Port.Override As Integer,_
  152.  Prefix1 As String,_
  153.  Prefix2 As String,_
  154.  Prelog.FileName As String,_
  155.  Previous.Command As Integer,_
  156.  Previous.Command1 As String,_
  157.  Previous.Command2 As String,_
  158.  Previous.Command3 As String,_
  159.  Psi.Attack.Mode As Integer,_
  160.  Psi.Defense.Mode As Integer,_
  161.  RecepRec As RecepType,_
  162.  Relogging As Integer,_
  163.  Remote As Integer,_
  164.  Room As Integer,_
  165.  Room.Action As Integer,_
  166.  Room.Health.Rate As Integer,_
  167.  Room.Index As Integer,_
  168.  Room.Link As Integer,_
  169.  Room.Monclass As Integer,_
  170.  Room.Monster.Rate As Integer,_
  171.  Room.Number As Integer,_
  172.  Room.Objects As Integer,_
  173.  Room.Rate As Integer,_
  174.  Room.Rust.Rate As Integer,_
  175.  Room.Steal.Rate As Integer,_
  176.  Room.Treasure As Integer,_
  177.  Room.Treasure.Max As Integer,_
  178.  RoomRecord As RoomType,_
  179.  Row As Integer,_
  180.  Rust.Rate As Integer,_
  181.  Security.Guard As Integer,_
  182.  Selection As Integer,_
  183.  Shelled As Integer,_
  184.  Sorting As Integer,_
  185.  Spell.Number As Integer,_
  186.  SpellRecord As SpellType,_
  187.  Spells.Max As Integer,_
  188.  Statusline.Mode As Integer,_
  189.  Steal.Rate As Integer,_
  190.  Stored.Parsed.Command1 As String,_
  191.  Stored.Parsed.Command2 As String,_
  192.  Strng As String,_
  193.  Strng1 As String,_
  194.  Strng2 As String,_
  195.  Strng3 As String,_
  196.  Subject As String,_
  197.  Summary.FileName As String,_
  198.  Sysop As Integer,_
  199.  TableRecord As TableType,_
  200.  Teleported As Integer,_
  201.  Temp, Temp!, Temp$,_
  202.  Temp.Command As String,_
  203.  Temp.FileName As String,_
  204.  Temp.Index As Integer,_
  205.  Temp.User.Index As Integer,_
  206.  Temp1, Temp2, Temp3,_
  207.  Temp4, Temp5, Temp6,_
  208.  Temp7, Temp8, Temp9,_
  209.  TempA$, TempA,_
  210.  TempB$, TempB,_
  211.  TempC$, TempC,_
  212.  TempD$, TempD,_
  213.  TempX$, TempX,_
  214.  Timeon As Single,_
  215.  Time.Left As Single,_
  216.  Time.On As String,_
  217.  Time.Override As Integer,_
  218.  Temp.Time As Single,_
  219.  Token As Integer,_
  220.  Token.Index As Integer,_
  221.  Town.Mayor As Integer,_
  222.  Treasure.Index As Integer,_
  223.  Treasure.Max As Integer,_
  224.  Treasure.Number As Integer,_
  225.  TreasureRecord As TreasureType,_
  226.  Two.Minutes.Left As Integer,_
  227.  User.Command As String,_
  228.  User.Index As Integer,_
  229.  User.Number As Integer,_
  230.  User.Temp As Integer,_
  231.  UserRecord As UserType,_
  232.  Users.Max As Integer,_
  233.  Vehicle1, Vehicle2, Vehicle3,_
  234.  Video.Page As Integer,_
  235.  Wait.Mode As Integer,_
  236.  Weapon1 As Integer,_
  237.  Weapon2 As Integer,_
  238.  Weapon3 As Integer,_
  239.  Weapon4 As Integer,_
  240.  Weapon5 As Integer,_
  241.  Weapon6 As Integer,_
  242.  Weapon7 As Integer,_
  243.  Weapon8 As Integer,_
  244.  Weapon9 As Integer,_
  245.  Weapon10 As Integer,_
  246.  Weight As Integer,_
  247.  Welcome.FileName As String,_
  248.  Word.Wrap As Integer,_
  249.  Word.Wrapped As Integer,_
  250.  Xcoor As Integer,_
  251.  Ycoor As Integer,_
  252.  Yes As Integer
  253.