☆ベルトアクション作成　Beats of rageスレッド☆

☆ベルトアクション作成　Beats of rageスレッド☆ (656ﾚｽ)
上下前次 1-新
通常表示 512ﾊﾞｲﾄ分割ﾚｽ栞

116: 名前は開発中のものです。 [sage] 2021/05/06(木) 23:33:55.01 ID:/KeaSO9B

@script
void self = getlocalvar("self");
int MP = getentityproperty(self,"mp");
setlocalvar("T"+self, findtarget(self));
if( frame == 0 && getlocalvar("T"+self) != NULL() ) {
void target = getlocalvar("T"+self);
void vAniID = getentityproperty(target,"animationID");
void TType = getentityproperty(target,"type");
int Boss = getentityproperty(target, "boss");
if(TType == openborconstant("TYPE_ENEMY") && Boss==0 && vAniID != openborconstant("ANI_DIE") && vAniID != openborconstant("ANI_SPAWN") && vAniID != openborconstant("ANI_RISE")) {
changeentityproperty(self,"mp",MP-80);
changeentityproperty(target, "parent", self);
changeentityproperty(target, "type", openborconstant("TYPE_NPC"));
changeentityproperty(target, "hostile", "TYPE_ENEMY");
changeentityproperty(target, "candamage", "TYPE_ENEMY");
changeentityproperty(target, "lifespancountdown", 2200);
changedrawmethod(target, "reset", 1);
setlocalvar("T"+self, NULL());
changedrawmethod(target,"tintmode",3);
changedrawmethod(target,"tintcolor",rgbcolor(128, 255, 255));
}
}
@end_script

http://mevius.5ch.net/test/read.cgi/gamedev/1547405874/116

150: 名前は開発中のものです。 [sage] 2021/05/16(日) 03:06:57.62 ID:FoJl/otl

Loop 1からの脱出
AnimにLoop 1が設定されていると
@cmd changeentityproperty getlocalvar("self") "animation" openborconstant("ANI_CHARGE")
では、すぐに元のAnimに戻されてしまう。
そこで、executeanimationを使う事で完全に別なAnimに移行できると紹介しましたが、
executeanimationを実行させる条件付けはどうしよう？
@script
if(frame>0) {
if(getplayerproperty(0, "newkeys")) {
executeanimation(getlocalvar("self"), openborconstant("ANI_CHARGE"), 0);
}
}
@end_script
これは何らかのキー入力（方向キー、各ボタン）でexecuteanimationするもの。
他にPlayerkeys(0,0,"anybutton")もありますが、これはボタン（Aの攻撃など）のみ、
あと、標準コマンドのCancelを使ってFreeSpecial#に移行することも出来ますね。
これだけでは無くプレイヤーに関しては、プレイヤーの状況を取得する手段が結構いろいろと用意されています。

>>148 のAnim JumpAttack2内の Velocity制御について、
結局、強制的に動かしたい方向が決まっていれば以下のように Velocityを指定してやれば良いということになります。
@cmd changeentityproperty getlocalvar("self") "velocity" 3 0 -4
frame data/~
~
@cmd changeentityproperty getlocalvar("self") "velocity" 0 0 0
frame data/~
ただ、直接指定すると”強制的に右向きを基本とした動作”になってしまうので、
if(vd==0) { vx= -vx; }こういった処理が必要な場合、@Scriptを利用することになります。
標準コマンドを利用するとAnim中に１回のみなどの制約が伴いますが、気軽に使えます。
一方、@cmdや@scriptを利用すると、様々な要素（省略できる部分もあります）について指定する必要があります。

http://mevius.5ch.net/test/read.cgi/gamedev/1547405874/150

163: 名前は開発中のものです。 [sage] 2021/06/14(月) 01:20:36.86 ID:f6qMiOOZ

