pouët.net

Go to bottom

Random line of code thread

category: code [glöplog]
previous page
next page
go to page of 89
node += side ^ dnear;
(from my raytracer) (yes, node is a pointer)
added on the 2008-03-03 08:57:00 by nystep nystep
seed = int(((seed * 69069 ) ^ 0xffffffff) & 0xffffffff)
added on the 2008-03-03 09:57:27 by noname noname
sta $d011
added on the 2008-03-03 10:14:21 by Weyland Yutani Weyland Yutani
The last ever C mistake:

if( code = CODE_RED ) launch_missiles();
added on the 2008-03-03 10:18:01 by xeron xeron
((vsx_module_param_texture*)my_param->module_param)->set_internal_from_param(((vsx_module_param_texture*)(*it)->module_param));
added on the 2008-03-03 10:25:41 by jaw jaw
#define LUA_CLASS(nameSpace, className) metaTable.RegisterObjectFunctor(#className, &New::New_##className); Engine::Base::Core::Instance().RegisterLuaMethod("New", #className, "", "", "create new " #className " object")
added on the 2008-03-03 10:28:45 by PiN PiN
JavaPtr<java_Array_1_java_lang_Object> matches = (JavaPtr<java_Array_1_java_lang_Object>)session->match((JavaPtr<java_lang_Object>)apTempl);
added on the 2008-03-03 10:52:34 by noname noname
typedef Loki::Factory
<
QWidget,
IExposedProperty::Guid,
LOKI_TYPELIST_2(IExposedProperty::Ptr, QWidget*)
> ParameterWidgetFactoryType;
added on the 2008-03-03 10:59:45 by cynic cynic
move.l #0,atari
rts
added on the 2008-03-03 12:05:48 by fxmj4598fj4598fj fxmj4598fj4598fj
commandline
= ( ("Field" >> (variable >> '(' >> filename >> ')')[&do_field])
| ("SliceViewer" >> (( '{' >> expression >> *(','>>expression) >> '}') | (expression))[&do_sliceviewer])
| ("FilteredFiberViewer" >> (variable[&set_last_fibervarname] >> ( ',' >> expression )[&do_fibercolor] >> *( ',' >> expression )[&do_fiberfilter] ))[&do_filteredfiberviewer]
| ("Dumper" >> (variable[&set_last_fibervarname] >> ( ',' >> expression )[&do_fibercolor] >> *( ',' >> expression )[&do_fiberfilter] ))[&do_dumper]
| ("FiberViewer" >> (variable[&set_last_fibervarname] >> ( ',' >> expression )[&do_fibercolor]))[&do_fiberviewer]
| ("VolumeViewer" >> variable[&set_last_varname][&do_volumeviewer])
| ("Grapher" >> variable[&set_last_varname][&do_grapher])
| ("IsoRenderer" >> (expression)[&do_isorenderer])
)
;
added on the 2008-03-03 12:20:05 by avoozl avoozl
NOP
NOP
NOP
NOP
NOP
NOP
NOP
ROR
LOL
NOP
NOP
NOP
NOP
added on the 2008-03-03 12:31:23 by dalezr dalezr
FileTypes = [(ft[0].strip(), filter(None, ft[1].split())) for ft in [ft.split(':', 1) for ft in FileTypes.strip().split("\n")]]
added on the 2008-03-03 12:34:19 by KeyJ KeyJ
void printHex32(char *d8,int n) {for(int i=0;i<8;i++,n>>=4) d8[7-i] = (n&0xf)["0123456789abcdef"];}
added on the 2008-03-03 12:50:44 by iq iq
intro->doTick(); // move the universe
added on the 2008-03-03 13:02:19 by iq iq
RSX_ASSERT(this == s_pCurCmdBuffer); // Many tacky Chicago-house tracks can testify that it is best to "release yourself".
added on the 2008-03-03 13:29:46 by superplek superplek
sNewFile = Left(sFile, InStr(LCase(sFile), ".") - 1) & sAddStr & Mid(sFile, InStr(LCase(sFile), "."))
added on the 2008-03-03 13:50:52 by Saga Musix Saga Musix
go_start <= '1' when (ac_regout = 0 and acknowledge = '1' and num_bytes /= 0) else '0';
added on the 2008-03-03 16:14:23 by vhiiula vhiiula
ExitThread(0);
added on the 2008-03-03 16:34:38 by Tolle Tolle
arse: ; it stands for Add, Read and SignExtend. What were you thinking?
added on the 2008-03-03 17:18:32 by gasman gasman
emacs _x;

no shit, this is an assembler instruction on the 68HC12. It's 'Extended Multiply and ACumulate'
http://www.ee.nmt.edu/~rison/ee308_spr02/eval-6812.pdf page 21 : D
added on the 2008-03-03 18:04:13 by GbND GbND
// CHECKSTYLE:OFF
added on the 2008-03-03 20:34:42 by cruzer cruzer
Code:Bytes = Bytes & Chr(Karte(Y, X) + 1) & Chr(Abs(Besetzt(Y, X)) Mod 256) & Chr(Abs(Zeitmap(Y, X))) & Chr(Abs(Gesperrt(Y, X))) & Chr(Len(Radius(Y, X)) \ 256) & Chr(Len(Radius(Y, X)) Mod 256) & Radius(Y, X)

that was some quite exhausting bugfixing... phew....
added on the 2008-03-03 21:09:59 by Saga Musix Saga Musix
// Includes
#include <PA9.h> // Include for PA_Lib
#include "musiq.h"
#include "gfx/all_gfx.c"
#include "gfx/all_gfx.h"

