can you feel the yass tonight? (postjam)

This commit is contained in:
Kevinmonitor 2023-01-31 18:05:02 +07:00
parent 4564ad9668
commit a25c13d846
66 changed files with 75 additions and 1966 deletions

Binary file not shown.

View File

@ -41,11 +41,11 @@ int medEnemyHitbox = 64;
int largeEnemyHitbox = 100;
int spiritHitbox = 48;
float smallEnemyHP = 45;
float mediumEnemyHP = 80;
float largeEnemyHP = 120;
float smallEnemyHP = 40;
float mediumEnemyHP = 90;
float largeEnemyHP = 150;
float largeEnemyAltHP = 150;
float popcornHP = 25;
float popcornHP = 30;
float smallEnemyScale = 1;
float largeEnemyScale = 1;
@ -215,16 +215,16 @@ int[] bossRect = [192, 448, 384, 704];
// Wave 5: Clumped small fairy lines come from both sides to attack you.
int W5_spawnDelayMin = 20;
int W5_spawnDelayMax = 40;
int W5_spawnDelayMin = 25;
int W5_spawnDelayMax = 45;
int W5_fairyNumMin = 3;
int W5_fairyNumMax = 6;
// Angles
int W5_moveTimeMin = 40;
int W5_moveTimeMax = 50;
int W5_moveTimeMin = 55;
int W5_moveTimeMax = 70;
float W5_bulletSpdMin = 11;
float W5_bulletSpdMax = 13;
@ -235,10 +235,10 @@ int[] bossRect = [192, 448, 384, 704];
int WG1_ringDenseMax = 14;
float WG1_bulletSpdMin = 8;
float WG1_bulletSpdMax = 11;
float WG1_bulletSpdMax = 10;
int WG1_bulletDelayMin = 30;
int WG1_bulletDelayMax = 45;
int WG1_bulletDelayMin = 35;
int WG1_bulletDelayMax = 50;
// Wave 7 (S2): Yukionna with spiral (counts as ground)

View File

