kevinmonitor/ScarletBlackMarket
1
1
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Jam build done. (Touhou Station Jam 3)

Browse source
This commit is contained in:
kevinmonitor 2022-08-23 16:48:09 +07:00
parent af1977159c
commit 06f2d5fd46
36 changed files with 132 additions and 68 deletions
Download patch file Download diff file Expand all files Collapse all files

14
script/KevinSystem/Kevin_System.txt
View file

@ -58,7 +58,7 @@ Lifebar full = (5, 78, 16, 108)
StartItemScript(dirCurrent ~ "./kevin_system/KevinSystem_Item.txt");
//TExtendSystem();
TExtendSystem();
TBossLife();
TBossTimer();
TCurrentFps();
@ -131,7 +131,7 @@ task TExtendSystem(){
//ObjText_SetFontBold(NextText, true);
// Indicates the score threshold needed for the next extend
let ExtendThresholdText =
/*let ExtendThresholdText =
CreateTextObject(
250, 960, 24,
@ -142,7 +142,7 @@ task TExtendSystem(){
);
ObjText_SetFontBold(ExtendThresholdText, true);
ObjText_SetHorizontalAlignment(ExtendThresholdText, ALIGNMENT_RIGHT);
ObjText_SetHorizontalAlignment(ExtendThresholdText, ALIGNMENT_RIGHT);*/
int count = 0;
// Millions
@ -150,8 +150,8 @@ task TExtendSystem(){
];
if(GetCommonData("Difficulty", "Hard") == "Hard"){req = [20, 80, 200, 500, 800, 1200, 2500, 5000];}
else{req = [15, 50, 100, 180, 300, 600, 1000, 2000, 4000];}
if(GetCommonData("Difficulty", "Normal") == "Normal"){req = [10, 20, 40, 70];}
else{req = [10, 20, 40, 70];}
let next = 0;
@ -165,8 +165,8 @@ task TExtendSystem(){
ExtendEffect;
}
}
if(next != 8){ObjText_SetText(ExtendThresholdText, "NEXT: " ~ DigitToCommaArray(req[next]*1000000));}
else{ObjText_SetText(ExtendThresholdText, "MAX EXTEND");}
/*if(next != 8){ObjText_SetText(ExtendThresholdText, "NEXT: " ~ DigitToCommaArray(req[next]*1000000));}
else{ObjText_SetText(ExtendThresholdText, "MAX EXTEND");}*/
yield;
}
}

18
script/KevinSystem/Universal_EnemyLib.dnh
View file

