unit stateimages; interface procedure InitializeCustomImages; implementation uses fpg_main; Const usr_state0 : Array[0..821] of byte = ( 66, 77, 54, 3, 0, 0, 0, 0, 0, 0, 54, 0, 0, 0, 40, 0, 0, 0, 16, 0, 0, 0, 16, 0, 0, 0, 1, 0, 24, 0, 0, 0, 0, 0, 0, 3, 0, 0,100, 0, 0, 0,100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132, 132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,132,132, 132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132, 132,132,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,132,132,132,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,132,132,132,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,132,132,132,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,132,132,132,132,132,132,132,132,132,132,132,132,132, 132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132, 132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255); Const usr_state1 : Array[0..821] of byte = ( 66, 77, 54, 3, 0, 0, 0, 0, 0, 0, 54, 0, 0, 0, 40, 0, 0, 0, 16, 0, 0, 0, 16, 0, 0, 0, 1, 0, 24, 0, 0, 0, 0, 0, 0, 3, 0, 0,100, 0, 0, 0,100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132, 132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255, 255,255,255,255,255,255, 0, 0, 0,255,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255,255,255,255, 0, 0, 0, 0, 0, 0, 0, 0, 0,255,255,255,255,255,255,255,255, 255,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,255,255,255,255,255,255,255,255, 255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255, 0, 0, 0, 0, 0, 0,255,255,255, 0, 0, 0, 0, 0, 0, 0, 0, 0,255,255,255,255,255,255,132,132, 132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132, 132,132,255,255,255, 0, 0, 0,255,255,255,255,255,255,255,255,255, 0, 0, 0, 0, 0, 0, 0, 0, 0,255,255,255,132,132,132,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 0, 0, 0, 0, 0, 0,255,255,255,132,132,132,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,132,132,132,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 0, 0, 0,255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,132,132,132,255,255,255,255,255,255,255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, 255,255,255,132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,132,132,132,132,132,132,132,132,132,132,132,132,132, 132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132,132, 132,132,132,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0, 255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255,255, 0,255, 255, 0,255,255, 0,255); procedure InitializeCustomImages; begin fpgImages.AddMaskedBMP( 'usr.state0', @usr_state0, sizeof(usr_state0), 0,0); fpgImages.AddMaskedBMP( 'usr.state1', @usr_state1, sizeof(usr_state1), 0,0); end; end.