//Deklarationen
// Unsigniert Signiert
//
// 8 bit 0 -> 255 -128 -> 127
// 16 bit 0 -> 65535 -32768 -> 32767
// 32 bit 0 -> 4294967295 -2147483648 -> 2147483647

u8 s = 3;
u8 ss = 2;
u8 FPS = 30;
s32 tk = 1;
u32 sk = 260;
s16 bewegung = 256;
s16 scroll = 0;
u16 timer = 0;
u8 st = 0;
s16 st1 = 0;
s16 st2 = 0;
s16 st3 = 0;
u8 BL1 = 1; //Button Layer
u8 BL2 = 1; //Button Layer
u8 BL3 = 1; //Button Layer


// Function: main()
int main(int argc, char ** argv){

// Palib stuff
PA_Init(); // Initializes PA_Lib
PA_InitVBL(); // Initializes a standard VBL
PA_InitText(0, 0); // Init Text on the top screen, background 0...
PA_SetBgColor(0,PA_RGB(0,0,10)); //Hintergrundfarbe 1=oben 0=unten R,G,B
PA_SetBgColor(1,PA_RGB(0,0,10)); //Hintergrundfarbe 1=oben 0=unten R,G,B
PA_InitSound(); // ohne diss keine Mukke
PA_SetModVolume(80); //Lautstärke des Modules
PA_PlayMod(musiq); //Spielt das Modul ab (Mod Name)

// LargeMap wird hier geladen Screen,BgNr.,Palettenname
PA_LoadPAGfxLargeBg(1,0,TXT);


// Screen & Palette für Logo´s
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
0, // Palette
(void*)farbe_Pal); // Paletten-Name


// Screen & Palette für Scrolltext
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
1, // Palette
(void*)ST_Pal); // Paletten-Name


// Screen & Palette für Hintergrund
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
2, // Palette
(void*)BG_Pal); // Paletten-Name

// Show Logo Interpol
PA_CreateSprite(1, // Screen 1=oben 0=unten
50, // Sprite Nummer
(void*)IA_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
3, 3); // X , Y Position

// Show Logo Interpol
PA_CreateSprite(1, // Screen 1=oben 0=unten
51, // Sprite Nummer
(void*)IB_Sprite, // Name
OBJ_SIZE_32X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
67, 3); /// X , Y Position

// Show Mess with the best Die like the rest
PA_CreateSprite(1, // Screen 1=oben 0=unten
52, // Sprite Nummer
(void*)DA_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
139, 24); // X , Y Position

// Show Mess with the best Die like the rest
PA_CreateSprite(1, // Screen 1=oben 0=unten
53, // Sprite Nummer
(void*)DB_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
203, 24); // X , Y Position

// Quadrostationy Spawn
PA_CreateSprite(1, 61,(void*)LO1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 0);
PA_CreateSprite(1, 62,(void*)LO2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 0);
PA_CreateSprite(1, 63,(void*)LO3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 0);
PA_CreateSprite(1, 64,(void*)LO4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 0);
PA_CreateSprite(1, 65,(void*)MM1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 64);
PA_CreateSprite(1, 66,(void*)MM2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 64);
PA_CreateSprite(1, 67,(void*)MM3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 64);
PA_CreateSprite(1, 68,(void*)MM4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 64);
PA_CreateSprite(1, 69,(void*)UO1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 128);
PA_CreateSprite(1, 70,(void*)UO2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 128);
PA_CreateSprite(1, 71,(void*)UO3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 128);
PA_CreateSprite(1, 72,(void*)UO4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 128);

// Quadrostationy Animation
// PA_StartSpriteAnim( 1, // screen
// 60, // sprite number
// 0, // first frame is 0
// 9, // last frame is 9, since we have 10 frames...
// 60); // Speed, set to 5 frames per second
PA_StartSpriteAnim(1,61,0,9,FPS);
PA_StartSpriteAnim(1,62,0,9,FPS);
PA_StartSpriteAnim(1,63,0,9,FPS);
PA_StartSpriteAnim(1,64,0,9,FPS);
PA_StartSpriteAnim(1,65,0,9,FPS);
PA_StartSpriteAnim(1,66,0,9,FPS);
PA_StartSpriteAnim(1,67,0,9,FPS);
PA_StartSpriteAnim(1,68,0,9,FPS);
PA_StartSpriteAnim(1,69,0,9,FPS);
PA_StartSpriteAnim(1,70,0,9,FPS);
PA_StartSpriteAnim(1,71,0,9,FPS);
PA_StartSpriteAnim(1,72,0,9,FPS);