@ -105,7 +105,7 @@ function <int> CreateFan (int parent, int way, int graphic, int stack,
let arrayPattern = ObjPatternShot_FireReturn(objPattern);
ascent(i in -1..length(arrayPattern)-1){
_BulletRescale(arrayPattern[i], scaleBullet, true, 0.25);
_BulletRescale(arrayPattern[i], scaleBullet, true, 1);
_Delay(arrayPattern[i], 5);
//Obj_SetRenderPriorityI(arrayPattern[i], 51);
}

View File

@ -41,7 +41,7 @@ let POINTER_CHAIN = LoadAreaCommonDataValuePointer("PIV", "ChainAmount", 1);
@Initialize {
//SetIntersectionVisualization(true);
SetIntersectionVisualization(true);
SetAutoDeleteObject(true);
@ -102,7 +102,7 @@ let POINTER_CHAIN = LoadAreaCommonDataValuePointer("PIV", "ChainAmount", 1);
case(EV_REQUEST_TIMER) {
//SetScriptResult(STAGE_LENGTH);
SetScriptResult(10);
SetScriptResult(STAGE_LENGTH);
//SetScriptResult(BOSS_LENGTH+5);
}
@ -1033,7 +1033,8 @@ task PhaseBonusCalculation(int enm, int HPthreshold, string spellName){
int curRank = rank;
int scoreBase = 1000000 * curRank;
int scoreBonus = GetAreaCommonData("PIV", "currentvalue", 1000)*250;
int scoreBonus = GetAreaCommonData("PIV", "currentvalue", 1000)*200;
int scoreFinalBonus = 0;
int i = 0; // 20 seconds
function _CreateBonusText(float x, y, fontSize, int colorBorder, string text){
@ -1043,7 +1044,7 @@ task PhaseBonusCalculation(int enm, int HPthreshold, string spellName){
x, y, fontSize,
text, "GravityBold8",
0xFFFFFF, 0xFFFFFF,
colorBorder, fontSize/10,
colorBorder, fontSize/8,
71
);
@ -1058,22 +1059,20 @@ task PhaseBonusCalculation(int enm, int HPthreshold, string spellName){
while(ObjEnemy_GetInfo(enm, INFO_LIFE) > HPthreshold){
scoreBase = trunc(Interpolate_Smooth(1000000 * curRank, 100000 * curRank, i/1200)/10)*10;
scoreFinalBonus = trunc(Interpolate_Linear(scoreBonus, scoreBonus/2, i/1200)/10)*10;
i = min(1200, i+1);
scoreBonus = scoreBase * GetCommonDataPtr(POINTER_CHAIN, 1);
ObjText_SetText(scoreText, spellName ~ "[r][font sz=16]BONUS: [font oc=(255, 136, 0)]" ~ DigitToCommaArray(trunc(scoreBonus/10)*10));
ObjText_SetText(scoreText, spellName ~ "[r][font sz=16]BONUS: [font oc=(255, 136, 0)]" ~ DigitToCommaArray(trunc(scoreFinalBonus/10)*10));
yield;
}
AddScore(scoreBonus);
AddScore(scoreFinalBonus);
async{
ObjText_SetText(scoreText, "[font sz=32 oc=(164, 0, 90)]SCORE BONUS:[r][font sz=32 wg=800 oc=(255, 136, 0)]" ~ DigitToCommaArray(trunc(scoreBonus/10)*10));
ObjText_SetText(scoreText, "[font sz=32 oc=(164, 0, 90)]SPELL CARD CLEAR![r][font sz=32 wg=800 oc=(255, 136, 0)]" ~ DigitToCommaArray(trunc(scoreFinalBonus/10)*10));
ChargeBreakSFX;
@ -1921,14 +1920,14 @@ function WaveGround1(){
}
if(rank <= 5){
CreateEnemyA(STG_WIDTH+128, STG_HEIGHT * 1/5, 180);
CreateEnemyA(STG_WIDTH+128, STG_HEIGHT * 4/5, 180);
CreateEnemyA(STG_WIDTH+96, STG_HEIGHT * 1/5, 180);
CreateEnemyA(STG_WIDTH+96, STG_HEIGHT * 4/5, 180);
}
else{
CreateEnemyA(STG_WIDTH+128, STG_HEIGHT * 1/5, 180);
CreateEnemyA(STG_WIDTH+128, STG_HEIGHT * 1/2, 180);
CreateEnemyA(STG_WIDTH+128, STG_HEIGHT * 4/5, 180);
CreateEnemyA(STG_WIDTH+96, STG_HEIGHT * 1/5, 180);
CreateEnemyA(STG_WIDTH+96, STG_HEIGHT * 1/2, 180);
CreateEnemyA(STG_WIDTH+96, STG_HEIGHT * 4/5, 180);
}
while(length(enmFly) > 1){yield;}
@ -2084,7 +2083,7 @@ function Wave9(){
float spd = FUNC_LERP_ACCEL(W9_bulletSpdMin, W9_bulletSpdMax, rank/RANK_MAX);
float movespd = baseMoveSpeedH * (1 + MoveSpeedRankMultiplierVL*rank);
float[] rangemove = [3, 6];
float[] rangemove = [2.4, 4.8];
int counter = 1;
@ -2158,7 +2157,7 @@ function Wave9(){
ascent(i in 0..num){
CreateEnemyA(rand(STG_WIDTH*6.5/8, STG_WIDTH*6.75/8), counter >= 1 ? -128 : STG_HEIGHT+128, movespd*counter);
CreateEnemyA(rand(STG_WIDTH*6.5/8, STG_WIDTH*6.75/8), counter >= 1 ? -96 : STG_HEIGHT+96, movespd*counter);
counter *= -1;

Binary file not shown.

Before

Width:  |  Height:  |  Size: 189 KiB

After

Width:  |  Height:  |  Size: 393 KiB

View File

@ -16,15 +16,15 @@ ShotData { id = 2008 rect = (1024,0,1152,128) collision = 12 delay_color = (255,
// FIRE SMALL
ShotData { id = 2011 rect = (0,128,128,256) collision = (12,0,-8) delay_color = (255,255,255) } //RED
ShotData { id = 2012 rect = (128,128,256,256) collision = (12,0,-8) delay_color = (255,255,255) } //ORANGE
ShotData { id = 2013 rect = (256,128,384,256) collision = (12,0,-8) delay_color = (255,255,255) } //YELLOW
ShotData { id = 2014 rect = (384,128,512,256) collision = (12,0,-8) delay_color = (255,255,255) } //GREEN
ShotData { id = 2015 rect = (512,128,640,256) collision = (12,0,-8) delay_color = (255,255,255) } //AQUA
ShotData { id = 2016 rect = (640,128,768,256) collision = (12,0,-8) delay_color = (255,255,255) } //LAVENDER
ShotData { id = 2017 rect = (768,128,896,256) collision = (12,0,-8) delay_color = (255,255,255) } //PURPLE
ShotData { id = 2018 rect = (896,128,1024,256) collision = (12,0,-8) delay_color = (255,255,255) } //PINK
ShotData { id = 2019 rect = (1024,128,1152,256) collision = (12,0,-8) delay_color = (255,255,255) } //WHITE
ShotData { id = 2011 rect = (0,128,128,256) collision = (12,0,8) delay_color = (255,255,255) } //RED
ShotData { id = 2012 rect = (128,128,256,256) collision = (12,0,8) delay_color = (255,255,255) } //ORANGE
ShotData { id = 2013 rect = (256,128,384,256) collision = (12,0,8) delay_color = (255,255,255) } //YELLOW
ShotData { id = 2014 rect = (384,128,512,256) collision = (12,0,8) delay_color = (255,255,255) } //GREEN
ShotData { id = 2015 rect = (512,128,640,256) collision = (12,0,8) delay_color = (255,255,255) } //AQUA
ShotData { id = 2016 rect = (640,128,768,256) collision = (12,0,8) delay_color = (255,255,255) } //LAVENDER
ShotData { id = 2017 rect = (768,128,896,256) collision = (12,0,8) delay_color = (255,255,255) } //PURPLE
ShotData { id = 2018 rect = (896,128,1024,256) collision = (12,0,8) delay_color = (255,255,255) } //PINK
ShotData { id = 2019 rect = (1024,128,1152,256) collision = (12,0,8) delay_color = (255,255,255) } //WHITE
// LEAF
@ -40,15 +40,15 @@ ShotData { id = 2030 rect = (1024,256,1152,384) collision = 8 delay_color = (255
// FIRE BIG
ShotData { id = 2033 rect = (0,384,128,512) collision = (20,0,-12) delay_color = (255,255,255) } //RED
ShotData { id = 2034 rect = (128,384,256,512) collision = (20,0,-12) delay_color = (255,255,255) } //ORANGE
ShotData { id = 2035 rect = (256,384,384,512) collision = (20,0,-12) delay_color = (255,255,255) } //YELLOW
ShotData { id = 2036 rect = (384,384,512,512) collision = (20,0,-12) delay_color = (255,255,255) } //GREEN
ShotData { id = 2037 rect = (512,384,640,512) collision = (20,0,-12) delay_color = (255,255,255) } //AQUA
ShotData { id = 2038 rect = (640,384,768,512) collision = (20,0,-12) delay_color = (255,255,255) } //LAVENDER
ShotData { id = 2039 rect = (768,384,896,512) collision = (20,0,-12) delay_color = (255,255,255) } //PURPLE
ShotData { id = 2040 rect = (896,384,1024,512) collision = (20,0,-12) delay_color = (255,255,255) } //PINK
ShotData { id = 2041 rect = (1024,384,1152,512) collision = (20,0,-12) delay_color = (255,255,255) } //WHITE
ShotData { id = 2033 rect = (0,384,128,512) collision = (20,0,12) delay_color = (255,255,255) } //RED
ShotData { id = 2034 rect = (128,384,256,512) collision = (20,0,12) delay_color = (255,255,255) } //ORANGE
ShotData { id = 2035 rect = (256,384,384,512) collision = (20,0,12) delay_color = (255,255,255) } //YELLOW
ShotData { id = 2036 rect = (384,384,512,512) collision = (20,0,12) delay_color = (255,255,255) } //GREEN
ShotData { id = 2037 rect = (512,384,640,512) collision = (20,0,12) delay_color = (255,255,255) } //AQUA
ShotData { id = 2038 rect = (640,384,768,512) collision = (20,0,12) delay_color = (255,255,255) } //LAVENDER
ShotData { id = 2039 rect = (768,384,896,512) collision = (20,0,12) delay_color = (255,255,255) } //PURPLE
ShotData { id = 2040 rect = (896,384,1024,512) collision = (20,0,12) delay_color = (255,255,255) } //PINK
ShotData { id = 2041 rect = (1024,384,1152,512) collision = (20,0,12) delay_color = (255,255,255) } //WHITE
ShotData { id = 2044 rect = (0,512,128,640) collision = (6,0,20) delay_color = (255,255,255) } //RED
ShotData { id = 2045 rect = (128,512,256,640) collision = (6,0,20) delay_color = (255,255,255) } //ORANGE

View File

@ -1,489 +0,0 @@
task _LaserSpriteRender(
img, int target, float targetAng,
int rectLeft, int rectTop, int rectRight, int rectBottom,
float scaleX, float scaleY, int renderPriority, float alpha,
float scaleSpeed
){
let lasersprite = ObjPrim_Create(OBJ_SPRITE_2D);
ObjPrim_SetTexture(lasersprite, img);
ObjSprite2D_SetSourceRect(lasersprite, rectLeft, rectTop, rectRight, rectBottom);
ObjRender_SetScaleXYZ(lasersprite, 0, scaleY, 1);
ObjSprite2D_SetDestRect(lasersprite, -(rectRight-rectLeft)/2, 0, (rectRight-rectLeft)/2, rectTop-rectBottom);
Obj_SetRenderPriorityI(lasersprite, renderPriority);
ObjRender_SetAlpha(lasersprite, 0);
ObjRender_SetBlendType(lasersprite, BLEND_ADD_ARGB);
async{
loop{
int[] EnemyList = ObjCol_GetListOfIntersectedEnemyID(target);
if(GetVirtualKeyState(VK_SHOT) != KEY_FREE && GetVirtualKeyState(VK_SLOWMOVE) != KEY_FREE && !ripplayer && IsPermitPlayerShot){
// Assumes the intersecting color is right next to the right of the original color
if (length(EnemyList) > 0) {ObjSprite2D_SetSourceRect(lasersprite, rectRight, rectTop, rectRight+(rectRight-rectLeft), rectBottom);}
else{ObjSprite2D_SetSourceRect(lasersprite, rectLeft, rectTop, rectRight, rectBottom);}
float targetx = ObjRender_GetX(target);
float targety = ObjRender_GetY(target);
ObjRender_SetScaleX(lasersprite, min(scaleX+rand(-0.025, 0.025), ObjRender_GetScaleX(lasersprite) + scaleSpeed));
ObjRender_SetAlpha(lasersprite, min(alpha, ObjRender_GetAlpha(lasersprite)+alpha/5));
ObjRender_SetAngleZ(lasersprite, targetAng);
ObjRender_SetPosition(lasersprite, targetx, targety, 1);
yield;
}
else{
ObjRender_SetScaleX(lasersprite, max(0, ObjRender_GetScaleX(lasersprite) - scaleSpeed));
ObjRender_SetAlpha(lasersprite, max(0, ObjRender_GetAlpha(lasersprite)-alpha/5));
yield;
}
yield;
}
}
}
function _RenderLaser(target, float ang, float maxintersectX, float maxLength, float width, float speedLength, float dmg){ /* */
float angRender = asin(maxintersectX/absolute(maxLength));
//int laser = CreatePlayerShotA1(ObjRender_GetX(target), ObjRender_GetY(target), 0, ang, dmg, 9999999, 0);
int laser = CreateStraightLaserA1(ObjRender_GetX(target), ObjRender_GetY(target), ang-90, maxLength, width, 9999999, 0, 1);
ObjLaser_SetInvalidLength(laser, 0, 0);
ObjShot_SetDamage(laser, dmg);
ObjShot_SetAutoDelete(laser, false);
Obj_SetRenderPriorityI(laser, 38);
_Follow(laser, target);
_LaserSpriteRender(
teamimg, laser, ang,
3072, 0, 3072+256, 256,
0.45, 20, 38, 240,
0.14
);
// When shot key is being held, create a line intersection that stretches across the laser.
/*
Calculations:
startx: x of target
starty: y of target
endx: x of laser
endy: maxLength
width = width of laser
*/
async{
loop{
if(GetVirtualKeyState(VK_SHOT) != KEY_FREE && GetVirtualKeyState(VK_SLOWMOVE) != KEY_FREE && !ripplayer && IsPermitPlayerShot){
if(shotspeed % 5 == 0){ObjSound_Play(Fire);}
ObjShot_SetIntersectionEnable(laser, true);
//ObjShot_SetIntersectionLine(laser, ObjRender_GetX(target), ObjRender_GetY(target), ObjRender_GetX(target)+maxintersectX, -maxLength, width);
//WriteLog(ObjMove_GetX(laserfwd));
yield;
}
else{ObjShot_SetIntersectionEnable(laser, false); yield;}
}
}
// After shot key is released, let the laser leave and then delete it.
return laser;
}
task _Follow(follower, followed){
while(!Obj_IsDeleted(follower)){
float x = ObjRender_GetX(followed);
float y = ObjRender_GetY(followed);
ObjMove_SetPosition(follower, x, y);
yield;
}
}
// Special functions for Tenshi's CAVE laser shottype.
// Original code by Razzy/Razzly, edited and tweaked by Kevinmonitor
// DEBUG
float LaserAlpha = 0; // Not used
task _CAVELaser(){
InitPLaserGfx(); // Probably effects that occur when the laser reaches an enemy? (KEV)
let lasers0 = [ID_INVALID,ID_INVALID,ID_INVALID,ID_INVALID,ID_INVALID,ID_INVALID,ID_INVALID,ID_INVALID,ID_INVALID];
// this delays when the laser fires
// laser fires when laserMode==0
// laserMode increments by 1 per frame
// so laser fires after 15 frames
// KEV: To fire the laser immediately, just set laserMode/laserLimit to 0.
let laserLimit = 0;
let laserMode=-laserLimit;
loop{
if(
GetPlayerState!=STATE_HIT
&& GetPlayerState!=STATE_DOWN
&& GetPlayerState!=STATE_END
&& (GetVirtualKeyState(VK_SHOT)==KEY_PUSH || GetVirtualKeyState(VK_SHOT)==KEY_HOLD)
){
if(IsPlayerSpellActive()){
laserMode=min(0,laserMode+1);
}
else{
// reset laser delay when slowmove is let go
laserMode=-laserLimit;
}
laserMode=min(0,laserMode+1);
if(laserMode>=0){
let odd = 1;
//NonPenetrationLaser(obj, xoff, yoff, ang, spd, maxLen, dmg, IsStrongLaser, width, vwidth)
// KEV: Ascent loop determines the number of lasers that will be spawned.
ascent(i in 0..1){
let las = lasers0[i];
if(Obj_IsValueExists(las,"DEL") || Obj_IsDeleted(las)){
let magnitude = 1;
lasers0[i]=NonPenetrationLaser(objPlayer, 0, -36, 270, 40, GetStgFrameHeight()*1.5, 7, 1.25, 1);
}
odd=-odd;
}
//PlaySnd(SND_p_shot, 93);
}
else{
// reset laser delay when fire is let go
// KEV: Unnecessary if the laser fires immediately
RemovePLaserGfx();
LaserAlpha = 0;
laserMode=-laserLimit;
}
}
yield;
}
}
// of an array of 2d coords, return the one closest to (sx,sy). Also returns the distance from (sx,sy) as the third value.
function GetClosestCoord(coords, sx,sy){
let closest=[];
let last_dist=99999;
let arrayLen=length(coords);
if(arrayLen==1){
let cur_dist;
if(length(coords[0])==3){ cur_dist=coords[0][2]; }
else{ cur_dist=((coords[0][0]-sx)^2+(coords[0][1]-sy)^2)^0.5; }
closest=[coords[0][0],coords[0][1], cur_dist];
}
else{
ascent(i in 0..arrayLen){
let cur_dist;
if(length(coords[i])==3){ cur_dist=(coords[i][2]); }
else{ cur_dist=((coords[i][0]-sx)^2+(coords[i][1]-sy)^2)^0.5; }
if(cur_dist < last_dist){
last_dist=cur_dist;
closest=[coords[i][0], coords[i][1], cur_dist];
}
}
}
return closest;
}
// non-penetrating laser object
function NonPenetrationLaser(obj, xoff, yoff, ang, spd, maxLen, dmg, width, vwidth){
//KEV: Parameter explanations:
//obj: Where the laser is fired from
//xoff/yoff: x and y offsets relative to the object
//ang, spd: Self-explanatory
//maxLen: max length of the laser, DON'T SET THIS TOO HIGH! GetStgFrameHeight() + a generous number should be enough
//dmg: Self-explanatory
//IsStrongLaser (REMOVED HERE): use this if you want to differentiate between strong and weak lasers I guess, I don't play CAVE games so idk
//width, vwidth: intersection & render width of laser
// KEV: Defines the laser object.
int a = 0;
let damager = ObjShot_Create(OBJ_STRAIGHT_LASER);
ObjShot_SetGraphic(damager, 0);
Obj_SetVisible(damager, true);
ObjShot_Regist(damager);
ObjShot_SetDamage(damager, dmg);
ObjShot_SetPenetration(damager, 9999);
ObjShot_SetEraseShot(damager, true);
ObjLaser_SetLength(damager, 0);
ObjLaser_SetIntersectionWidth(damager, 256*width);
ObjLaser_SetRenderWidth(damager, 256*vwidth);
ObjStLaser_SetAngle(damager, ang); ObjShot_SetAutoDelete(damager, false);
ObjShot_SetIntersectionEnable(damager, true);
TNonPenetrationLaser();
return damager;
task TNonPenetrationLaser(){
let scroll=rand(0,64);
let len=0; // the length of the laser (increased until maxLen)
let cosine=cos(ang); // grab this value for placement of the tip. **this assumes the laser never changes angle**
let sine=sin(ang); // grab this value for placement of the tip. **this assumes the laser never changes angle**
// **for lasers that change angle, cosine and sine will need to be updated**
// Laser is now firing
while(
IsPlayerSpellActive()
&& !Obj_IsDeleted(damager) // KEV: The four following states can be reduced to !ripplayer in my player scripts
&& !ripplayer
&& (GetVirtualKeyState(VK_SHOT) != KEY_FREE)
){
a++;
if(a % 5 == 0){ObjSound_Play(Fire);}
CheckLaserIntersection;
// Set the laser's position and length
ObjMove_SetPosition(damager, ObjMove_GetX(obj)+xoff,ObjMove_GetY(obj)+yoff);
len = min(maxLen, len+spd);
ObjLaser_SetLength(damager, len);
//ObjShot_SetIntersectionLine(damager, ObjMove_GetX(obj), ObjMove_GetY(obj)+yoff, ObjMove_GetX(obj), -len, 128*width);
MakeLaserGfxFrame;
yield;
}
// This laser isn't deleted just yet. I let it fly away first.
// This value lets other tasks check when this happens.
Obj_SetValue(damager, "DEL", true);
// Laser is now leaving
ObjMove_SetAngle(damager, ObjStLaser_GetAngle(damager));
ObjMove_SetSpeed(damager, spd);
while(!Obj_IsDeleted(damager) && len > 128){
MakeLaserGfxFrame;
len=max(0,len-spd);
ObjLaser_SetLength(damager, len);
CheckLaserIntersection;
yield;
}
Obj_Delete(damager);
function MakeLaserGfxFrame(){
//let hyper=0;
// Values related to graphic lengths
let gLen = max(0, len-32-24);
let gLen2 = max(0, len-32);
// add sprites to the per-frame sprite list
// KEV: Function reference: PLaserGfxFrameLaser(gfxObj, u, v, u2, v2, ry, x, y, ang, sx, sy, rd, gn, bl, al)
//KEV: Function description:
//Adds a vertex to the attached gfxObj sprite list. Uses u, v, u2, v2 as coordinates for the SourceRect, ry for DestRect (rx is calculated in the function), x & y for vertex position, sx & sy for the scaling, rd, gn and bl for colors, and al for alpha.
//PLaserGfxFrame is similar but is used for the base and tip of the laser. The ry (and by extension rx) parameters are removed.
//(rd, gn, bl values have been removed)
// ObjStLaser_SetEndGraphic (ph3sx) may come in handy for the base/tips.
// After reaching the bottom rect, value loops back to the top.
PLaserGfxFrameLaser(lasGfxObj[0], 512, scroll, 1024, scroll*512, 64, ObjMove_GetX(damager)+cosine*24, ObjMove_GetY(damager)+sine*24, ang+90, vwidth*rand(1.0, 1.05), gLen/64, 255);
PLaserGfxFrameLaser(lasGfxObj[1], 512, scroll, 1024, scroll*512, 64, ObjMove_GetX(damager)+cosine*24, ObjMove_GetY(damager)+sine*24, ang+90, vwidth*rand(1.4, 1.5), gLen/64, 60); // Glow effect
PLaserGfxFrame(lasGfxObj[2], 512, 768, 1024, 1280, ObjMove_GetX(damager)+cosine*24, ObjMove_GetY(damager)+sine*24-20, ang+90, 1.15*vwidth+rand(0.2, 0.3), 1.15+rand(0.2, 0.3), 255); // Base of laser
PLaserGfxFrame(lasGfxObj[3], 1024, 0, 1536, 512, ObjMove_GetX(damager)+cosine*gLen2, 10+ObjMove_GetY(damager)+sine*gLen2, ang+90, 0.6*width+rand(0.2, 0.3), 0.8, 255);// Tip of laser
ObjRender_SetAngleZ(lasGfxObj[2], ObjRender_GetAngleZ(lasGfxObj[2])+10);
//WriteLog([ObjMove_GetX(damager), ObjMove_GetY(damager)]);
scroll += 0.05; // Scrolls the laser's graphic.
if (scroll >= 1) {scroll = 0.1;}
}
function CheckLaserIntersection(){
// ------------------ Check for enemy collisions ------------------
let enemies=ObjCol_GetListOfIntersectedEnemyID(damager); // Get enemy array
let closest=[];
let arrayLen=length(enemies);
// Check all enemies hit (if any)
if(arrayLen>0){
let enm_pos=[]; // will be a 2-dimensional array
// KEV: If there is no strong/weak laser differentiation, this ascent loop can be removed entirely(?)
ascent(i in 0..arrayLen){ // go through the enemies list
// Weaker lasers get pushed back by "popcorn" enemies.
// KEV: I don't really want to implement strong/weak laser differentiations...
if(ObjEnemy_GetInfo(enemies[i], INFO_LIFE) > 1){
// There are multiple collisions per enemy to check as well
// It's rare that there's more than one, but it's allowed
let pos=GetEnemyIntersectionPositionByIdA1(enemies[i]); // KEV: Returns the multiple hitboxes of the enemy as a 2D array, format is [index][x, y of hitbox].
//KEV: Further explanation (rough and probably incorrect);
//An enemy has 2 hitboxes, one at coords [16, 16] and one at [32, 32].
//You get a 2D array named "coords" containing the coordinates of these 2 hitboxes by using GetEnemyIntersectionPositionByIdA1.
//You then write this line "float num = coords[0][1];" and WriteLog() the value of num.
//coords[0][1] corresponds to the y coordinate of the first hitbox, which would give you a num value of 16.
let closest2=GetClosestCoord(pos, ObjMove_GetX(damager),ObjMove_GetY(damager));
if(closest2[0]!=-1234){
enm_pos=enm_pos~[closest2];
}
}
}
closest = GetClosestCoord(enm_pos, ObjMove_GetX(damager),ObjMove_GetY(damager));
}
// ------------------ ------------------ ------------------
// There has been a collision, dial back laser length to (roughly) the point of collision.
// (Roughly) because we can't get the exact location, and doing it ourselves requires finding the hitbox dimensions.
// KEV: Getting the hitbox dimensions/locations should be perfectly possible with ph3sx's intersection-obtaining functions. Will need re-examining
// Set the damage of the laser.
float dmgBase = 12;
float dmgMax = 12;
if(length(closest) > 0){
let dist=closest[2]-16;
len=max(0,dist);
// The laser deals higher damage the closer it is to the enemy.
float ratioDist = 120/closest[2];
ObjShot_SetDamage(damager, Interpolate_Decelerate(dmgBase, dmgMax, min(1, ratioDist)));
// The laser changes colours depending on distance.
}
}
}
} // NonPenetrationLaser
let lasGfxObj=[]; // KEV: An array that will contain three sprite lists, rendering three different parts of the laser (base, body, tip).
// KEV: Creates the sprite lists, assigns the texture to them, and adds them as indexes into lasGfxObj.
task InitPLaserGfx(){
let imgLaser = GetCurrentScriptDirectory() ~ "./playerlib/Chimata_Sheet.png";
LoadTextureEx(imgLaser, true, true); // Loaded in main script
ascent(i in 0..4){
let gfx = ObjPrim_Create(OBJ_SPRITE_LIST_2D);
ObjSpriteList2D_SetAutoClearVertexCount(gfx, true);
ObjPrim_SetTexture(gfx, imgLaser);
Obj_SetRenderPriorityI(gfx, 41);
lasGfxObj = lasGfxObj~[gfx];
//ObjRender_SetBlendType(lasGfxObj[i-1], BLEND_ADD_ARGB);
}
async{
while(length(lasGfxObj) >= 3){
ObjRender_SetAngleZ(lasGfxObj[2], ObjRender_GetAngleZ(lasGfxObj[2])+10);
yield;
}
}
//ObjRender_SetBlendType(lasGfxObj[2], BLEND_ADD_ARGB);
Obj_SetRenderPriorityI(lasGfxObj[2], 42);
}
task RemovePLaserGfx{
let imgLaser = GetCurrentScriptDirectory() ~ "laser_fx.png";
RemoveTexture(imgLaser);
ascent(i in 0..length(lasGfxObj)){
Obj_Delete(lasGfxObj[i]);
lasGfxObj[i]=ID_INVALID;
}
}
// See the non-penetrating laser object task for information on these tasks.
task PLaserGfxFrame(
int gfxObj,
float rectLeft, float rectTop, float rectRight, float rectBottom,
float posX, float posY,
float ang,
float scaleX, float scaleY,
float alpha){
if(gfxObj==ID_INVALID){return;}
//ObjRender_SetBlendType(gfxObj, BLEND_ADD_ARGB);
ObjRender_SetPosition(gfxObj, posX, posY, 0);
ObjRender_SetAngleZ(gfxObj, ang);
ObjRender_SetScaleXYZ(gfxObj, scaleX, scaleY, 1);
ObjSpriteList2D_SetSourceRect(gfxObj, rectLeft, rectTop, rectRight, rectBottom);
ObjSpriteList2D_SetDestCenter(gfxObj);
ObjSpriteList2D_AddVertex(gfxObj);
ObjRender_SetAlpha(gfxObj, alpha);
}
task PLaserGfxFrameLaser(
int gfxObj,
float rectLeft, float rectTop, float rectRight, float rectBottom,
float destY,
float posX, float posY,
float ang,
float scaleX, float scaleY,
float alpha){
if(gfxObj==ID_INVALID){return;}
//ObjRender_SetBlendType(gfxObj, BLEND_ADD_ARGB);
ObjRender_SetPosition(gfxObj, posX, posY,0);
ObjRender_SetAngleZ(gfxObj, ang);
ObjRender_SetScaleXYZ(gfxObj, scaleX, scaleY, 1);
ObjRender_SetAlpha(gfxObj, alpha);
ObjSpriteList2D_SetSourceRect(gfxObj, rectLeft, rectTop, rectRight, rectBottom);
let destX = (rectRight - rectLeft)/2;
ObjSpriteList2D_SetDestRect(gfxObj, -destX, 0, destX, -destY);
ObjSpriteList2D_AddVertex(gfxObj);
}

View File

@ -1,634 +0,0 @@
#TouhouDanmakufu[Player]
#ScriptVersion[3]
#ID["Flandre"]
#Title["Flandre"]
#Text["E"]
//#Image["./mariremi_lib/mariremi_illust.png"]
#ReplayName["Flandre"]
#include "script/KevinSystem/kevin_system/Lib_Const.dnh"
#include "script/KevinSystem/Kevin_PlayerLib.txt"
#include "script/KevinSystem/PlayerSoundLib.dnh"
#include "./Chimata_Function.dnh"
#include "./Chimata_ShotConst.dnh"
#include "script/KevinSystem/kevin_system/Kevin_ItemConst.txt"
#include "script/KevinSystem/kevin_system/Kevin_ItemLib.txt"
float shotDamage = 2.4+(GetCommonData("Rank", 1)*0.3);
float shotScale = 0.6+(GetCommonData("Rank", 1)*0.125);
float shotSpeed = 50+(GetCommonData("Rank", 1)*1.5);
let csd = GetCurrentScriptDirectory();
// Global Variables
float maxX = GetStgFrameWidth();
float maxY = GetStgFrameHeight();
// Images & Sound
let teamimg = csd ~ "./playerlib/Flan_Sheet.png";
LoadTextureEx(teamimg, true, true);
//ObjRender_SetTextureFilterMip(teamimg, FILTER_LINEAR);
let sndpath = csd ~ "./sound";
// Other stuff
float playerX = 0;
float playerY = 0;
let objPlayer = GetPlayerObjectID();
int plrender = Obj_GetRenderPriorityI(objPlayer);
bool ripplayer = false;
float shotspeed = 0;
float bombrand = 0;
bool bombenable = false;
bool focusactive = false;
bool ishoming = false;
bool isChain = false;
int[] _enemyArray = []; // Prepare an array to store enemy IDs for Kouda's homing shot
int[] _existArray = [];
int[] _shotArray = [];
int grazecounter = 0; // For basic graze = PIV mechanic
int shotAlpha = (GetAreaCommonData("Config", "PlayerShotOpacity", 60)*0.01)*255;
float[] PlayerSpd = [15.5, 7.5];
// Custom events for scoring mechanic
const EV_PIV_100 = EV_USER + 100i; // Normal enemies and nons
const EV_PIV_250 = EV_USER + 101i; // Spells
const EV_PIV_500 = EV_USER + 102i; // Last Spells
const EV_PIV_2000 = EV_USER + 103i; // What.
@Initialize{
if(!IsCommonDataAreaExists("PIV")){
CreateCommonDataArea("PIV");
SetAreaCommonData("PIV", "currentvalue", 10000);
SetAreaCommonData("PIV", "ChainAmount", 1);
}
else{}
SetPlayerStateEndEnable(true);
// Stuff
parameterrender();
playerrender();
Obj_SetRenderPriorityI(objPlayer, 43);
plrender = Obj_GetRenderPriorityI(objPlayer);
_SoundTask();
//SetIntersectionVisualization(true); // Debug
_Mechanic(ripplayer, _enemyArray, _existArray, GetStgFrameWidth(), GetStgFrameHeight(), objPlayer, GetEnemyBossSceneObjectID(), 5, 2, 80);
_ShowChain();
_HitboxRender(ripplayer, objPlayer, teamimg, teamimg, 1280, 512, 1408, 640, 1536, 896, 2048, 1408, 0.3, 0.65);
SetShotAutoDeleteClip(256, 256, 256, 256);
// Shot functions
//SetPlayerSpell(99);
_Countdown();
_CAVELaser();
_ShotType();
//UniversalAlphaHandle(_shotArray);
// Shot data loading
LoadPlayerShotData(csd ~ "./Chimata_ShotData.dnh");
}
@MainLoop{
_enemyArray = GetIntersectionRegistedEnemyID;
shotspeed += 1; // Managing the shot rate
//_shotArray = GetAllShotID(TARGET_PLAYER);
//UniversalAlphaHandle(_shotArray);
playerX = ObjMove_GetX(objPlayer);
playerY = ObjMove_GetY(objPlayer);
yield;
}
@Event{
alternative(GetEventType)
// Delete effect
case(EV_DELETE_SHOT_PLAYER){
if(GetCommonDataPtr(EFFECTCUT_PTR, 0) >= 3){}
else{
let graphic = GetEventArgument(2);
float[] position = GetEventArgument(1);
let obj = CreatePlayerShotA1(position[0], position[1], 0, ObjMove_GetAngle(GetEventArgument(0)), 0, 99999, graphic);
ObjShot_SetIntersectionEnable(obj, false); _DeleteEffect(obj, shotScale);
}
//if(graphic == ELECTRIC_FIRE_ALT) {_DeleteEffectAlt(obj);}
//else{_DeleteEffect(obj);}
}
// PIV-item spawning events
case(EV_PIV_100){
let arg = GetEventArgument(0);
CreatePIVItem(PIV_100, arg[0], arg[1]);
}
case(EV_PIV_250){
let arg = GetEventArgument(0);
CreatePIVItem(PIV_250, arg[0], arg[1]);
}
case(EV_PIV_500){
let arg = GetEventArgument(0);
CreatePIVItem(PIV_500, arg[0], arg[1]);
}
// Basic functionality events
case(EV_REQUEST_SPELL){
let bomb = GetPlayerSpell();
if (bomb >= 1){
SetScriptResult(true);
SetPlayerSpell(bomb - 1);
_Bomb();
SetCommonData("Rank", max(1, GetCommonData("Rank", 1)-1));
_SigilCall(false, teamimg, 768+256, 512, 768+512, 768, objPlayer, GetPlayerInvincibilityFrame());
}
else {
SetScriptResult(false);
}
}
case(EV_HIT){
ObjSound_Play(PlayerHit);
_DeathbombWarning(teamimg, [1536, 384, 1536+512, 384+512], 15, 0.75);
}
case(EV_CHAIN_MAX){
if(!isChain){
ObjSound_Play(Shine);
isChain = true;
}
else{}
}
case(EV_CHAIN_RELEASE){
}
case(EV_CHAIN_END){
SetAreaCommonData("PIV", "ChainAmount", 1);
isChain = false;
}
case(EV_PLAYER_SHOOTDOWN){
ObjSound_Play(PlayerDie2);
BombRefund();
ripplayer = true;
DeleteShotAll(TYPE_SHOT, TYPE_ITEM);
SetCommonData("Rank", max(1, round(GetCommonData("Rank", 1)/2)));
_SigilCall(true, teamimg, 768, 512, 768+256, 768, objPlayer, 60);
}
case(EV_PLAYER_REBIRTH){
ripplayer = false;
SetPlayerInvincibilityFrame(180);
//_Countdown();
_SigilCall(false, teamimg, 768+256, 512, 768+512, 768, objPlayer, 150);
}
case(EV_GRAZE){
grazecounter += GetEventArgument(0);
ObjSound_Play(Graze);
while(grazecounter >= 10){
SetAreaCommonData("PIV", "currentvalue", GetAreaCommonData("PIV", "currentvalue")+10);
grazecounter -= 10;
}
}
}
@Finalize{
}
// Homing
task BombRefund(){
SetPlayerSpell(GetPlayerSpell()+[1, 2, 3, 3][clamp((GetCommonData("Rank", 1)/2)-1, 0, 3)]);
}
task _SwingBehaviour(target){
float ang = 0;
Obj_SetRenderPriorityI(target, 42);
while(true){
ObjRender_SetAngleZ(target, 0+20*sin(ang));
ang += 360/120;
yield;
}
}
task _ShotType(){
_Option(125, 0, 0, 1);
_Option(125, 90, 0, 1);
_Option(125, 180, 0, 1);
_Option(125, 270, 0, 1);
// Rank
while(true){
shotDamage = 2.4+(GetCommonData("Rank", 1)*0.2);
shotScale = 0.6+(GetCommonData("Rank", 1)*0.1);
shotSpeed = 50+(GetCommonData("Rank", 1)*2);
wait(30);
}
}
function _Option(dist, startang, wvel, counterspin){
//let shot = CreatePlayerShotA1(playerX+x, playerY-150+y, 0, startang, 0, 99999, KEV_OPTION);
let dummy = CreatePlayerShotA1(playerX, playerY-180, 0, startang, 0, 99999, 0);
bool visible = true;
int shotspeedhome = 0;
float counter = 0;
float scythex = 0;
float scythey = 0;
float offset = 0;
float dummyX = ObjMove_GetX(dummy);
float dummyY = ObjMove_GetY(dummy);
let shot = CreatePlayerShotA1(dummyX, dummyY, 0, startang, 0, 99999, OPTION);
float spaceX = 0, spaceY = 0;
float shotang = startang;
//ObjShot_SetSpinAngularVelocity(shot, wvel);
ObjShot_SetAutoDelete(shot, false);
ObjShot_SetAutoDelete(dummy, false);
_BulletRescalePlayer(shot, 0.25, true, 1);
ObjRender_SetBlendType(shot, BLEND_ALPHA);
ObjRender_SetAlpha(shot, 255);
Obj_SetRenderPriorityI(shot, plrender-1);
// Handles the spinning and shooting of the options.
async{
//SetShotAutoDeleteClip(-500, 128, -500, -500);
//int i = 0;
loop{
float shotx = ObjMove_GetX(shot);
float shoty = ObjMove_GetY(shot);
ObjRender_SetAngleZ(shot, 0);
if(!IsPermitPlayerShot || ripplayer){
//spaceX = clamp(spaceX-2, 0, x);
//Obj_SetVisible(shot, false);
Obj_SetVisible(dummy, false);
visible = false;
shotspeedhome = 0;
}
else{
//spaceX = min(x, spaceX+x/45);
//spaceY = min(y, spaceY+y/45);
Obj_SetVisible(shot, true); visible = true;
Obj_SetVisible(dummy, true);
if(shotspeedhome % 4 == 0 && GetVirtualKeyState(VK_SHOT) != KEY_FREE){
let water = CreatePlayerShotA1(shotx, shoty, 50, 270, 4, 1.5, FIRE);
//let water2 = CreatePlayerShotA1(shotx+25, shoty, 15, shotang+180, 1.82, 1.25, KEV_OPTIONSHOT);
ObjShot_SetAutoDelete(water, false);
ObjRender_SetAlpha(water, shotAlpha);
_HandleDeletion(water);
_BulletRescalePlayer(water, shotScale, true, 1);
//ObjMove_SetAngularVelocity(water, [0, 0.2][typeGun]);
//ObjMove_SetAngularVelocity(water2, [0, 0.2][typeGun]);
Obj_SetRenderPriorityI(water, plrender-1);
ObjSound_Play(Base2);
}
shotspeedhome++;
//counter;
}
yield;
}
}
task _HandleDeletion(int target){
while(ObjMove_GetY(target) > -128){
if(Obj_IsDeleted(target)){break;}
yield;
}
Obj_Delete(target);
return;
}
// Having the options move with Kevin if not shooting and/or focused.
async{
float angmove = 0;
loop{
ObjMove_SetPosition(shot, playerX+counterspin*spaceX*cos(shotang), playerY-offset+counterspin*spaceY*sin(shotang));
shotang += 3.5*counterspin;
ObjMove_SetPosition(dummy, playerX, playerY);
if(GetVirtualKeyState(VK_SLOWMOVE) != KEY_FREE){
spaceX = max(dist*0.75, spaceX-dist*1.5/15);
spaceY = max(dist*0.75, spaceY-dist*1.5/15);
}
else{
spaceX = min(dist*1.5, spaceX+dist*1.5/15);
spaceY = min(dist*1.5, spaceY+dist*1.5/15);
}
yield;
}
}
async{
loop{
if(visible == true){ObjShot_SetIntersectionEnable(shot, true); ObjShot_SetIntersectionEnable(dummy, true); counter += (1/240); counter = min(counter, 1);}
else if (visible != true && GetVirtualKeyState(VK_SLOWMOVE) != KEY_FREE){ObjShot_SetIntersectionEnable(shot, false); ObjShot_SetIntersectionEnable(dummy, false);}
else {ObjShot_SetIntersectionEnable(shot, false); ObjShot_SetIntersectionEnable(dummy, false); counter = 0;}
yield;
}
}
return shot;
}
// Basic player parameters
task parameterrender(){
SetPlayerItemScope(120);
SetPlayerLife(9); // Debug
SetPlayerSpell(2);
SetPlayerSpeed(PlayerSpd[0], PlayerSpd[1]); // (original: 5.25/2.0)
SetPlayerRebirthFrame(15);
SetPlayerDownStateFrame(60);
SetPlayerAutoItemCollectLine(GetStgFrameHeight/3);
SetPlayerRebirthLossFrame(0);
ObjPlayer_AddIntersectionCircleA1(objPlayer, 0, 0, 0, 40);
}
// Renders the shottype
// Player sprites
task playerrender(){
// Why is this movement code so cursed jesus fucking christ
float scale = 0.4; // Scalies
int frame = 0;
ObjPrim_SetTexture(objPlayer, teamimg);
ObjSprite2D_SetSourceRect(objPlayer, 0, 0, 512, 384);
ObjSprite2D_SetDestCenter(objPlayer);
Obj_SetRenderPriorityI(objPlayer, 42);
//ObjRender_SetTextureFilterMin(objPlayer, FILTER_ANISOTROPIC);
ObjRender_SetScaleXYZ(objPlayer, scale, scale, 1);
// Lower "speed" parameter = FASTER SPEED
// FOR WHEN ONLY IDLE SPRITES ARE DONE
loop{
//frame++;
_RenderPlayerMovement(objPlayer, frame, 0, 0, 512, 384, scale, 4, 6);
//if (frame >= (1*4-1)){frame = 0;}
yield;
}
}
task PointblankPlacebo(target, scale, multiplier){
int len = 10;
while(GetObjectDistance(target, objPlayer) < 90){
_BulletRescalePlayer(target, scale*multiplier, true, multiplier); // Pointblank
yield;
}
ascent(i in 0..len){
_BulletRescalePlayer(target, Interpolate_Decelerate(scale*multiplier, scale, i/len), true, Interpolate_Decelerate(multiplier, 1, i/len));
yield;
}
}
task Fadein(target, len){
ascent(i in 0..len){
_BulletRescalePlayer(target, Interpolate_Decelerate(0.4, 0.7, i/len), true, Interpolate_Decelerate(0.4, 0.7, i/len));
//ObjRender_SetBlendType(target, BLEND_ADD_ARGB);
yield;
}
ObjRender_SetBlendType(target, BLEND_ALPHA);
}
task Fadein(target, len, targetscale, targetscalehitbox){
ascent(i in 0..len){
_BulletRescalePlayer(target, Interpolate_Decelerate(0.1, targetscale, i/len), true, Interpolate_Decelerate(1, targetscalehitbox, i/len));
//ObjRender_SetBlendType(target, BLEND_ADD_ARGB);
yield;
}
ObjRender_SetBlendType(target, BLEND_ALPHA);
}
// Handling of bomb
task _Bomb(){
// Preparation
SetAreaCommonData("ChainChecks", "IsChaining", true);
SetForbidPlayerShot(true);
SetForbidPlayerSpell(true);
SetPlayerInvincibilityFrame(270);
// Spell object
let manageObj = GetSpellManageObject(); // SPELL BEGINS
ObjSpell_Regist(manageObj);
//ObjSound_Play(bombsfx);
SetPlayerSpeed(PlayerSpd[0]*2, PlayerSpd[1]*2);
// 180 seconds DEATH LASER
//SetCommonData("IsBomb", true);
//_Countdown(270);
async{
loop(90){
Fire();
Fire();
wait(2);
}
}
function Fire(){
let shotA = CreatePlayerShotA1(playerX, playerY, 25, rand(-15, 195), shotDamage/2, 25, FIRE);
_BulletRescalePlayer(shotA, 1.25, true, 1);
ObjRender_SetAlpha(shotA, 255);
Fading(shotA);
ObjRender_SetBlendType(shotA, BLEND_ADD_ARGB);
Obj_SetRenderPriorityI(shotA, 41);
ObjShot_SetPenetrateShotEnable(shotA, false);
//ObjShot_SetEnemyIntersectionInvalidFrame(shotA, 5); // CURRENTLY BUGGED AS OF PH3SX 1.32B
ObjShot_SetSpellFactor(shotA, true);
ObjShot_SetEraseShot(shotA, true);
}
loop(30){
if(GetVirtualKeyState(VK_SHOT) != KEY_FREE){ObjSound_Play(Fire);}
wait(6);
}
task Fading(shot){
ObjMove_SetAcceleration(shot, -1.5);
ObjMove_SetMaxSpeed(shot, 3);
ascent(i in 0..40){
ObjRender_SetAlpha(shot, Interpolate_Decelerate(255, 0, i/40));
yield;
}
Obj_Delete(shot);
}
SetPlayerSpeed(PlayerSpd[0], PlayerSpd[1]);
SetForbidPlayerShot(false);
Obj_Delete(manageObj); // !!! IMPORTANT !!!
SetAreaCommonData("ChainChecks", "IsChaining", false);
NotifyEventOwn(EV_CHAIN_END, 0);
wait(60);
SetForbidPlayerSpell(false);
}
// Screenshake function for bomb's duration - adapted from Sparen's tutorials
task _Countdown(){
//int timer = time;
int counter = CreateTextObject(
playerX, playerY, 58,
"", "Origami Mommy",
0xFFFFFF, 0xFFFFFF,
0x1AEC8C, 10,
Obj_GetRenderPriorityI(objPlayer)+1
);
ObjText_SetHorizontalAlignment(counter, ALIGNMENT_CENTER);
while(true){
if(GetPlayerInvincibilityFrame() <= 0){Obj_SetVisible(counter, false);}
else{Obj_SetVisible(counter, true);}
ObjRender_SetPosition(counter, playerX, playerY - 140, 1);
ObjText_SetText(counter, IntToString(GetPlayerInvincibilityFrame()));
yield;
}
//Obj_Delete(counter);
}
task _BombShake(shaketime, intensity){
float baseintensity = intensity;
float shakeno = shaketime;
ascent(i in 0..shakeno){
Set2DCameraFocusX(GetStgFrameWidth/2 + rand(-intensity, intensity));
Set2DCameraFocusY(GetStgFrameHeight/2 + rand(-intensity, intensity));
intensity = Interpolate_Decelerate(0, baseintensity, 1-i/shakeno);
shaketime--;
yield;
}
while(shaketime > 0){yield;}
Set2DCameraFocusX(GetStgFrameWidth/2);
Set2DCameraFocusY(GetStgFrameHeight/2);
yield;
}
function CreateTextObject(
float mx, my, size,
string text, font,
int colorTop, colorBottom,
int borderColor, borderWidth,
int renderPriority
){
let obj = ObjText_Create();
ObjText_SetText(obj, text);
ObjText_SetFontSize(obj, size);
ObjText_SetFontType(obj, font);
ObjText_SetFontColorTop(obj, colorTop);
ObjText_SetFontColorBottom(obj, colorBottom);
ObjText_SetFontBorderType(obj, BORDER_FULL);
ObjText_SetFontBorderColor(obj, borderColor);
ObjText_SetFontBorderWidth(obj, borderWidth);
Obj_SetRenderPriorityI(obj, renderPriority);
ObjRender_SetX(obj, mx);
ObjRender_SetY(obj, my);
return obj;
}

View File

@ -1,9 +0,0 @@
let current = GetCurrentScriptDirectory();
let path = current ~ "Chimata_ShotData.dnh";
LoadPlayerShotData(path);
// -----
const FIRE = 1;
const OPTION = 2;

View File

@ -1,30 +0,0 @@
shot_image = "./playerlib/Flan_Sheet.png"
ShotData{
id = 0 // Dummy
rect = (0,0,0,0)
render = ALPHA
alpha = 0
collision = 32
}
// Fire
ShotData{
id = 1
rect = (1024, 0, 1152, 256)
render = ALPHA
alpha = 255
collision = 128 // Hitbox of arrows is not centered on the sprite
}
// Option
ShotData{
id = 2
rect = (512, 0, 1024, 384)
render = ALPHA
alpha = 255
fixed_angle = true
collision = 0 // Hitbox of arrows is not centered on the sprite
}

Binary file not shown.

Before

Width:  |  Height:  |  Size: 1.0 MiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 640 KiB

View File

@ -1 +0,0 @@
2,0.57,,0.3442,,0.2691,0.3,0.2179,,0.3445,,,,,,,,,,,0.2992,,0.5139,,,1,,,,,,,masterVolume

View File

@ -1,299 +0,0 @@
// Shot Type
int[] optionArr = [];
float angSpace = 2.5;
float[] angStartArr = [];
// Far left, left, right, far right
float[] angStartUF = [230, 270, 270, 310];
float[] angStartUFAlt = [230, 275, 265, 310];
float[] angStartF = [250, 280, 260, 290];
float offsetX = 125;
float offsetY = 75;
int[] bulletNum = [4, 3, 3, 4];
task _HomeShot(int shot_) {
float duration = 55;
bool homingBool = false;
float basepenetrate = ObjShot_GetPenetration(shot_);
float basedmg = ObjShot_GetDamage(shot_);
//
for (int t = 0i; t < duration && !Obj_IsDeleted(shot_); t++) {
// Checks if enemies are on screen. If enemies are visible, enable homing for the shots.
// _enemyArray is an array containing all enemy IDs, and is constantly updated in @MainLoop.
if (0 < length(_enemyArray)) {
float targetDist = 2000; // Arbitrary number (???)
int targetID = 0;
// Checks distance of every enemy on screen.
for each (int enemy in ref _enemyArray) {
float enemyX = ObjMove_GetX(enemy);
float enemyY = ObjMove_GetY(enemy);
if (0 < enemyX && enemyX < maxX && 0 < enemyY && enemyY < maxY) {
// Returns the hypotenuse of the triangle formed by the x & y distances between the shot and the enemy.
float shotDist = hypot(enemyX - ObjMove_GetX(shot_), enemyY - ObjMove_GetY(shot_));
// Locks the shot onto the enemy.
if (shotDist < targetDist) {
targetDist = shotDist;
targetID = enemy;
homingBool = true;
}
}
}
// Code to handle the actual homing.
if (homingBool) {
for (int f = 0; t < duration && !Obj_IsDeleted(shot_) && !Obj_IsDeleted(targetID) && ObjEnemy_GetInfo(targetID, INFO_LIFE) != 0 && !ObjCol_IsIntersected(shot_); t++) {
ObjShot_SetAutoDelete(shot_, false);
float shotAngle = NormalizeAngle(ObjMove_GetAngle(shot_)); // Angle of the player shot
float targetAngle = NormalizeAngle(atan2(ObjMove_GetY(targetID) - ObjMove_GetY(shot_), ObjMove_GetX(targetID) - ObjMove_GetX(shot_))); // Returns angle from the shot to the enemy.
float angleDistance = AngularDistance(shotAngle, targetAngle); // Angular distance between enemy and player shot
float homeRate = Interpolate_Decelerate(0, 0.8, min(45, f) / 45);
// Homing speed?
ObjMove_SetAngle(shot_, Interpolate_Accelerate(shotAngle, shotAngle + angleDistance, homeRate)); // Interpolate_Necko
f++;
yield;
}
ObjShot_SetAutoDelete(shot_, true);
ObjMove_SetAngularVelocity(shot_, 0);
homingBool = false;
}
}
yield;
}
}
task UpdateAng(){
while(true){
if(GetVirtualKeyState(VK_SLOWMOVE) != KEY_FREE){
angStartArr = angStartF;
angSpace = 9;
}
else{
angStartArr = angStartUF;
angSpace = 18;
}
yield;
}
}
task ShotType(){
}
function <int> CreateOption(
float offsetX_uf, offsetY_uf,
float offsetX_f, offsetY_f,
float ang_uf, ang_f
){
// Option
int option = PlayerOption_LinearMove(
offsetX_uf, offsetY_uf, offsetX_f, offsetY_f,
true, ang_uf, ang_f,
plimg,
OPTION, 0.5, 39,
128, 1, 1, false,
false, 1,
false, false
);
return option;
}
// CALL THIS TASK FIRST
task InitiateOptions(){
// Far left, left, right, far right
float[][] offsetArr = [
[-offsetX * 1.5, offsetY * 1.25, -offsetX * 1, offsetY * 0.75],
[-offsetX * 1, 0, -offsetX * 0.75, -offsetY * 0.4],
[offsetX * 1, 0, offsetX * 0.75, -offsetY * 0.4],
[offsetX * 1.5, offsetY * 1.25, offsetX * 1, offsetY * 0.75],
];
int count = 0;
for each (float[] entry in ref offsetArr){
int option = CreateOption(
offsetArr[count][0], offsetArr[count][1],
offsetArr[count][2], offsetArr[count][3],
angStartUF[count], angStartF[count]
);
optionArr = optionArr ~ [option];
ShotType(option, angStartUFAlt[count], angStartF[count], bulletNum[count]);
SpecialWeapon(option, angStartUFAlt[count], angStartF[count], bulletNum[count]);
count++;
}
}
task BaseShot(){
int angMultiplier = 0;
while(true){
if(GetVirtualKeyState(VK_SHOT) != KEY_FREE && GetVirtualKeyState(VK_USER1) == KEY_FREE &&IsPermitPlayerShot && !ripplayer){
if(shotspeed % 4 == 0){
ObjSound_Play(Base3);
let shotA = CreatePlayerShotA1(playerX, playerY, 52, 270, shotDamage*2, 1.2, FIRE_BASE);
_BulletRescalePlayer(shotA, shotScale1, true, 1);
ObjRender_SetAlpha(shotA, shotAlpha);
Obj_SetRenderPriorityI(shotA, 41);
}
}
yield;
}
}
task ShotType(int ID, float startAngUF, startAngF, int bulletNum){
int angMultiplier = 0;
while(true){
if(GetVirtualKeyState(VK_SHOT) != KEY_FREE && GetVirtualKeyState(VK_USER1) == KEY_FREE &&IsPermitPlayerShot && !ripplayer){
if(shotspeed % 3*(bulletNum+1) == 0){
float x = ObjMove_GetX(ID);
float y = ObjMove_GetY(ID);
int multiplier = 1;
if(x-playerX > 0){multiplier = 1;}
else{multiplier = -1;}
//ObjSound_Play(Base3);
loop(bulletNum){
if(GetVirtualKeyState(VK_SLOWMOVE) != KEY_FREE){
let shotA = CreatePlayerShotA1(x, y, 45, startAngF+angSpace*multiplier*angMultiplier, shotDamage, 1.1, FIRE_NORMAL);
_BulletRescalePlayer(shotA, shotScale1, true, 1);
ObjRender_SetAlpha(shotA, shotAlpha);
Obj_SetRenderPriorityI(shotA, 41);
}
else{
let shotA = CreatePlayerShotA1(x, y, 45, startAngUF+angSpace*multiplier*angMultiplier, shotDamage, 1.1, FIRE_NORMAL);
_BulletRescalePlayer(shotA, shotScale1, true, 1);
ObjRender_SetAlpha(shotA, shotAlpha);
Obj_SetRenderPriorityI(shotA, 41);
}
angMultiplier ++;
wait(2);
}
angMultiplier = 0;
}
}
yield;
}
}
task SpecialWeapon(int ID, float startAngUF, startAngF, int bulletNum){
int angMultiplier = 0;
while(true){
if(GetVirtualKeyState(VK_USER1) != KEY_FREE && GetCommonDataPtr(POINTER_SPECIALAMMO, 100) > 0 && IsPermitPlayerShot && !ripplayer){
SetCommonDataPtr(POINTER_SPECIALCHECK, true);
SetCommonDataPtr(POINTER_CHAINCHECK, true);
// 15 ammo per second
if(shotspeed % 4 == 0){
float x = ObjMove_GetX(ID);
float y = ObjMove_GetY(ID);
SetCommonDataPtr(POINTER_SPECIALAMMO, max(0, GetCommonDataPtr(POINTER_SPECIALAMMO, 100)-(15/60)));
// Minimal rank boost -> +0.5 rank for every 10 seconds of the wpn being used -> 1/20 rank every sec -> 1/300 rank every 4 frames
SetCommonData("Rank", clamp(GetCommonData("Rank", 1) + 1/(300*4), GetCommonData("MinRank", 1), GetCommonData("MaxRank", 12)));
int multiplier = 1;
if(x-playerX > 0){multiplier = 1;}
else{multiplier = -1;}
ObjSound_Play(Base2);
loop(1){
let shotA = CreatePlayerShotA1(x, y, 45, startAngF+rand(-1, 1), shotDamageSpecial, 1.1, FIRE_SPECIAL);
_BulletRescalePlayer(shotA, shotScale1*2, true, 1);
_HomeShot(shotA);
ObjRender_SetAlpha(shotA, shotAlpha);
Obj_SetRenderPriorityI(shotA, 41);
angMultiplier ++;
}
angMultiplier = 0;
}
}
else{
SetCommonDataPtr(POINTER_CHAINCHECK, false);
if(GetCommonDataPtr(POINTER_CHAINGAUGE, 0) <= 0){SetCommonDataPtr(POINTER_SPECIALCHECK, false);}
}
yield;
}
}
// Bomb
// Yassbong explosion

View File

@ -1,364 +0,0 @@
#TouhouDanmakufu[Player]
#ScriptVersion[3]
#ID["PL1_LAVENDER"]
#Title["Lavender Mushihime"]
#Text["Player 1"]
//#Image["./mariremi_lib/mariremi_illust.png"]
#ReplayName["Lavender"]
#include "script/KevinSystem/kevin_system/Lib_Const.dnh"
#include "script/KevinSystem/Kevin_PlayerLib.txt"
#include "script/KevinSystem/PlayerSoundLib.dnh"
#include "./Player_Function.dnh"
#include "./Player_ShotConst.dnh"
#include "script/KevinSystem/kevin_system/Kevin_ItemConst.txt"
#include "script/KevinSystem/kevin_system/Kevin_ItemLib.txt"
let csd = GetCurrentScriptDirectory();
// Global Variables
float maxX = GetStgFrameWidth();
float maxY = GetStgFrameHeight();
// Images & Sound
let teamimg = csd ~ "./playerlib/Player_Sheet.png";
LoadTextureEx(teamimg, true, true);
//ObjRender_SetTextureFilterMip(teamimg, FILTER_LINEAR);
let plimg = csd ~ "./playerlib/PlSheet_Lavender.png";
LoadTextureEx(plimg, true, true);
ObjRender_SetTextureFilter(plimg, FILTER_NONE, FILTER_NONE, FILTER_NONE);
let sndpath = csd ~ "./sound";
int[] _enemyArray = [];
int[] _existArray = [];
int[] _shotArray = [];
bool isChain = false;
bool isUseSpecialWpn = false;
float curChain = 0;
// Other stuff
float playerX = 0;
float playerY = 0;
let objPlayer = GetPlayerObjectID();
int plrender = Obj_GetRenderPriorityI(objPlayer);
bool ripplayer = false;
float shotspeed = 0;
float bombrand = 0;
int grazecounter = 0; // For basic graze = PIV mechanic
int shotAlpha = (GetAreaCommonData("Config", "PlayerShotOpacity", 60)*0.01)*255;
float shotDamage = 3.1;
float shotDamageSpecial = 6.25;
float shotScale1 = 1;
float[] PlayerSpd = [13, 6.5];
// Custom events for scoring mechanic
const EV_PIV_100 = EV_USER + 100i; // Normal enemies and nons
const EV_PIV_250 = EV_USER + 101i; // Spells
const EV_PIV_500 = EV_USER + 102i; // Last Spells
const EV_PIV_2000 = EV_USER + 103i; // What.
@Initialize{
if(!IsCommonDataAreaExists("PIV")){
CreateCommonDataArea("PIV");
SetAreaCommonData("PIV", "currentvalue", 10000);
SetAreaCommonData("PIV", "ChainAmount", 1);
}
else{}
SetPlayerStateEndEnable(true);
// Stuff
Parameter();
RenderPlayer();
UpdateAng();
BaseShot();
InitiateOptions();
Obj_SetRenderPriorityI(objPlayer, 43);
plrender = Obj_GetRenderPriorityI(objPlayer);
_SoundTask();
//SetIntersectionVisualization(true); // Debug
_Mechanic(ripplayer, _enemyArray, _existArray, GetStgFrameWidth(), GetStgFrameHeight(), objPlayer, GetEnemyBossSceneObjectID(), 1, 2, 80);
_ShowChain();
_HandleChainGauge();
_HitboxRender(ripplayer, objPlayer, plimg, teamimg, 768, 192, 832, 256, 1536, 896, 2048, 1408, 0.5, 0.65);
SetShotAutoDeleteClip(256, 256, 256, 256);
_Countdown();
// Shot data loading
LoadPlayerShotData(csd ~ "./Player_ShotData.dnh");
}
@MainLoop{
_enemyArray = GetIntersectionRegistedEnemyID;
shotspeed += 1; // Managing the shot rate
//_shotArray = GetAllShotID(TARGET_PLAYER);
//UniversalAlphaHandle(_shotArray);
playerX = ObjMove_GetX(objPlayer);
playerY = ObjMove_GetY(objPlayer);
yield;
}
@Event{
alternative(GetEventType)
// Delete effect
case(EV_DELETE_SHOT_PLAYER){
if(GetCommonDataPtr(EFFECTCUT_PTR, 0) >= 3){}
else{
let graphic = GetEventArgument(2);
float[] position = GetEventArgument(1);
let obj = CreatePlayerShotA1(position[0], position[1], 0, ObjMove_GetAngle(GetEventArgument(0)), 0, 99999, graphic);
ObjShot_SetIntersectionEnable(obj, false); _DeleteEffect(obj, graphic == FIRE_SPECIAL ? shotScale1 * 2 : shotScale1);
}
//if(graphic == ELECTRIC_FIRE_ALT) {_DeleteEffectAlt(obj);}
//else{_DeleteEffect(obj);}
}
// PIV-item spawning events
case(EV_PIV_100){
let arg = GetEventArgument(0);
CreatePIVItem(PIV_100, arg[0], arg[1]);
}
case(EV_PIV_250){
let arg = GetEventArgument(0);
CreatePIVItem(PIV_250, arg[0], arg[1]);
}
case(EV_PIV_500){
let arg = GetEventArgument(0);
CreatePIVItem(PIV_500, arg[0], arg[1]);
}
// Basic functionality events
case(EV_REQUEST_SPELL){
let bomb = GetPlayerSpell();
if (bomb >= 1){
SetScriptResult(true);
SetPlayerSpell(bomb - 1);
_Bomb();
SetCommonData("Rank", clamp(max(1, GetCommonData("Rank", 1)-0.25), GetCommonData("MinRank", 1), GetCommonData("MaxRank", 12)));
_SigilCall(false, teamimg, 768+256, 512, 768+512, 768, objPlayer, GetPlayerInvincibilityFrame());
}
else {
SetScriptResult(false);
}
}
case(EV_HIT){
ObjSound_Play(PlayerHit);
_DeathbombWarning(plimg, [832, 0, 1088, 256], 20, 3);
}
case(EV_CHAIN_MAX){
if(!isChain){
ObjSound_Play(Shine);
isChain = true;
curChain = GetCommonDataPtr(POINTER_CHAIN, 1);
}
else{}
}
case(EV_CHAIN_RELEASE){
}
case(EV_CHAIN_END){
SetAreaCommonData("PIV", "ChainAmount", 1);
isChain = false;
// Increase rank depending on curChain (>= 32), then reset curChain. MAX CHAIN increases rank by 0.4.
if(curChain >= 32){
SetCommonData("Rank", clamp(GetCommonData("Rank", 1) + Interpolate_Linear(0.25, 0.5, curChain/64), GetCommonData("MinRank", 1), GetCommonData("MaxRank", 12)));
}
curChain = 1;
}
case(EV_PLAYER_SHOOTDOWN){
ObjSound_Play(PlayerDie2);
SetPlayerSpell(GetPlayerSpell()+2);
ripplayer = true;
DeleteShotAll(TYPE_SHOT, TYPE_ITEM);
// Decrease rank by 1/4
SetCommonData("Rank", clamp(GetCommonData("Rank", 1) * 0.75, GetCommonData("MinRank", 1), GetCommonData("MaxRank", 12)));
_SigilCall(true, teamimg, 768, 512, 768+256, 768, objPlayer, 60);
}
case(EV_PLAYER_REBIRTH){
ripplayer = false;
SetPlayerInvincibilityFrame(180);
//_Countdown();
_SigilCall(false, teamimg, 768+256, 512, 768+512, 768, objPlayer, 150);
}
case(EV_GRAZE){
}
}
@Finalize{
}
// Basic player parameters
task Parameter(){
// im trying to not be collected by the player but their item scope is dummy thicc and im alerted by its cheek
SetPlayerItemScope(360);
SetPlayerLife(9); // Debug
SetPlayerSpell(2);
SetPlayerSpeed(PlayerSpd[0], PlayerSpd[1]); // (original: 5.25/2.0)
SetPlayerRebirthFrame(20);
SetPlayerDownStateFrame(60);
SetPlayerAutoItemCollectLine(GetStgFrameHeight/3);
SetPlayerRebirthLossFrame(0);
ObjPlayer_AddIntersectionCircleA1(objPlayer, 0, 0, 0, 40);
}
// Player render
task RenderPlayer(){
// Why is this movement code so cursed jesus fucking christ
float scale = 1; // Scalies
int frame = 0;
ObjPrim_SetTexture(objPlayer, plimg);
ObjSprite2D_SetSourceRect(objPlayer, 0, 0, 128, 192);
ObjSprite2D_SetDestCenter(objPlayer);
Obj_SetRenderPriorityI(objPlayer, 42);
//ObjRender_SetTextureFilterMin(objPlayer, FILTER_ANISOTROPIC);
ObjRender_SetScaleXYZ(objPlayer, scale, scale, 1);
// Lower "speed" parameter = FASTER SPEED
loop{
frame++;
_RenderPlayerMovement(objPlayer, frame, 0, 0, 128, 192, scale, 3, 6);
if (frame >= (3*6-1)){frame = 0;}
yield;
}
}
// Handling of bomb
task _Bomb(){
// Fire rings explode in a straight line, bomb lasts 90 frames with 240-frame total invincibility
// Preparation
SetForbidPlayerShot(true);
SetForbidPlayerSpell(true);
SetPlayerInvincibilityFrame(120);
// Spell object
let manageObj = GetSpellManageObject(); // SPELL BEGINS
ObjSpell_Regist(manageObj);
// Fully refills chain gauge for 120 frames
// Activates chain but not FUN MODE
async{
loop(60){
SetCommonDataPtr(POINTER_CHAINCHECK, true);
SetCommonDataPtr(POINTER_CHAINGAUGE, 100);
yield;
}
}
task CreateFireRing(x, y){
float startAng = rand(0, 360);
ascent(i in 0..16){
int slash = CreatePlayerShotA1(x, y, 35, startAng + i * 360/16, shotDamageSpecial/8, 64, FIRE_SPECIAL);
ObjShot_SetPenetrateShotEnable(slash, false);
ObjRender_SetColorHSV(slash, 180, 255, 255);
_BulletRescalePlayer(slash, shotScale1*2.5, true, 1);
ObjShot_SetSpellFactor(slash, true);
ObjShot_SetEraseShot(slash, true);
Obj_SetRenderPriorityI(slash, plrender-1);
//ObjRender_SetBlendType(slash, BLEND_ADD_ARGB);
Fade(slash);
}
ObjSound_Play(Explosion2);
}
task Fade(int ID){
ObjRender_SetAlpha(ID, 255);
ObjMove_AddPatternA2(ID, 0, 40, NO_CHANGE, -40/25, 15, 0);
ascent(i in 0..15){
ObjRender_SetAlpha(ID, Interpolate_Accelerate(255, 0, i/15));
yield;
}
Obj_Delete(ID);
}
float bombX = playerX;
ascent(i in 0..15){
CreateFireRing(rand(0, STG_WIDTH), rand(0, STG_HEIGHT));
wait(4);
}
SetPlayerSpeed(PlayerSpd[0], PlayerSpd[1]);
SetForbidPlayerShot(false);
Obj_Delete(manageObj); // !!! IMPORTANT !!!
wait(60);
SetForbidPlayerSpell(false);
}

View File

@ -1,11 +0,0 @@
let current = GetCurrentScriptDirectory();
let path = current ~ "Player_ShotData.dnh";
LoadPlayerShotData(path);
// -----
const OPTION = 1;
const FIRE_NORMAL = 2;
const FIRE_SPECIAL = 3;
const FIRE_BASE = 4;

View File

@ -1,49 +0,0 @@
shot_image = "./playerlib/PlSheet_Lavender.png"
ShotData{
id = 0 // Dummy
rect = (0,0,0,0)
render = ALPHA
alpha = 0
collision = 32
}
// Option
ShotData{
id = 1
rect = (0, 192, 128, 384)
render = ALPHA
alpha = 255
collision = 0 // Hitbox of arrows is not centered on the sprite
}
// Fire1
ShotData{
id = 2
rect = (128, 192, 256, 384)
render = ALPHA
alpha = 255
collision = 64 // Hitbox of arrows is not centered on the sprite
}
// Fire2
ShotData{
id = 3
rect = (512, 192, 640, 384)
render = ALPHA
alpha = 255
collision = 64 // Hitbox of arrows is not centered on the sprite
}
// Fire0
ShotData{
id = 4
rect = (384, 192, 512, 384)
render = ALPHA
alpha = 255
collision = 64 // Hitbox of arrows is not centered on the sprite
}

Binary file not shown.

Before

Width:  |  Height:  |  Size: 62 KiB

View File

@ -1 +0,0 @@
2,0.57,,0.3442,,0.2691,0.3,0.2179,,0.3445,,,,,,,,,,,0.2992,,0.5139,,,1,,,,,,,masterVolume

View File

@ -41,7 +41,7 @@ task BaseShot(){
ascent(i in 0..3){
let shotA = CreatePlayerShotA1(playerX, playerY, 52, ang2 - ang2 * (i * 1), shotDamageOption, 1.5, AMULET);
let shotA = CreatePlayerShotA1(playerX, playerY, 52, ang2 - ang2 * (i * 1), shotDamageOption*1.25, 1.5, AMULET);
_BulletRescalePlayer(shotA, shotScaleOption, true, 1);
ObjRender_SetAlpha(shotA, shotAlpha);
Obj_SetRenderPriorityI(shotA, 41);
@ -50,7 +50,7 @@ task BaseShot(){
ascent(i in 0..3){
let shotB = CreatePlayerShotA1(playerX, playerY, 52, ang2 - ang2 * (i * 1) + 180, shotDamageOption, 1.5, AMULET);
let shotB = CreatePlayerShotA1(playerX, playerY, 52, ang2 - ang2 * (i * 1) + 180, shotDamageOption*1.25, 1.5, AMULET);
_BulletRescalePlayer(shotB, shotScaleOption, true, 1);
ObjRender_SetAlpha(shotB, shotAlpha);
Obj_SetRenderPriorityI(shotB, 41);
@ -111,49 +111,39 @@ task SpecialWeapon(){
while(true){
if(GetVirtualKeyState(VK_SPELL) != KEY_FREE && GetCommonDataPtr(POINTER_SPECIALAMMO, 100) > 0 && !ripplayer){
if(GetVirtualKeyState(VK_SPELL) != KEY_FREE && GetCommonDataPtr(POINTER_SPECIALAMMO, 100) > 20/60 && !ripplayer){
if(shotspeed % 4 == 0){ObjSound_Play(Fire);}
i = min(210, i+210/10);
ObjMove_SetPosition(golem, playerX + i, playerY);
ObjRender_SetAlpha(golem, min(255, ObjRender_GetAlpha(golem)+255/10));
Obj_SetVisible(golem, true);
//SetCommonDataPtr(POINTER_SPECIALCHECK, true);
SetCommonDataPtr(POINTER_CHAINCHECK, true);
SetPlayerSpeed(PlayerSpd[0]*1.5, PlayerSpd[1]*1.5);
// (Approx.) 20 ammo per second
// (Approx.) 20 ammo per second, 1/3 ammo per frame.
SetCommonDataPtr(POINTER_SPECIALAMMO, max(0, GetCommonDataPtr(POINTER_SPECIALAMMO, 100)-(20/60)));
ObjShot_SetIntersectionEnable(golem, true);
Obj_SetVisible(golem, true);
if(ObjRender_GetAlpha(golem) >= 220){
ObjShot_SetIntersectionEnable(golem, true);
}
else{
ObjShot_SetIntersectionEnable(golem, false);
}
// +1 rank per 10 seconds of use
SetCommonData("Rank", clamp(GetCommonData("Rank", 1)+1/600, 1, GetCommonData("MaxRank", 6)));
/*
if(shotspeed % 4 == 0){
float x = ObjMove_GetX(ID);
float y = ObjMove_GetY(ID);
// Minimal rank boost -> +0.5 rank for every 10 seconds of the wpn being used -> 1/20 rank every sec -> 1/300 rank every 4 frames
SetCommonData("Rank", clamp(GetCommonData("Rank", 1) + 1/300, GetCommonData("MinRank", 1), GetCommonData("MaxRank", 12)));
angFire[0] = 270 + angFlux * sin(ang1) + rand(-5, 5);
angFire[1] = 270 + angFlux * sin(ang2) + rand(-5, 5);
// YASS FIRE THOSE BITCH KILLER SLASHES
FireSlash(angFire[0], 50, 35, 45);
FireSlash(angFire[1], 50, 35, 45);
ang1 += 25;
ang2 -= 25;
}
*/
}
else{
@ -165,7 +155,14 @@ task SpecialWeapon(){
ObjRender_SetAlpha(golem, max(0, ObjRender_GetAlpha(golem)-255/10));
SetPlayerSpeed(PlayerSpd[0], PlayerSpd[1]);
SetCommonDataPtr(POINTER_SPECIALAMMO, min(100, GetCommonDataPtr(POINTER_SPECIALAMMO, 100)+(5/60)));
// Refills ammo by 1/12 ammo per frame.
if(GetVirtualKeyState(VK_SPELL) == KEY_FREE)
{SetCommonDataPtr(POINTER_SPECIALAMMO, min(100, GetCommonDataPtr(POINTER_SPECIALAMMO, 100)+(5/60)));}
else
{}
SetCommonDataPtr(POINTER_CHAINCHECK, false);
ObjShot_SetIntersectionEnable(golem, false);

View File

@ -62,7 +62,7 @@ int grazecounter = 0; // For basic graze = PIV mechanic
int shotAlpha = (GetAreaCommonData("Config", "PlayerShotOpacity", 255)*0.01)*255;
float shotDamageOption = 4;
float shotDamageOption = 4.5;
float shotScaleOption = 1;
float shotDamageLaser = 2;
@ -249,7 +249,7 @@ task Parameter(){
SetPlayerDownStateFrame(90);
SetPlayerAutoItemCollectLine(GetStgFrameHeight/3);
SetPlayerRebirthLossFrame(0);
ObjPlayer_AddIntersectionCircleA1(objPlayer, 0, 0, 2, 40);
ObjPlayer_AddIntersectionCircleA1(objPlayer, 0, 0, 1, 40);
}