DIM MAP[0] FOR A=0 TO 3 BGSCREEN A,64,64 LOAD "DAT:SC_MAP_L"+STR$(A),MAP BGLOAD A,MAP WEND