// Infinite loop to keep the program running
while (1)
{

//Tastenbelegung
//INTERPOL LOGO
if (Pad.Newpress.L) BL1+=1;
if (BL1==2) PA_DeleteSprite(1,50),
PA_DeleteSprite(1,51),
BL1+=1;
if (BL1==4) PA_CreateSprite(1,50,(void*)IA_Sprite,OBJ_SIZE_64X64,1,0, 3,3),
PA_CreateSprite(1,51,(void*)IB_Sprite,OBJ_SIZE_32X64,1,0,67,3),
BL1+=1;
if (BL1>4) BL1=1;

//Mess with the best, Die like the rest
if (Pad.Newpress.R) BL2+=1;
if (BL2==2) PA_DeleteSprite(1,52),
PA_DeleteSprite(1,53),
BL2+=1;
if (BL2==4) PA_CreateSprite(1,52,(void*)DA_Sprite,OBJ_SIZE_64X64,1,0,139,24),
PA_CreateSprite(1,53,(void*)DB_Sprite,OBJ_SIZE_64X64,1,0,203,24),
BL2+=1;
if (BL2>4) BL2=1;

//Credits txt
if (Pad.Newpress.Start) BL3+=1;
if (BL3==2) PA_DeleteMap (1,0), BL3+=1;
if (BL3==4) PA_LoadPAGfxLargeBg(1, 0, TXT), BL3+=1;
if (BL3>4) BL3=1;

//Rote 4ecke FPS controll
if (Pad.Held.Up) FPS+=1;
if (Pad.Held.Down) FPS-=1;
if (Pad.Newpress.Left) FPS=30;


// Display Bewegung und Timer Zeit
PA_OutputText(0, 0, 0, "Credits \n \nBEWEGUNG : %d \nZEIT : %d \n \nScroll Text \n \nText O Pos. : %d \nT Speed O : %d \nST1 Pos. : %d \nST2 Pos. : %d \nFPS. : %d", bewegung, timer, sk, st3, st1, st2, FPS);

//schiebt die Quadrate hinter die LargeMap
PA_SetSpritePrio (1,61,3);
PA_SetSpritePrio (1,62,3);
PA_SetSpritePrio (1,63,3);
PA_SetSpritePrio (1,64,3);
PA_SetSpritePrio (1,65,3);
PA_SetSpritePrio (1,66,3);
PA_SetSpritePrio (1,67,3);
PA_SetSpritePrio (1,68,3);
PA_SetSpritePrio (1,69,3);
PA_SetSpritePrio (1,70,3);
PA_SetSpritePrio (1,71,3);
PA_SetSpritePrio (1,72,3);

// Scrollt den Hintergrund (LargeMap) auf X
PA_LargeScrollX(1, 0, bewegung);

//Text Scroll
timer++; //Timeline start
if (timer>130) bewegung-=s;
if (timer>260) bewegung+=s;
if (timer>520) bewegung+=s;
if (timer>650) bewegung-=s;
if (timer>910) bewegung+=s;
if (timer>1040) bewegung-=s;
if (timer>1300) bewegung-=s;
if (timer>1430) bewegung+=s, timer-=1430;

//Scrollspeed Adventure
st++; //Scrolltimer start
if (st==1) sk-=1;
if (st==3) sk-=1;
if (st==5) sk-=1;
if (st==7) sk-=1;
if (st==9) sk-=1;
if (st==11) sk-=1;
if (st==13) sk-=1;
if (st==15) sk-=1, st-=15;


//Scrolltext Sprites Movment
st1++;
st2++;
if (st1>50)
PA_SetSpriteX (1,4,sk),
PA_SetSpriteX (1,5,sk+32),
PA_SetSpriteX (1,6,sk+64),
PA_SetSpriteX (1,7,sk+96),
PA_SetSpriteX (1,8,sk+128),
PA_SetSpriteX (1,9,sk+160),
PA_SetSpriteX (1,10,sk+192),
PA_SetSpriteX (1,11,sk+224);

if (st1>500)
PA_SetSpriteX (1,12,sk+256),
PA_SetSpriteX (1,13,sk+288),
PA_SetSpriteX (1,14,sk+320),
PA_SetSpriteX (1,15,sk+352),
PA_SetSpriteX (1,16,sk+384),
PA_SetSpriteX (1,17,sk+416),
PA_SetSpriteX (1,18,sk+448),
PA_SetSpriteX (1,19,sk+480);

if (st2>950)
PA_SetSpriteX (1,20,sk+512),
PA_SetSpriteX (1,21,sk+544),
PA_SetSpriteX (1,22,sk+576),
PA_SetSpriteX (1,23,sk+608),
PA_SetSpriteX (1,24,sk+640),
PA_SetSpriteX (1,25,sk+672),
PA_SetSpriteX (1,26,sk+704),
PA_SetSpriteX (1,27,sk+736);

if (st2>1400)
PA_SetSpriteX (1,28,sk+768),
PA_SetSpriteX (1,29,sk+800),
PA_SetSpriteX (1,30,sk+832),
PA_SetSpriteX (1,31,sk+864),
PA_SetSpriteX (1,32,sk+896);


//Scrolltext Sprites Killing Sphere
if (st1==550) PA_DeleteSprite (1,4);
if (st1==750) PA_DeleteSprite (1,5);
if (st1==800) PA_DeleteSprite (1,6);
if (st1==850) PA_DeleteSprite (1,7);
if (st1==900) PA_DeleteSprite (1,8);
if (st1==950) PA_DeleteSprite (1,9);
if (st1==1000) PA_DeleteSprite (1,10);
if (st1==1050) PA_DeleteSprite (1,11);
if (st1==1100) PA_DeleteSprite (1,12);
if (st1==1200) PA_DeleteSprite (1,13);
if (st1==1250) PA_DeleteSprite (1,14);
if (st1==1300) PA_DeleteSprite (1,15);
if (st1==1350) PA_DeleteSprite (1,16);
if (st1==1400) PA_DeleteSprite (1,17);
if (st1==1450) PA_DeleteSprite (1,18);
if (st1==1500) PA_DeleteSprite (1,19);
if (st1==1650) PA_DeleteSprite (1,20);
if (st1==1700) PA_DeleteSprite (1,21);
if (st1==1750) PA_DeleteSprite (1,22);
if (st1==1800) PA_DeleteSprite (1,23);
if (st2==1850) PA_DeleteSprite (1,24);
if (st2==1900) PA_DeleteSprite (1,25), st1-=1900;
if (st2==1950) PA_DeleteSprite (1,26);
if (st2==2000) PA_DeleteSprite (1,27);
if (st2==2050) PA_DeleteSprite (1,28);
if (st2==2100) PA_DeleteSprite (1,29);
if (st2==2300) st2-=1900;

//Scrolltext Sprites Spawn & Respawn
if (st1==50)
PA_CreateSprite(1, 4,(void*)ST01_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 5,(void*)ST02_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 6,(void*)ST03_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 7,(void*)ST04_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 8,(void*)ST05_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 9,(void*)ST06_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 10,(void*)ST07_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 11,(void*)ST08_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==500)
PA_CreateSprite(1, 12,(void*)ST09_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 13,(void*)ST10_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 14,(void*)ST11_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 15,(void*)ST12_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 16,(void*)ST13_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 17,(void*)ST14_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 18,(void*)ST15_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 19,(void*)ST16_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==950)
PA_CreateSprite(1, 20,(void*)ST17_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 21,(void*)ST18_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 22,(void*)ST19_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 23,(void*)ST20_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 24,(void*)ST21_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 25,(void*)ST22_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 26,(void*)ST23_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 27,(void*)ST24_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==1400)
PA_CreateSprite(1, 28,(void*)ST25_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 29,(void*)ST26_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 30,(void*)ST27_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 31,(void*)ST28_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 32,(void*)ST29_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);


PA_WaitForVBL();
}

