> LIST
Option base 1
Dim float keyret
Dim float keymap(3,4) = (1,4,7,10, 2,5,8,0, 3,6,9,11)
Keypad keymap(), keyret, myint, gp1, 3, gp4, 4

Do
 ' main processing loop
Loop

Sub myint
  Print keyret
End Sub

End

RUN
[4] Keypad keymap(), keyret, myint, gp1, 3, gp4, 4
Error : Invalid syntax

Option base 0
Dim keyret
'Standard 4x4 keypad layout 1,2,3,A - 4,5,6,B - 7,8,9,C - *,0,#,D
Dim keymap$(23) = ("0","1","2","3","4","5","6","7","8","9","*","#","","","","","","","","","A","B","C","D")
' HEX 4x4 keypad layout 0,1,2,3 - 4,5,6,7 - 8,9,A,B - C,D,E,F
'Dim keymap$(23) = ("D","0","1","2","4","5","6","8","9","A","C","E","","","","","","","","","3","7","B","F")
'or for integer HEX value
'Dim integer keymap(23) = (13,0,1,2,4,5,6,8,9,10,12,14,0,0,0,0,0,0,0,0,3,7,11,15)

Keypad keyret, keyint, gp0,gp1, gp2, gp3, gp4, gp5, gp6, gp7

Do
 ' main processing loop
Loop

Sub keyint
  Print keyret, keymap$(keyret)
End Sub

End

'test variatble space
OPTION EXPLICIT
OPTION DEFAULT integer

dim a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z
dim a1,b1,c1,d1,e1,f1,g1,h1,i1,j1,k1,l1,m1,n1,o1,p1,q1,r1,s1,t1,u1,v1,w1,x1,y1,z1
dim a2,b2,c2,d2,e2,f2,g2,h2,i2,j2,k2,l2,m2,n2,o2,p2,q2,r2,s2,t2,u2,v2,w2,x2,y2,z2
dim a3,b3,c3,d3,e3,f3,g3,h3,i3,j3,k3,l3,m3,n3,o3,p3,q3,r3,s3,t3,u3,v3,w3,x3,y3,z3
dim a4,b4,c4,d4,e4,f4,g4,h4,i4,j4,k4,l4,m4,n4,o4,p4,q4,r4,s4,t4,u4,v4,w4,x4,y4,z4
dim a5,b5,c5,d5,e5,f5,g5,h5,i5,j5,k5,l5,m5,n5,o5,p5,q5,r5,s5,t5,u5,v5,w5,x5,y5,z5
dim a6,b6,c6,d6,e6,f6,g6,h6,i6,j6,k6,l6,m6,n6,o6,p6,q6,r6,s6,t6,u6,v6,w6,x6,y6,z6
dim a7,b7,c7,d7,e7,f7,g7,h7,i7,j7,k7,l7,m7,n7,o7,p7,q7,r7,s7,t7,u7,v7,w7,x7,y7,z7
dim a8,b8,c8,d8,e8,f8,g8,h8,i8,j8,k8,l8,m8,n8,o8,p8,q8,r8,s8,t8,u8,v8,w8,x8,y8,z8
dim a9,b9,c9,d9,e9,f9,g9,h9,i9,j9,k9,l9,m9,n9,o9,p9,q9,r9,s9,t9,u9',v9,w9,x9,y9,z9

hello
memory
end

sub hello
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z
local a1,b1,c1,d1,e1,f1,g1,h1,i1,j1,k1,l1,m1,n1,o1,p1,q1,r1,s1,t1,u1,v1,w1,x1,y1,z1
local a2,b2,c2,d2,e2,f2,g2,h2,i2,j2,k2,l2,m2,n2,o2,p2,q2,r2,s2,t2,u2,v2,w2,x2,y2,z2
local a3,b3,c3,d3,e3,f3,g3,h3,i3,j3,k3,l3,m3,n3,o3,p3,q3,r3,s3,t3,u3,v3,w3,x3,y3,z3
local a4,b4,c4,d4,e4,f4,g4,h4,i4,j4,k4,l4,m4,n4,o4,p4,q4,r4,s4,t4,u4,v4,w4,x4,y4,z4
local a5,b5,c5,d5,e5,f5,g5,h5,i5,j5,k5,l5,m5,n5,o5,p5,q5,r5,s5,t5,u5,v5,w5,x5,y5,z5
local a6,b6,c6,d6,e6,f6,g6,h6,i6,j6,k6,l6,m6,n6,o6,p6,q6,r6,s6,t6,u6,v6,w6,x6,y6,z6
local a7,b7,c7,d7,e7,f7,g7,h7,i7,j7,k7,l7,m7,n7,o7,p7,q7,r7,s7,t7,u7,v7,w7,x7,y7,z7
local a8,b8,c8,d8,e8,f8,g8,h8,i8,j8,k8,l8,m8,n8,o8',p8,q8,r8,s8,t8,u8,v8,w8,x8,y8,z8
'local a9,b9,c9,d9,e9,f9,g9,h9,i9,j9,k9,l9,m9,n9,o9,p9,q9,r9,s9,t9,u9,v9,w9,x9,y9,z9
end sub

PicoMite MMBasic RP2040 V6.01.00
OPTION SYSTEM SPI GP18,GP19,GP16
OPTION SYSTEM I2C GP14,GP15
OPTION COLOURCODE ON
OPTION CPUSPEED (KHz) 200000
OPTION SDCARD GP17
OPTION F5 flash run
>
AUTOSAVE N
Progress: 1/31
Upload completed 1
Enter ctrl-Z, F1, or F2 to exit
Saved 1730 bytes
>
Time taken: 2252mS
RUN
Program:
  2K ( 1%) Program (31 lines)
122K (99%) Free

Saved Variables:
 16K (100%) Free

RAM:
 26K (17%) 476 Variables
  0K ( 0%) General
124K (83%) Free