@script
if(frame==0) { float Vx, Vz, Vy=3, dx=0, dz=0;
void self = getlocalvar("self");
int dir = getentityproperty(self, "direction");
float x = getentityproperty(self, "x");
float z = getentityproperty(self, "z");
if (dir==0) { dx = -dx; }
setlocalvar("T"+self, findtarget(self));
if( getlocalvar("T"+self) != NULL()){
void target = getlocalvar("T"+self);
float Tx = getentityproperty(target, "x");
float Tz = getentityproperty(target, "z");
if(Tx < x) { changeentityproperty(self, "direction", 0);
} else { changeentityproperty(self, "direction", 1); }
x = x+dx;
z = z+dz;
Vx = ((Tx-x)/(22*Vy));
Vz = ((Tz-z)/(22*Vy));
} else {
Vx = 1 ;
if(dir==0){ Vx = -Vx ; }
Vz = 0 ; }
tossentity(self, Vy, Vx, Vz); }
@end_script
他人様のアイデアを偉そうに紹介するのもアレなんですが、近くの敵に誘導ジャンプします。
if(frame==0) { float Vx, Vz, Vy=3, dx=0, dz=0;
これで、Frame 0の時、ジャンプ力３（Vy=3）で届く範囲を索敵してジャンプします。
攻撃するかどうかは、Anim中に記述されたコマンド次第で、このままなら、
攻撃可能と設定した近くの対象にジャンプするだけです。

http://mevius.5ch.net/test/read.cgi/gamedev/1547405874/163

164: 名前は開発中のものです。 [sage] 2021/06/17(木) 02:47:33.77 ID:1MwPeeuR

DOT {Index} {Time} {Mode} {Force} {Rate}
{Index} defines DOT index. Entity may have up to 10 DOT effects at one time. An entity can be hit by more than one DOT effect at once. If entity is hit by same indexed DOT effects, only the latest one will be applied.
{Time} defines how long DOT effect active in centiseconds.
{Mode} defines how DOT effect is applied to hit entity. HP damage is same type as original attack and affected by damage mitigation.
1 = Nonlethal HP (can reduce to 1 but not below).
2 = MP.
3 = MP and nonlethal HP.
4 = HP.
5 = MP and HP.
{Force} defines amount of damage per tick.
{Rate} defines delay between each tick in centisecond.

DROPVと同じように Attack コマンドと一緒に記述することで
一定時間、ダメージを与え続けるというもの、
Indexは特に気にしなくてOK（DOTが重複して掛かるかどうか）、Timeは持続時間（６００で6秒）
ModeはHPにダメージ、MPにダメージか双方か、ダメージによって消滅するか
Forceは一回あたりのダメージ。Rateは総時間（Time）中、何回ダメージを与えるか
Timeが６００でRateが１００なら、1秒ごとに6秒間Forceダメージ与えるというもの。

http://mevius.5ch.net/test/read.cgi/gamedev/1547405874/164

165: 名前は開発中のものです。 [sage] 2021/06/17(木) 02:55:24.76 ID:1MwPeeuR

スクリプトで同じような事をしようと思うと
anim idle
@script
if(frame==1) { void self = getlocalvar("self");
setlocalvar("BT"+self, findtarget(self));
if(getlocalvar("BT"+self)!=NULL()) {
void target = getlocalvar("BT"+self);
void PDir = getentityproperty(self, "direction");
int tx = getentityproperty(target, "x"), px = getentityproperty(self, "x");
int tz = getentityproperty(target, "z"), pz = getentityproperty(self, "z");
if(PDir) {
if( tz - pz < 10 && tz - pz > -10 && tx - px > 30 && tx - px <240) {
changeentityproperty(target, "lifespancountdown", 600 ); // openborvariant("elapsed_time")+300);
changedrawmethod(target, "reset", 1);
setlocalvar("BT"+self, NULL());
changedrawmethod(target,"tintmode",3);
changedrawmethod(target,"tintcolor",rgbcolor(255, 64, 32)); }
} else {
if( tz - pz < 10 && tz - pz > -10 && tx - px > -240 && tx - px <-30) {
changeentityproperty(target, "lifespancountdown", 600 ); // openborvariant("elapsed_time")+300);
changedrawmethod(target, "reset", 1);
setlocalvar("BT"+self, NULL());
changedrawmethod(target,"tintmode",3);
changedrawmethod(target,"tintcolor",rgbcolor(255, 64, 32));
}　}　}　}
@end_script
余計なことたくさんしてるんで長くなってますが、
自分の進行方向の敵を標的に選んで、縦軸にずれが１０ドット、横軸３０〜２４０ドットにいる
一番近い敵の色をちょっと赤っぽくして6秒後に即お陀仏というもの
DOTと同じような事をしようとするとスクリプトでは結構な手間がかかります。
いかにOpenBoRの基本コマンドが良くできているかということですね。

http://mevius.5ch.net/test/read.cgi/gamedev/1547405874/165

上下前次 1-新書関写板覧索設栞歴

あと 454 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.024s