return 0;
} // End of main()
added on the 2008-03-03 21:56:09 by Herpes Herpes
// Includes
#include <PA9.h> // Include for PA_Lib
#include "musiq.h"
#include "gfx/all_gfx.c"
#include "gfx/all_gfx.h"

//Deklarationen
// Unsigniert Signiert
//
// 8 bit 0 -> 255 -128 -> 127
// 16 bit 0 -> 65535 -32768 -> 32767
// 32 bit 0 -> 4294967295 -2147483648 -> 2147483647

u8 s = 3;
u8 ss = 2;
u8 FPS = 30;
s32 tk = 1;
u32 sk = 260;
s16 bewegung = 256;
s16 scroll = 0;
u16 timer = 0;
u8 st = 0;
s16 st1 = 0;
s16 st2 = 0;
s16 st3 = 0;
u8 BL1 = 1; //Button Layer
u8 BL2 = 1; //Button Layer
u8 BL3 = 1; //Button Layer


// Function: main()
int main(int argc, char ** argv){

// Palib stuff
PA_Init(); // Initializes PA_Lib
PA_InitVBL(); // Initializes a standard VBL
PA_InitText(0, 0); // Init Text on the top screen, background 0...
PA_SetBgColor(0,PA_RGB(0,0,10)); //Hintergrundfarbe 1=oben 0=unten R,G,B
PA_SetBgColor(1,PA_RGB(0,0,10)); //Hintergrundfarbe 1=oben 0=unten R,G,B
PA_InitSound(); // ohne diss keine Mukke
PA_SetModVolume(80); //Lautstärke des Modules
PA_PlayMod(musiq); //Spielt das Modul ab (Mod Name)

// LargeMap wird hier geladen Screen,BgNr.,Palettenname
PA_LoadPAGfxLargeBg(1,0,TXT);


// Screen & Palette für Logo´s
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
0, // Palette
(void*)farbe_Pal); // Paletten-Name


// Screen & Palette für Scrolltext
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
1, // Palette
(void*)ST_Pal); // Paletten-Name


// Screen & Palette für Hintergrund
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
2, // Palette
(void*)BG_Pal); // Paletten-Name

// Show Logo Interpol
PA_CreateSprite(1, // Screen 1=oben 0=unten
50, // Sprite Nummer
(void*)IA_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
3, 3); // X , Y Position

// Show Logo Interpol
PA_CreateSprite(1, // Screen 1=oben 0=unten
51, // Sprite Nummer
(void*)IB_Sprite, // Name
OBJ_SIZE_32X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
67, 3); /// X , Y Position

// Show Mess with the best Die like the rest
PA_CreateSprite(1, // Screen 1=oben 0=unten
52, // Sprite Nummer
(void*)DA_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
139, 24); // X , Y Position

// Show Mess with the best Die like the rest
PA_CreateSprite(1, // Screen 1=oben 0=unten
53, // Sprite Nummer
(void*)DB_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
203, 24); // X , Y Position

// Quadrostationy Spawn
PA_CreateSprite(1, 61,(void*)LO1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 0);
PA_CreateSprite(1, 62,(void*)LO2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 0);
PA_CreateSprite(1, 63,(void*)LO3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 0);
PA_CreateSprite(1, 64,(void*)LO4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 0);
PA_CreateSprite(1, 65,(void*)MM1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 64);
PA_CreateSprite(1, 66,(void*)MM2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 64);
PA_CreateSprite(1, 67,(void*)MM3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 64);
PA_CreateSprite(1, 68,(void*)MM4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 64);
PA_CreateSprite(1, 69,(void*)UO1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 128);
PA_CreateSprite(1, 70,(void*)UO2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 128);
PA_CreateSprite(1, 71,(void*)UO3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 128);
PA_CreateSprite(1, 72,(void*)UO4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 128);

