Code: Select all
EnableExplicit
DataSection
PB_ico_start:
; size : 1150 bytes
Data.q $1010000100010000,$0468002000010000,$0028000000160000,$0020000000100000,$0000002000010000
Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
Data.q $0000000000000000,$0000010000000000,$0000230000000B00,$0000000000000800,$0000000000000000
Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000050000000000,$2320691506042300
Data.q $0101E46E211CBD64,$00000E0000008404,$0000000000000000,$0000000000000000,$0000000000000000
Data.q $0201160000000200,$3A34A54D19155007,$5A5CFEDB5451E6A1,$2F29FFD7595CFFDB,$000093090302F694
Data.q $0000000000001300,$0000000000000000,$100D230000000000,$4E42D68C30278B35,$5B54FFE6594FFBD9
Data.q $6061FFE05C5AFFE3,$6060FFDE686DFFDE,$0302F6AB372CFFD4,$000001000000540A,$0000000000000000
Data.q $5847899230260000,$5B4CFFED5847FFF3,$5E56FFE95E53FFEA,$5148FFD85750FFE1,$231BB799362BF4D1
Data.q $000025300F0C6E6F,$0000000000000300,$0000000000000000,$4A3C0B34100C0000,$493DFFED5A49D4D0
Data.q $2C24EFB0453AFFC6,$02024C461914987C,$0000020000001207,$0000000000000000,$0000000000000000
Data.q $0000000000000000,$1F18000000000000,$4B40F3E456462A5F,$0000E6521914FFD1,$0D0B7F1D07057100
Data.q $000055000000AC2F,$0000000000000300,$0000000000000000,$0000000000000000,$0000000000000000
Data.q $6250AA62211B1300,$5047FFDE5549FFEE,$4E4BFFDE5C56FCCD,$0000E2561B16FFCC,$0000010000004A00
Data.q $0000000000000000,$0000000000000000,$251D000000000000,$624EFEEC5B464F6E,$695EFFEF6958FFED
Data.q $6666FFDD5F5AFFEC,$1613FFC9504EFFDE,$00002F000000D444,$0000000000000000,$0000000000000000
Data.q $0101000000000000,$5F4BB3B845370104,$6A5CFFEC6856FFE9,$423BFFCA514BFFEC,$2720C5973B34FBA9
Data.q $0000170200008578,$0000000000000000,$0000000000000000,$0000000000000000,$4435184B1C170000
Data.q $473B8585372D9EA3,$2D27FFC24038F0C9,$00009F0D0504FA8E,$0000010000001C00,$0000000000000000
Data.q $0000000000000000,$0000000000000000,$0000000000000000,$1310460000001A00,$3932FFB831289E3D
Data.q $1210F99A2F29FFB8,$000038000000CC39,$0000000000000000,$0000000000000000,$0000000000000000
Data.q $211B000000000000,$362BF8A72E25906D,$362CFFBC362DFEBE,$3932FFB73830FFB8,$0000C52E0F0DFEB2
Data.q $0000000000002300,$0000000000000000,$0000000000000000,$1E19000000000000,$382EF5C03A2F2451
Data.q $372EFFBC382EFFC0,$3730FFB5362DFFB9,$0806FDAA352EFFB2,$000014000000AB17,$0000000000000000
Data.q $0000000000000000,$0000000000000000,$3A2F71842F270000,$3F35FFBD392FFFC1,$423DFFBA413BFFBD
Data.q $362DFFB74742FFB8,$00005E070202F7A4,$0000000000000100,$0000000000000000,$0000000000000000
Data.q $4136031209070000,$352A82913D337E96,$32265F7F31267188,$211B3C672D234E76,$00000C1207052B50
Data.q $1FFE000000000000,$07C041AC0FF841AC,$078041AC038041AC,$1FC041AC3F8041AC,$0FC041AC0FC041AC
Data.q $0FE041AC0FC041AC,$07F041AC0FF041AC,$01F841AC03F041AC
Data.b $AC,$41,$F8,$03,$AC,$41
PB_ico_end:
EndDataSection
Define ico = CatchImage(#PB_Any, ?PB_ico_start)
OpenWindow(0, #PB_Ignore, #PB_Ignore, 640, 480, "")
SendMessage_(WindowID(0), #WM_SETICON, 0, ImageID(ico))
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow