Array bounds error? Does Ada start counting array indices at 0 or 1? That's a common mistake no matter what language you use.

Hard to debug this without knowing Ada and knowing what the Drawn function is doing, etc.