// Quadrostationy Animation
// PA_StartSpriteAnim( 1, // screen
// 60, // sprite number
// 0, // first frame is 0
// 9, // last frame is 9, since we have 10 frames...
// 60); // Speed, set to 5 frames per second
PA_StartSpriteAnim(1,61,0,9,FPS);
PA_StartSpriteAnim(1,62,0,9,FPS);
PA_StartSpriteAnim(1,63,0,9,FPS);
PA_StartSpriteAnim(1,64,0,9,FPS);
PA_StartSpriteAnim(1,65,0,9,FPS);
PA_StartSpriteAnim(1,66,0,9,FPS);
PA_StartSpriteAnim(1,67,0,9,FPS);
PA_StartSpriteAnim(1,68,0,9,FPS);
PA_StartSpriteAnim(1,69,0,9,FPS);
PA_StartSpriteAnim(1,70,0,9,FPS);
PA_StartSpriteAnim(1,71,0,9,FPS);
PA_StartSpriteAnim(1,72,0,9,FPS);


// Infinite loop to keep the program running
while (1)
{

//Tastenbelegung
//INTERPOL LOGO
if (Pad.Newpress.L) BL1+=1;
if (BL1==2) PA_DeleteSprite(1,50),
PA_DeleteSprite(1,51),
BL1+=1;
if (BL1==4) PA_CreateSprite(1,50,(void*)IA_Sprite,OBJ_SIZE_64X64,1,0, 3,3),
PA_CreateSprite(1,51,(void*)IB_Sprite,OBJ_SIZE_32X64,1,0,67,3),
BL1+=1;
if (BL1>4) BL1=1;

//Mess with the best, Die like the rest
if (Pad.Newpress.R) BL2+=1;
if (BL2==2) PA_DeleteSprite(1,52),
PA_DeleteSprite(1,53),
BL2+=1;
if (BL2==4) PA_CreateSprite(1,52,(void*)DA_Sprite,OBJ_SIZE_64X64,1,0,139,24),
PA_CreateSprite(1,53,(void*)DB_Sprite,OBJ_SIZE_64X64,1,0,203,24),
BL2+=1;
if (BL2>4) BL2=1;

//Credits txt
if (Pad.Newpress.Start) BL3+=1;
if (BL3==2) PA_DeleteMap (1,0), BL3+=1;
if (BL3==4) PA_LoadPAGfxLargeBg(1, 0, TXT), BL3+=1;
if (BL3>4) BL3=1;

//Rote 4ecke FPS controll
if (Pad.Held.Up) FPS+=1;
if (Pad.Held.Down) FPS-=1;
if (Pad.Newpress.Left) FPS=30;


// Display Bewegung und Timer Zeit
PA_OutputText(0, 0, 0, "Credits \n \nBEWEGUNG : %d \nZEIT : %d \n \nScroll Text \n \nText O Pos. : %d \nT Speed O : %d \nST1 Pos. : %d \nST2 Pos. : %d \nFPS. : %d", bewegung, timer, sk, st3, st1, st2, FPS);

//schiebt die Quadrate hinter die LargeMap
PA_SetSpritePrio (1,61,3);
PA_SetSpritePrio (1,62,3);
PA_SetSpritePrio (1,63,3);
PA_SetSpritePrio (1,64,3);
PA_SetSpritePrio (1,65,3);
PA_SetSpritePrio (1,66,3);
PA_SetSpritePrio (1,67,3);
PA_SetSpritePrio (1,68,3);
PA_SetSpritePrio (1,69,3);
PA_SetSpritePrio (1,70,3);
PA_SetSpritePrio (1,71,3);
PA_SetSpritePrio (1,72,3);

// Scrollt den Hintergrund (LargeMap) auf X
PA_LargeScrollX(1, 0, bewegung);

//Text Scroll
timer++; //Timeline start
if (timer>130) bewegung-=s;
if (timer>260) bewegung+=s;
if (timer>520) bewegung+=s;
if (timer>650) bewegung-=s;
if (timer>910) bewegung+=s;
if (timer>1040) bewegung-=s;
if (timer>1300) bewegung-=s;
if (timer>1430) bewegung+=s, timer-=1430;

//Scrollspeed Adventure
st++; //Scrolltimer start
if (st==1) sk-=1;
if (st==3) sk-=1;
if (st==5) sk-=1;
if (st==7) sk-=1;
if (st==9) sk-=1;
if (st==11) sk-=1;
if (st==13) sk-=1;
if (st==15) sk-=1, st-=15;


//Scrolltext Sprites Movment
st1++;
st2++;
if (st1>50)
PA_SetSpriteX (1,4,sk),
PA_SetSpriteX (1,5,sk+32),
PA_SetSpriteX (1,6,sk+64),
PA_SetSpriteX (1,7,sk+96),
PA_SetSpriteX (1,8,sk+128),
PA_SetSpriteX (1,9,sk+160),
PA_SetSpriteX (1,10,sk+192),
PA_SetSpriteX (1,11,sk+224);

if (st1>500)
PA_SetSpriteX (1,12,sk+256),
PA_SetSpriteX (1,13,sk+288),
PA_SetSpriteX (1,14,sk+320),
PA_SetSpriteX (1,15,sk+352),
PA_SetSpriteX (1,16,sk+384),
PA_SetSpriteX (1,17,sk+416),
PA_SetSpriteX (1,18,sk+448),
PA_SetSpriteX (1,19,sk+480);

if (st2>950)
PA_SetSpriteX (1,20,sk+512),
PA_SetSpriteX (1,21,sk+544),
PA_SetSpriteX (1,22,sk+576),
PA_SetSpriteX (1,23,sk+608),
PA_SetSpriteX (1,24,sk+640),
PA_SetSpriteX (1,25,sk+672),
PA_SetSpriteX (1,26,sk+704),
PA_SetSpriteX (1,27,sk+736);

if (st2>1400)
PA_SetSpriteX (1,28,sk+768),
PA_SetSpriteX (1,29,sk+800),
PA_SetSpriteX (1,30,sk+832),
PA_SetSpriteX (1,31,sk+864),
PA_SetSpriteX (1,32,sk+896);


//Scrolltext Sprites Killing Sphere
if (st1==550) PA_DeleteSprite (1,4);
if (st1==750) PA_DeleteSprite (1,5);
if (st1==800) PA_DeleteSprite (1,6);
if (st1==850) PA_DeleteSprite (1,7);
if (st1==900) PA_DeleteSprite (1,8);
if (st1==950) PA_DeleteSprite (1,9);
if (st1==1000) PA_DeleteSprite (1,10);
if (st1==1050) PA_DeleteSprite (1,11);
if (st1==1100) PA_DeleteSprite (1,12);
if (st1==1200) PA_DeleteSprite (1,13);
if (st1==1250) PA_DeleteSprite (1,14);
if (st1==1300) PA_DeleteSprite (1,15);
if (st1==1350) PA_DeleteSprite (1,16);
if (st1==1400) PA_DeleteSprite (1,17);
if (st1==1450) PA_DeleteSprite (1,18);
if (st1==1500) PA_DeleteSprite (1,19);
if (st1==1650) PA_DeleteSprite (1,20);
if (st1==1700) PA_DeleteSprite (1,21);
if (st1==1750) PA_DeleteSprite (1,22);
if (st1==1800) PA_DeleteSprite (1,23);
if (st2==1850) PA_DeleteSprite (1,24);
if (st2==1900) PA_DeleteSprite (1,25), st1-=1900;
if (st2==1950) PA_DeleteSprite (1,26);
if (st2==2000) PA_DeleteSprite (1,27);
if (st2==2050) PA_DeleteSprite (1,28);
if (st2==2100) PA_DeleteSprite (1,29);
if (st2==2300) st2-=1900;

//Scrolltext Sprites Spawn & Respawn
if (st1==50)
PA_CreateSprite(1, 4,(void*)ST01_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 5,(void*)ST02_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 6,(void*)ST03_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 7,(void*)ST04_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 8,(void*)ST05_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 9,(void*)ST06_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 10,(void*)ST07_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 11,(void*)ST08_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==500)
PA_CreateSprite(1, 12,(void*)ST09_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 13,(void*)ST10_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 14,(void*)ST11_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 15,(void*)ST12_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 16,(void*)ST13_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 17,(void*)ST14_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 18,(void*)ST15_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 19,(void*)ST16_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==950)
PA_CreateSprite(1, 20,(void*)ST17_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 21,(void*)ST18_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 22,(void*)ST19_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 23,(void*)ST20_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 24,(void*)ST21_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 25,(void*)ST22_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 26,(void*)ST23_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 27,(void*)ST24_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==1400)
PA_CreateSprite(1, 28,(void*)ST25_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 29,(void*)ST26_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 30,(void*)ST27_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 31,(void*)ST28_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 32,(void*)ST29_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);


PA_WaitForVBL();
}

