(********************************************************************* :Program. BinCode.mod :Author. Pit Burkhardt :Address. Stettinerstraße 25 D-7030 Böblingen :shortcut. [pit] :Version. 1.0 :Date. some fine Day in July 1988 :Copyright. PD :Language. Modula-II :Translator.M2Amiga :Imports. none :UpDate. none :Contents. Data for BOB-Images, MODULE was created by IFF2Code/[pit]. :Remark. Studienarbeit Im Kernfach TECHNISCHES DESIGN an der Universität Stuttgart **********************************************************************) IMPLEMENTATION MODULE BinCode; FROM SYSTEM IMPORT WORD; FROM Memory IMPORT AllocMemory; VAR i :INTEGER; BEGIN (* MAIN *) FOR i:=0 TO 8 DO AllocMemory(ImgPtr[i],SIZE(ImgPtr[i]^),TRUE); END; Imgwidth := 64; Imgheight:= 23; Imgdepth := 3; WITH ImgPtr[WARN]^ DO (* WARN *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=00000H; Dat[ 5]:=00001H; Dat[ 6]:=0E000H; Dat[ 7]:=00000H;(* 2*) Dat[ 8]:=00000H; Dat[ 9]:=00001H; Dat[ 10]:=0E000H; Dat[ 11]:=00000H;(* 3*) Dat[ 12]:=00000H; Dat[ 13]:=00007H; Dat[ 14]:=0F800H; Dat[ 15]:=00000H;(* 4*) Dat[ 16]:=00000H; Dat[ 17]:=00007H; Dat[ 18]:=0F800H; Dat[ 19]:=00000H;(* 5*) Dat[ 20]:=00000H; Dat[ 21]:=0001FH; Dat[ 22]:=0FE00H; Dat[ 23]:=00000H;(* 6*) Dat[ 24]:=00000H; Dat[ 25]:=0001FH; Dat[ 26]:=0FE00H; Dat[ 27]:=00000H;(* 7*) Dat[ 28]:=00000H; Dat[ 29]:=0007FH; Dat[ 30]:=0FF80H; Dat[ 31]:=00000H;(* 8*) Dat[ 32]:=00000H; Dat[ 33]:=0007FH; Dat[ 34]:=0FF80H; Dat[ 35]:=00000H;(* 9*) Dat[ 36]:=00000H; Dat[ 37]:=001FFH; Dat[ 38]:=0FFE0H; Dat[ 39]:=00000H;(*10*) Dat[ 40]:=00000H; Dat[ 41]:=001FFH; Dat[ 42]:=0FFE0H; Dat[ 43]:=00000H;(*11*) Dat[ 44]:=00000H; Dat[ 45]:=007FFH; Dat[ 46]:=0FFF8H; Dat[ 47]:=00000H;(*12*) Dat[ 48]:=00000H; Dat[ 49]:=007FFH; Dat[ 50]:=0FFF8H; Dat[ 51]:=00000H;(*13*) Dat[ 52]:=00000H; Dat[ 53]:=01FFFH; Dat[ 54]:=0FFFEH; Dat[ 55]:=00000H;(*14*) Dat[ 56]:=00000H; Dat[ 57]:=01FFFH; Dat[ 58]:=0FFFEH; Dat[ 59]:=00000H;(*15*) Dat[ 60]:=00000H; Dat[ 61]:=07FFFH; Dat[ 62]:=0FFFFH; Dat[ 63]:=08000H;(*16*) Dat[ 64]:=00000H; Dat[ 65]:=07FFFH; Dat[ 66]:=0FFFFH; Dat[ 67]:=08000H;(*17*) Dat[ 68]:=00001H; Dat[ 69]:=0FFFFH; Dat[ 70]:=0FFFFH; Dat[ 71]:=0E000H;(*18*) Dat[ 72]:=00001H; Dat[ 73]:=0FFFFH; Dat[ 74]:=0FFFFH; Dat[ 75]:=0E000H;(*19*) Dat[ 76]:=00007H; Dat[ 77]:=0FFFFH; Dat[ 78]:=0FFFFH; Dat[ 79]:=0F800H;(*20*) Dat[ 80]:=00007H; Dat[ 81]:=0FFFFH; Dat[ 82]:=0FFFFH; Dat[ 83]:=0F800H;(*21*) Dat[ 84]:=0001FH; Dat[ 85]:=0FFFFH; Dat[ 86]:=0FFFFH; Dat[ 87]:=0FE00H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00000H; Dat[ 93]:=00003H; Dat[ 94]:=0C000H; Dat[ 95]:=00000H;(* 1*) Dat[ 96]:=00000H; Dat[ 97]:=00003H; Dat[ 98]:=0E000H; Dat[ 99]:=00000H;(* 2*) Dat[100]:=00000H; Dat[101]:=0000FH; Dat[102]:=0F000H; Dat[103]:=00000H;(* 3*) Dat[104]:=00000H; Dat[105]:=0000FH; Dat[106]:=0F800H; Dat[107]:=00000H;(* 4*) Dat[108]:=00000H; Dat[109]:=0003FH; Dat[110]:=0FC00H; Dat[111]:=00000H;(* 5*) Dat[112]:=00000H; Dat[113]:=0003EH; Dat[114]:=01E00H; Dat[115]:=00000H;(* 6*) Dat[116]:=00000H; Dat[117]:=000FEH; Dat[118]:=01F00H; Dat[119]:=00000H;(* 7*) Dat[120]:=00000H; Dat[121]:=000F8H; Dat[122]:=00780H; Dat[123]:=00000H;(* 8*) Dat[124]:=00000H; Dat[125]:=003F8H; Dat[126]:=007C0H; Dat[127]:=00000H;(* 9*) Dat[128]:=00000H; Dat[129]:=003E1H; Dat[130]:=0E1E0H; Dat[131]:=00000H;(*10*) Dat[132]:=00000H; Dat[133]:=00FE1H; Dat[134]:=0E1F0H; Dat[135]:=00000H;(*11*) Dat[136]:=00000H; Dat[137]:=00F81H; Dat[138]:=0E078H; Dat[139]:=00000H;(*12*) Dat[140]:=00000H; Dat[141]:=03F81H; Dat[142]:=0E07CH; Dat[143]:=00000H;(*13*) Dat[144]:=00000H; Dat[145]:=03E01H; Dat[146]:=0E01EH; Dat[147]:=00000H;(*14*) Dat[148]:=00000H; Dat[149]:=0FE01H; Dat[150]:=0E01FH; Dat[151]:=00000H;(*15*) Dat[152]:=00000H; Dat[153]:=0F800H; Dat[154]:=00007H; Dat[155]:=08000H;(*16*) Dat[156]:=00003H; Dat[157]:=0F800H; Dat[158]:=00007H; Dat[159]:=0C000H;(*17*) Dat[160]:=00003H; Dat[161]:=0E001H; Dat[162]:=0E001H; Dat[163]:=0E000H;(*18*) Dat[164]:=0000FH; Dat[165]:=0E001H; Dat[166]:=0E001H; Dat[167]:=0F000H;(*19*) Dat[168]:=0000FH; Dat[169]:=08000H; Dat[170]:=00000H; Dat[171]:=07800H;(*20*) Dat[172]:=0003FH; Dat[173]:=0FFFFH; Dat[174]:=0FFFFH; Dat[175]:=0FC00H;(*21*) Dat[176]:=0001FH; Dat[177]:=0FFFFH; Dat[178]:=0FFFFH; Dat[179]:=0FE00H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00000H; Dat[185]:=00003H; Dat[186]:=0C000H; Dat[187]:=00000H;(* 1*) Dat[188]:=00000H; Dat[189]:=00003H; Dat[190]:=0E000H; Dat[191]:=00000H;(* 2*) Dat[192]:=00000H; Dat[193]:=0000FH; Dat[194]:=0F800H; Dat[195]:=00000H;(* 3*) Dat[196]:=00000H; Dat[197]:=0000FH; Dat[198]:=0F800H; Dat[199]:=00000H;(* 4*) Dat[200]:=00000H; Dat[201]:=0003FH; Dat[202]:=0FE00H; Dat[203]:=00000H;(* 5*) Dat[204]:=00000H; Dat[205]:=0003FH; Dat[206]:=0FE00H; Dat[207]:=00000H;(* 6*) Dat[208]:=00000H; Dat[209]:=000FFH; Dat[210]:=0FF80H; Dat[211]:=00000H;(* 7*) Dat[212]:=00000H; Dat[213]:=000FFH; Dat[214]:=0FF80H; Dat[215]:=00000H;(* 8*) Dat[216]:=00000H; Dat[217]:=003FFH; Dat[218]:=0FFE0H; Dat[219]:=00000H;(* 9*) Dat[220]:=00000H; Dat[221]:=003FFH; Dat[222]:=0FFE0H; Dat[223]:=00000H;(*10*) Dat[224]:=00000H; Dat[225]:=00FFFH; Dat[226]:=0FFF8H; Dat[227]:=00000H;(*11*) Dat[228]:=00000H; Dat[229]:=00FFFH; Dat[230]:=0FFF8H; Dat[231]:=00000H;(*12*) Dat[232]:=00000H; Dat[233]:=03FFFH; Dat[234]:=0FFFEH; Dat[235]:=00000H;(*13*) Dat[236]:=00000H; Dat[237]:=03FFFH; Dat[238]:=0FFFEH; Dat[239]:=00000H;(*14*) Dat[240]:=00000H; Dat[241]:=0FFFFH; Dat[242]:=0FFFFH; Dat[243]:=08000H;(*15*) Dat[244]:=00000H; Dat[245]:=0FFFFH; Dat[246]:=0FFFFH; Dat[247]:=08000H;(*16*) Dat[248]:=00003H; Dat[249]:=0FFFFH; Dat[250]:=0FFFFH; Dat[251]:=0E000H;(*17*) Dat[252]:=00003H; Dat[253]:=0FFFFH; Dat[254]:=0FFFFH; Dat[255]:=0E000H;(*18*) Dat[256]:=0000FH; Dat[257]:=0FFFFH; Dat[258]:=0FFFFH; Dat[259]:=0F800H;(*19*) Dat[260]:=0000FH; Dat[261]:=0FFFFH; Dat[262]:=0FFFFH; Dat[263]:=0F800H;(*20*) Dat[264]:=0003FH; Dat[265]:=0FFFFH; Dat[266]:=0FFFFH; Dat[267]:=0FE00H;(*21*) Dat[268]:=0001FH; Dat[269]:=0FFFFH; Dat[270]:=0FFFFH; Dat[271]:=0FE00H;(*22*) Dat[272]:=00007H; Dat[273]:=0FFFFH; Dat[274]:=0FFFFH; Dat[275]:=0FF80H;(*23*) END; WITH ImgPtr[BATT]^ DO (* BATT *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=007FFH; Dat[ 5]:=0E000H; Dat[ 6]:=00007H; Dat[ 7]:=0FFE0H;(* 2*) Dat[ 8]:=007FFH; Dat[ 9]:=0E000H; Dat[ 10]:=00007H; Dat[ 11]:=0FFE0H;(* 3*) Dat[ 12]:=07FFFH; Dat[ 13]:=0FFFFH; Dat[ 14]:=0FFFFH; Dat[ 15]:=0FFFCH;(* 4*) Dat[ 16]:=07FFFH; Dat[ 17]:=0FFFFH; Dat[ 18]:=0FFFFH; Dat[ 19]:=0FFFCH;(* 5*) Dat[ 20]:=07FFFH; Dat[ 21]:=0FFFFH; Dat[ 22]:=0FFFFH; Dat[ 23]:=0FFFCH;(* 6*) Dat[ 24]:=07FFFH; Dat[ 25]:=0FFFFH; Dat[ 26]:=0FFFFH; Dat[ 27]:=0FFFCH;(* 7*) Dat[ 28]:=07FFFH; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FFFFH; Dat[ 31]:=0FFFCH;(* 8*) Dat[ 32]:=07FFFH; Dat[ 33]:=0FFFFH; Dat[ 34]:=0FFFFH; Dat[ 35]:=0FFFCH;(* 9*) Dat[ 36]:=07FFFH; Dat[ 37]:=0FFFFH; Dat[ 38]:=0FFFFH; Dat[ 39]:=0FFFCH;(*10*) Dat[ 40]:=07FFFH; Dat[ 41]:=0FFFFH; Dat[ 42]:=0FFFFH; Dat[ 43]:=0FFFCH;(*11*) Dat[ 44]:=07FFFH; Dat[ 45]:=0FFFFH; Dat[ 46]:=0FFFFH; Dat[ 47]:=0FFFCH;(*12*) Dat[ 48]:=07FFFH; Dat[ 49]:=0FFFFH; Dat[ 50]:=0FFFFH; Dat[ 51]:=0FFFCH;(*13*) Dat[ 52]:=07FFFH; Dat[ 53]:=0FFFFH; Dat[ 54]:=0FFFFH; Dat[ 55]:=0FFFCH;(*14*) Dat[ 56]:=07FFFH; Dat[ 57]:=0FFFFH; Dat[ 58]:=0FFFFH; Dat[ 59]:=0FFFCH;(*15*) Dat[ 60]:=07FFFH; Dat[ 61]:=0FFFFH; Dat[ 62]:=0FFFFH; Dat[ 63]:=0FFFCH;(*16*) Dat[ 64]:=07FFFH; Dat[ 65]:=0FFFFH; Dat[ 66]:=0FFFFH; Dat[ 67]:=0FFFCH;(*17*) Dat[ 68]:=07FFFH; Dat[ 69]:=0FFFFH; Dat[ 70]:=0FFFFH; Dat[ 71]:=0FFFCH;(*18*) Dat[ 72]:=07FFFH; Dat[ 73]:=0FFFFH; Dat[ 74]:=0FFFFH; Dat[ 75]:=0FFFCH;(*19*) Dat[ 76]:=07FFFH; Dat[ 77]:=0FFFFH; Dat[ 78]:=0FFFFH; Dat[ 79]:=0FFFCH;(*20*) Dat[ 80]:=07FFFH; Dat[ 81]:=0FFFFH; Dat[ 82]:=0FFFFH; Dat[ 83]:=0FFFCH;(*21*) Dat[ 84]:=07FFFH; Dat[ 85]:=0FFFFH; Dat[ 86]:=0FFFFH; Dat[ 87]:=0FFFCH;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00FFFH; Dat[ 93]:=0C000H; Dat[ 94]:=0000FH; Dat[ 95]:=0FFC0H;(* 1*) Dat[ 96]:=00FFFH; Dat[ 97]:=0E000H; Dat[ 98]:=0000FH; Dat[ 99]:=0FFE0H;(* 2*) Dat[100]:=0FE00H; Dat[101]:=07FFFH; Dat[102]:=0FFFEH; Dat[103]:=00078H;(* 3*) Dat[104]:=0FFFFH; Dat[105]:=0FFFFH; Dat[106]:=0FFFFH; Dat[107]:=0FFFCH;(* 4*) Dat[108]:=0FFFFH; Dat[109]:=0FFFFH; Dat[110]:=0FFFFH; Dat[111]:=0FFFCH;(* 5*) Dat[112]:=0F800H; Dat[113]:=00000H; Dat[114]:=00000H; Dat[115]:=0001CH;(* 6*) Dat[116]:=0F800H; Dat[117]:=00000H; Dat[118]:=00000H; Dat[119]:=0001CH;(* 7*) Dat[120]:=0F800H; Dat[121]:=00000H; Dat[122]:=00000H; Dat[123]:=0001CH;(* 8*) Dat[124]:=0F801H; Dat[125]:=08000H; Dat[126]:=00000H; Dat[127]:=0001CH;(* 9*) Dat[128]:=0F801H; Dat[129]:=08000H; Dat[130]:=00000H; Dat[131]:=0001CH;(*10*) Dat[132]:=0F801H; Dat[133]:=08000H; Dat[134]:=00000H; Dat[135]:=0001CH;(*11*) Dat[136]:=0F87FH; Dat[137]:=0FE00H; Dat[138]:=0007FH; Dat[139]:=0FE1CH;(*12*) Dat[140]:=0F801H; Dat[141]:=08000H; Dat[142]:=00000H; Dat[143]:=0001CH;(*13*) Dat[144]:=0F801H; Dat[145]:=08000H; Dat[146]:=00000H; Dat[147]:=0001CH;(*14*) Dat[148]:=0F801H; Dat[149]:=08000H; Dat[150]:=00000H; Dat[151]:=0001CH;(*15*) Dat[152]:=0F800H; Dat[153]:=00000H; Dat[154]:=00000H; Dat[155]:=0001CH;(*16*) Dat[156]:=0F800H; Dat[157]:=00000H; Dat[158]:=00000H; Dat[159]:=0001CH;(*17*) Dat[160]:=0F800H; Dat[161]:=00000H; Dat[162]:=00000H; Dat[163]:=0001CH;(*18*) Dat[164]:=0F800H; Dat[165]:=00000H; Dat[166]:=00000H; Dat[167]:=0001CH;(*19*) Dat[168]:=0F800H; Dat[169]:=00000H; Dat[170]:=00000H; Dat[171]:=0001CH;(*20*) Dat[172]:=0FFFFH; Dat[173]:=0FFFFH; Dat[174]:=0FFFFH; Dat[175]:=0FFFCH;(*21*) Dat[176]:=07FFFH; Dat[177]:=0FFFFH; Dat[178]:=0FFFFH; Dat[179]:=0FFFCH;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00FFFH; Dat[185]:=0C000H; Dat[186]:=0000FH; Dat[187]:=0FFC0H;(* 1*) Dat[188]:=00800H; Dat[189]:=00000H; Dat[190]:=00008H; Dat[191]:=00000H;(* 2*) Dat[192]:=0F9FFH; Dat[193]:=09FFFH; Dat[194]:=0FFF9H; Dat[195]:=0FF98H;(* 3*) Dat[196]:=08000H; Dat[197]:=00000H; Dat[198]:=00000H; Dat[199]:=00000H;(* 4*) Dat[200]:=08000H; Dat[201]:=00000H; Dat[202]:=00000H; Dat[203]:=00002H;(* 5*) Dat[204]:=087FFH; Dat[205]:=0FFFFH; Dat[206]:=0FFFFH; Dat[207]:=0FFE2H;(* 6*) Dat[208]:=087FFH; Dat[209]:=0FFFFH; Dat[210]:=0FFFFH; Dat[211]:=0FFE2H;(* 7*) Dat[212]:=087FFH; Dat[213]:=0FFFFH; Dat[214]:=0FFFFH; Dat[215]:=0FFE2H;(* 8*) Dat[216]:=087FEH; Dat[217]:=07FFFH; Dat[218]:=0FFFFH; Dat[219]:=0FFE2H;(* 9*) Dat[220]:=087FEH; Dat[221]:=07FFFH; Dat[222]:=0FFFFH; Dat[223]:=0FFE2H;(*10*) Dat[224]:=087FEH; Dat[225]:=07FFFH; Dat[226]:=0FFFFH; Dat[227]:=0FFE2H;(*11*) Dat[228]:=08780H; Dat[229]:=001FFH; Dat[230]:=0FF80H; Dat[231]:=001E2H;(*12*) Dat[232]:=087FEH; Dat[233]:=07FFFH; Dat[234]:=0FFFFH; Dat[235]:=0FFE2H;(*13*) Dat[236]:=087FEH; Dat[237]:=07FFFH; Dat[238]:=0FFFFH; Dat[239]:=0FFE2H;(*14*) Dat[240]:=087FEH; Dat[241]:=07FFFH; Dat[242]:=0FFFFH; Dat[243]:=0FFE2H;(*15*) Dat[244]:=087FFH; Dat[245]:=0FFFFH; Dat[246]:=0FFFFH; Dat[247]:=0FFE2H;(*16*) Dat[248]:=087FFH; Dat[249]:=0FFFFH; Dat[250]:=0FFFFH; Dat[251]:=0FFE2H;(*17*) Dat[252]:=087FFH; Dat[253]:=0FFFFH; Dat[254]:=0FFFFH; Dat[255]:=0FFE2H;(*18*) Dat[256]:=087FFH; Dat[257]:=0FFFFH; Dat[258]:=0FFFFH; Dat[259]:=0FFE2H;(*19*) Dat[260]:=087FFH; Dat[261]:=0FFFFH; Dat[262]:=0FFFFH; Dat[263]:=0FFE2H;(*20*) Dat[264]:=08000H; Dat[265]:=00000H; Dat[266]:=00000H; Dat[267]:=00002H;(*21*) Dat[268]:=00000H; Dat[269]:=00000H; Dat[270]:=00000H; Dat[271]:=00002H;(*22*) Dat[272]:=01FFFH; Dat[273]:=0FFFFH; Dat[274]:=0FFFFH; Dat[275]:=0FFFEH;(*23*) END; WITH ImgPtr[OELS]^ DO (* OELS *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=00000H; Dat[ 5]:=00FFFH; Dat[ 6]:=0FFFFH; Dat[ 7]:=0FFF0H;(* 2*) Dat[ 8]:=00000H; Dat[ 9]:=00FFFH; Dat[ 10]:=0FFFFH; Dat[ 11]:=0FFFCH;(* 3*) Dat[ 12]:=00000H; Dat[ 13]:=0FFFFH; Dat[ 14]:=0FFFFH; Dat[ 15]:=0FFFCH;(* 4*) Dat[ 16]:=00000H; Dat[ 17]:=0FC00H; Dat[ 18]:=0003FH; Dat[ 19]:=0FFFCH;(* 5*) Dat[ 20]:=00000H; Dat[ 21]:=0FC00H; Dat[ 22]:=0003FH; Dat[ 23]:=0FFFCH;(* 6*) Dat[ 24]:=00000H; Dat[ 25]:=0FC00H; Dat[ 26]:=0003FH; Dat[ 27]:=0FFFCH;(* 7*) Dat[ 28]:=00000H; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FFFFH; Dat[ 31]:=0FFFCH;(* 8*) Dat[ 32]:=00000H; Dat[ 33]:=0FFFFH; Dat[ 34]:=0FFFFH; Dat[ 35]:=0FFFCH;(* 9*) Dat[ 36]:=00000H; Dat[ 37]:=0FFFFH; Dat[ 38]:=0FFFFH; Dat[ 39]:=0FFFCH;(*10*) Dat[ 40]:=00000H; Dat[ 41]:=0FFFFH; Dat[ 42]:=0FFFFH; Dat[ 43]:=0FFFCH;(*11*) Dat[ 44]:=0000FH; Dat[ 45]:=0FFFFH; Dat[ 46]:=0FFFFH; Dat[ 47]:=0FFFCH;(*12*) Dat[ 48]:=0000FH; Dat[ 49]:=0FFFFH; Dat[ 50]:=0FFFFH; Dat[ 51]:=0FFFCH;(*13*) Dat[ 52]:=0000FH; Dat[ 53]:=0FFFFH; Dat[ 54]:=0FFFFH; Dat[ 55]:=0FFFCH;(*14*) Dat[ 56]:=000CFH; Dat[ 57]:=0FFFFH; Dat[ 58]:=0FFFFH; Dat[ 59]:=0FFFCH;(*15*) Dat[ 60]:=003CFH; Dat[ 61]:=0FFFFH; Dat[ 62]:=0FFFFH; Dat[ 63]:=0FFFCH;(*16*) Dat[ 64]:=00FC0H; Dat[ 65]:=00FFFH; Dat[ 66]:=0FFFFH; Dat[ 67]:=0FFFCH;(*17*) Dat[ 68]:=00F00H; Dat[ 69]:=00000H; Dat[ 70]:=00000H; Dat[ 71]:=00000H;(*18*) Dat[ 72]:=03F00H; Dat[ 73]:=00000H; Dat[ 74]:=00000H; Dat[ 75]:=00000H;(*19*) Dat[ 76]:=03F00H; Dat[ 77]:=00000H; Dat[ 78]:=00000H; Dat[ 79]:=00000H;(*20*) Dat[ 80]:=03F00H; Dat[ 81]:=00000H; Dat[ 82]:=00000H; Dat[ 83]:=00000H;(*21*) Dat[ 84]:=03F00H; Dat[ 85]:=00000H; Dat[ 86]:=00000H; Dat[ 87]:=00000H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00000H; Dat[ 93]:=01FFFH; Dat[ 94]:=0FFFFH; Dat[ 95]:=0FFE0H;(* 1*) Dat[ 96]:=00000H; Dat[ 97]:=01FFFH; Dat[ 98]:=0FFFFH; Dat[ 99]:=0FFF8H;(* 2*) Dat[100]:=00001H; Dat[101]:=0FFFFH; Dat[102]:=0FFFFH; Dat[103]:=0C03CH;(* 3*) Dat[104]:=00001H; Dat[105]:=0CFFFH; Dat[106]:=0FFFFH; Dat[107]:=03FCCH;(* 4*) Dat[108]:=00001H; Dat[109]:=0CC00H; Dat[110]:=0003CH; Dat[111]:=0FFCCH;(* 5*) Dat[112]:=00001H; Dat[113]:=0CC00H; Dat[114]:=0007CH; Dat[115]:=0FFCCH;(* 6*) Dat[116]:=00001H; Dat[117]:=0CCFFH; Dat[118]:=0FFFCH; Dat[119]:=0FFCCH;(* 7*) Dat[120]:=00001H; Dat[121]:=0CFFFH; Dat[122]:=0FFF3H; Dat[123]:=0FFCCH;(* 8*) Dat[124]:=00001H; Dat[125]:=0C000H; Dat[126]:=0000FH; Dat[127]:=0FFCCH;(* 9*) Dat[128]:=00001H; Dat[129]:=0CFFFH; Dat[130]:=0FFFFH; Dat[131]:=0FFCCH;(*10*) Dat[132]:=0001FH; Dat[133]:=0CFFFH; Dat[134]:=0FFFFH; Dat[135]:=0FFCCH;(*11*) Dat[136]:=0001FH; Dat[137]:=0CFFFH; Dat[138]:=0FFFFH; Dat[139]:=0FFCCH;(*12*) Dat[140]:=0001FH; Dat[141]:=0CFFFH; Dat[142]:=0FFFFH; Dat[143]:=0FFCCH;(*13*) Dat[144]:=0019FH; Dat[145]:=0CFFFH; Dat[146]:=0FFFFH; Dat[147]:=0FFCCH;(*14*) Dat[148]:=007DCH; Dat[149]:=0CFFFH; Dat[150]:=0FFFFH; Dat[151]:=0FFCCH;(*15*) Dat[152]:=01FCFH; Dat[153]:=0F000H; Dat[154]:=00000H; Dat[155]:=0003CH;(*16*) Dat[156]:=01FC0H; Dat[157]:=00FFFH; Dat[158]:=0FFFFH; Dat[159]:=0FFFCH;(*17*) Dat[160]:=07F00H; Dat[161]:=00000H; Dat[162]:=00000H; Dat[163]:=00000H;(*18*) Dat[164]:=07F00H; Dat[165]:=00000H; Dat[166]:=00000H; Dat[167]:=00000H;(*19*) Dat[168]:=07F00H; Dat[169]:=00000H; Dat[170]:=00000H; Dat[171]:=00000H;(*20*) Dat[172]:=07F00H; Dat[173]:=00000H; Dat[174]:=00000H; Dat[175]:=00000H;(*21*) Dat[176]:=03F00H; Dat[177]:=00000H; Dat[178]:=00000H; Dat[179]:=00000H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00000H; Dat[185]:=01FFFH; Dat[186]:=0FFFFH; Dat[187]:=0FFE0H;(* 1*) Dat[188]:=00000H; Dat[189]:=01000H; Dat[190]:=00000H; Dat[191]:=00008H;(* 2*) Dat[192]:=00001H; Dat[193]:=0F000H; Dat[194]:=00000H; Dat[195]:=03FC0H;(* 3*) Dat[196]:=00001H; Dat[197]:=03000H; Dat[198]:=00000H; Dat[199]:=0C032H;(* 4*) Dat[200]:=00001H; Dat[201]:=033FFH; Dat[202]:=0FFC3H; Dat[203]:=00032H;(* 5*) Dat[204]:=00001H; Dat[205]:=03300H; Dat[206]:=00043H; Dat[207]:=00032H;(* 6*) Dat[208]:=00001H; Dat[209]:=033FFH; Dat[210]:=0FFC3H; Dat[211]:=00032H;(* 7*) Dat[212]:=00001H; Dat[213]:=03000H; Dat[214]:=0000CH; Dat[215]:=00032H;(* 8*) Dat[216]:=00001H; Dat[217]:=03FFFH; Dat[218]:=0FFF0H; Dat[219]:=00032H;(* 9*) Dat[220]:=00001H; Dat[221]:=03000H; Dat[222]:=00000H; Dat[223]:=00032H;(*10*) Dat[224]:=0001FH; Dat[225]:=03000H; Dat[226]:=00000H; Dat[227]:=00032H;(*11*) Dat[228]:=00010H; Dat[229]:=03000H; Dat[230]:=00000H; Dat[231]:=00032H;(*12*) Dat[232]:=00010H; Dat[233]:=03000H; Dat[234]:=00000H; Dat[235]:=00032H;(*13*) Dat[236]:=00190H; Dat[237]:=03000H; Dat[238]:=00000H; Dat[239]:=00032H;(*14*) Dat[240]:=00713H; Dat[241]:=03000H; Dat[242]:=00000H; Dat[243]:=00032H;(*15*) Dat[244]:=01C30H; Dat[245]:=00FFFH; Dat[246]:=0FFFFH; Dat[247]:=0FFC2H;(*16*) Dat[248]:=01033H; Dat[249]:=0F000H; Dat[250]:=00000H; Dat[251]:=00002H;(*17*) Dat[252]:=070F0H; Dat[253]:=003FFH; Dat[254]:=0FFFFH; Dat[255]:=0FFFEH;(*18*) Dat[256]:=040C0H; Dat[257]:=00000H; Dat[258]:=00000H; Dat[259]:=00000H;(*19*) Dat[260]:=040C0H; Dat[261]:=00000H; Dat[262]:=00000H; Dat[263]:=00000H;(*20*) Dat[264]:=040C0H; Dat[265]:=00000H; Dat[266]:=00000H; Dat[267]:=00000H;(*21*) Dat[268]:=000C0H; Dat[269]:=00000H; Dat[270]:=00000H; Dat[271]:=00000H;(*22*) Dat[272]:=00FC0H; Dat[273]:=00000H; Dat[274]:=00000H; Dat[275]:=00000H;(*23*) END; WITH ImgPtr[GURT]^ DO (* GURT *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=03FFFH; Dat[ 5]:=0FFF3H; Dat[ 6]:=00000H; Dat[ 7]:=00000H;(* 2*) Dat[ 8]:=00FFFH; Dat[ 9]:=0FFFFH; Dat[ 10]:=0C000H; Dat[ 11]:=00000H;(* 3*) Dat[ 12]:=003FFH; Dat[ 13]:=0FFFFH; Dat[ 14]:=0F000H; Dat[ 15]:=00000H;(* 4*) Dat[ 16]:=000FFH; Dat[ 17]:=0FFFFH; Dat[ 18]:=0C000H; Dat[ 19]:=00000H;(* 5*) Dat[ 20]:=0003FH; Dat[ 21]:=0FFFFH; Dat[ 22]:=0F000H; Dat[ 23]:=00000H;(* 6*) Dat[ 24]:=0000FH; Dat[ 25]:=0FFFFH; Dat[ 26]:=0FC00H; Dat[ 27]:=00000H;(* 7*) Dat[ 28]:=00003H; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FF00H; Dat[ 31]:=00000H;(* 8*) Dat[ 32]:=00000H; Dat[ 33]:=0FFFCH; Dat[ 34]:=03FC0H; Dat[ 35]:=00000H;(* 9*) Dat[ 36]:=00003H; Dat[ 37]:=0FFF0H; Dat[ 38]:=03FCCH; Dat[ 39]:=00000H;(*10*) Dat[ 40]:=00000H; Dat[ 41]:=0FFF0H; Dat[ 42]:=0FF3FH; Dat[ 43]:=00000H;(*11*) Dat[ 44]:=00000H; Dat[ 45]:=033FFH; Dat[ 46]:=0FCFFH; Dat[ 47]:=0C000H;(*12*) Dat[ 48]:=00C00H; Dat[ 49]:=000FFH; Dat[ 50]:=0F3FFH; Dat[ 51]:=0F000H;(*13*) Dat[ 52]:=03F00H; Dat[ 53]:=0003FH; Dat[ 54]:=0CFFFH; Dat[ 55]:=0FC00H;(*14*) Dat[ 56]:=00FC3H; Dat[ 57]:=0C00FH; Dat[ 58]:=03FFFH; Dat[ 59]:=0FC00H;(*15*) Dat[ 60]:=003F3H; Dat[ 61]:=0C000H; Dat[ 62]:=0FFFFH; Dat[ 63]:=0FC00H;(*16*) Dat[ 64]:=000FFH; Dat[ 65]:=0C003H; Dat[ 66]:=0FFFFH; Dat[ 67]:=0FC00H;(*17*) Dat[ 68]:=0003FH; Dat[ 69]:=0C000H; Dat[ 70]:=0FFFFH; Dat[ 71]:=0FC00H;(*18*) Dat[ 72]:=003FFH; Dat[ 73]:=0C000H; Dat[ 74]:=03FFFH; Dat[ 75]:=0FC00H;(*19*) Dat[ 76]:=003FFH; Dat[ 77]:=0C000H; Dat[ 78]:=00FFFH; Dat[ 79]:=0FF00H;(*20*) Dat[ 80]:=00000H; Dat[ 81]:=00000H; Dat[ 82]:=003FFH; Dat[ 83]:=0FFC0H;(*21*) Dat[ 84]:=00000H; Dat[ 85]:=00000H; Dat[ 86]:=00000H; Dat[ 87]:=03FF0H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=07FFFH; Dat[ 93]:=0FFE6H; Dat[ 94]:=00000H; Dat[ 95]:=00000H;(* 1*) Dat[ 96]:=03FFFH; Dat[ 97]:=0FFFFH; Dat[ 98]:=08000H; Dat[ 99]:=00000H;(* 2*) Dat[100]:=00FFFH; Dat[101]:=0FFFCH; Dat[102]:=0E000H; Dat[103]:=00000H;(* 3*) Dat[104]:=003FFH; Dat[105]:=0FFFCH; Dat[106]:=03000H; Dat[107]:=00000H;(* 4*) Dat[108]:=000FFH; Dat[109]:=0FFF0H; Dat[110]:=0E000H; Dat[111]:=00000H;(* 5*) Dat[112]:=0003FH; Dat[113]:=0FFC0H; Dat[114]:=03800H; Dat[115]:=00000H;(* 6*) Dat[116]:=0000FH; Dat[117]:=0FF00H; Dat[118]:=00E00H; Dat[119]:=00000H;(* 7*) Dat[120]:=00003H; Dat[121]:=0FC03H; Dat[122]:=0C380H; Dat[123]:=00000H;(* 8*) Dat[124]:=00007H; Dat[125]:=0F00CH; Dat[126]:=070D8H; Dat[127]:=00000H;(* 9*) Dat[128]:=00003H; Dat[129]:=00031H; Dat[130]:=0F0DEH; Dat[131]:=00000H;(*10*) Dat[132]:=00000H; Dat[133]:=0CC3FH; Dat[134]:=0C37FH; Dat[135]:=08000H;(*11*) Dat[136]:=01800H; Dat[137]:=0330FH; Dat[138]:=00DFFH; Dat[139]:=0E000H;(*12*) Dat[140]:=07E00H; Dat[141]:=000C0H; Dat[142]:=037FFH; Dat[143]:=0F800H;(*13*) Dat[144]:=03F87H; Dat[145]:=08030H; Dat[146]:=0DFF3H; Dat[147]:=0FC00H;(*14*) Dat[148]:=00FE7H; Dat[149]:=0C00FH; Dat[150]:=07FC0H; Dat[151]:=0FC00H;(*15*) Dat[152]:=003FFH; Dat[153]:=0C004H; Dat[154]:=0FF03H; Dat[155]:=0FC00H;(*16*) Dat[156]:=000FFH; Dat[157]:=0C003H; Dat[158]:=0FC0FH; Dat[159]:=0FC00H;(*17*) Dat[160]:=007FFH; Dat[161]:=0C000H; Dat[162]:=0FF3FH; Dat[163]:=0FC00H;(*18*) Dat[164]:=007FFH; Dat[165]:=0C000H; Dat[166]:=03FFFH; Dat[167]:=0FE00H;(*19*) Dat[168]:=003FFH; Dat[169]:=0C000H; Dat[170]:=00FFFH; Dat[171]:=0FF80H;(*20*) Dat[172]:=00000H; Dat[173]:=00000H; Dat[174]:=003FFH; Dat[175]:=0FFE0H;(*21*) Dat[176]:=00000H; Dat[177]:=00000H; Dat[178]:=00000H; Dat[179]:=03FF0H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=07FFFH; Dat[185]:=0FFE6H; Dat[186]:=00000H; Dat[187]:=00000H;(* 1*) Dat[188]:=00000H; Dat[189]:=0000CH; Dat[190]:=08000H; Dat[191]:=00000H;(* 2*) Dat[192]:=00000H; Dat[193]:=00003H; Dat[194]:=02000H; Dat[195]:=00000H;(* 3*) Dat[196]:=00000H; Dat[197]:=00003H; Dat[198]:=0C000H; Dat[199]:=00000H;(* 4*) Dat[200]:=00000H; Dat[201]:=0000FH; Dat[202]:=03000H; Dat[203]:=00000H;(* 5*) Dat[204]:=00000H; Dat[205]:=0003FH; Dat[206]:=0C800H; Dat[207]:=00000H;(* 6*) Dat[208]:=00000H; Dat[209]:=000FFH; Dat[210]:=0F200H; Dat[211]:=00000H;(* 7*) Dat[212]:=00000H; Dat[213]:=003FCH; Dat[214]:=03C80H; Dat[215]:=00000H;(* 8*) Dat[216]:=00007H; Dat[217]:=00FF3H; Dat[218]:=0CF18H; Dat[219]:=00000H;(* 9*) Dat[220]:=00000H; Dat[221]:=0FFCFH; Dat[222]:=0CF32H; Dat[223]:=00000H;(*10*) Dat[224]:=00000H; Dat[225]:=033CFH; Dat[226]:=03CC0H; Dat[227]:=08000H;(*11*) Dat[228]:=01800H; Dat[229]:=00CF0H; Dat[230]:=0F300H; Dat[231]:=02000H;(*12*) Dat[232]:=07200H; Dat[233]:=00C3FH; Dat[234]:=0CC00H; Dat[235]:=00800H;(*13*) Dat[236]:=00087H; Dat[237]:=0800FH; Dat[238]:=0300CH; Dat[239]:=00000H;(*14*) Dat[240]:=00024H; Dat[241]:=00000H; Dat[242]:=0C03FH; Dat[243]:=00300H;(*15*) Dat[244]:=0000CH; Dat[245]:=03007H; Dat[246]:=000FCH; Dat[247]:=00300H;(*16*) Dat[248]:=00000H; Dat[249]:=03000H; Dat[250]:=003F0H; Dat[251]:=00300H;(*17*) Dat[252]:=007C0H; Dat[253]:=03000H; Dat[254]:=000C0H; Dat[255]:=00300H;(*18*) Dat[256]:=00400H; Dat[257]:=03000H; Dat[258]:=00000H; Dat[259]:=00300H;(*19*) Dat[260]:=00000H; Dat[261]:=03000H; Dat[262]:=00000H; Dat[263]:=00080H;(*20*) Dat[264]:=000FFH; Dat[265]:=0F000H; Dat[266]:=00000H; Dat[267]:=00020H;(*21*) Dat[268]:=00000H; Dat[269]:=00000H; Dat[270]:=000FFH; Dat[271]:=0C000H;(*22*) Dat[272]:=00000H; Dat[273]:=00000H; Dat[274]:=00000H; Dat[275]:=00FFCH;(*23*) END; WITH ImgPtr[BLIR]^ DO (* BLIR *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=00000H; Dat[ 5]:=00000H; Dat[ 6]:=00000H; Dat[ 7]:=00000H;(* 2*) Dat[ 8]:=00000H; Dat[ 9]:=007FFH; Dat[ 10]:=0FFE0H; Dat[ 11]:=00000H;(* 3*) Dat[ 12]:=00000H; Dat[ 13]:=01FFFH; Dat[ 14]:=0FFF8H; Dat[ 15]:=00000H;(* 4*) Dat[ 16]:=00000H; Dat[ 17]:=07FFFH; Dat[ 18]:=0FFFEH; Dat[ 19]:=00000H;(* 5*) Dat[ 20]:=00001H; Dat[ 21]:=0FFFFH; Dat[ 22]:=0FFFFH; Dat[ 23]:=08000H;(* 6*) Dat[ 24]:=00007H; Dat[ 25]:=0FFFFH; Dat[ 26]:=0FFFFH; Dat[ 27]:=0E000H;(* 7*) Dat[ 28]:=0001FH; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FFFFH; Dat[ 31]:=0F800H;(* 8*) Dat[ 32]:=0007FH; Dat[ 33]:=0FFFFH; Dat[ 34]:=0FFFFH; Dat[ 35]:=0FE00H;(* 9*) Dat[ 36]:=001FFH; Dat[ 37]:=0FFFFH; Dat[ 38]:=0FFFFH; Dat[ 39]:=0FF80H;(*10*) Dat[ 40]:=007FFH; Dat[ 41]:=0FFFFH; Dat[ 42]:=0FFFFH; Dat[ 43]:=0FFE0H;(*11*) Dat[ 44]:=01FFFH; Dat[ 45]:=0FFFFH; Dat[ 46]:=0FFFFH; Dat[ 47]:=0FFF8H;(*12*) Dat[ 48]:=007FFH; Dat[ 49]:=0FFFFH; Dat[ 50]:=0FFFFH; Dat[ 51]:=0FFE0H;(*13*) Dat[ 52]:=001FFH; Dat[ 53]:=0FFFFH; Dat[ 54]:=0FFFFH; Dat[ 55]:=0FF80H;(*14*) Dat[ 56]:=0007FH; Dat[ 57]:=0FFFFH; Dat[ 58]:=0FFFFH; Dat[ 59]:=0FE00H;(*15*) Dat[ 60]:=0001FH; Dat[ 61]:=0FFFFH; Dat[ 62]:=0FFFFH; Dat[ 63]:=0F800H;(*16*) Dat[ 64]:=00007H; Dat[ 65]:=0FFFFH; Dat[ 66]:=0FFFFH; Dat[ 67]:=0E000H;(*17*) Dat[ 68]:=00001H; Dat[ 69]:=0FFFFH; Dat[ 70]:=0FFFFH; Dat[ 71]:=08000H;(*18*) Dat[ 72]:=00000H; Dat[ 73]:=07FFFH; Dat[ 74]:=0FFFEH; Dat[ 75]:=00000H;(*19*) Dat[ 76]:=00000H; Dat[ 77]:=01FFFH; Dat[ 78]:=0FFF8H; Dat[ 79]:=00000H;(*20*) Dat[ 80]:=00000H; Dat[ 81]:=007FFH; Dat[ 82]:=0FFE0H; Dat[ 83]:=00000H;(*21*) Dat[ 84]:=00000H; Dat[ 85]:=00000H; Dat[ 86]:=00000H; Dat[ 87]:=00000H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00000H; Dat[ 93]:=00000H; Dat[ 94]:=00000H; Dat[ 95]:=00000H;(* 1*) Dat[ 96]:=00000H; Dat[ 97]:=00FFFH; Dat[ 98]:=0FFC0H; Dat[ 99]:=00000H;(* 2*) Dat[100]:=00000H; Dat[101]:=0381EH; Dat[102]:=079F0H; Dat[103]:=00000H;(* 3*) Dat[104]:=00000H; Dat[105]:=0E01EH; Dat[106]:=079FCH; Dat[107]:=00000H;(* 4*) Dat[108]:=00003H; Dat[109]:=0801EH; Dat[110]:=079FFH; Dat[111]:=00000H;(* 5*) Dat[112]:=0000EH; Dat[113]:=0001EH; Dat[114]:=079FFH; Dat[115]:=0C000H;(* 6*) Dat[116]:=00038H; Dat[117]:=0001EH; Dat[118]:=079E7H; Dat[119]:=0F000H;(* 7*) Dat[120]:=000E0H; Dat[121]:=0001EH; Dat[122]:=079E1H; Dat[123]:=0FC00H;(* 8*) Dat[124]:=00380H; Dat[125]:=0001EH; Dat[126]:=079E0H; Dat[127]:=07F00H;(* 9*) Dat[128]:=00E00H; Dat[129]:=0001EH; Dat[130]:=079E0H; Dat[131]:=01FC0H;(*10*) Dat[132]:=03800H; Dat[133]:=0001EH; Dat[134]:=079E0H; Dat[135]:=007F0H;(*11*) Dat[136]:=00000H; Dat[137]:=0001EH; Dat[138]:=079E0H; Dat[139]:=001F8H;(*12*) Dat[140]:=00000H; Dat[141]:=0001EH; Dat[142]:=079E0H; Dat[143]:=007E0H;(*13*) Dat[144]:=00000H; Dat[145]:=0001EH; Dat[146]:=079E0H; Dat[147]:=01F80H;(*14*) Dat[148]:=00000H; Dat[149]:=0001EH; Dat[150]:=079E0H; Dat[151]:=07E00H;(*15*) Dat[152]:=00000H; Dat[153]:=0001EH; Dat[154]:=079E1H; Dat[155]:=0F800H;(*16*) Dat[156]:=00000H; Dat[157]:=0001EH; Dat[158]:=079E7H; Dat[159]:=0E000H;(*17*) Dat[160]:=00000H; Dat[161]:=0001EH; Dat[162]:=079FFH; Dat[163]:=08000H;(*18*) Dat[164]:=00000H; Dat[165]:=0001EH; Dat[166]:=079FEH; Dat[167]:=00000H;(*19*) Dat[168]:=00000H; Dat[169]:=0001EH; Dat[170]:=079F8H; Dat[171]:=00000H;(*20*) Dat[172]:=00000H; Dat[173]:=0001EH; Dat[174]:=079E0H; Dat[175]:=00000H;(*21*) Dat[176]:=00000H; Dat[177]:=00000H; Dat[178]:=00000H; Dat[179]:=00000H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00000H; Dat[185]:=00000H; Dat[186]:=00000H; Dat[187]:=00000H;(* 1*) Dat[188]:=00000H; Dat[189]:=00FFFH; Dat[190]:=0FFC0H; Dat[191]:=00000H;(* 2*) Dat[192]:=00000H; Dat[193]:=03FE1H; Dat[194]:=087F0H; Dat[195]:=00000H;(* 3*) Dat[196]:=00000H; Dat[197]:=0FFE1H; Dat[198]:=087FCH; Dat[199]:=00000H;(* 4*) Dat[200]:=00003H; Dat[201]:=0FFE1H; Dat[202]:=087FFH; Dat[203]:=00000H;(* 5*) Dat[204]:=0000FH; Dat[205]:=0FFE1H; Dat[206]:=087FFH; Dat[207]:=0C000H;(* 6*) Dat[208]:=0003FH; Dat[209]:=0FFE1H; Dat[210]:=087FFH; Dat[211]:=0F000H;(* 7*) Dat[212]:=000FFH; Dat[213]:=0FFE1H; Dat[214]:=087FFH; Dat[215]:=0FC00H;(* 8*) Dat[216]:=003FFH; Dat[217]:=0FFE1H; Dat[218]:=087FFH; Dat[219]:=0FF00H;(* 9*) Dat[220]:=00FFFH; Dat[221]:=0FFE1H; Dat[222]:=087FFH; Dat[223]:=0FFC0H;(*10*) Dat[224]:=03FFFH; Dat[225]:=0FFE1H; Dat[226]:=087FFH; Dat[227]:=0FFF0H;(*11*) Dat[228]:=01FFFH; Dat[229]:=0FFE1H; Dat[230]:=087FFH; Dat[231]:=0FFF8H;(*12*) Dat[232]:=00FFFH; Dat[233]:=0FFE1H; Dat[234]:=087FFH; Dat[235]:=0FFFCH;(*13*) Dat[236]:=003FFH; Dat[237]:=0FFE1H; Dat[238]:=087FFH; Dat[239]:=0FFF0H;(*14*) Dat[240]:=000FFH; Dat[241]:=0FFE1H; Dat[242]:=087FFH; Dat[243]:=0FFC0H;(*15*) Dat[244]:=0003FH; Dat[245]:=0FFE1H; Dat[246]:=087FFH; Dat[247]:=0FF00H;(*16*) Dat[248]:=0000FH; Dat[249]:=0FFE1H; Dat[250]:=087FFH; Dat[251]:=0FC00H;(*17*) Dat[252]:=00003H; Dat[253]:=0FFE1H; Dat[254]:=087FFH; Dat[255]:=0F000H;(*18*) Dat[256]:=00000H; Dat[257]:=0FFE1H; Dat[258]:=087FFH; Dat[259]:=0C000H;(*19*) Dat[260]:=00000H; Dat[261]:=03FE1H; Dat[262]:=087FFH; Dat[263]:=00000H;(*20*) Dat[264]:=00000H; Dat[265]:=00FE1H; Dat[266]:=087FCH; Dat[267]:=00000H;(*21*) Dat[268]:=00000H; Dat[269]:=003FFH; Dat[270]:=0FFF0H; Dat[271]:=00000H;(*22*) Dat[272]:=00000H; Dat[273]:=00000H; Dat[274]:=00000H; Dat[275]:=00000H;(*23*) END; WITH ImgPtr[BLIL]^ DO (* BLIL *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=00000H; Dat[ 5]:=00000H; Dat[ 6]:=00000H; Dat[ 7]:=00000H;(* 2*) Dat[ 8]:=00000H; Dat[ 9]:=007FFH; Dat[ 10]:=0FFE0H; Dat[ 11]:=00000H;(* 3*) Dat[ 12]:=00000H; Dat[ 13]:=01FFFH; Dat[ 14]:=0FFF8H; Dat[ 15]:=00000H;(* 4*) Dat[ 16]:=00000H; Dat[ 17]:=07FFFH; Dat[ 18]:=0FFFEH; Dat[ 19]:=00000H;(* 5*) Dat[ 20]:=00001H; Dat[ 21]:=0FFFFH; Dat[ 22]:=0FFFFH; Dat[ 23]:=08000H;(* 6*) Dat[ 24]:=00007H; Dat[ 25]:=0FFFFH; Dat[ 26]:=0FFFFH; Dat[ 27]:=0E000H;(* 7*) Dat[ 28]:=0001FH; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FFFFH; Dat[ 31]:=0F800H;(* 8*) Dat[ 32]:=0007FH; Dat[ 33]:=0FFFFH; Dat[ 34]:=0FFFFH; Dat[ 35]:=0FE00H;(* 9*) Dat[ 36]:=001FFH; Dat[ 37]:=0FFFFH; Dat[ 38]:=0FFFFH; Dat[ 39]:=0FF80H;(*10*) Dat[ 40]:=007FFH; Dat[ 41]:=0FFFFH; Dat[ 42]:=0FFFFH; Dat[ 43]:=0FFE0H;(*11*) Dat[ 44]:=01FFFH; Dat[ 45]:=0FFFFH; Dat[ 46]:=0FFFFH; Dat[ 47]:=0FFF8H;(*12*) Dat[ 48]:=007FFH; Dat[ 49]:=0FFFFH; Dat[ 50]:=0FFFFH; Dat[ 51]:=0FFE0H;(*13*) Dat[ 52]:=001FFH; Dat[ 53]:=0FFFFH; Dat[ 54]:=0FFFFH; Dat[ 55]:=0FF80H;(*14*) Dat[ 56]:=0007FH; Dat[ 57]:=0FFFFH; Dat[ 58]:=0FFFFH; Dat[ 59]:=0FE00H;(*15*) Dat[ 60]:=0001FH; Dat[ 61]:=0FFFFH; Dat[ 62]:=0FFFFH; Dat[ 63]:=0F800H;(*16*) Dat[ 64]:=00007H; Dat[ 65]:=0FFFFH; Dat[ 66]:=0FFFFH; Dat[ 67]:=0E000H;(*17*) Dat[ 68]:=00001H; Dat[ 69]:=0FFFFH; Dat[ 70]:=0FFFFH; Dat[ 71]:=08000H;(*18*) Dat[ 72]:=00000H; Dat[ 73]:=07FFFH; Dat[ 74]:=0FFFEH; Dat[ 75]:=00000H;(*19*) Dat[ 76]:=00000H; Dat[ 77]:=01FFFH; Dat[ 78]:=0FFF8H; Dat[ 79]:=00000H;(*20*) Dat[ 80]:=00000H; Dat[ 81]:=007FFH; Dat[ 82]:=0FFE0H; Dat[ 83]:=00000H;(*21*) Dat[ 84]:=00000H; Dat[ 85]:=00000H; Dat[ 86]:=00000H; Dat[ 87]:=00000H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00000H; Dat[ 93]:=00000H; Dat[ 94]:=00000H; Dat[ 95]:=00000H;(* 1*) Dat[ 96]:=00000H; Dat[ 97]:=00FFFH; Dat[ 98]:=0FFC0H; Dat[ 99]:=00000H;(* 2*) Dat[100]:=00000H; Dat[101]:=03F9EH; Dat[102]:=07810H; Dat[103]:=00000H;(* 3*) Dat[104]:=00000H; Dat[105]:=0FF9EH; Dat[106]:=07804H; Dat[107]:=00000H;(* 4*) Dat[108]:=00003H; Dat[109]:=0FF9EH; Dat[110]:=07801H; Dat[111]:=00000H;(* 5*) Dat[112]:=0000FH; Dat[113]:=0FF9EH; Dat[114]:=07800H; Dat[115]:=04000H;(* 6*) Dat[116]:=0003FH; Dat[117]:=0E79EH; Dat[118]:=07800H; Dat[119]:=01000H;(* 7*) Dat[120]:=000FFH; Dat[121]:=0879EH; Dat[122]:=07800H; Dat[123]:=00400H;(* 8*) Dat[124]:=003FEH; Dat[125]:=0079EH; Dat[126]:=07800H; Dat[127]:=00100H;(* 9*) Dat[128]:=00FF8H; Dat[129]:=0079EH; Dat[130]:=07800H; Dat[131]:=00040H;(*10*) Dat[132]:=03FE0H; Dat[133]:=0079EH; Dat[134]:=07800H; Dat[135]:=00010H;(*11*) Dat[136]:=01F80H; Dat[137]:=0079EH; Dat[138]:=07800H; Dat[139]:=00000H;(*12*) Dat[140]:=007E0H; Dat[141]:=0079EH; Dat[142]:=07800H; Dat[143]:=00000H;(*13*) Dat[144]:=001F8H; Dat[145]:=0079EH; Dat[146]:=07800H; Dat[147]:=00000H;(*14*) Dat[148]:=0007EH; Dat[149]:=0079EH; Dat[150]:=07800H; Dat[151]:=00000H;(*15*) Dat[152]:=0001FH; Dat[153]:=0879EH; Dat[154]:=07800H; Dat[155]:=00000H;(*16*) Dat[156]:=00007H; Dat[157]:=0E79EH; Dat[158]:=07800H; Dat[159]:=00000H;(*17*) Dat[160]:=00001H; Dat[161]:=0FF9EH; Dat[162]:=07800H; Dat[163]:=00000H;(*18*) Dat[164]:=00000H; Dat[165]:=07F9EH; Dat[166]:=07800H; Dat[167]:=00000H;(*19*) Dat[168]:=00000H; Dat[169]:=01F9EH; Dat[170]:=07800H; Dat[171]:=00000H;(*20*) Dat[172]:=00000H; Dat[173]:=0079EH; Dat[174]:=07800H; Dat[175]:=00000H;(*21*) Dat[176]:=00000H; Dat[177]:=00000H; Dat[178]:=00000H; Dat[179]:=00000H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00000H; Dat[185]:=00000H; Dat[186]:=00000H; Dat[187]:=00000H;(* 1*) Dat[188]:=00000H; Dat[189]:=00FFFH; Dat[190]:=0FFC0H; Dat[191]:=00000H;(* 2*) Dat[192]:=00000H; Dat[193]:=03FE1H; Dat[194]:=087F0H; Dat[195]:=00000H;(* 3*) Dat[196]:=00000H; Dat[197]:=0FFE1H; Dat[198]:=087FCH; Dat[199]:=00000H;(* 4*) Dat[200]:=00003H; Dat[201]:=0FFE1H; Dat[202]:=087FFH; Dat[203]:=00000H;(* 5*) Dat[204]:=0000FH; Dat[205]:=0FFE1H; Dat[206]:=087FFH; Dat[207]:=0C000H;(* 6*) Dat[208]:=0003FH; Dat[209]:=0FFE1H; Dat[210]:=087FFH; Dat[211]:=0F000H;(* 7*) Dat[212]:=000FFH; Dat[213]:=0FFE1H; Dat[214]:=087FFH; Dat[215]:=0FC00H;(* 8*) Dat[216]:=003FFH; Dat[217]:=0FFE1H; Dat[218]:=087FFH; Dat[219]:=0FF00H;(* 9*) Dat[220]:=00FFFH; Dat[221]:=0FFE1H; Dat[222]:=087FFH; Dat[223]:=0FFC0H;(*10*) Dat[224]:=03FFFH; Dat[225]:=0FFE1H; Dat[226]:=087FFH; Dat[227]:=0FFF0H;(*11*) Dat[228]:=01FFFH; Dat[229]:=0FFE1H; Dat[230]:=087FFH; Dat[231]:=0FFF8H;(*12*) Dat[232]:=00FFFH; Dat[233]:=0FFE1H; Dat[234]:=087FFH; Dat[235]:=0FFFCH;(*13*) Dat[236]:=003FFH; Dat[237]:=0FFE1H; Dat[238]:=087FFH; Dat[239]:=0FFF0H;(*14*) Dat[240]:=000FFH; Dat[241]:=0FFE1H; Dat[242]:=087FFH; Dat[243]:=0FFC0H;(*15*) Dat[244]:=0003FH; Dat[245]:=0FFE1H; Dat[246]:=087FFH; Dat[247]:=0FF00H;(*16*) Dat[248]:=0000FH; Dat[249]:=0FFE1H; Dat[250]:=087FFH; Dat[251]:=0FC00H;(*17*) Dat[252]:=00003H; Dat[253]:=0FFE1H; Dat[254]:=087FFH; Dat[255]:=0F000H;(*18*) Dat[256]:=00000H; Dat[257]:=0FFE1H; Dat[258]:=087FFH; Dat[259]:=0C000H;(*19*) Dat[260]:=00000H; Dat[261]:=03FE1H; Dat[262]:=087FFH; Dat[263]:=00000H;(*20*) Dat[264]:=00000H; Dat[265]:=00FE1H; Dat[266]:=087FCH; Dat[267]:=00000H;(*21*) Dat[268]:=00000H; Dat[269]:=003FFH; Dat[270]:=0FFF0H; Dat[271]:=00000H;(*22*) Dat[272]:=00000H; Dat[273]:=00000H; Dat[274]:=00000H; Dat[275]:=00000H;(*23*) END; WITH ImgPtr[FLIT]^ DO (* FLIT *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=00000H; Dat[ 5]:=00000H; Dat[ 6]:=00000H; Dat[ 7]:=00000H;(* 2*) Dat[ 8]:=003FFH; Dat[ 9]:=0FFF0H; Dat[ 10]:=03FFFH; Dat[ 11]:=0FF00H;(* 3*) Dat[ 12]:=003FFH; Dat[ 13]:=0FFF0H; Dat[ 14]:=03FFFH; Dat[ 15]:=0FF00H;(* 4*) Dat[ 16]:=003FFH; Dat[ 17]:=0FFF0H; Dat[ 18]:=03FFFH; Dat[ 19]:=0FF00H;(* 5*) Dat[ 20]:=003FFH; Dat[ 21]:=0FFF0H; Dat[ 22]:=03FFFH; Dat[ 23]:=0FF00H;(* 6*) Dat[ 24]:=003FFH; Dat[ 25]:=0FFF0H; Dat[ 26]:=03FFFH; Dat[ 27]:=0FF00H;(* 7*) Dat[ 28]:=003FFH; Dat[ 29]:=0FFF0H; Dat[ 30]:=03FFFH; Dat[ 31]:=0FF00H;(* 8*) Dat[ 32]:=003FFH; Dat[ 33]:=0FFF0H; Dat[ 34]:=03FFFH; Dat[ 35]:=0FF00H;(* 9*) Dat[ 36]:=003FFH; Dat[ 37]:=0FFF0H; Dat[ 38]:=03FFFH; Dat[ 39]:=0FF00H;(*10*) Dat[ 40]:=003FFH; Dat[ 41]:=0FFF0H; Dat[ 42]:=03FFFH; Dat[ 43]:=0FF00H;(*11*) Dat[ 44]:=003FFH; Dat[ 45]:=0FFF0H; Dat[ 46]:=03FFFH; Dat[ 47]:=0FF00H;(*12*) Dat[ 48]:=003FFH; Dat[ 49]:=0FFF0H; Dat[ 50]:=03FFFH; Dat[ 51]:=0FF00H;(*13*) Dat[ 52]:=003FFH; Dat[ 53]:=0FFF0H; Dat[ 54]:=03FFFH; Dat[ 55]:=0FF00H;(*14*) Dat[ 56]:=003FFH; Dat[ 57]:=0FFF0H; Dat[ 58]:=03FFFH; Dat[ 59]:=0FF00H;(*15*) Dat[ 60]:=003FFH; Dat[ 61]:=0FFF0H; Dat[ 62]:=03FFFH; Dat[ 63]:=0FF00H;(*16*) Dat[ 64]:=003FFH; Dat[ 65]:=0FFF0H; Dat[ 66]:=03FFFH; Dat[ 67]:=0FF00H;(*17*) Dat[ 68]:=003FFH; Dat[ 69]:=0FFF0H; Dat[ 70]:=03FFFH; Dat[ 71]:=0FF00H;(*18*) Dat[ 72]:=001FFH; Dat[ 73]:=0FFE0H; Dat[ 74]:=01FFFH; Dat[ 75]:=0FE00H;(*19*) Dat[ 76]:=0007FH; Dat[ 77]:=0FF80H; Dat[ 78]:=007FFH; Dat[ 79]:=0F800H;(*20*) Dat[ 80]:=0000FH; Dat[ 81]:=0FC00H; Dat[ 82]:=000FFH; Dat[ 83]:=0C000H;(*21*) Dat[ 84]:=00000H; Dat[ 85]:=00000H; Dat[ 86]:=00000H; Dat[ 87]:=00000H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00000H; Dat[ 93]:=00000H; Dat[ 94]:=00000H; Dat[ 95]:=00000H;(* 1*) Dat[ 96]:=007FFH; Dat[ 97]:=0FFE0H; Dat[ 98]:=07FFFH; Dat[ 99]:=0FE00H;(* 2*) Dat[100]:=00733H; Dat[101]:=03330H; Dat[102]:=07333H; Dat[103]:=03300H;(* 3*) Dat[104]:=00733H; Dat[105]:=03330H; Dat[106]:=07333H; Dat[107]:=03300H;(* 4*) Dat[108]:=00733H; Dat[109]:=03330H; Dat[110]:=07333H; Dat[111]:=03300H;(* 5*) Dat[112]:=00733H; Dat[113]:=03330H; Dat[114]:=07333H; Dat[115]:=03300H;(* 6*) Dat[116]:=00733H; Dat[117]:=03330H; Dat[118]:=07333H; Dat[119]:=03300H;(* 7*) Dat[120]:=00733H; Dat[121]:=03330H; Dat[122]:=07333H; Dat[123]:=03300H;(* 8*) Dat[124]:=00733H; Dat[125]:=03330H; Dat[126]:=07333H; Dat[127]:=03300H;(* 9*) Dat[128]:=00733H; Dat[129]:=03330H; Dat[130]:=07333H; Dat[131]:=03300H;(*10*) Dat[132]:=00733H; Dat[133]:=03330H; Dat[134]:=07333H; Dat[135]:=03300H;(*11*) Dat[136]:=00733H; Dat[137]:=03330H; Dat[138]:=07333H; Dat[139]:=03300H;(*12*) Dat[140]:=00733H; Dat[141]:=03330H; Dat[142]:=07333H; Dat[143]:=03300H;(*13*) Dat[144]:=00733H; Dat[145]:=03330H; Dat[146]:=07333H; Dat[147]:=03300H;(*14*) Dat[148]:=00733H; Dat[149]:=03330H; Dat[150]:=07333H; Dat[151]:=03300H;(*15*) Dat[152]:=00400H; Dat[153]:=00000H; Dat[154]:=04000H; Dat[155]:=00000H;(*16*) Dat[156]:=007FFH; Dat[157]:=0FFF0H; Dat[158]:=07FFFH; Dat[159]:=0FF00H;(*17*) Dat[160]:=003FFH; Dat[161]:=0FFF0H; Dat[162]:=03FFFH; Dat[163]:=0FF00H;(*18*) Dat[164]:=001FFH; Dat[165]:=0FFE0H; Dat[166]:=01FFFH; Dat[167]:=0FE00H;(*19*) Dat[168]:=0007FH; Dat[169]:=0FF80H; Dat[170]:=007FFH; Dat[171]:=0F800H;(*20*) Dat[172]:=0000FH; Dat[173]:=0FC00H; Dat[174]:=000FFH; Dat[175]:=0C000H;(*21*) Dat[176]:=00000H; Dat[177]:=00000H; Dat[178]:=00000H; Dat[179]:=00000H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00000H; Dat[185]:=00000H; Dat[186]:=00000H; Dat[187]:=00000H;(* 1*) Dat[188]:=007FFH; Dat[189]:=0FFE0H; Dat[190]:=07FFFH; Dat[191]:=0FE00H;(* 2*) Dat[192]:=004CCH; Dat[193]:=0CCC0H; Dat[194]:=04CCCH; Dat[195]:=0CC00H;(* 3*) Dat[196]:=004CCH; Dat[197]:=0CCC8H; Dat[198]:=04CCCH; Dat[199]:=0CC80H;(* 4*) Dat[200]:=004CCH; Dat[201]:=0CCC8H; Dat[202]:=04CCCH; Dat[203]:=0CC80H;(* 5*) Dat[204]:=004CCH; Dat[205]:=0CCC8H; Dat[206]:=04CCCH; Dat[207]:=0CC80H;(* 6*) Dat[208]:=004CCH; Dat[209]:=0CCC8H; Dat[210]:=04CCCH; Dat[211]:=0CC80H;(* 7*) Dat[212]:=004CCH; Dat[213]:=0CCC8H; Dat[214]:=04CCCH; Dat[215]:=0CC80H;(* 8*) Dat[216]:=004CCH; Dat[217]:=0CCC8H; Dat[218]:=04CCCH; Dat[219]:=0CC80H;(* 9*) Dat[220]:=004CCH; Dat[221]:=0CCC8H; Dat[222]:=04CCCH; Dat[223]:=0CC80H;(*10*) Dat[224]:=004CCH; Dat[225]:=0CCC8H; Dat[226]:=04CCCH; Dat[227]:=0CC80H;(*11*) Dat[228]:=004CCH; Dat[229]:=0CCC8H; Dat[230]:=04CCCH; Dat[231]:=0CC80H;(*12*) Dat[232]:=004CCH; Dat[233]:=0CCC8H; Dat[234]:=04CCCH; Dat[235]:=0CC80H;(*13*) Dat[236]:=004CCH; Dat[237]:=0CCC8H; Dat[238]:=04CCCH; Dat[239]:=0CC80H;(*14*) Dat[240]:=004CCH; Dat[241]:=0CCC8H; Dat[242]:=04CCCH; Dat[243]:=0CC80H;(*15*) Dat[244]:=007FFH; Dat[245]:=0FFF8H; Dat[246]:=07FFFH; Dat[247]:=0FF80H;(*16*) Dat[248]:=00400H; Dat[249]:=00008H; Dat[250]:=04000H; Dat[251]:=00080H;(*17*) Dat[252]:=00000H; Dat[253]:=00008H; Dat[254]:=00000H; Dat[255]:=00080H;(*18*) Dat[256]:=00000H; Dat[257]:=00018H; Dat[258]:=00000H; Dat[259]:=00180H;(*19*) Dat[260]:=00080H; Dat[261]:=00070H; Dat[262]:=00800H; Dat[263]:=00700H;(*20*) Dat[264]:=00030H; Dat[265]:=003C0H; Dat[266]:=00300H; Dat[267]:=03C00H;(*21*) Dat[268]:=00007H; Dat[269]:=0FE00H; Dat[270]:=0007FH; Dat[271]:=0E000H;(*22*) Dat[272]:=00000H; Dat[273]:=00000H; Dat[274]:=00000H; Dat[275]:=00000H;(*23*) END; WITH ImgPtr[HABR]^ DO (* HABR *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=00000H; Dat[ 5]:=0007FH; Dat[ 6]:=0FFFFH; Dat[ 7]:=0E000H;(* 2*) Dat[ 8]:=0007FH; Dat[ 9]:=0FFFFH; Dat[ 10]:=0FFFFH; Dat[ 11]:=08000H;(* 3*) Dat[ 12]:=001FFH; Dat[ 13]:=0FFFFH; Dat[ 14]:=0FFFEH; Dat[ 15]:=00000H;(* 4*) Dat[ 16]:=007FFH; Dat[ 17]:=0FFFFH; Dat[ 18]:=0FFF8H; Dat[ 19]:=00000H;(* 5*) Dat[ 20]:=01FFFH; Dat[ 21]:=0FFFFH; Dat[ 22]:=0FFE0H; Dat[ 23]:=00000H;(* 6*) Dat[ 24]:=007FFH; Dat[ 25]:=0FFFFH; Dat[ 26]:=0FF80H; Dat[ 27]:=00000H;(* 7*) Dat[ 28]:=0007FH; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FE00H; Dat[ 31]:=00000H;(* 8*) Dat[ 32]:=0001FH; Dat[ 33]:=0FFFFH; Dat[ 34]:=0FE00H; Dat[ 35]:=07FF8H;(* 9*) Dat[ 36]:=0007FH; Dat[ 37]:=0FFFFH; Dat[ 38]:=0FE00H; Dat[ 39]:=07FF8H;(*10*) Dat[ 40]:=0007FH; Dat[ 41]:=0FFFFH; Dat[ 42]:=0FE00H; Dat[ 43]:=007F8H;(*11*) Dat[ 44]:=0001FH; Dat[ 45]:=0FFFFH; Dat[ 46]:=0F800H; Dat[ 47]:=01FF8H;(*12*) Dat[ 48]:=00007H; Dat[ 49]:=0FFFFH; Dat[ 50]:=0E000H; Dat[ 51]:=07E78H;(*13*) Dat[ 52]:=00001H; Dat[ 53]:=0FFFFH; Dat[ 54]:=08001H; Dat[ 55]:=0F878H;(*14*) Dat[ 56]:=00000H; Dat[ 57]:=07FFFH; Dat[ 58]:=0E000H; Dat[ 59]:=06000H;(*15*) Dat[ 60]:=00000H; Dat[ 61]:=01FFFH; Dat[ 62]:=0F800H; Dat[ 63]:=00000H;(*16*) Dat[ 64]:=00000H; Dat[ 65]:=007FFH; Dat[ 66]:=0FE00H; Dat[ 67]:=00000H;(*17*) Dat[ 68]:=00000H; Dat[ 69]:=001E1H; Dat[ 70]:=0FF80H; Dat[ 71]:=00000H;(*18*) Dat[ 72]:=00000H; Dat[ 73]:=00000H; Dat[ 74]:=07FE0H; Dat[ 75]:=00000H;(*19*) Dat[ 76]:=00000H; Dat[ 77]:=00000H; Dat[ 78]:=01FF8H; Dat[ 79]:=00000H;(*20*) Dat[ 80]:=00000H; Dat[ 81]:=00000H; Dat[ 82]:=007FEH; Dat[ 83]:=00000H;(*21*) Dat[ 84]:=00000H; Dat[ 85]:=00000H; Dat[ 86]:=001FFH; Dat[ 87]:=08000H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00000H; Dat[ 93]:=000FFH; Dat[ 94]:=0FFFFH; Dat[ 95]:=0C000H;(* 1*) Dat[ 96]:=000FFH; Dat[ 97]:=0FFE0H; Dat[ 98]:=00000H; Dat[ 99]:=06000H;(* 2*) Dat[100]:=003FFH; Dat[101]:=0FF80H; Dat[102]:=00001H; Dat[103]:=08000H;(* 3*) Dat[104]:=00F80H; Dat[105]:=00000H; Dat[106]:=00006H; Dat[107]:=00000H;(* 4*) Dat[108]:=03E00H; Dat[109]:=00000H; Dat[110]:=00018H; Dat[111]:=00000H;(* 5*) Dat[112]:=0181EH; Dat[113]:=00000H; Dat[114]:=00060H; Dat[115]:=00000H;(* 6*) Dat[116]:=007FFH; Dat[117]:=0E000H; Dat[118]:=00180H; Dat[119]:=00000H;(* 7*) Dat[120]:=0007FH; Dat[121]:=0F800H; Dat[122]:=00600H; Dat[123]:=0FFF0H;(* 8*) Dat[124]:=000F8H; Dat[125]:=07E00H; Dat[126]:=00600H; Dat[127]:=0FFF8H;(* 9*) Dat[128]:=000E0H; Dat[129]:=06180H; Dat[130]:=00600H; Dat[131]:=07FF8H;(*10*) Dat[132]:=00061H; Dat[133]:=081E0H; Dat[134]:=00600H; Dat[135]:=03FF8H;(*11*) Dat[136]:=0001EH; Dat[137]:=00618H; Dat[138]:=01800H; Dat[139]:=0FFF8H;(*12*) Dat[140]:=00006H; Dat[141]:=0181EH; Dat[142]:=06003H; Dat[143]:=0FEF8H;(*13*) Dat[144]:=00001H; Dat[145]:=0E07FH; Dat[146]:=0C001H; Dat[147]:=0F878H;(*14*) Dat[148]:=00000H; Dat[149]:=06186H; Dat[150]:=07000H; Dat[151]:=06000H;(*15*) Dat[152]:=00000H; Dat[153]:=01E06H; Dat[154]:=01C00H; Dat[155]:=00000H;(*16*) Dat[156]:=00000H; Dat[157]:=0061EH; Dat[158]:=00700H; Dat[159]:=00000H;(*17*) Dat[160]:=00000H; Dat[161]:=001E1H; Dat[162]:=081C0H; Dat[163]:=00000H;(*18*) Dat[164]:=00000H; Dat[165]:=00000H; Dat[166]:=06070H; Dat[167]:=00000H;(*19*) Dat[168]:=00000H; Dat[169]:=00000H; Dat[170]:=0181CH; Dat[171]:=00000H;(*20*) Dat[172]:=00000H; Dat[173]:=00000H; Dat[174]:=00607H; Dat[175]:=00000H;(*21*) Dat[176]:=00000H; Dat[177]:=00000H; Dat[178]:=00181H; Dat[179]:=08000H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00000H; Dat[185]:=000FFH; Dat[186]:=0FFFFH; Dat[187]:=0C000H;(* 1*) Dat[188]:=000FFH; Dat[189]:=0FF9FH; Dat[190]:=0FFFFH; Dat[191]:=08000H;(* 2*) Dat[192]:=00380H; Dat[193]:=0007FH; Dat[194]:=0FFFEH; Dat[195]:=07800H;(* 3*) Dat[196]:=00E7FH; Dat[197]:=0FFFFH; Dat[198]:=0FFF9H; Dat[199]:=0E000H;(* 4*) Dat[200]:=039FFH; Dat[201]:=0FFFFH; Dat[202]:=0FFE7H; Dat[203]:=08000H;(* 5*) Dat[204]:=007E1H; Dat[205]:=0FFFFH; Dat[206]:=0FF9EH; Dat[207]:=00000H;(* 6*) Dat[208]:=00000H; Dat[209]:=01FFFH; Dat[210]:=0FE78H; Dat[211]:=00000H;(* 7*) Dat[212]:=00180H; Dat[213]:=007FFH; Dat[214]:=0F9E0H; Dat[215]:=0FFF0H;(* 8*) Dat[216]:=000E7H; Dat[217]:=081FFH; Dat[218]:=0F980H; Dat[219]:=08000H;(* 9*) Dat[220]:=0009FH; Dat[221]:=09E7FH; Dat[222]:=0F980H; Dat[223]:=00006H;(*10*) Dat[224]:=0001EH; Dat[225]:=07E1FH; Dat[226]:=0F980H; Dat[227]:=03806H;(*11*) Dat[228]:=00001H; Dat[229]:=0F9E7H; Dat[230]:=0E780H; Dat[231]:=0E006H;(*12*) Dat[232]:=00001H; Dat[233]:=0E7E1H; Dat[234]:=09E03H; Dat[235]:=08186H;(*13*) Dat[236]:=00000H; Dat[237]:=01F80H; Dat[238]:=07800H; Dat[239]:=00786H;(*14*) Dat[240]:=00000H; Dat[241]:=01E79H; Dat[242]:=09000H; Dat[243]:=01E1EH;(*15*) Dat[244]:=00000H; Dat[245]:=001F9H; Dat[246]:=0E400H; Dat[247]:=01800H;(*16*) Dat[248]:=00000H; Dat[249]:=001E1H; Dat[250]:=0F900H; Dat[251]:=00000H;(*17*) Dat[252]:=00000H; Dat[253]:=0001EH; Dat[254]:=07E40H; Dat[255]:=00000H;(*18*) Dat[256]:=00000H; Dat[257]:=00078H; Dat[258]:=01F90H; Dat[259]:=00000H;(*19*) Dat[260]:=00000H; Dat[261]:=00000H; Dat[262]:=007E4H; Dat[263]:=00000H;(*20*) Dat[264]:=00000H; Dat[265]:=00000H; Dat[266]:=001F9H; Dat[267]:=00000H;(*21*) Dat[268]:=00000H; Dat[269]:=00000H; Dat[270]:=0007EH; Dat[271]:=00000H;(*22*) Dat[272]:=00000H; Dat[273]:=00000H; Dat[274]:=0007FH; Dat[275]:=0E000H;(*23*) END; WITH ImgPtr[HECK]^ DO (* HECK *) (* Plane 1 *) Dat[ 0]:=00000H; Dat[ 1]:=00000H; Dat[ 2]:=00000H; Dat[ 3]:=00000H;(* 1*) Dat[ 4]:=007FFH; Dat[ 5]:=0FFFFH; Dat[ 6]:=0FFFFH; Dat[ 7]:=0FFE0H;(* 2*) Dat[ 8]:=01FFFH; Dat[ 9]:=0FFFFH; Dat[ 10]:=0FFFFH; Dat[ 11]:=0FFF8H;(* 3*) Dat[ 12]:=07FFFH; Dat[ 13]:=0FFFFH; Dat[ 14]:=0FFFFH; Dat[ 15]:=0FFFCH;(* 4*) Dat[ 16]:=07FFFH; Dat[ 17]:=0FFFFH; Dat[ 18]:=0FFFFH; Dat[ 19]:=0FFFCH;(* 5*) Dat[ 20]:=07FFFH; Dat[ 21]:=0FFFFH; Dat[ 22]:=0FFFFH; Dat[ 23]:=0FFFCH;(* 6*) Dat[ 24]:=07FFFH; Dat[ 25]:=0FFFFH; Dat[ 26]:=0FFFFH; Dat[ 27]:=0FFFCH;(* 7*) Dat[ 28]:=07FFFH; Dat[ 29]:=0FFFFH; Dat[ 30]:=0FFFFH; Dat[ 31]:=0FFFCH;(* 8*) Dat[ 32]:=07FFFH; Dat[ 33]:=0FFFFH; Dat[ 34]:=0FFFFH; Dat[ 35]:=0FFFCH;(* 9*) Dat[ 36]:=07FFFH; Dat[ 37]:=0FFFFH; Dat[ 38]:=0FFFFH; Dat[ 39]:=0FFFCH;(*10*) Dat[ 40]:=07FFFH; Dat[ 41]:=0FFFFH; Dat[ 42]:=0FFFFH; Dat[ 43]:=0FFFCH;(*11*) Dat[ 44]:=07FFFH; Dat[ 45]:=0FFFFH; Dat[ 46]:=0FFFFH; Dat[ 47]:=0FFFCH;(*12*) Dat[ 48]:=07FFFH; Dat[ 49]:=0FFFFH; Dat[ 50]:=0FFFFH; Dat[ 51]:=0FFFCH;(*13*) Dat[ 52]:=07FFFH; Dat[ 53]:=0FFFFH; Dat[ 54]:=0FFFFH; Dat[ 55]:=0FFFCH;(*14*) Dat[ 56]:=07FFFH; Dat[ 57]:=0FFFFH; Dat[ 58]:=0FFFFH; Dat[ 59]:=0FFFCH;(*15*) Dat[ 60]:=07FFFH; Dat[ 61]:=0FFFFH; Dat[ 62]:=0FFFFH; Dat[ 63]:=0FFFCH;(*16*) Dat[ 64]:=07FFFH; Dat[ 65]:=0FFFFH; Dat[ 66]:=0FFFFH; Dat[ 67]:=0FFFCH;(*17*) Dat[ 68]:=07FFFH; Dat[ 69]:=0FFFFH; Dat[ 70]:=0FFFFH; Dat[ 71]:=0FFFCH;(*18*) Dat[ 72]:=07FFFH; Dat[ 73]:=0FFFFH; Dat[ 74]:=0FFFFH; Dat[ 75]:=0FFFCH;(*19*) Dat[ 76]:=07FFFH; Dat[ 77]:=0FFFFH; Dat[ 78]:=0FFFFH; Dat[ 79]:=0FFFCH;(*20*) Dat[ 80]:=01FFFH; Dat[ 81]:=0FFFFH; Dat[ 82]:=0FFFFH; Dat[ 83]:=0FFF8H;(*21*) Dat[ 84]:=007FFH; Dat[ 85]:=0FFFFH; Dat[ 86]:=0FFFFH; Dat[ 87]:=0FFE0H;(*22*) Dat[ 88]:=00000H; Dat[ 89]:=00000H; Dat[ 90]:=00000H; Dat[ 91]:=00000H;(*23*) (* Plane 2 *) Dat[ 92]:=00FFFH; Dat[ 93]:=0FFFFH; Dat[ 94]:=0FFFFH; Dat[ 95]:=0FFC0H;(* 1*) Dat[ 96]:=03FFFH; Dat[ 97]:=0FFFFH; Dat[ 98]:=0FFFFH; Dat[ 99]:=0FFF0H;(* 2*) Dat[100]:=0F800H; Dat[101]:=00000H; Dat[102]:=00000H; Dat[103]:=00018H;(* 3*) Dat[104]:=0E666H; Dat[105]:=06666H; Dat[106]:=06666H; Dat[107]:=06604H;(* 4*) Dat[108]:=0E000H; Dat[109]:=00000H; Dat[110]:=00000H; Dat[111]:=00004H;(* 5*) Dat[112]:=0E666H; Dat[113]:=06666H; Dat[114]:=06666H; Dat[115]:=06664H;(* 6*) Dat[116]:=0E000H; Dat[117]:=00000H; Dat[118]:=00000H; Dat[119]:=00004H;(* 7*) Dat[120]:=0E660H; Dat[121]:=00000H; Dat[122]:=00000H; Dat[123]:=06664H;(* 8*) Dat[124]:=0E000H; Dat[125]:=00000H; Dat[126]:=00000H; Dat[127]:=00004H;(* 9*) Dat[128]:=0E666H; Dat[129]:=06000H; Dat[130]:=00666H; Dat[131]:=06664H;(*10*) Dat[132]:=0E000H; Dat[133]:=00000H; Dat[134]:=00000H; Dat[135]:=00004H;(*11*) Dat[136]:=0E660H; Dat[137]:=00000H; Dat[138]:=00000H; Dat[139]:=06664H;(*12*) Dat[140]:=0E000H; Dat[141]:=00000H; Dat[142]:=00000H; Dat[143]:=00004H;(*13*) Dat[144]:=0E666H; Dat[145]:=06666H; Dat[146]:=00000H; Dat[147]:=06664H;(*14*) Dat[148]:=0E000H; Dat[149]:=00000H; Dat[150]:=00000H; Dat[151]:=00004H;(*15*) Dat[152]:=0E660H; Dat[153]:=00000H; Dat[154]:=00000H; Dat[155]:=00664H;(*16*) Dat[156]:=0E000H; Dat[157]:=00000H; Dat[158]:=00000H; Dat[159]:=00004H;(*17*) Dat[160]:=0E666H; Dat[161]:=06666H; Dat[162]:=06666H; Dat[163]:=06664H;(*18*) Dat[164]:=0E000H; Dat[165]:=00000H; Dat[166]:=00000H; Dat[167]:=00004H;(*19*) Dat[168]:=06666H; Dat[169]:=06666H; Dat[170]:=06666H; Dat[171]:=06664H;(*20*) Dat[172]:=01800H; Dat[173]:=00000H; Dat[174]:=00000H; Dat[175]:=00018H;(*21*) Dat[176]:=007FFH; Dat[177]:=0FFFFH; Dat[178]:=0FFFFH; Dat[179]:=0FFE0H;(*22*) Dat[180]:=00000H; Dat[181]:=00000H; Dat[182]:=00000H; Dat[183]:=00000H;(*23*) (* Plane 3 *) Dat[184]:=00FFFH; Dat[185]:=0FFFFH; Dat[186]:=0FFFFH; Dat[187]:=0FFC0H;(* 1*) Dat[188]:=03800H; Dat[189]:=00000H; Dat[190]:=00000H; Dat[191]:=00010H;(* 2*) Dat[192]:=0E7FFH; Dat[193]:=0FFFFH; Dat[194]:=0FFFFH; Dat[195]:=0FFE0H;(* 3*) Dat[196]:=09999H; Dat[197]:=09999H; Dat[198]:=09999H; Dat[199]:=099FAH;(* 4*) Dat[200]:=09FFFH; Dat[201]:=0FFFFH; Dat[202]:=0FFFFH; Dat[203]:=0FFFAH;(* 5*) Dat[204]:=09999H; Dat[205]:=09999H; Dat[206]:=09999H; Dat[207]:=0999AH;(* 6*) Dat[208]:=09FFFH; Dat[209]:=0FFFFH; Dat[210]:=0FFFFH; Dat[211]:=0FFFAH;(* 7*) Dat[212]:=0999FH; Dat[213]:=0FFFFH; Dat[214]:=0FFFFH; Dat[215]:=0999AH;(* 8*) Dat[216]:=09FFFH; Dat[217]:=0FFFFH; Dat[218]:=0FFFFH; Dat[219]:=0FFFAH;(* 9*) Dat[220]:=09999H; Dat[221]:=09FFFH; Dat[222]:=0F999H; Dat[223]:=0999AH;(*10*) Dat[224]:=09FFFH; Dat[225]:=0FFFFH; Dat[226]:=0FFFFH; Dat[227]:=0FFFAH;(*11*) Dat[228]:=0999FH; Dat[229]:=0FFFFH; Dat[230]:=0FFFFH; Dat[231]:=0999AH;(*12*) Dat[232]:=09FFFH; Dat[233]:=0FFFFH; Dat[234]:=0FFFFH; Dat[235]:=0FFFAH;(*13*) Dat[236]:=09999H; Dat[237]:=09999H; Dat[238]:=0FFFFH; Dat[239]:=0999AH;(*14*) Dat[240]:=09FFFH; Dat[241]:=0FFFFH; Dat[242]:=0FFFFH; Dat[243]:=0FFFAH;(*15*) Dat[244]:=0999FH; Dat[245]:=0FFFFH; Dat[246]:=0FFFFH; Dat[247]:=0F99AH;(*16*) Dat[248]:=09FFFH; Dat[249]:=0FFFFH; Dat[250]:=0FFFFH; Dat[251]:=0FFFAH;(*17*) Dat[252]:=09999H; Dat[253]:=09999H; Dat[254]:=09999H; Dat[255]:=0999AH;(*18*) Dat[256]:=09FFFH; Dat[257]:=0FFFFH; Dat[258]:=0FFFFH; Dat[259]:=0FFFAH;(*19*) Dat[260]:=01999H; Dat[261]:=09999H; Dat[262]:=09999H; Dat[263]:=0999AH;(*20*) Dat[264]:=007FFH; Dat[265]:=0FFFFH; Dat[266]:=0FFFFH; Dat[267]:=0FFE6H;(*21*) Dat[268]:=00000H; Dat[269]:=00000H; Dat[270]:=00000H; Dat[271]:=0001CH;(*22*) Dat[272]:=001FFH; Dat[273]:=0FFFFH; Dat[274]:=0FFFFH; Dat[275]:=0FFF8H;(*23*) END; END BinCode.