@ -17,21 +17,23 @@
*/
task _InitDifficulty(int diffInt){
function <int> _InitDifficulty(int diffInt){
int difficulty = 0;
if(GetCommonData("Difficulty", "Normal") == "Normal"){
diffInt = 0;
difficulty = 0;
}
else if(GetCommonData("Difficulty", "Normal") == "Hyper"){
diffInt = 1;
else if(GetCommonData("Difficulty", "Normal") == "Hard"){
difficulty = 1;
}
else if(GetCommonData("Difficulty", "Normal") == "Unparalleled"){
diffInt = 2;
else if(GetCommonData("Difficulty", "Normal") == "Lunatic"){
difficulty = 2;
}
return;
return difficulty;
}
// Explosion Sound Effects
@ -258,7 +260,7 @@ task _GoToBrazil(
if(ObjEnemyBossScene_GetInfo(targetscene, INFO_PLAYER_SHOOTDOWN_COUNT) > 0){
finalItemDrop = minitemdrop;
itemType = POINT_REGULAR;
//itemType = POINT_REGULAR;
}
DeleteShotAll(TYPE_ALL,TYPE_ITEM);

4
script/KevinSystem/Universal_Lib.txt
View file

@ -29,14 +29,14 @@ InstallFont("script/KevinSystem/font/AnkeCall.ttf");
// Placeholder
let invalid = "script/KevinSystem/img/lol.png";
let testEnemyTex = "script/game/StageLib/TestEnemy.png";
let testEnemyTex = "script/game/resourceLib/Spritesheet_StationJam.png";
LoadTextureEx(invalid, true, true);
LoadTextureEx(testEnemyTex, true, true);
int PetalEffect = ObjParticleList_Create(OBJ_PARTICLE_LIST_2D);
_EffectListPreRender(PetalEffect, testEnemyTex, [512, 0, 768, 256]);
_EffectListPreRender(PetalEffect, testEnemyTex, [1536, 0, 1792, 256]);
_SoundTask;
// Simple text object creation (adapted from mkm)

BIN
script/KevinSystem/font/OtsutomeFont_Ver3.ttf Normal file
View file

Binary file not shown.

8
script/KevinSystem/kevin_system/Kevin_EndScene.txt
View file

@ -27,9 +27,9 @@ int STGHEIGHT = GetStgFrameHeight();
task TBackgroundNew(renderX, renderY){
let objText = ObjText_Create();
ObjText_SetText(objText, "Thank you for playing![r]Until the next pride...");
ObjText_SetFontSize(objText, 36);
ObjText_SetFontType(objText, "Connecting Chain Handserif");
ObjText_SetText(objText, ["Thank you for playing![r]Until the next station...", "このゲームを遊ぶをありがとうございました！"][GetCommonData("Language", 0)]);
ObjText_SetFontSize(objText, [38, 45][GetCommonData("Language", 0)]);
ObjText_SetFontType(objText, "コーポレート・ロゴ（ラウンド） ver2 Bold");
//ObjText_SetMaxWidth(objText, GetScreenWidth/2);
ObjText_SetHorizontalAlignment(objText, ALIGNMENT_CENTER);
@ -185,7 +185,7 @@ task TMenu
let mx = GetScreenWidth/2;
let my = GetScreenHeight/4;
let texts = ["Save A Replay", "Depart From The Market", "Re-enter The Parade"];
let texts = ["Save Replay", "Back To Title", "Restart Battle"];
var countMenu = length(texts);
ascent(var iText in 0 .. countMenu)
{

28
script/KevinSystem/kevin_system/Kevin_Pause.txt
View file

@ -31,19 +31,27 @@ task TFunFact(){
//int y = 0;
let textchoices = [
"The sun is just a really hot egg tart, if you think about it.",
"Gay people.",
"You know what else is as cool as gay Touhous? It's Kouji Kouda[r]from the hit anime \"Boku no Hero Academia\"- *turns into a Kouda plushie*",
"Thanks for playing this game! I hope you enjoyed my gay Touhou endeavours.",
"You can set the amount of starting lives you have in the configurations menu.[r]If you have trouble with difficult patterns or stage sections, now you can blast right through them!"
["The sun is just a really hot egg tart, right?",
"Touhou.",
"You know what else is as cool as Touhou? It's Kouji Kouda[r]from the hit anime \"Boku no Hero Academia\"!",
"Thanks for playing this game!",
"You can set the amount of starting lives you have in the configurations menu.[r]If you have trouble with difficult patterns or stage sections, now you can blast right through them!"],
["太陽は実際に暑いエッグタルト、ね？",
"東方.",
"このゲームの開発元の一番好きなキャラクターは『僕のヒーローアカデミア』の『口田甲司』ですよ！[r]口田くんはすごいとかわいいね...",
"このゲームを遊ぶをありがとうございました！",
"あなたは『OPTIONS』のメニューにはライフカウンターを変化することができます。"],
];
int x = prand_int(0, length(textchoices)-1);
int x = prand_int(0, length(textchoices[GetCommonData("Language", 0)])-1);
//y = length(textchoices);
let objText = ObjText_Create();
ObjText_SetText(objText, textchoices[x]);
ObjText_SetFontSize(objText, 36);
ObjText_SetFontType(objText, "Connecting Chain Handserif");
ObjText_SetText(objText, textchoices[GetCommonData("Language", 0)][x]);
ObjText_SetFontSize(objText, [38, 45][GetCommonData("Language", 0)]);
ObjText_SetFontType(objText, "コーポレート・ロゴ（ラウンド） ver2 Bold");
//ObjText_SetMaxWidth(objText, GetScreenWidth/2);
ObjText_SetHorizontalAlignment(objText, ALIGNMENT_CENTER);
@ -205,7 +213,7 @@ task TMenu
let mx = GetScreenWidth/2;
let my = GetScreenHeight/4;
let texts = ["Resume The Faceoff", "Accept Your Losses", "Take Another Shot"];
let texts = ["Resume Game", "Back To Title", "Restart Battle"];
var countMenu = length(texts);
ascent(var iText in 0 .. countMenu)
{