return 0;
} // End of main()
added on the 2008-03-03 21:56:27 by Herpes Herpes
// Includes
#include <PA9.h> // Include for PA_Lib
#include "musiq.h"
#include "gfx/all_gfx.c"
#include "gfx/all_gfx.h"

//Deklarationen
// Unsigniert Signiert
//
// 8 bit 0 -> 255 -128 -> 127
// 16 bit 0 -> 65535 -32768 -> 32767
// 32 bit 0 -> 4294967295 -2147483648 -> 2147483647

u8 s = 3;
u8 ss = 2;
u8 FPS = 30;
s32 tk = 1;
u32 sk = 260;
s16 bewegung = 256;
s16 scroll = 0;
u16 timer = 0;
u8 st = 0;
s16 st1 = 0;
s16 st2 = 0;
s16 st3 = 0;
u8 BL1 = 1; //Button Layer
u8 BL2 = 1; //Button Layer
u8 BL3 = 1; //Button Layer


// Function: main()
int main(int argc, char ** argv){

// Palib stuff
PA_Init(); // Initializes PA_Lib
PA_InitVBL(); // Initializes a standard VBL
PA_InitText(0, 0); // Init Text on the top screen, background 0...
PA_SetBgColor(0,PA_RGB(0,0,10)); //Hintergrundfarbe 1=oben 0=unten R,G,B
PA_SetBgColor(1,PA_RGB(0,0,10)); //Hintergrundfarbe 1=oben 0=unten R,G,B
PA_InitSound(); // ohne diss keine Mukke
PA_SetModVolume(80); //Lautstärke des Modules
PA_PlayMod(musiq); //Spielt das Modul ab (Mod Name)

// LargeMap wird hier geladen Screen,BgNr.,Palettenname
PA_LoadPAGfxLargeBg(1,0,TXT);


// Screen & Palette für Logo´s
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
0, // Palette
(void*)farbe_Pal); // Paletten-Name


// Screen & Palette für Scrolltext
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
1, // Palette
(void*)ST_Pal); // Paletten-Name


// Screen & Palette für Hintergrund
PA_LoadSpritePal(1, // Screen 1=oben 0=unten
2, // Palette
(void*)BG_Pal); // Paletten-Name

// Show Logo Interpol
PA_CreateSprite(1, // Screen 1=oben 0=unten
50, // Sprite Nummer
(void*)IA_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
3, 3); // X , Y Position

