PureBoard

Code: Alles auswählen

XIncludeFile "AnimGIFGadget.pbi"


If gdiplus_Init()
  OpenWindow(0, #PB_Ignore, #PB_Ignore, 160, 180, "Alien")
  SetWindowColor(0, #Black)
  AnimGIFGadgetMem(0, 15, 15, ?alien00007_gif_start, 10613, #Black)
 
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_CloseWindow
        HideWindow(0, #True)
        FreeAnimGIFGadget(0)
        gdiplus_End()
        Break
    EndSelect
  ForEver
EndIf

DataSection
  alien00007_gif_start:
    ; size : 10613 bytes
    Data.q $007E613938464947,$040504003FE50096,$453F443F906D8970,$A1470347AAC7AD3E,$516251232524A0A2
    Data.q $ECC68FA992DADADA,$BE372645280428C0,$6A6A6B898B8AB8CD,$544E5A5A5B9DBAA2,$D72718283436344D
    Data.q $B2BDB7471347665F,$9B89B4D7B6141614,$C0322A625F746286,$F2F2F26E766FBBDA,$3744746DF2544EB2
    Data.q $3678967A66026643,$6F6AE66212623528,$484B5A5AC63A3A76,$55C6F6CEA5AEA64B,$E6E6E63216342A28
    Data.q $0913FEFEFE94B696,$9E3505365C665E12,$788A7A9599964A4A,$EECE520252B4C9B6,$C6AEBEAECECECEC6
    Data.q $0BFF21000000C6BE,$455041435354454E,$0000000103302E32,$003F00320904F921,$96007E000000002C
    Data.q $48709FC0FF060000,$6CC972A4C88F1A2C,$16AA48D4A8D09F3A,$5E983DC4CCC00018,$E8CF4EA8518D70B5
    Data.q $C1A62E5C2BA754B4,$EE4C3D7A11BF3707,$3505260357F7EB86,$246889886A243A05,$0E187A393D0A7257
    Data.q $1818919197793939,$86355F340F11913E,$0D353A2445A6A58A,$18B2789A902C0F10,$2C3D91B3B4B4B5B2
    Data.q $68C2A787602B1F1B,$B3B1943D1B122F6C,$9B9797B5B3B8789B,$C3668617261F3792,$D3903823173A4ADC
    Data.q $B9E7E9B8E5D1D0CE,$F3DD640723383D95,$77189A7A3713AA44,$B34A00D2B7B7CFD0,$D146266B0B170D15
    Data.q $08CF4A86C566C61B,$154B1DCEF124DBEC,$801DCF2963C46023,$8E904385D2D1CCFE,$6200A1585C488A85
    Data.q $6ED6748DC717672E,$08FC7D70907DA593,$A2141407FFBE5D72,$0479490284C05344,$121CA652B125BC56
    Data.q $A654AA69176811F3,$83C312375392243D,$862106F93E874209,$715AA5566290750F,$2B8255F350AB266A
    Data.q $F86172E889C5AA35,$E420A925D89482F0,$9D4FAA5762EB48E9,$8FB753EE38A4B5CA,$0E3B604FC89E1533
    Data.q $06C4C3A23DFD822F,$B4710B9D4162E3A4,$BAA1CEA43495D3D3,$171E0EDD89586A35,$FE6EC20D050F6693
    Data.q $E56159B4468566D1,$95C6D771B59ABC4C,$4B3D3E74FC8E4EA9,$BE840143ECAB52AB,$3341C0F1A8907FBB
    Data.q $929ACE5E9F19A55C,$5E61CFA81DE84A6A,$8E371F93EE077A43,$B8392130A9F42E7A,$62D50FA2E6C0A151
    Data.q $E87A9F0255E36195,$E0C831EE0681E0E5,$4A0C82C1E03A1082,$6B61A7B2070781A8,$115D6311FF36C1B0
    Data.q $08C3A50DFE0AC370,$B7C2055497634C11,$3285E1385A0E85DA,$DEE8C20F846308CA,$0D395CDB072E2E7A
    Data.q $04C3A3759A890946,$B9301A0619060DA0,$338CA138DE377B21,$20B9665895E13956,$2E3F69E508EE157C
    Data.q $0E8C29140C04D1C5,$779D535C21F4B810,$0B9627296A1083A0,$C1A02E7707A7584C,$31A979E0E956719D
    Data.q $9941F259E245C929,$D8FD704E98209CDC,$75A4E789CE129C1E,$A769F298A502D9D6,$558C7365E8EA919C
    Data.q $6868A22666A1DEC4,$59CE187C25C8BD76,$0BACE959EE789EE7,$A57A6295AD6B6AD0,$E94F6221A9BE9184
    Data.q $33412014A5A201B7,$4A4E54A75CA6A11F,$D3B4ED19E2B5AE29,$27EAEAB3B52B9B4A,$D41F324F96A1CC84
    Data.q $86D9070D1A89CA50,$D2D5B425FFAAB216,$B66D6B42D8BBED2A,$632A198C253B3AD5,$030146A8942369DA
    Data.q $2CF9F5AD62537268,$C696C2B08BB299AE,$85E52AEAD6BCED4B,$A6643706939BE9C7,$EA78CFBB20230906
    Data.q $6B5BC30AB5E74949,$332BAE328B43270B,$BE21894E9BB62EDC,$C142A5B0C1E69DF3,$9183DAD8FD4E0DC0
    Data.q $2F3CAF0AA6EB7B3A,$B32D02F4ACA32DBB,$AFE5B85E9AD3EF0B,$C0D467B8834069F6,$B2966BC7B2E74DC1
    Data.q $74CCB34DD36F3C2E,$BB4BD2F650B767CA,$539E4AAF33BDB4FC,$578949C7050BF813,$6B07AB2AD2577BB0
    Data.q $F45CAB6DCAF4CDA3,$EA17C9ACFE0B48D9,$7602C24DE4866719,$979DB0038370D451,$88E130CD1F619DA3
    Data.q $7A4E9388D27A0E87,$5333CCEB9C9B4DCA,$0D163D602507895D,$3E7AD4B7FFC7E98D,$EA366E8F82DA6B7C
    Data.q $1C33A5E8366E0F86,$0E54E2E83752EAEB,$9AD5B31C1392708C,$FFBDF0BA2CC27D7A,$EF382F1386DABBFE
    Data.q $097B33A6B11B47DF,$8DE584CEC80A0391,$3A7F6BBEC3B067B1,$B7F6FC7C5E87F2DB,$69DE68DFB9E2F28D
    Data.q $09805096F3C0980E,$02ACD883D53E2784,$B3DA74CD21FD3687,$EF89FDC117C0F5DF,$00C00C3E50D20E4A
    Data.q $970C833C02A09026,$647C1041A540A6FA,$4E06BF78510A9E03,$D38A835082F56DD0,$5DA00509100C1303
    Data.q $78B0ADBFA71414A1,$2038982AF060742F,$E2AF1D5B0B7B2F76,$D0466EC094071733,$2849561A91240541
    Data.q $C297BCF11C4B805B,$175E045B7E903A15,$F4460E353DAB8825,$E81A035094034C91,$87B6F0DB1AB07A6B
    Data.q $63DF8BCFFF71C2C4,$88CE24C468EF1920,$02F092D5CD49C56F,$E1549BB855870D9E,$BE854E9E17473890
    Data.q $2E053C48210B5FA3,$80F08A4088040088,$C1204805E018071F,$852B45BEA0D3500A,$56B2E85B0BE45C8F
    Data.q $140453D3F57BCCBA,$F81C03E0041281B0,$C5B8578250FA0040,$03800A10E1B82B01,$17E46B445D49384A
    Data.q $CF859181ECC2C921,$700D811034F164A4,$5038020098030260,$65C0049300C40502,$06A11A0E80F90E0C
    Data.q $0A00300735C3D10F,$1A0940F81F0113B0,$7BE188F2B9B2C437,$20280D32E70F3DA5,$B276C337E6E4DB00
    Data.q $0441C01B00204416,$1F4CC05408950930,$5A8A859036254164,$103801C0C8190B34,$DDE4D17471641880
    Data.q $6DB48639D24A4509,$0200AA5607012804,$069B6BDCFF6D4068,$751326FC0F80AA3A,$5C0C81112AC0022B
    Data.q $F00204C0CD3FA7F4,$19539F9512B67BD2,$015470008049EF17,$0402505B3DA3BD45,$1C53A8901C008068
    Data.q $001C3BD3122801B0,$949C0E003A8358AA,$C60AD5496B4492A4,$4CDA2CAF009372A6,$A625A0D01C80B015
    Data.q $505800507EFA81E9,$90020528BD80AC60,$A7BC438232367CD4,$56B3EE2FCF3A5406,$2690F038B441280A
    Data.q $7C2598EA4500E631,$651BA800CE9FD81A,$A02E90D6788F5AAB,$01C4F55AE5858DAA,$00C072FB97695C02
    Data.q $33B3B670A7227806,$5ACF819B736E68C8,$2B1F3F2A3D840334,$1EC0110034CDC15C,$0E6B4E5A2B8922DB
    Data.q $090240865800C18D,$B7466B1DB7008778,$3D16B7D76EEE807B,$368A98C14B4A0100,$48F95D00FFE0318C
    Data.q $2E801E6FF535C35C,$03E0E97F01F01C69,$03DDDA33502EC8CA,$7F466EF5FEBFE050,$655388B3E2F6D84A
    Data.q $75A2313F90634A99,$1CB0700713E60CB1,$7E00603F9CD7D03D,$140BD6F28B5FA12B,$5040013C4604C158
    Data.q $DBCE00E9FDB9BBA0,$AAB00A6D333E4960,$6115D005571C1B54,$0542201C06C0401E,$0E54E6280C085280
    Data.q $80349B37FADCD630,$536009010C9407C0,$C2F919522C462AC0,$02EF33D78F351718,$5A0260113BAB0A0E
    Data.q $605800707F8FCF0D,$40E346ACFD400680,$F3883701E03C0F83,$BC180E76E4D07003,$2CCCDB4CCB004059
    Data.q $F31DAF1808008C9F,$8B5256B5C2C5B817,$E10A359AFA5C00C1,$012C8F7EEB097200,$A600C0060580DF37
    Data.q $3FC0789C09810CDF,$FC45DB85FF84403D,$CB1F018808034CA1,$7A755E58D93D67EB,$60F6CB17303C0200
    Data.q $519BF607CC6665CC,$0F81F006CDC04C0A,$0F06E0636103C078,$328C678A7C3C34E8,$1002AE2A5CACC5F8
    Data.q $AA2D91D5994EF300,$00E060D1C33972BD,$10DB9C3ACF629843,$D60241E09CCE004B,$38030259CCB3809D
    Data.q $D3D752EA3A83A800,$B688C6E0697D4E91,$8EC09A0BC7163418,$C506610B700F95F5,$B33702BCD7874B9C
    Data.q $EDD7C48186EB07C0,$F66E27057B240303,$C62E0A20DA3D556F,$43D29C5F521C26AA,$86054D7E8CD00D8B
    Data.q $F59E0262570D8000,$3C4F896EA1F1AFEF,$02602607C8383C01,$102E1EA303360379,$AECB50480DE80693
    Data.q $391ED35863C7294C,$C0020CC21C010085,$C08732B7FA484AE3,$00801003FF0E6BA5,$05AD3FCECAF73806
    Data.q $5A77CB827E769AED,$7A7C5D067F4CF787,$0C1594EAAF132842,$10700392675406A1,$804F0F00DAFC2F54
    Data.q $E7835B9CF60EBFC4,$A1C8F01158F666F2,$6D81A66721BD30BB,$E8110686A96CE57C,$2BE809F7704C54B6
    Data.q $78115A0AF5EECD06,$89C096C9E2BCDFC1,$61DA0096A05DFF13,$CDB6494B13B51C44,$D038045A92B3E4D2
    Data.q $3836B607A7C35A03,$EFA00CD514E0466F,$616ECDD5CD373803,$13EAFD5F18021B23,$1DE98C91D3CAF1AF
    Data.q $60467F32B8FBE3AF,$9F545D85012A5891,$45DF42FA00609331,$C3D2E2B409826C8D,$8C15E4DE2DB0B626
    Data.q $FF13FDC01CEC9DC0,$592533E474973D53,$103101A34C7DB634,$1001121768829774,$7E616E44C25B0110
    Data.q $FA01E1AAFF18C026,$02C02C7EF7C95FC5,$34D864B00F10709B,$9D01064901202B00,$6F76376CD6F24ED6
    Data.q $B6D23F127B5E93A4,$0A2573A92B280732,$04463E4002BE01C0,$C61E73021B0C9015,$7100600F0AD01270
    Data.q $01384A02B64B6C86,$96F067466F038695,$B542E6AC00751782,$00B4CE4758020012,$801E38D48B52D031
    Data.q $876163FF25B02555,$77D7EA7C557D0442,$94F1843012023026,$706958220237F56C,$73E69E81F8460066
    Data.q $D7D93DB4CA01C517,$958345293844614C,$21475053501E5F02,$50053EA01C1EC74F,$FC5177C701E46F02
    Data.q $62584C86E0230075,$003402B0237F7080,$2B01271616770F67,$32948E74B5177FC0,$552D67F7B17D7858
    Data.q $4F21600A5582B944,$1E546E8685B32062,$DD51A562FF00A1EE,$6BE7D37F786D0145,$702C03E6C26C10AD
    Data.q $2E00300061D01471,$4296546CF5583BF6,$55AE52A2F641176E,$3A0426631102FA21,$7EB57F6B421B5E20
    Data.q $35FE6025FD897000,$178CA00E6C20AE7A,$4A98AA5166F30267,$676E36C67D5044FF,$AD57703120F30B88
    Data.q $6900244505793FF2,$D5BC64551420C26E,$9C6E87C905E5BB5B,$0008CE8A77F40180,$87486377716D178C
    Data.q $BB3B84648332B53F,$00809590225101F7,$38BC8B503503F450,$3389651859E89521,$07C6987808765FE0
    Data.q $945D74B5625BD64F,$4E82F85D85B7687D,$7E480F5AE54E8B33,$100F9284C20150ED,$BE58075721720686
    Data.q $66F7EF82351A66A5,$30009158CD6F001F,$8F95D87E55448C01,$0340382554AD5507,$0A44D1EBFF233944
    Data.q $48826F02B0F56180,$684C64789659D668,$265636297FB64D82,$0044746A64DC3BE7,$C0344FE2795C6962
    Data.q $2B1EC2803143FD02,$20901102F03F3390,$E66A51597201523A,$3873D7F684A89F05,$7DF5584467AF5809
    Data.q $62D076F85D40E634,$6857400802C01A46,$04457B3E81CB3AD9,$59937A02161CC35A,$9D6508C28C05BD51
    Data.q $65783702D4740195,$46F5025011368442,$799A901101E3522D,$0492243CC1E84322,$C01E4231AB014024
    Data.q $9B5DB5FC9B69B577,$6837B33DA6D559D9,$B2573258D46FE414,$0E3902342779AA7B,$83E0350478DF0110
    Data.q $A0599D79713AC1E6,$A942E8549B576566,$7D69C48063494279,$B2553AB0C785C458,$E56144042E17BD21
    Data.q $A0E61E9F46399D41,$A97916A8FF3BF9BC,$3A95700254FE02D4,$877051E01F836688,$6E40443663C1AE2F
    Data.q $A29A0E84025286A9,$74A96818847DA019,$D62334AEA1858B36,$1AC2194182B16A34,$73213FF98E04D3E9
    Data.q $5C808A29A296449C,$4AD4F37718825568,$2299570001529352,$0504D4C11EA43333,$8E543D86A6B401F0
    Data.q $E03132D9DD9D7A42,$8E6B0A4954D3F57F,$50401B0380312783,$F88F01E7C5237258,$2322E0CA00602F04
    Data.q $9DD972A5B92D4FE4,$885885C9BD52A505,$FC00A0014FE3628F,$50F00A37131427C3,$72E87BF01400504F
    Data.q $2B516A7895A9D59C,$4FF30A85902536D6,$850955727A37E82B,$0703D1E823A4317B,$3B720501F4049270
    Data.q $88E7A93A9201B2B0,$EC5C9A31412A8334,$325A69591A9D4662,$8C5F5213FF353351,$3CC92A00C03A0499
    Data.q $BAAEA4100A252250,$6352936551D3C05F,$A9B6FE03D2332EEA,$D55C20A2F739C2D7,$3328074F8131639E
    Data.q $A985FBAC96802752,$20319FE2D3A4D00B,$B86364D429339D2B,$9D525B47F4662CF7,$54C62280050532C4
    Data.q $E2AC800127626F45,$7DDA4D367605059A,$6AED9C72D552E591,$D523B27234634763,$1B040504EABF0359
    Data.q $5AFF02B01A322422,$4D00BA3232B5C151,$09F2B527C6888B15,$C47F3FC3853809C4,$0100C088A8A02C25
    Data.q $A5F27639B1AC46F3,$BB1E4DE349034B19,$1B4FF8879C750301,$21223947F343AA00,$C0101DB0679499EC
    Data.q $B325521A16909402,$62BA5BAFE0130312,$E20E52D8069C3388,$5AB3F50903149852,$00D02C35F37030F4
    Data.q $8302B00CFF08BB46,$87C6D33D51AC4001,$9AEE639367A95A42,$5E0250386D485D49,$01198825694176BB
    Data.q $1A0B33EAF70C3082,$1A6F103453329947,$8584DC8ACB545817,$F3F66AB38D50BB3A,$89B656B7214A6B36
    Data.q $2501C363B0150050,$E4B758B3C0307214,$1C01C013789994B6,$B5F50527086132D7,$43CE1EE468A37A4A
    Data.q $6B1E51A400F4520F,$8072D003B387424B,$D7DC91B361AE9BBE,$2C01E9CC3706B047,$03400C0241282FD0
    Data.q $F2782963EF2FB093,$2248B586BBCBBC58,$214AEC3103A08567,$C0C2B98007031212,$49B0820D44D0E108
    Data.q $6F64B044662D7485,$4AA6A8935F258ABA,$9E59602C01F0830F,$8AF78D93D39E342B,$D418A6A4DB00B4CB
    Data.q $421D994803137CA9,$3C9AC57C01ECAF70,$8865485AFF93D5C5,$21337CA4F5444D76,$6A84227128B1163E
    Data.q $307682B4B3C20A20,$8E701A32D8ABA478,$2BE239329E3C9570,$B7C0E815755BB516,$BE047D8AB4AA6062
    Data.q $D63E37C2F65948CF,$E392A02F02417FC2,$9C171E6D63C14A68,$45EA86359C85C747,$E89D0C08C3D23421
    Data.q $AE450447125C1E64,$70253884CC464BAE,$51AA51F0B08C295B,$21055B1DDC4004AC,$F5AB6FB60E57F2D7
    Data.q $1A34039C00394F48,$63B017C64C635390,$40144EC2B120F8BC,$253DE3875AB47203,$3E8B7C746000A770
    Data.q $3033024C63C3E00C,$A887E01A27D9F001,$A5E71D883ACF0136,$5402B0EB8400761D,$681CB5F8BCC04DC7
    Data.q $94051D008558504C,$C516C84001634588,$9E9AF8896B441895,$C4492B98F452048C,$1C0144DCFF54EB23
    Data.q $0085293F43C2BC05,$A01425BA9DC15AAD,$71C1F72E57CCB3C8,$5FC69ECBA98032AC,$D00300852B51C52B
    Data.q $F3337480C86516AA,$C68C1E98E054CC9B,$20084B685D4653AA,$DD401B4380EA29B5,$45579E035045CDEC
    Data.q $9A9391DB214FC432,$80CEEB2C861C6001,$9A5BFB8607C5CE01,$CAF3C70A788BE00B,$2E5F8A54CFCA081A
    Data.q $0315AA308CF30945,$ABB3212A05001A93,$BABE7110A8C04CD0,$C15580CD800B85BB,$C04ED1801703D25D
    Data.q $202B58B2B6C5F31D,$20A218AD8033562D,$B03A043D26CED038,$785906083B8CF28B,$D35D34010BC7C9AA
    Data.q $4471B9EB4C0261DA,$231EB2DCD05001CF,$0F94C503504BD42A,$3A788ACC3320B815,$69D19D4E96BABC6B
    Data.q $3BF4A73B925C1A62,$0D00D015FF9B5008,$5F1371AE90599920,$D1D0813024D4ED41,$21972D634AD29D23
    Data.q $02A0220280220220,$8D5BC1AA52B29519,$4FB5FA905F333C92,$D7AD7901600D5629,$9212A56016028028
    Data.q $725F8D19D813931A,$8E7D872EC7B99D41,$802A05902E00201D,$33A69D7BD8DD8DD7,$4A2044D94CB25334
    Data.q $6D8734523792B6DE,$A3D8BD9ED78D7A03,$35E20B80E02ED79D,$A1D00F8484DAAC74,$77515D4930C48977
    Data.q $DB7DA2036DB4D79D,$000D1C68DC014016,$13C1E755A55D94D8,$DCCD77000D042B63,$6022D8CDA301602F
    Data.q $BE57A1E76B48B503,$2B74C8D45D70180D,$5D7ADCB02E000D12,$AA334013D8CDDFDB,$18EC41DAAD6D0121
    Data.q $B05985C65DCF3DC2,$7ADF0002002DB7DD,$01903DA51863029D,$5835C46DFFDAADD2,$D8C0330072D3259A
    Data.q $1038021DB7DB6DDF,$36DE8DE7D5A20637,$D033242301A950C1,$1D78DC8E17E02033,$1FDBDA7496801302
    Data.q $94DB69512035049E,$8E1602F0014C9B9F,$50E2E012016DB3E1,$DD404AE3131A9EB1,$9025BBAE24CA2221
    Data.q $9EE2CD79E4DDA2D8,$19E0DEE44A6F1C92,$558B3704324C788D,$2902AE5ED8E00201,$8111EB2535AD02E0
    Data.q $512339861AE1FE0D,$0301B278489D467C,$51E4D95FD0150150,$0CB4E54E309ADA05,$1142425194DDADD7
    Data.q $96C3183FFC042F63,$B22C011BB6E32E7A,$DE9CBA6B2AF236A0,$E55E87D170947E4B,$14A5E4816EB4CE34
    Data.q $A9576969C72251AF,$B9D5D7268045E95D,$22F73FE3ACC17AFA,$2D01704EEA2C8890,$42339A1E4112B691
    Data.q $940FB1ACC8CEB2EA,$00D03A04DEAEDD10,$A9AD1F4D5E2C9512,$F90341C6E6C2083C,$1D016E81C19DEBDD
    Data.q $36DD24F25FC541A3,$4AEBF050EBDECA17,$1CB2AADD51552A2B,$8E670339D51A3615,$A5ED051201457CED
    Data.q $15E1A62031902E71,$F709015163EE6E43,$3D20635D1A6EEB21,$1DB04FEF2AF50140,$316F19226C094559
    Data.q $FE06500D01B0395F,$1A453602F1DB053E,$A02B01BBCF1A5261,$820151DB052F0B1B,$EFC28635E4549691
    Data.q $B02608CC64F17CC8,$239651C111D0E202,$063180F22EE50C00,$306002F0156277ED,$3AF39F38F2EF2D0A
    Data.q $04F921000041EE6F,$00022C003F003209,$06000092007B0001,$8F1A2C48709FC0FF,$8000302CC49124C8
    Data.q $1AD86A56AA60E999,$78B0E0BF7A54C0A3,$F0698B970AE9D46C,$3397AF4C396FB5C1,$15A854C0D5F871B8
    Data.q $2463848382642474,$188D39110601034E,$187174727273390E,$2F26340F11713E39,$3A2464A3A2858035
    Data.q $9496722C25100D35,$71B4AF3D93B17392,$A4819F2B1F1B2C3D,$3D0F122F6642C0BF,$B4B1B0CB18B5B490
    Data.q $261F0671CB93CDCF,$173A62DBC15D8017,$B2CEB3CFD2953823,$23383D8DE7E6E3D0,$3713A749F2DC5B07
    Data.q $B3E4EA0472949197,$86EB873B356ACEFA,$87015B7A12F35035,$28901030FC389CD9,$88E5F8FC898F4E91
    Data.q $C8E8CA73391A2970,$2E2460C24747C1C1,$158BB262F22030AC,$489C523128C4595B,$47030CC8B4BA2116
    Data.q $F080A03D1AB268FF,$58032C142602A8A4,$AB4DF09756CDA691,$4E65554B01230399,$8A13079C63F407CC
    Data.q $00070B020DE31D1A,$B7D552B5B91444E9,$A46E68E46DC2AF12,$42A1FA8ABDC74DB6,$30F8B042525FB1A8
    Data.q $E7C4D6E5747634E7,$7CDEE96FADA36E48,$7C7A958FBF274B7A,$1E261D12300BE060,$8CC44DAD4B76852C
    Data.q $C8EAB59AA0D64B25,$2DA712E9BC46E591,$C0AC2CF5881A0A0C,$974C4251F7A5160A,$C4806B9039E3EB31
    Data.q $9EBF9290E7F341DA,$D05897DB24F2159C,$1E35120FF7926178,$C8D7716EB1D99A58,$E7737DA0E1CFA921
    Data.q $6BBD9ECF87C7D9CE,$FD892CAFE76497C9,$B706D486F0050A8D,$9ED7A5725CCC944C,$781A839CB8341A7A
    Data.q $72E1484A12836110,$A25557715CA7D216,$8042B0DCB64BD1FF,$287CE4044230E963,$167260D235E85D1B
    Data.q $A32846340780E07A,$F2138CE378E63384,$635C5721D17C20D8,$A3C99D88DF545157,$C7751526D55104C3
    Data.q $63494DF0846157A9,$4E3396A5A9665785,$4D1AA625F67B60F9,$00E8F3670120F48C,$F09458F469392381
    Data.q $C1E9D65B9623784D,$66780680B9E67702,$7E1CC8BE728CA549,$736E68668F85A936,$368FE0C74D4C60C2
    Data.q $00B9EA949F6598DA,$EE34A66579EA989E,$7DDD282E918E6349,$3924350700E5A992,$31241A969939A2CA
    Data.q $E979DE7CA6A74976,$EEB7AEEB8A62B6A5,$A0E0E83E57AFE79A,$3A241B0388D61975,$6163DB333012014A
    Data.q $AB7AE6BA9D2388FE,$F6D9AEABEA5ABCA6,$649F17DA1173A5B9,$5898A40D41F7B245,$8D5CEA0D7264E6FF
    Data.q $9AF6D6BCE99A7693,$57BD2D5BCEBDB6AB,$C8DA1DAE7D5CDBBE,$D15800C052122408,$B5A9BAC43972D902
    Data.q $C0B41EBE6F4BE6F5,$9E84677B72DCB6EB,$80A6C2E37D612B06,$52CE08C2418AAA09,$A76B6AD692B81D25
    Data.q $2CD00BC5ADCA52F7,$2FBD736CD336C5B1,$9E5726FF8FAF0B7B,$1070030626EC0F07,$B5F3DC3E7F7262E7
    Data.q $5CE297CDABBCE6BC,$1EA735AD4352BE75,$0340683D7DEFFA03,$1D8E3E41C0D464BA,$D5311C4B2E961EDB
    Data.q $2CEB56D642DD4ABD,$E08575C9F2B6DDF1,$F271830504DAA746,$E750A6EF073C9581,$D5F37DDB8CCD774A
    Data.q $DCC696D6735E3390,$11039C597E5D8DA9,$D6E038370D462770,$538EDDF17E227273,$DC3ADADF8EE4BA9D
    Data.q $DC870C8E33ED6F92,$90C340E861D170FF,$EDC74FBEE58BBC74,$C8EB359EC756D5FA,$31EAFAF6EC376D57
    Data.q $9C4A77423645D295,$DDF6D8625101188C,$FEABE0F0F91F1B8D,$78E575AF17C8EB7D,$B640280ED0A608FA
    Data.q $D7A69CDEC90FA012,$F13DDDD791DCFE2B,$D8D3F9F7FCBFEFC9,$0267B1BF1C941EA4,$861E602601423BD4
    Data.q $B9005F32F86A6B51,$AB71762F09EF4127,$87F96232D570F720,$18E0E00541204901,$EADEF37265ECC170
    Data.q $E57F4F25FBB387BA,$D50A33E79D069F33,$50890241303D2E87,$988AD438E69DDD80,$7C0F91D83FD82EFF
    Data.q $3C27B836D620A3A8,$02094071744C28D9,$FC512A20541D0437,$0F1609C43890C693,$C627890B23033A86
    Data.q $8751725365CA6223,$060680D42380D11A,$2DC9BE16640390C4,$31131E3C007CB1FF,$0A377131F20B47B8
    Data.q $C0BC1FC540685D1A,$2BA661098AB95B00,$18DFE4647C717DE6,$DD8F118E4ABFA6EB,$700F80400802D5FA
    Data.q $F015228018330100,$92A9910560902282,$8FF0BDFDC325AE8D,$0C47A8991F64745C,$3204C0E00A01484A
    Data.q $588F7772F8280190,$63E04803800B0241,$493717121E531991,$10E4BCD092CFF215,$BE9780200080466D
    Data.q $8007AC70293666CC,$302927C7C3480870,$40F81C01000E7200,$78F2CE22C446F400,$023767C91F224BCC
    Data.q $1136A7CCDA028070,$642217C054163616,$32F26CCFA0360E44,$C5D62A0C40081C03,$23E68CCD9A7345E5
    Data.q $18A0A00C0081A95D,$09C001A43A050285,$99F34665E8B760E1,$E2347B8953AC0981,$026011B847D8EB1D
    Data.q $00F98E01E91D23FF,$4629881C12131112,$3E99B44649089033,$EA5D8316714FE895,$502ED9152819A334
    Data.q $400814A3151E7C09,$71F2C1F138F8013B,$D3CDCA4753C12B77,$8F48848B2810201C,$054303801E8C033A
    Data.q $356E98512AD2FFEA,$866006068C5007A3,$596B2D18AC65BC11,$52A0D59683833979,$56A9CF1AAD3C60DD
    Data.q $20354EEB7D4E008D,$6BC08E024090B095,$B2965803819A0F41,$C8465A840128357F,$156528BB388ED509
    Data.q $281F18E7440A4FAB,$F2F29259211B4DC0,$597B66052D801400,$6EA58D588ED6026C,$07B696CE97B358FD
    Data.q $6C07192A35692DB0,$D97D6B66301F0186,$EE88130076CECAD7,$9F35F403DB10F404,$14D138FD43DE1803
    Data.q $380400402B006012,$1851BAC1EC098100,$3017BED5A0022EFF,$3B9D5E40395598A0,$2FC01F0200400982
    Data.q $8B9762DADE602404,$0A01B6752BEB5CF2,$0C0DC0303701E0D0,$9B67A8F72C29DE52,$80E49101505E038C
    Data.q $8340576C2BDCFA06,$7E407E0BC1003C0F,$080A16666C4E5025,$D5FEE2A95F682ED0,$C05803C08014070C
    Data.q $40782C0300F81F02,$03F56F1381902979,$7D53932414C391F7,$580DF0F0120D72F2,$15FDC7582B1C0060
    Data.q $B67AAA03100F366E,$0F70218C19C47FC5,$0B01E009CBE0C01E,$3AC7D7040181006E,$E45B6142E45B80CD
    Data.q $DC3C04EE764603E0,$C0C6360780F01F64,$03383C7782BC740D,$00BFE9E0E2E16655,$419781603802401C
    Data.q $7818079A30100300,$90DEA460FB620480,$DAD1D845C038152E,$0241F0F718A0AF23,$03F98C1F6A3D46FF
    Data.q $3D370D039FEE0E24,$1F8C40C81A6AF80A,$4820D1C0CB476A20,$F7A75566500C0F80,$DF0BAC874FB834A8
    Data.q $8D72E003B61A74AA,$5000DA941865FD47,$3EB5E8097D9A029E,$900E00008BDD75F2,$35BEE0065A2C036C
    Data.q $C7B8380981FCC408,$38C0603936B69CBD,$B7732B7174B937C8,$4EA203197009014D,$804C83662D47B340
    Data.q $47CC5955B2AD48D2,$0DC0F82300E14005,$39013A3B86EB7CBC,$E28CEBEB2D75749E,$E0020CC0998E3A40
    Data.q $ED8524020068AB80,$CBFA3B2FE5EC979C,$75050CFC04F32690,$F00B5FFCCC92E067,$0820D1A0FB6ED959
    Data.q $B74C15DE6E23A3F7,$AA4118143755969C,$0E163F1C06A0AC1C,$8DDF5C92FB026E42,$574A6E5C140F3306
    Data.q $4010F1B6C52BC51A,$0EB8E73AD759EDFF,$788EFC034BEE1DB3,$004DDAC227D70005,$6B818A410260D413
    Data.q $60E4B8D71902B029,$F2CAEAAC778E75D6,$26AF772568259F55,$35100603FD376A77,$C658EB3D009D19CE
    Data.q $C063DED004327E0B,$8A898038EC7A207B,$0E49E6A14396D17B,$7E4FC76BAD480F35,$019C7DAAB89DB104
    Data.q $E7F2282DC5944DBD,$D0CF1A93D1F76E11,$7305637DF18CF0F6,$96C2986925C10560,$66D4A3120C9C179F
    Data.q $CEFBE3046F6B615F,$D47680258EB5DE78,$533678AFA8007783,$ED78062D56EEC17C,$58E71BE75C65392B
    Data.q $E93FA5A933B674C7,$5D2C63B5007367CA,$A0A0D7C951D5DF8C,$971164C1978D3C87,$0107650125E00077
    Data.q $F00A5AD740008034,$990194DA75C6037A,$5F961F6086327756,$9166175065D5F8FF,$4040384D97F74F76
    Data.q $E3A300C03F5ED16F,$9F02659572D6F200,$02B5F762160B8116,$B0387BA64901382E,$CC4016DB6526665F
    Data.q $6F60125B36716B14,$C02C7888305FC5FB,$276666BC78D6CE6C,$01E2451EC7975716,$A2C70C703503F19B
    Data.q $1002301472170601,$69F07A7D48146328,$E03377C6D064C674,$9355A62E4AE56863,$86D02307A7D88275
    Data.q $403E7287501A2775,$EC3B664065202B66,$71D01B0052E80101,$85AF5CC79D01E405,$575D483083D5F570
    Data.q $6A663500603861C8,$74290314F972C861,$145955CD69500B65,$8186FA6CB86F7147,$F0110334D90EF692
    Data.q $2B43D03F57474522,$0265967218551CB3,$67E47220537D95B3,$135AD79477B63663,$5CD8976696045BB0
    Data.q $557BD7EA6CA828FF,$0186ED2380135787,$285300703A03F4A5,$C189989880D5891D,$6786367767745965
    Data.q $18920508360268B6,$CB4F957988135754,$1066340AC7A10237,$C00A0335990EF012,$2436403D1721C730
    Data.q $5F35042122FF69A0,$B7CE6486E88636E8,$FA7C10130346D014,$7CA7572B78937DC4,$F5F88E4595563000
    Data.q $030509027D462261,$04348407445137C0,$38E03BE1CC00A035,$495CE79F9096D46F,$8358E864C88C00F6
    Data.q $48AB38C4F40116EA,$7E85C83D7747CB5A,$3B623501B0195996,$11E91E119D01903D,$295AF6685057B221
    Data.q $4BE8DB07B7FE8128,$892E93F2976D65D9,$198765D586D02689,$02B0C24DF4A31D12,$D5F456F6182171EB
    Data.q $185D77D95FB5F783,$5C381B2974130045,$164DB77F77E921FF,$02F2AA02B1EA2422,$48BC9673B41F4011
    Data.q $236E776882E5F505,$8A196883A5417815,$837C6544DA86379F,$EC9183EF3ED0041C,$90700A21130D4056
    Data.q $87DA0550148985AE,$4798178500B55554,$2231EC1EB9870255,$E3BE1F7026024046,$475A389758A74B01
    Data.q $99C92D3354300015,$D1EC2712C199E519,$1E21728385104839,$7425226E858A95B0,$25319B200152B985
    Data.q $A901A37E43627D01,$23C1EE84B4C40485,$D4756699C680C01E,$352917DB9D591D02,$45543B76D1AC4052
    Data.q $A82501E9A73D1958,$819923DF59B5939D,$01E1559D129C51B9,$43D93A297204A3EE,$0A4F99E897601E21
    Data.q $2798C55C39EC3FD0,$504A4C21F2290213,$0D2F043723201F00,$3589AE4DA9FB8CF2,$5501456F9FF011FF
    Data.q $2A801E24127F2BF6,$21F315591A02F05F,$81050A0FA0E03127,$37A0089FB8683C55,$F4FF9F21AC23D427
    Data.q $6C1D11AE5A600505,$432948A258F701E3,$82D59FD0079E89C5,$CE48500703D2EE25,$01B2591F61AD01F9
    Data.q $B9D5A3D3DE5C3A14,$A923321025A2F6A2,$5EC00A4220483255,$79DA9FA0313A51F6,$DB6D599C9BE44800
    Data.q $01B23320B29E2122,$28F52E40260DD8C9,$C8025A0F9D400429,$A2C01B0075A494C3,$A02501E23D9B52D7
    Data.q $F88520230050622C,$A2401F27748B1CB0,$755BA783925819C6,$A83B442749901156,$5C55020133062A99
    Data.q $2A0F02B004257A03,$54A7A5479D937555,$A584FE21121927E5,$01F53D887E4A8347,$349B2A740312982F
    Data.q $01B01C566A903580,$CB2B12954B6681FF,$01C1E00A317E03D1,$52973BF8EE18D167,$503FA00358AA6054
    Data.q $3CD50C0015D053BA,$F43A02C2183873C0,$5966E02B00C0240B,$5FFA4D6862BD9E54,$301C5956D4AD1390
    Data.q $0F39849A3B19D7A9,$130A840C1ADB0112,$45152F331DA5D26F,$313C3ACF56F84803,$00161D01C01C0340
    Data.q $43CF32F31945EAEC,$150050A49E1AF221,$36F3BF20F19387D0,$C9114EA02501A297,$20AED6AC5266AA5C
    Data.q $23337C31B2F738EB,$91E202F10A3D3039,$312BB83830F20C36,$50D4EC964B32B310,$C231A5436E703477
    Data.q $8F034ADD14630402,$7033C12924401130,$77DE50D62E03B316,$9A00A21827E34F3C,$2FE1AA0E00871807
    Data.q $74AEB374913A7235,$3933F44E3786AE44,$0A71DE20000A00B0,$4B49AB14A9B01FFF,$4B0B5D59EB084CC4
    Data.q $3B0E4A430D27229B,$B59F830084CA8416,$62B92BB6C3C64902,$328127C2FB20D316,$1F226180AAC4A423
    Data.q $6832B62F2B56989A,$B4F7B0078241252C,$DE39E0312D2B44B7,$2151AE168B110651,$8B463C24985862FB
    Data.q $18A1700800702541,$9A3B9BB9AB621CBA,$85589F82B01D1A1E,$1B2BDBB76027AF3F,$3ED9BCB829915D90
    Data.q $8936035A59BAFA31,$59A8E2BAB57BB33D,$AEC4E8297B206567,$500E2EF259004025,$D2241B2A3D5BC2A4
    Data.q $B084CF4F800B2F29,$07DC4F602D62E494,$5EBD71610393A535,$278B84A4AB121290,$2866B160080144E5
    Data.q $0335CA40A5F37158,$024047BEAA823EDA,$82C1440989013033,$7D5B8BD180601A56,$BE502501135753FB
    Data.q $0823327229EB17FF,$1CEBB25C8181BFE4,$C7024E4001BE3474,$4DABDBE43165545B,$C1695600A1EC37B4
    Data.q $DBC83D916745604A,$299FD0134D60252B,$001008AB401ABE14,$5014232B0B314C34,$8A01EA08045C2AB7
    Data.q $01C0113AE2FA2134,$D44D8ED4B8C3A4E7,$1C0134B9C3103120,$30D2F033D3B001A0,$00269A3C41A4601B
    Data.q $0151544A2561D21C,$025C395D581A5090,$22D320E31D557B82,$BE2EE76F05FC5D9A,$68427C2B7B6C319B
    Data.q $10041EE2BF2D8316,$2F0716153D5C71BC,$44CB36B6D331218A,$9C8198B84E2E1A03,$CBB6A2B087EA0804
    Data.q $79746831442BC6C4,$3043C8FB880231CE,$2A3F8442C6E1ABA3,$2902352B8AEEBB96,$51E1060C9E017004
    Data.q $95730AD5388C1A5C,$00103C9872C047CC,$C83BA044CADC5CFF,$C4EBCE5B9A682717,$0AFAABEBA9C37C78
    Data.q $263D5CBC9CD30D28,$4BA41329398FAE00,$4008008BF2008806,$39A8825E3DC8DDC5,$81D035049CCDAF30
    Data.q $3BB6B904C93BEA87,$E1C281C9239B7155,$C754A926B00505EC,$D27FAD68944EE4C9,$261DFCEFCBB84E1C
    Data.q $603B3548B71E0F80,$01ED2E131BB0AC89,$3C1C6A5B3F0CFD97,$2D3A53CF74B5CF52,$B5C9C90D0B9B8405
    Data.q $86CA5333397C931F,$C8E0011C98C6B715,$1D011574A804BD17,$54A7D3144CEB5A28,$487048D2551E2512
    Data.q $8905BCBCD22A3153,$9D00D0399D0C12CA,$A6836B1B1A08D17C,$929A3704ADB35CC1,$6F421D328F11F046
    Data.q $52B4ACB711AB0ADA,$C0121571CE25EB70,$5A9DE1E6A1ED32CF,$A0AA02B17CB66012,$6FD25D3F9391ECFF
    Data.q $4B3C87B154251384,$ED4DCEE1F3217B17,$C1B573A416A0D3D4,$824437A5447BC25C,$30E21C0850D73C40
    Data.q $84D032F9BDCBA085,$D80C8039C2E3CEBB,$F34022C0FBC91046,$1F404A0CB5E2F8B5,$204026455D8ED247
    Data.q $AA67D52C621921FB,$C60049891F539827,$17130AC18049D9B7,$8B7BA68C999D220C,$F4DAAD5934B23FAA
    Data.q $DB3B8D4054A9D4F0,$90371C833F3973B3,$370F9CE3046DB8C2,$D4425648108D71E1,$809084C20E23144D
    Data.q $8613F00D19FDC5B2,$93728132D9BCAE12,$0A07DD536308D8EE,$AA2FF18E11A16801,$DE2BFC798C3D2314
    Data.q $11B01B7A5B01705E,$9037ECDEA9DDB07F,$11DDD7C2BDEED3E0,$030D1EE261209369,$2BDFB91719230032
    Data.q $2EE18FD2814FC5FC,$AC7F21F12A3DBCA2,$00D8CAE08D5A0081,$F1F7369A2014E167,$16BFDCB90392E41C
    Data.q $22B243C6001446EE,$82451A618E01A84C,$0F45605FE23DA903,$2E516F15918B1680,$9E30E22003915E1B
    Data.q $8C19197301000CA5,$00D50308F175E431,$7026035326E3D07F,$F524FD0018F168B6,$E3EE4AD7F74701B1
    Data.q $31CE2ECDA6183015,$21E57E5600CA8B07,$0731B60E174D0874,$707F02F023034038,$0D00C0A705EE62D6
    Data.q $E6E0A009F8AD6FF0
    Data.b $9B,$1B,$04,$00,$3B
  alien00007_gif_end:
EndDataSection

Code: Alles auswählen

EnableExplicit

XIncludeFile "AnimGIFGadget.pbi"

Procedure.i ReceiveHTTPMemory(URL.s, BufferSize = 4096, Timeout = 5000)
  Protected Connection, Time, Time2, Event, Size = 1, Size2, SizeAll, pos
  Protected.s Server
  Protected *Mem, *Buffer, *Mem2
  
  If LCase(Left(URL, 7)) <> "http://" : URL = "http://" + URL : EndIf
  Server = GetURLPart(URL, #PB_URL_Site)
  If Not Server : ProcedureReturn #False : EndIf
  Connection = OpenNetworkConnection(Server, 80, #PB_Network_TCP)
  If Not Connection : ProcedureReturn #False : EndIf
  If BufferSize <= 0 : BufferSize = 4096 : EndIf
  *Buffer = AllocateMemory(BufferSize)
  If Not *Buffer : ProcedureReturn #False : EndIf

  SendNetworkString(Connection, "GET " + URL + " HTTP/1.0" + #LFCR$ + #LFCR$)
  Time = ElapsedMilliseconds()
  Repeat
    Event = NetworkClientEvent(Connection)
    If Event = #PB_NetworkEvent_Data
      Repeat
        Size = ReceiveNetworkData(Connection, *Buffer, BufferSize)
        If Size > 0
          Time = ElapsedMilliseconds()
          SizeAll + Size
          *Mem = ReAllocateMemory(*Mem, SizeAll)
          If *Mem
            CopyMemory(*Buffer, *Mem + (SizeAll - Size), Size)
          Else
            CloseNetworkConnection(Connection)
            FreeMemory(*Buffer)
            ProcedureReturn #False
          EndIf
        EndIf
      Until Size <= 0
    EndIf
    Time2 = ElapsedMilliseconds() - Time
  Until Time2 > Timeout Or Size <= 0
  CloseNetworkConnection(Connection)
  FreeMemory(*Buffer)
  If Time2 > Timeout
    If *Mem : FreeMemory(*Mem) : EndIf
    ProcedureReturn #False
  EndIf
  pos = FindString(PeekS(*mem, -1, #PB_UTF8), #CRLF$ + #CRLF$, 1) - 1
  pos = Len(#CRLF$ + #CRLF$) + pos
  Size2 = MemorySize(*Mem) - pos
  *Mem2 = AllocateMemory(Size2)
  If *Mem2
    CopyMemory(*Mem + pos, *Mem2, Size2)
    FreeMemory(*Mem)
    ProcedureReturn *Mem2
  EndIf
  FreeMemory(*Mem)
  ProcedureReturn #False
EndProcedure

InitNetwork()

Define *mem = ReceiveHTTPMemory("http://i.imgur.com/Van5g.gif")

If *mem
  If gdiplus_Init()
    OpenWindow(0, #PB_Ignore, #PB_Ignore, 614, 206, "Mario")
    AnimGIFGadgetMem(1, 0, 0, *mem, MemorySize(*mem))
    Repeat
      Select WaitWindowEvent()
        Case #PB_Event_CloseWindow
          HideWindow(0, #True)
          FreeAnimGIFGadget(1)
          Break
      EndSelect
    ForEver
    gdiplus_End()
  EndIf
  FreeMemory(*mem)
EndIf