diff --git a/array.bas b/array.bas
index 7524e7c..93dbca7 100644
--- a/array.bas
+++ b/array.bas
@@ -1,5 +1,11 @@
 DIM global(5) AS UByte => { 47h, 4Ch, 4Fh, 42h, 41h, 4Ch }
 
+CLS
+PRINT "@global = "; @global
+PRINT "@global(0) = "; @global(0)
+PRINT "@global DATA PTR = "; PEEK(UInteger, @global + 2 )
+PRINT
+
 subroutine()
 STOP