// Show Logo Interpol
PA_CreateSprite(1, // Screen 1=oben 0=unten
51, // Sprite Nummer
(void*)IB_Sprite, // Name
OBJ_SIZE_32X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
67, 3); /// X , Y Position

// Show Mess with the best Die like the rest
PA_CreateSprite(1, // Screen 1=oben 0=unten
52, // Sprite Nummer
(void*)DA_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
139, 24); // X , Y Position

// Show Mess with the best Die like the rest
PA_CreateSprite(1, // Screen 1=oben 0=unten
53, // Sprite Nummer
(void*)DB_Sprite, // Name
OBJ_SIZE_64X64, // Abmessung
1, // Farben 0=16 1=265
0, // Palette
203, 24); // X , Y Position

// Quadrostationy Spawn
PA_CreateSprite(1, 61,(void*)LO1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 0);
PA_CreateSprite(1, 62,(void*)LO2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 0);
PA_CreateSprite(1, 63,(void*)LO3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 0);
PA_CreateSprite(1, 64,(void*)LO4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 0);
PA_CreateSprite(1, 65,(void*)MM1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 64);
PA_CreateSprite(1, 66,(void*)MM2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 64);
PA_CreateSprite(1, 67,(void*)MM3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 64);
PA_CreateSprite(1, 68,(void*)MM4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 64);
PA_CreateSprite(1, 69,(void*)UO1_Sprite, OBJ_SIZE_64X64,1, 2, 0, 128);
PA_CreateSprite(1, 70,(void*)UO2_Sprite, OBJ_SIZE_64X64,1, 2, 64, 128);
PA_CreateSprite(1, 71,(void*)UO3_Sprite, OBJ_SIZE_64X64,1, 2, 128, 128);
PA_CreateSprite(1, 72,(void*)UO4_Sprite, OBJ_SIZE_64X64,1, 2, 192, 128);

// Quadrostationy Animation
// PA_StartSpriteAnim( 1, // screen
// 60, // sprite number
// 0, // first frame is 0
// 9, // last frame is 9, since we have 10 frames...
// 60); // Speed, set to 5 frames per second
PA_StartSpriteAnim(1,61,0,9,FPS);
PA_StartSpriteAnim(1,62,0,9,FPS);
PA_StartSpriteAnim(1,63,0,9,FPS);
PA_StartSpriteAnim(1,64,0,9,FPS);
PA_StartSpriteAnim(1,65,0,9,FPS);
PA_StartSpriteAnim(1,66,0,9,FPS);
PA_StartSpriteAnim(1,67,0,9,FPS);
PA_StartSpriteAnim(1,68,0,9,FPS);
PA_StartSpriteAnim(1,69,0,9,FPS);
PA_StartSpriteAnim(1,70,0,9,FPS);
PA_StartSpriteAnim(1,71,0,9,FPS);
PA_StartSpriteAnim(1,72,0,9,FPS);


