Why does this print only the Z part of the alphabet?
Dim Ingredient$(200)
Count = 0
Repeat
inc count
Read Ingredient$(Count)
Until Ingredient$(Count) = "0"
For n=0 to Count
For nn=n to Count
if Ingredient$(n)>Ingredient$(nn)
temp_Ingredient$=Ingredient$(nn)
Ingredient$(nn)=Ingredient$(n)
Ingredient$(n)=temp_Ingredient$
endif
Next nn
Next n
Print Count
For n = 1 to count
Print Ingredient$(Count) + " ";
next n
Wait 4000
Data "Cat Whiskers","Dragon Scales","Frog's Breath","Fairy Tears","Dragon Claws"
Data "Wolf Blood","Crow's Beak","Willow Leaves","Monkey Brain"
Data "Butterfly Wings","Fish Scales","Lobster Claws","Lion Mane"
Data "Skunk Tail","Baby Vomit","Rose Petals","Lock of Hair"
Data "Goat Beard","Dog's Milk","Tiger Tail","Lilly Leaf","Frog's Spawn"
Data "Lemon Juice","Slug Slime","Snail Shell","Emu Eyes","Mole Claws"
Data "Camel Spit","Dragonfly Wings","Octopus Ink","Jellyfish"
Data "Starfish","Goat Horn","Rhino Horn","Shark Oil","Shark's Tooth"
Data "Fur Cones","Spider's Web","Vulture Eggs","Troll's Beard"
Data "Gremlin Warts","Toad's Warts","Toadstools","Magic Mushrooms"
Data "Pheonix Feathers","Peacock Feathers","Whale Blubber"
Data "Moth's Wings","Red Ants","Squirrel Tail","Fox Tail","Llama Spit"
Data "Pig Snout","Rabbit Tail","Gecko Skin","Snake Skin","Sands Of Time"
Data "Mermaid Scales","Pigeon Droppings","Rabbit Droppings","Rat Droppings"
Data "Electric Eel","Puffer Fish","Beanie Babies","Penguin Vomit"
Data "Dolphin Nose","Jumpimg Beans","Pigmy Vomit","Corpse Ashes","Rat Skulls"
Data "Mummy's Hand","Vampire's Tooth","Mammoth Hair","Badger's Nose"
Data "Zombies Eye","Dragon Fire","Ancient Scrolls","Mad Man's Diary"
Data "Poison Pickle","Ginger Hair","Pirate Skull","Hyena's Laugh"
Data "Mongoose Ears","Beetle Juice","African Amber","Pirate's Doubloon"
Data "0"
Oh silly Me!!!
Used Count instead of N.