counter

auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-100] | displaytext 'T1 wands: $itemcount.'3068'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-110] | displaytext 'T2 wands: $itemcount.'8082'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-120] | displaytext 'T3 wands: $itemcount.'3065'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-130] | displaytext 'T4 wands: $itemcount.'3324'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-140] | displaytext 'T5 wands: $itemcount.'7379'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-150] | displaytext 'T6 wands: $itemcount.'7451'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-160] | displaytext 'T7 wands: $itemcount.'8093'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-170] | displaytext 'T8 wands: $itemcount.'3343'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-180] | displaytext 'T9 wands: $itemcount.'7430'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-190] | displaytext 'T10 wands: $itemcount.'3341'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-200] | displaytext 'T11 wands: $itemcount.'7410'
auto 10000 dontlist | setcolor 000 128 128 | setpos [$screenleft-222] [$screentop-210] | displaytext 'T12 wands: $itemcount.'3348'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-220] | displaytext 'T1 daggers: $itemcount.'3294'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-230] | displaytext 'T2 daggers: $itemcount. '3291'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-240] | displaytext 'T3 daggers: $itemcount.'7385'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-250] | displaytext 'T4 daggers: $itemcount.'5908'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-260] | displaytext 'T5 daggers: $itemcount.'7404'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-270] | displaytext 'T6 daggers: $itemcount.'3284'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-280] | displaytext 'T7 daggers: $itemcount.'10390'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-290] | displaytext 'T8 daggers: $itemcount.'3299'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-300] | displaytext 'T9 daggers: $itemcount.'3290'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-310] | displaytext 'T10 daggers: $itemcount.'680'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-320] | displaytext 'T11 daggers: $itemcount.'3295'
auto 10000 dontlist | setcolor 000 128 000 | setpos [$screenleft-222] [$screentop-330] | displaytext 'T12 daggers: $itemcount.'7408'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-340] | displaytext 'T1 swords: $itemcount.'3281'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-350] | displaytext 'T2 swords: $itemcount. '7449'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-360] | displaytext 'T3 swords: $itemcount.'3307'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-370] | displaytext 'T4 swords: $itemcount.'3278'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-380] | displaytext 'T5 swords: $itemcount.'7382'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-390] | displaytext 'T6 swords: $itemcount.'7420'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-400] | displaytext 'T7 swords: $itemcount.'7416'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-410] | displaytext 'T8 swords: $itemcount.'7405'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-420] | displaytext 'T9 swords: $itemcount.'7402'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-430] | displaytext 'T10 swords: $itemcount.'8104'
auto 10000 dontlist | setcolor 220 20 60 | setpos [$screenleft-222] [$screentop-440] | displaytext 'T11 swords: $itemcount.'3296'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-470] | displaytext 'T1 axes: $itemcount.'3303'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-480] | displaytext 'T2 axes: $itemcount. '3275'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-490] | displaytext 'T3 axes: $itemcount.'3344'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-500] | displaytext 'T4 axes: $itemcount.'7380'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-510] | displaytext 'T5 axes: $itemcount.'6553'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-520] | displaytext 'T6 axes: $itemcount.'7454'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-530] | displaytext 'T7 axes: $itemcount.'7419'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-540] | displaytext 'T8 axes: $itemcount.'7411'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-550] | displaytext 'T9 axes: $itemcount.'7434'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-560] | displaytext 'T10 axes: $itemcount.'8098'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-570] | displaytext 'T11 axes: $itemcount.'7436'
auto 10000 dontlist | setcolor 255 069 000 | setpos [$screenleft-222] [$screentop-580] | displaytext 'T12 axes: $itemcount.'8097'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-590] | displaytext 'T1 maces: $itemcount.'3311'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-600] | displaytext 'T2 maces: $itemcount. '7432'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-610] | displaytext 'T3 maces: $itemcount.'8099'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-620] | displaytext 'T4 maces: $itemcount.'3312'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-630] | displaytext 'T5 maces: $itemcount.'7381'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-640] | displaytext 'T6 maces: $itemcount.'3322'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-650] | displaytext 'T7 maces: $itemcount.'7431'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-660] | displaytext 'T8 maces: $itemcount.'7422'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-670] | displaytext 'T9 maces: $itemcount.'7415'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-680] | displaytext 'T10 maces: $itemcount.'7450'
auto 10000 dontlist | setcolor 255 000 255 | setpos [$screenleft-222] [$screentop-690] | displaytext 'T11 maces: $itemcount.'3325'
auto 200 listas 'Pk' | foreach 'shootablemonsters' $pr {if ?$pr.isonscreen && $pr.skull >= 3] playsound monster.wav
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-100] | displaytext 'T1 armors: $itemcount.'3397'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-110] | displaytext 'T2 armors: $itemcount.'3357'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-120] | displaytext 'T3 armors: $itemcount.'3399'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-130] | displaytext 'T4 armors: $itemcount.'8049'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-140] | displaytext 'T5 armors: $itemcount.'3388'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-150] | displaytext 'T6 armors: $itemcount.'3366'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-160] | displaytext 'T7 armors: $itemcount.'3379'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-170] | displaytext 'T8 armors: $itemcount.'8041'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-180] | displaytext 'T9 armors: $itemcount.'3381'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-190] | displaytext 'T10 armors: $itemcount.'3567'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-200] | displaytext 'T11 armors: $itemcount.'3360'
auto 10000 dontlist | setcolor 192 192 192 | setpos [$screenleft-100] [$screentop-210] | displaytext 'T12 armors: $itemcount.'8039'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-220] | displaytext 'T1 helmets: $itemcount.'6432'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-230] | displaytext 'T2 helmets: $itemcount.'3351'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-240] | displaytext 'T3 helmets: $itemcount.'3390'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-250] | displaytext 'T4 helmets: $itemcount.'3229'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-260] | displaytext 'T5 helmets: $itemcount.'3230'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-270] | displaytext 'T6 helmets: $itemcount.'3405'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-280] | displaytext 'T7 helmets: $itemcount.'3375'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-290] | displaytext 'T8 helmets: $itemcount.'3407'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-300] | displaytext 'T9 helmets: $itemcount.'3385'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-310] | displaytext 'T10 helmets: $itemcount.'3573'
auto 10000 dontlist | setcolor 100 149 237 | setpos [$screenleft-100] [$screentop-320] | displaytext 'T11 helmets: $itemcount.'3365'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-710] | displaytext 'T1 legs: $itemcount.'3398'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-720] | displaytext 'T2 legs: $itemcount.'3557'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-730] | displaytext 'T3 legs: $itemcount.'3363'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-740] | displaytext 'T4 legs: $itemcount.'10387'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-750] | displaytext 'T5 legs: $itemcount.'3389'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-760] | displaytext 'T6 legs: $itemcount.'3558'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-770] | displaytext 'T7 legs: $itemcount.'3362'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-780] | displaytext 'T8 legs: $itemcount.'8095'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-790] | displaytext 'T9 legs: $itemcount.'3382'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-800] | displaytext 'T10 legs: $itemcount.'645'
auto 10000 dontlist | setcolor 250 128 114 | setpos [$screenleft-222] [$screentop-810] | displaytext 'T11 legs: $itemcount.'3364'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-340] | displaytext 'T1 shields: $itemcount.'3442'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-350] | displaytext 'T2 shields: $itemcount.'3432'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-360] | displaytext 'T3 shields: $itemcount.'3417'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-370] | displaytext 'T4 shields: $itemcount.'3424'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-380] | displaytext 'T5 shields: $itemcount.'3438'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-390] | displaytext 'T6 shields: $itemcount.'3413'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-400] | displaytext 'T7 shields: $itemcount.'6390'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-410] | displaytext 'T8 shields: $itemcount.'8081'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-420] | displaytext 'T9 shields: $itemcount.'3419'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-430] | displaytext 'T10 shields: $itemcount.'3441'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-440] | displaytext 'T11 shields: $itemcount.'3423'
auto 10000 dontlist | setcolor 046 139 087 | setpos [$screenleft-100] [$screentop-450] | displaytext 'T12 shields: $itemcount.'3427'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-460] | displaytext 'T1 rings: $itemcount.'6299'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-470] | displaytext 'T2 rings: $itemcount.'3097'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-480] | displaytext 'T3 rings: $itemcount.'3004'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-490] | displaytext 'T4 rings: $itemcount.'3053'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-500] | displaytext 'T5 rings: $itemcount.'6093'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-510] | displaytext 'T6 rings: $itemcount.'3092'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-520] | displaytext 'T7 rings: $itemcount.'3245'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-530] | displaytext 'T8 rings: $itemcount.'3052'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-540] | displaytext 'T9 rings: $itemcount.'3010'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-550] | displaytext 'T10 rings: $itemcount.'3049'
auto 10000 dontlist | setcolor 188 143 143 | setpos [$screenleft-100] [$screentop-560] | displaytext 'T11 rings: $itemcount.'3063'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-580] | displaytext 'T1 boots: $itemcount.'6299'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-590] | displaytext 'T2 boots: $itemcount.'3097'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-600] | displaytext 'T3 boots: $itemcount.'3004'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-610] | displaytext 'T4 boots: $itemcount.'3053'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-620] | displaytext 'T5 boots: $itemcount.'6093'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-630] | displaytext 'T6 boots: $itemcount.'3092'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-640] | displaytext 'T7 boots: $itemcount.'3245'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-650] | displaytext 'T8 boots: $itemcount.'3052'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-660] | displaytext 'T9 boots: $itemcount.'3010'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-670] | displaytext 'T10 boots: $itemcount.'3049'
auto 10000 dontlist | setcolor 032 178 170 | setpos [$screenleft-100] [$screentop-680] | displaytext 'T11 boots: $itemcount.'3063'