// Infinite loop to keep the program running
while (1)
{

//Tastenbelegung
//INTERPOL LOGO
if (Pad.Newpress.L) BL1+=1;
if (BL1==2) PA_DeleteSprite(1,50),
PA_DeleteSprite(1,51),
BL1+=1;
if (BL1==4) PA_CreateSprite(1,50,(void*)IA_Sprite,OBJ_SIZE_64X64,1,0, 3,3),
PA_CreateSprite(1,51,(void*)IB_Sprite,OBJ_SIZE_32X64,1,0,67,3),
BL1+=1;
if (BL1>4) BL1=1;

//Mess with the best, Die like the rest
if (Pad.Newpress.R) BL2+=1;
if (BL2==2) PA_DeleteSprite(1,52),
PA_DeleteSprite(1,53),
BL2+=1;
if (BL2==4) PA_CreateSprite(1,52,(void*)DA_Sprite,OBJ_SIZE_64X64,1,0,139,24),
PA_CreateSprite(1,53,(void*)DB_Sprite,OBJ_SIZE_64X64,1,0,203,24),
BL2+=1;
if (BL2>4) BL2=1;

//Credits txt
if (Pad.Newpress.Start) BL3+=1;
if (BL3==2) PA_DeleteMap (1,0), BL3+=1;
if (BL3==4) PA_LoadPAGfxLargeBg(1, 0, TXT), BL3+=1;
if (BL3>4) BL3=1;

//Rote 4ecke FPS controll
if (Pad.Held.Up) FPS+=1;
if (Pad.Held.Down) FPS-=1;
if (Pad.Newpress.Left) FPS=30;


// Display Bewegung und Timer Zeit
PA_OutputText(0, 0, 0, "Credits \n \nBEWEGUNG : %d \nZEIT : %d \n \nScroll Text \n \nText O Pos. : %d \nT Speed O : %d \nST1 Pos. : %d \nST2 Pos. : %d \nFPS. : %d", bewegung, timer, sk, st3, st1, st2, FPS);

//schiebt die Quadrate hinter die LargeMap
PA_SetSpritePrio (1,61,3);
PA_SetSpritePrio (1,62,3);
PA_SetSpritePrio (1,63,3);
PA_SetSpritePrio (1,64,3);
PA_SetSpritePrio (1,65,3);
PA_SetSpritePrio (1,66,3);
PA_SetSpritePrio (1,67,3);
PA_SetSpritePrio (1,68,3);
PA_SetSpritePrio (1,69,3);
PA_SetSpritePrio (1,70,3);
PA_SetSpritePrio (1,71,3);
PA_SetSpritePrio (1,72,3);

// Scrollt den Hintergrund (LargeMap) auf X
PA_LargeScrollX(1, 0, bewegung);

//Text Scroll
timer++; //Timeline start
if (timer>130) bewegung-=s;
if (timer>260) bewegung+=s;
if (timer>520) bewegung+=s;
if (timer>650) bewegung-=s;
if (timer>910) bewegung+=s;
if (timer>1040) bewegung-=s;
if (timer>1300) bewegung-=s;
if (timer>1430) bewegung+=s, timer-=1430;

//Scrollspeed Adventure
st++; //Scrolltimer start
if (st==1) sk-=1;
if (st==3) sk-=1;
if (st==5) sk-=1;
if (st==7) sk-=1;
if (st==9) sk-=1;
if (st==11) sk-=1;
if (st==13) sk-=1;
if (st==15) sk-=1, st-=15;


//Scrolltext Sprites Movment
st1++;
st2++;
if (st1>50)
PA_SetSpriteX (1,4,sk),
PA_SetSpriteX (1,5,sk+32),
PA_SetSpriteX (1,6,sk+64),
PA_SetSpriteX (1,7,sk+96),
PA_SetSpriteX (1,8,sk+128),
PA_SetSpriteX (1,9,sk+160),
PA_SetSpriteX (1,10,sk+192),
PA_SetSpriteX (1,11,sk+224);

if (st1>500)
PA_SetSpriteX (1,12,sk+256),
PA_SetSpriteX (1,13,sk+288),
PA_SetSpriteX (1,14,sk+320),
PA_SetSpriteX (1,15,sk+352),
PA_SetSpriteX (1,16,sk+384),
PA_SetSpriteX (1,17,sk+416),
PA_SetSpriteX (1,18,sk+448),
PA_SetSpriteX (1,19,sk+480);

if (st2>950)
PA_SetSpriteX (1,20,sk+512),
PA_SetSpriteX (1,21,sk+544),
PA_SetSpriteX (1,22,sk+576),
PA_SetSpriteX (1,23,sk+608),
PA_SetSpriteX (1,24,sk+640),
PA_SetSpriteX (1,25,sk+672),
PA_SetSpriteX (1,26,sk+704),
PA_SetSpriteX (1,27,sk+736);

if (st2>1400)
PA_SetSpriteX (1,28,sk+768),
PA_SetSpriteX (1,29,sk+800),
PA_SetSpriteX (1,30,sk+832),
PA_SetSpriteX (1,31,sk+864),
PA_SetSpriteX (1,32,sk+896);


//Scrolltext Sprites Killing Sphere
if (st1==550) PA_DeleteSprite (1,4);
if (st1==750) PA_DeleteSprite (1,5);
if (st1==800) PA_DeleteSprite (1,6);
if (st1==850) PA_DeleteSprite (1,7);
if (st1==900) PA_DeleteSprite (1,8);
if (st1==950) PA_DeleteSprite (1,9);
if (st1==1000) PA_DeleteSprite (1,10);
if (st1==1050) PA_DeleteSprite (1,11);
if (st1==1100) PA_DeleteSprite (1,12);
if (st1==1200) PA_DeleteSprite (1,13);
if (st1==1250) PA_DeleteSprite (1,14);
if (st1==1300) PA_DeleteSprite (1,15);
if (st1==1350) PA_DeleteSprite (1,16);
if (st1==1400) PA_DeleteSprite (1,17);
if (st1==1450) PA_DeleteSprite (1,18);
if (st1==1500) PA_DeleteSprite (1,19);
if (st1==1650) PA_DeleteSprite (1,20);
if (st1==1700) PA_DeleteSprite (1,21);
if (st1==1750) PA_DeleteSprite (1,22);
if (st1==1800) PA_DeleteSprite (1,23);
if (st2==1850) PA_DeleteSprite (1,24);
if (st2==1900) PA_DeleteSprite (1,25), st1-=1900;
if (st2==1950) PA_DeleteSprite (1,26);
if (st2==2000) PA_DeleteSprite (1,27);
if (st2==2050) PA_DeleteSprite (1,28);
if (st2==2100) PA_DeleteSprite (1,29);
if (st2==2300) st2-=1900;

//Scrolltext Sprites Spawn & Respawn
if (st1==50)
PA_CreateSprite(1, 4,(void*)ST01_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 5,(void*)ST02_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 6,(void*)ST03_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 7,(void*)ST04_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 8,(void*)ST05_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 9,(void*)ST06_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 10,(void*)ST07_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 11,(void*)ST08_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==500)
PA_CreateSprite(1, 12,(void*)ST09_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 13,(void*)ST10_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 14,(void*)ST11_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 15,(void*)ST12_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 16,(void*)ST13_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 17,(void*)ST14_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 18,(void*)ST15_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 19,(void*)ST16_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==950)
PA_CreateSprite(1, 20,(void*)ST17_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 21,(void*)ST18_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 22,(void*)ST19_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 23,(void*)ST20_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 24,(void*)ST21_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 25,(void*)ST22_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 26,(void*)ST23_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 27,(void*)ST24_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);
if (st1==1400)
PA_CreateSprite(1, 28,(void*)ST25_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 29,(void*)ST26_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 30,(void*)ST27_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 31,(void*)ST28_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183),
PA_CreateSprite(1, 32,(void*)ST29_Sprite, OBJ_SIZE_32X16, 1, 1, 260, 183);


PA_WaitForVBL();
}

return 0;
} // End of main()
added on the 2008-03-03 21:56:48 by Herpes Herpes
previous page
next page
go to page of 89

login

login via SceneID
log in :: register
Go to top