Jump to content

Photo

Fire

XB Demo Anim

7 replies to this topic

#1 sometimes99er OFFLINE  

sometimes99er

    River Patroller

  • 4,225 posts
  • Location:Denmark

Posted Sun Jul 12, 2015 11:01 PM

a fireplace could be nice


Make it so. :)
 

64 CALL CHAR(64,"00030101000002020200163E1F5F3F0E000000001010000000800000008")
68 CALL CHAR(68,"102000000000080400122001002040110000000000000000800080008000804")
72 CALL CHAR(72,"20102000000A05090D0D090060808020C0008000200010C0000000800040408")
76 CALL CHAR(76,"020000000204000000200000000000000000000000000000000000000000002")
80 CALL CHAR(80,"00000000000000120E46E44EEE7F1F1F0000000000000080000080000040202")
84 CALL CHAR(84,"000002010100080000280201100020000000100000004000000000004000808")
88 CALL CHAR(88,"030405020019120D111009A001004020101020A0004000400000008000A04")
92 CALL CHAR(92,"0002000000000000000000000080000000000010000020008000404")
96 CALL CHAR(96,"04010A02020424266606677B7A3F7F1E000000800000000000C090104020A")
100 CALL CHAR(100,"021200000402125100400804054000210000004040400000000000802000008")
104 CALL CHAR(104,"01041109093901008129108080000000000080008000C08000004020904")
108 CALL CHAR(108,"102800100000080010008000008000000000000000000000C000000000004")
112 CALL CHAR(112,"0000303808000001010000040E1F1F1E80000000000000001000000000008")
116 CALL CHAR(116,"00000004040801000001123211002020008000000000008080000000008")
120 CALL CHAR(120,"0422480012060800001A2509202000010040400000008010209000008")
124 CALL CHAR(124,"2000020000001200000408000000400040008000000000200")
200 CALL CLEAR::CALL SCREEN(2)::CALL MAGNIFY(3)
210 FOR I=64 TO 112 STEP 16
220 CALL SPRITE(#1,I,16,99,99,#2,I+4,12,99,99,#3,I+8,10,99,99,#4,I+12,7,99,99)
230 NEXT I::GOTO 210


#2 --- Ω --- OFFLINE  

--- Ω ---

    Hexacorerunner

  • 13,924 posts
  • Location:82.102.25.76

Posted Mon Jul 13, 2015 12:04 AM

I hope you don't mind me 'borrowing it' for a couple of days...  ;)



#3 Schmitzi OFFLINE  

Schmitzi

    River Patroller

  • 4,525 posts
  • ToXiC
  • Location:Germany

Posted Mon Jul 13, 2015 4:00 AM

  :lust:  :lust: :lust: :lust: :lust: :lust: :lust: :lust: :lust: :lust: :lust: :lust: :lust: :lust:



#4 Dexter OFFLINE  

Dexter

    Moonsweeper

  • 271 posts
  • Location:Landgraaf, Netherlands / Übach-Palenberg, Deutschland

Posted Mon Jul 13, 2015 6:38 AM

Lovely animation, reminds me of Prince of Persia.



#5 Opry99er OFFLINE  

Opry99er

    Quadrunner

  • 10,733 posts
  • Location:Hustisford, WI

Posted Mon Jul 13, 2015 7:37 AM

Damn.... Thats just beautiful

Edited by Opry99er, Mon Jul 13, 2015 7:37 AM.


#6 am1933 OFFLINE  

am1933

    Stargunner

  • 1,039 posts
  • Location:U.K

Posted Mon Jul 13, 2015 11:11 AM

That's one big pile of character definitions!!!!!



#7 Plastik OFFLINE  

Plastik

    Chopper Commander

  • 145 posts
  • The future is 8-bit
  • Location:New Jersey

Posted Tue Jul 14, 2015 10:00 AM

 

Make it so. :)
 

64 CALL CHAR(64,"00030101000002020200163E1F5F3F0E000000001010000000800000008")
68 CALL CHAR(68,"102000000000080400122001002040110000000000000000800080008000804")
72 CALL CHAR(72,"20102000000A05090D0D090060808020C0008000200010C0000000800040408")
76 CALL CHAR(76,"020000000204000000200000000000000000000000000000000000000000002")
80 CALL CHAR(80,"00000000000000120E46E44EEE7F1F1F0000000000000080000080000040202")
84 CALL CHAR(84,"000002010100080000280201100020000000100000004000000000004000808")
88 CALL CHAR(88,"030405020019120D111009A001004020101020A0004000400000008000A04")
92 CALL CHAR(92,"0002000000000000000000000080000000000010000020008000404")
96 CALL CHAR(96,"04010A02020424266606677B7A3F7F1E000000800000000000C090104020A")
100 CALL CHAR(100,"021200000402125100400804054000210000004040400000000000802000008")
104 CALL CHAR(104,"01041109093901008129108080000000000080008000C08000004020904")
108 CALL CHAR(108,"102800100000080010008000008000000000000000000000C000000000004")
112 CALL CHAR(112,"0000303808000001010000040E1F1F1E80000000000000001000000000008")
116 CALL CHAR(116,"00000004040801000001123211002020008000000000008080000000008")
120 CALL CHAR(120,"0422480012060800001A2509202000010040400000008010209000008")
124 CALL CHAR(124,"2000020000001200000408000000400040008000000000200")
200 CALL CLEAR::CALL SCREEN(2)::CALL MAGNIFY(3)
210 FOR I=64 TO 112 STEP 16
220 CALL SPRITE(#1,I,16,99,99,#2,I+4,12,99,99,#3,I+8,10,99,99,#4,I+12,7,99,99)
230 NEXT I::GOTO 210

bruce-willis.gif

 

BRAVO! 



#8 TheMole OFFLINE  

TheMole

    Dragonstomper

  • 819 posts
  • Location:Belgium

Posted Tue Jul 14, 2015 4:12 PM

I thought I'd take a stab doing a fire demo effect on the f18a, more details here: http://atariage.com/...rces/?p=3277853







Also tagged with one or more of these keywords: XB, Demo, Anim

0 user(s) are browsing this forum

0 members, 0 guests, 0 anonymous users