RosettaCodeData/Task/Enumerations/FreeBASIC/enumerations.basic

' FB 1.05.0 Win64

Enum Animals
  Cat
  Dog
  Zebra
End Enum

Enum Dogs
  Bulldog = 1
  Terrier = 2
  WolfHound = 4
End Enum

Print Cat, Dog, Zebra
Print Bulldog, Terrier, WolfHound
Sleep