Improve the last entry
4 posters
Page 1 of 1
Improve the last entry
Rather than each of us making a vehicle and the best one wins, I want to try something different. Each of us will improve upon what the last guy did. You can add something to it, improve the controls, upgrade part of it, etc.
When nobody is working on the vehicle, the first person to post gets a turn. They have one week to either make their improvement or forfeit. If they don't, their turn ends and it's up to someone else to upgrade the last version.
If you're the competitive type, the last one to modify it before the thread dies wins.
I'll start:
This is my old jet car, modified to use Lua, which is better for scripting.
When nobody is working on the vehicle, the first person to post gets a turn. They have one week to either make their improvement or forfeit. If they don't, their turn ends and it's up to someone else to upgrade the last version.
If you're the competitive type, the last one to modify it before the thread dies wins.
I'll start:
- Code:
Val
{
SPEED(default=0,min=-100,max=100,step=20)
STRAFE(default=0,min=-100,max=100,step=20)
JETXNW(default=0,min=-1000000,max=1000000,step=0)
JETXSW(default=0,min=-1000000,max=1000000,step=0)
JETXSE(default=0,min=-1000000,max=1000000,step=0)
JETXNE(default=0,min=-1000000,max=1000000,step=0)
JETYNW(default=100000,min=-000000,max=1000000,step=0)
JETYSW(default=100000,min=-000000,max=1000000,step=0)
JETYSE(default=100000,min=-000000,max=1000000,step=0)
JETYNE(default=100000,min=-000000,max=1000000,step=0)
JETZNW(default=0,min=-1000000,max=1000000,step=0)
JETZSW(default=0,min=-1000000,max=1000000,step=0)
JETZSE(default=0,min=-1000000,max=1000000,step=0)
JETZNE(default=0,min=-1000000,max=1000000,step=0)
ANGLE(default=0,min=-0.1,max=0.1,step=0.1)
EY(default=0,min=-3.14,max=3.14,step=0)
}
Key
{
0:SPEED(step=20)
1:SPEED(step=-20)
2:ANGLE(step=-0.1)
3:ANGLE(step=0.1)
4:STRAFE(step=-20)
5:STRAFE(step=20)
}
Body {
Core(){
N:Frame(option=1){
N:Frame(option=1){
W:Frame(option=1){
W:Jet(name=NW,power=-JETYNW){
N:Jet(power=JETXNW,ANGLE=90){}
W:Jet(power=JETZNW,ANGLE=90){}
}}
E:Frame(option=1){
E:Jet(name=NE,power=-JETYNE){
N:Jet(power=JETXNE,ANGLE=90){}
E:Jet(power=JETZNE,ANGLE=90){}
}}
}}
S:TrimF(spring=0.2,damper=0.2,option=1){
S:Frame(option=1){
W:Frame(option=1){
W:Jet(name=SW,power=-JETYSW){
S:Jet(power=JETXSW,ANGLE=90){}
W:Jet(power=JETZSW,ANGLE=90){}
}}
E:Frame(option=1){
E:Jet(name=SE,power=-JETYSE){
S:Jet(power=JETXSE,ANGLE=90){}
E:Jet(power=JETZSE,ANGLE=90){}
}}
}}
}
}
Lua
{
function main()
DEY=_EY()-EY
EY=_EY()
if DEY>3.14 then DEY=DEY-6.28 end
if DEY<-3.14 then DEY=DEY+6.28 end
Spin=(ANGLE-DEY)*500000
Forward=(SPEED+_VZ())*5000
Sideways=(STRAFE+_VX())*5000
JETXNE=Forward-Spin
JETXSW=-Forward-Spin
JETZNW=-Sideways-Spin
JETZSE=Sideways-Spin
JETXNW=Forward+Spin
JETXSE=-Forward+Spin
JETZNE=Sideways+Spin
JETZSW=-Sideways+Spin
JETYNW=(_H(NW)-0.6)*1000000
JETYSW=(_H(SW)-0.6)*1000000
JETYNE=(_H(NE)-0.6)*1000000
JETYSE=(_H(SE)-0.6)*1000000
if JETYNW>JETYSW
then
Max=JETYNW
Min=JETYSW
else
Max=JETYSW
Min=JETYNW
end
if JETYNE>Max then Max=JETYNE end
if JETYNE<Min then Min=JETYNE end
if JETYSE>Max then Max=JETYSE end
if JETYSE<Min then Min=JETYSE end
if Max-Min>200000
then
JETYNW=Min
JETYSW=Min
JETYNE=Min
JETYSE=Min
end
end
}
This is my old jet car, modified to use Lua, which is better for scripting.
DanielLC- Tank
- Posts : 78
Join date : 2010-10-23
Re: Improve the last entry
I don't mean to give the typical response here, but it needs GUNS!!!
So I added them, plus some cowl work.
C fires option 40000 guns
So I added them, plus some cowl work.
C fires option 40000 guns
- Code:
// [RCD]
Val
{
ANGLE(default=0, min=-0.1, max=0.1, step=0.1)
COLOR(default=#2D2D2D)
EY(default=0, min=-3.14, max=3.14)
GUN(default=0, max=40000, step=40000)
JETXNE(default=0, min=-1000000, max=1000000)
JETXNW(default=0, min=-1000000, max=1000000)
JETXSE(default=0, min=-1000000, max=1000000)
JETXSW(default=0, min=-1000000, max=1000000)
JETYNE(default=100000, max=1000000)
JETYNW(default=100000, max=1000000)
JETYSE(default=100000, max=1000000)
JETYSW(default=100000, max=1000000)
JETZNE(default=0, min=-1000000, max=1000000)
JETZNW(default=0, min=-1000000, max=1000000)
JETZSE(default=0, min=-1000000, max=1000000)
JETZSW(default=0, min=-1000000, max=1000000)
SPEED(default=0, min=-100, max=100, step=20)
STRAFE(default=0, min=-100, max=100, step=20)
}
Key
{
0:SPEED(step=20)
1:SPEED(step=-20)
2:ANGLE(step=-0.1)
3:ANGLE(step=0.1)
4:STRAFE(step=-20)
5:STRAFE(step=20)
6:GUN(step=40000)
}
Body
{
Core(color=Color) {
N:Frame(option=1) {
N:Frame(option=1) {
W:Frame(option=1) {
W:Jet(color=Color, name=NW, power=-JETYNW) {
N:Jet(power=JETXNW, angle=90, color=Color) { }
W:Jet(power=JETZNW, angle=90, color=Color) { }
N:Arm(power=Gun, option=40000, color=Color) { }
}
}
E:Frame(option=1) {
E:Jet(color=Color, name=NE, power=-JETYNE) {
N:Jet(power=JETXNE, angle=90, color=Color) { }
E:Jet(power=JETZNE, angle=90, color=Color) { }
N:Arm(power=Gun, option=40000, color=Color) { }
}
}
}
}
S:TrimF(spring=0.2, damper=0.2, option=1) {
S:Frame(option=1) {
W:Frame(option=1) {
W:Jet(color=Color, name=SW, power=-JETYSW) {
S:Jet(power=JETXSW, angle=90, color=Color) { }
W:Jet(power=JETZSW, angle=90, color=Color) { }
}
}
E:Frame(option=1) {
E:Jet(color=Color, name=SE, power=-JETYSE) {
S:Jet(power=JETXSE, angle=90, color=Color) { }
E:Jet(power=JETZSE, angle=90, color=Color) { }
}
}
}
}
N:TrimF(angle=45, option=1) {
N:Cowl(angle=180, color=#FF0000, effect=#5000) { }
}
N:TrimF(angle=-45, option=1) {
N:Cowl(angle=180, color=#FF0000, effect=#5000) { }
}
S:Trim(angle=90, color=Color) {
S:Chip(color=Color) {
E:Cowl(option=3, color=Color) { }
S:Cowl(option=4, color=Color) {
E:Cowl(color=Color) { }
}
}
E:Cowl(angle=135, color=Color) {
N:Cowl(color=Color) {
N:Cowl(option=4, color=Color) { }
}
E:Cowl(angle=135, color=Color) {
N:Cowl(color=Color) { }
}
}
E:Cowl(angle=-135, color=Color) {
N:Cowl(color=Color) {
N:Cowl(option=4, color=Color) { }
}
S:Cowl(angle=-90, option=3, color=Color) { }
E:Cowl(angle=-135, color=Color) {
N:Cowl(color=Color) { }
}
}
}
}
}
Lua
{
function main()
DEY=_EY()-EY
EY=_EY()
if DEY>3.14 then DEY=DEY-6.28 end
if DEY<-3.14 then DEY=DEY+6.28 end
Spin=(ANGLE-DEY)*500000
Forward=(SPEED+_VZ())*5000
Sideways=(STRAFE+_VX())*5000
JETXNE=Forward-Spin
JETXSW=-Forward-Spin
JETZNW=-Sideways-Spin
JETZSE=Sideways-Spin
JETXNW=Forward+Spin
JETXSE=-Forward+Spin
JETZNE=Sideways+Spin
JETZSW=-Sideways+Spin
JETYNW=(_H(NW)-0.6)*1000000
JETYSW=(_H(SW)-0.6)*1000000
JETYNE=(_H(NE)-0.6)*1000000
JETYSE=(_H(SE)-0.6)*1000000
if JETYNW>JETYSW
then
Max=JETYNW
Min=JETYSW
else
Max=JETYSW
Min=JETYNW
end
if JETYNE>Max then Max=JETYNE end
if JETYNE<Min then Min=JETYNE end
if JETYSE>Max then Max=JETYSE end
if JETYSE<Min then Min=JETYSE end
if Max-Min>200000
then
JETYNW=Min
JETYSW=Min
JETYNE=Min
JETYSE=Min
end
end
}
JosefYurnov99- Plane
- Posts : 43
Join date : 2011-03-11
Age : 28
Location : America
Re: Improve the last entry
upgraded guns from 40k to 50k
zoomed view out
added changelog
zoomed view out
added changelog
- Code:
Val{
ANGLE(min=-0.1,max=0.1,step=0.1)
COLOR(default=2960685)
EY(min=-3.14,max=3.14)
GUN(max=50000,step=50000)
JETXNE(min=-1000000,max=1000000)
JETXNW(min=-1000000,max=1000000)
JETXSE(min=-1000000,max=1000000)
JETXSW(min=-1000000,max=1000000)
JETYNE(default=100000,max=1000000)
JETYNW(default=100000,max=1000000)
JETYSE(default=100000,max=1000000)
JETYSW(default=100000,max=1000000)
JETZNE(min=-1000000,max=1000000)
JETZNW(min=-1000000,max=1000000)
JETZSE(min=-1000000,max=1000000)
JETZSW(min=-1000000,max=1000000)
SPEED(min=-100,max=100,step=20)
STRAFE(min=-100,max=100,step=20)
}
Key{
0:SPEED(step=20)
1:SPEED(step=-20)
2:ANGLE(step=-0.100000001)
3:ANGLE(step=0.100000001)
4:STRAFE(step=-20)
5:STRAFE(step=20)
6:GUN(step=50000)
}
Body{
Core(Color=COLOR){
N:Frame(Option=1){
N:Frame(Option=1){
W:Frame(Option=1){
W:Jet(Name=NW,Color=COLOR,Power=-JETYNW){
N:Jet(Color=COLOR,Angle=90,Power=JETXNW){}
W:Jet(Color=COLOR,Angle=90,Power=JETZNW){}
N:Arm(Color=COLOR,Power=GUN,Option=50000){}
}
}
E:Frame(Option=1){
E:Jet(Name=NE,Color=COLOR,Power=-JETYNE){
N:Jet(Color=COLOR,Angle=90,Power=JETXNE){}
E:Jet(Color=COLOR,Angle=90,Power=JETZNE){}
N:Arm(Color=COLOR,Power=GUN,Option=50000){}
}
}
}
}
S:TrimF(Damper=0.2,Spring=0.2,Option=1){
S:Frame(Option=1){
W:Frame(Option=1){
W:Jet(Name=SW,Color=COLOR,Power=-JETYSW){
S:Jet(Color=COLOR,Angle=90,Power=JETXSW){}
W:Jet(Color=COLOR,Angle=90,Power=JETZSW){}
}
}
E:Frame(Option=1){
E:Jet(Name=SE,Color=COLOR,Power=-JETYSE){
S:Jet(Color=COLOR,Angle=90,Power=JETXSE){}
E:Jet(Color=COLOR,Angle=90,Power=JETZSE){}
}
}
}
}
N:TrimF(Angle=45,Option=1){
N:Cowl(Color=#FF0000,Angle=180,Effect=#005000){}
}
N:TrimF(Angle=-45,Option=1){
N:Cowl(Color=#FF0000,Angle=180,Effect=#005000){}
}
S:Trim(Color=COLOR,Angle=90){
S:Chip(Color=COLOR){
E:Cowl(Color=COLOR,Option=3){}
S:Cowl(Color=COLOR,Option=4){
E:Cowl(Color=COLOR){}
}
}
E:Cowl(Color=COLOR,Angle=135){
N:Cowl(Color=COLOR){
N:Cowl(Color=COLOR,Option=4){}
}
E:Cowl(Color=COLOR,Angle=135){
N:Cowl(Color=COLOR){}
}
}
E:Cowl(Color=COLOR,Angle=-135){
N:Cowl(Color=COLOR){
N:Cowl(Color=COLOR,Option=4){}
}
S:Cowl(Color=COLOR,Angle=-90,Option=3){}
E:Cowl(Color=COLOR,Angle=-135){
N:Cowl(Color=COLOR){}
}
}
}
}
}
Lua{
--[[changelog
v1(DanielLC)
-basic model
v2(JosefYurnov99)
-added cowling
-added 40k guns
v3(RA2lover)
-upgraded guns from 40k to 50k
-zoomed view out
-added changelog
/changelog]]
_ZOOM(75)
function main()
DEY=_EY()-EY
EY=_EY()
if DEY>3.14 then DEY=DEY-6.28 end
if DEY<-3.14 then DEY=DEY+6.28 end
Spin=(ANGLE-DEY)*500000
Forward=(SPEED+_VZ())*5000
Sideways=(STRAFE+_VX())*5000
JETXNE=Forward-Spin
JETXSW=-Forward-Spin
JETZNW=-Sideways-Spin
JETZSE=Sideways-Spin
JETXNW=Forward+Spin
JETXSE=-Forward+Spin
JETZNE=Sideways+Spin
JETZSW=-Sideways+Spin
JETYNW=(_H(NW)-0.6)*1000000
JETYSW=(_H(SW)-0.6)*1000000
JETYNE=(_H(NE)-0.6)*1000000
JETYSE=(_H(SE)-0.6)*1000000
if JETYNW>JETYSW
then
Max=JETYNW
Min=JETYSW
else
Max=JETYSW
Min=JETYNW
end
if JETYNE>Max then Max=JETYNE end
if JETYNE<Min then Min=JETYNE end
if JETYSE>Max then Max=JETYSE end
if JETYSE<Min then Min=JETYSE end
if Max-Min>200000
then
JETYNW=Min
JETYSW=Min
JETYNE=Min
JETYSE=Min
end
end
}
Last edited by RA2lover on Sun Jul 07, 2013 6:09 pm; edited 1 time in total (Reason for editing : changed to actual model file)
RA2lover- Walker
- Posts : 382
Join date : 2010-10-11
Age : 29
Location : Brazil
Re: Improve the last entry
I like this idea.
guns shoot at different times
modifided controls
added controls on screen
added colors
guns shoot at different times
modifided controls
added controls on screen
added colors
- Code:
// [RCD]
Val
{
ANGLE(default=0, min=-0.1, max=0.1, step=0.1)
CC(default=0, max=3)
COLOR(default=2960685)
EY(default=0, min=-3.14, max=3.14)
GC(default=0, max=8, step=8)
GUN1(default=0, max=50000, step=50000)
GUN2(default=0, max=50000, step=50000)
JETXNE(default=0, min=-1000000, max=1000000)
JETXNW(default=0, min=-1000000, max=1000000)
JETXSE(default=0, min=-1000000, max=1000000)
JETXSW(default=0, min=-1000000, max=1000000)
JETYNE(default=100000, max=1000000)
JETYNW(default=100000, max=1000000)
JETYSE(default=100000, max=1000000)
JETYSW(default=100000, max=1000000)
JETZNE(default=0, min=-1000000, max=1000000)
JETZNW(default=0, min=-1000000, max=1000000)
JETZSE(default=0, min=-1000000, max=1000000)
JETZSW(default=0, min=-1000000, max=1000000)
SPEED(default=0, min=-100, max=100, step=20)
STRAFE(default=0, min=-100, max=100, step=20)
}
Key
{
0:SPEED(step=20)
1:SPEED(step=-20)
2:ANGLE(step=-0.100000001)
3:ANGLE(step=0.100000001)
4:STRAFE(step=-20)
5:GC(step=0.25)
6:STRAFE(step=20)
}
Body
{
Core(color=COLOR) {
N:Frame(option=1) {
N:Frame(option=1) {
W:Frame(option=1) {
W:Jet(name=NW, color=COLOR, power=-JETYNW) {
N:Jet(color=COLOR, angle=90, power=JETXNW) { }
W:Jet(color=COLOR, angle=90, power=JETZNW) { }
N:Arm(color=COLOR, power=GUN1, option=50000) { }
}
}
E:Frame(option=1) {
E:Jet(name=NE, color=COLOR, power=-JETYNE) {
N:Jet(color=COLOR, angle=90, power=JETXNE) { }
E:Jet(color=COLOR, angle=90, power=JETZNE) { }
N:Arm(color=COLOR, power=GUN2, option=50000) { }
}
}
}
}
S:TrimF(damper=0.2, spring=0.2, option=1) {
S:Frame(option=1) {
W:Frame(option=1) {
W:Jet(name=SW, color=COLOR, power=-JETYSW) {
S:Jet(color=COLOR, angle=90, power=JETXSW) { }
W:Jet(color=COLOR, angle=90, power=JETZSW) { }
}
}
E:Frame(option=1) {
E:Jet(name=SE, color=COLOR, power=-JETYSE) {
S:Jet(color=COLOR, angle=90, power=JETXSE) { }
E:Jet(color=COLOR, angle=90, power=JETZSE) { }
}
}
}
}
N:TrimF(angle=45, option=1) {
N:Cowl(color=#FF0000, angle=180, effect=#005000) { }
}
N:TrimF(angle=-45, option=1) {
N:Cowl(color=#FF0000, angle=180, effect=#005000) { }
}
S:Trim(color=COLOR, angle=90) {
S:Chip(color=COLOR) {
E:Cowl(color=COLOR, option=3) { }
S:Cowl(color=COLOR, option=4) {
E:Cowl(color=COLOR) { }
}
}
E:Cowl(color=COLOR, angle=135) {
N:Cowl(color=COLOR) {
N:Cowl(color=COLOR, option=4) { }
}
E:Cowl(color=COLOR, angle=135) {
N:Cowl(color=COLOR) { }
}
}
E:Cowl(color=COLOR, angle=-135) {
N:Cowl(color=COLOR) {
N:Cowl(color=COLOR, option=4) { }
}
S:Cowl(color=COLOR, angle=-90, option=3) { }
E:Cowl(color=COLOR, angle=-135) {
N:Cowl(color=COLOR) { }
}
}
}
}
}
Lua
{
--[[changelog
v1(DanielLC)
-basic model
v2(JosefYurnov99)
-added cowling
-added 40k guns
v3(RA2lover)
-upgraded guns from 40k to 50k
-zoomed view out
-added changelog
v4(Fox Explorer)
-guns shoot at different times
-modifided controls
-added controls on screen
-added colors
/changelog]]
_ZOOM(75)
function main()
DEY=_EY()-EY
EY=_EY()
if DEY>3.14 then DEY=DEY-6.28 end
if DEY<-3.14 then DEY=DEY+6.28 end
Spin=(ANGLE-DEY)*500000
Forward=(SPEED+_VZ())*5000
Sideways=(STRAFE+_VX())*5000
JETXNE=Forward-Spin
JETXSW=-Forward-Spin
JETZNW=-Sideways-Spin
JETZSE=Sideways-Spin
JETXNW=Forward+Spin
JETXSE=-Forward+Spin
JETZNE=Sideways+Spin
JETZSW=-Sideways+Spin
JETYNW=(_H(NW)-0.6)*1000000
JETYSW=(_H(SW)-0.6)*1000000
JETYNE=(_H(NE)-0.6)*1000000
JETYSE=(_H(SE)-0.6)*1000000
if JETYNW>JETYSW
then
Max=JETYNW
Min=JETYSW
else
Max=JETYSW
Min=JETYNW
end
if JETYNE>Max then Max=JETYNE end
if JETYNE<Min then Min=JETYNE end
if JETYSE>Max then Max=JETYSE end
if JETYSE<Min then Min=JETYSE end
if Max-Min>200000
then
JETYNW=Min
JETYSW=Min
JETYNE=Min
JETYSE=Min
end
if GC==1 then GUN1=50000 end
if GC==3 then GUN2=50000 end
if GC==4 then GC=0 end
if _KEYDOWN(7)>0 then CC=CC+1 end
if _KEYDOWN(8)>0 then CC=CC-1 end
if CC==0 then COLOR=2960685 end
if CC==1 then COLOR=909090 end
if CC==2 then COLOR=9000000 end
if COLOR==2960685 then out(7,"Color = Black") end
if COLOR==909090 then out(7,"Color = Green") end
if COLOR==9000000 then out(7,"Color = Tan") end
out(2,"Arrow Keys = Drive")
out(3,"Z/C = Strafe")
out(4,"X = Guns")
out(5,"A/S = Color")
end}
Fox Explorer- Plane
- Posts : 25
Join date : 2011-06-08
Re: Improve the last entry
I replaced each 50k gun with duel seven-barreled 115k gatling guns. Also, I fixed the balance issues caused by these gigantic guns, and I made it turn faster.
If anyone wants to add more barrels, be warned that each parent can only have fourteen children. You're going to have to essentially have two separate bases each holding half the barrels for it to work.
If anyone wants to add more barrels, be warned that each parent can only have fourteen children. You're going to have to essentially have two separate bases each holding half the barrels for it to work.
- Code:
// [RCD]
Val
{
GUNPITCHW(default=90, min=45, max=135, step=0)
GUNPITCHE(default=90, min=45, max=135, step=0)
ANGLE(default=0, min=-0.1, max=0.1, step=0.1)
CC(default=0, max=2)
COLOR(default=2960685)
EY(default=0, min=-3.14, max=3.14)
JETXNE(default=0, min=-4000000, max=4000000)
JETXNW(default=0, min=-4000000, max=4000000)
JETXSE(default=0, min=-1000000, max=1000000)
JETXSW(default=0, min=-1000000, max=1000000)
JETYNE(default=0, max=4000000)
JETYNW(default=0, max=4000000)
JETYSE(default=0, max=1000000)
JETYSW(default=0, max=1000000)
JETZNE(default=0, min=-4000000, max=4000000)
JETZNW(default=0, min=-4000000, max=4000000)
JETZSE(default=0, min=-1000000, max=1000000)
JETZSW(default=0, min=-1000000, max=1000000)
SPEED(default=0, min=-100, max=100, step=20)
STRAFE(default=0, min=-100, max=100, step=20)
GUN0(default=0,min=0,max=200000,step=200000)
ANGLE0(default=-180,min=-180,max=180)
TIME0(default=-180,min=-180,max=180)
GUN1(default=0,min=0,max=200000,step=200000)
ANGLE1(default=-180,min=-180,max=180)
TIME1(default=-180,min=-180,max=180)
GUN2(default=0,min=0,max=200000,step=200000)
ANGLE2(default=-180,min=-180,max=180)
TIME2(default=-180,min=-180,max=180)
GUN3(default=0,min=0,max=200000,step=200000)
ANGLE3(default=-180,min=-180,max=180)
TIME3(default=-180,min=-180,max=180)
GUN4(default=0,min=0,max=200000,step=200000)
ANGLE4(default=-180,min=-180,max=180)
TIME4(default=-180,min=-180,max=180)
GUN5(default=0,min=0,max=200000,step=200000)
ANGLE5(default=-180,min=-180,max=180)
TIME5(default=-180,min=-180,max=180)
FIRE(default=0,min=0,max=1,step=1)
TIME(default=0,max=10,step=1)
INDEX(default=0,max=6)
}
Key
{
0:SPEED(step=20)
1:SPEED(step=-20)
2:ANGLE(step=-0.500000001)
3:ANGLE(step=0.500000001)
4:STRAFE(step=-20)
5:GC(step=0.25)
5:FIRE(step=10)
6:STRAFE(step=20)
}
Body
{
Core(color=COLOR) {
N:Frame(color=COLOR, option=1) {
N:Frame(color=COLOR, option=1) {
W:Frame(color=COLOR, option=1) {
W:Jet(name=NW, color=COLOR, power=-JETYNW) {
N:Jet(color=COLOR, ANGLE=90, power=JETXNW) { }
W:Jet(color=COLOR, ANGLE=90, power=JETZNW) { }
S:Chip(name=WPITCH, color=COLOR, angle=-90){
S:Frame(color=COLOR, option=1, angle=GUNPITCHW, option=1){
E:Frame(color=COLOR, option=1, angle=ANGLE0){
N:Arm(color=COLOR, power=GUN0, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE1){
N:Arm(color=COLOR, power=GUN1, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE2){
N:Arm(color=COLOR, power=GUN2, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE3){
N:Arm(color=COLOR, power=GUN3, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE4){
N:Arm(color=COLOR, power=GUN4, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE5){
N:Arm(color=COLOR, power=GUN5, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE0){
N:Arm(color=COLOR, power=GUN0, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE1){
N:Arm(color=COLOR, power=GUN1, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE2){
N:Arm(color=COLOR, power=GUN2, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE3){
N:Arm(color=COLOR, power=GUN3, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE4){
N:Arm(color=COLOR, power=GUN4, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE5){
N:Arm(color=COLOR, power=GUN5, option=115000){}
}
}
}
}
}
E:Frame(color=COLOR, option=1) {
E:Jet(name=NE, color=COLOR, power=-JETYNE) {
N:Jet(color=COLOR, ANGLE=90, power=JETXNE) { }
E:Jet(color=COLOR, ANGLE=90, power=JETZNE) { }
S:Chip(color=COLOR, angle=-90){
S:Frame(name=EPITCH, color=COLOR, option=1, angle=GUNPITCHE, option=1){
E:Frame(color=COLOR, option=1, angle=ANGLE0){
N:Arm(color=COLOR, power=GUN0, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE1){
N:Arm(color=COLOR, power=GUN1, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE2){
N:Arm(color=COLOR, power=GUN2, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE3){
N:Arm(color=COLOR, power=GUN3, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE4){
N:Arm(color=COLOR, power=GUN4, option=115000){}
}
E:Frame(color=COLOR, option=1, angle=ANGLE5){
N:Arm(color=COLOR, power=GUN5, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE0){
N:Arm(color=COLOR, power=GUN0, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE1){
N:Arm(color=COLOR, power=GUN1, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE2){
N:Arm(color=COLOR, power=GUN2, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE3){
N:Arm(color=COLOR, power=GUN3, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE4){
N:Arm(color=COLOR, power=GUN4, option=115000){}
}
W:Frame(color=COLOR, option=1, angle=ANGLE5){
N:Arm(color=COLOR, power=GUN5, option=115000){}
}
}
}
}
}
}
}
S:TrimF(damper=0.2, spring=0.2, option=1) {
S:Frame(color=COLOR, option=1) {
W:Frame(color=COLOR, option=1) {
W:Jet(name=SW, color=COLOR, power=-JETYSW) {
S:Jet(color=COLOR, ANGLE=90, power=JETXSW) { }
W:Jet(color=COLOR, ANGLE=90, power=JETZSW) { }
}
}
E:Frame(color=COLOR, option=1) {
E:Jet(name=SE, color=COLOR, power=-JETYSE) {
S:Jet(color=COLOR, ANGLE=90, power=JETXSE) { }
E:Jet(color=COLOR, ANGLE=90, power=JETZSE) { }
}
}
}
}
N:TrimF(ANGLE=45, option=1) {
N:Cowl(color=#FF0000, ANGLE=180, effect=#005000) { }
}
N:TrimF(ANGLE=-45, option=1) {
N:Cowl(color=#FF0000, ANGLE=180, effect=#005000) { }
}
S:Trim(color=COLOR, ANGLE=90) {
S:Chip(color=COLOR) {
E:Cowl(color=COLOR, option=3) { }
S:Cowl(color=COLOR, option=4) {
E:Cowl(color=COLOR) { }
}
}
E:Cowl(color=COLOR, ANGLE=135) {
N:Cowl(color=COLOR) {
N:Cowl(color=COLOR, option=4) { }
}
E:Cowl(color=COLOR, ANGLE=135) {
N:Cowl(color=COLOR) { }
}
}
E:Cowl(color=COLOR, ANGLE=-135) {
N:Cowl(color=COLOR) {
N:Cowl(color=COLOR, option=4) { }
}
S:Cowl(color=COLOR, ANGLE=-90, option=3) { }
E:Cowl(color=COLOR, ANGLE=-135) {
N:Cowl(color=COLOR) { }
}
}
}
}
}
Lua
{
--[[changelog
v1(DanielLC)
-basic model
v2(JosefYurnov99)
-added cowling
-added 40k guns
v3(RA2lover)
-upgraded guns from 40k to 50k
-zoomed view out
-added changelog
v4(Fox Explorer)
-guns shoot at different TIMEs
-modifided controls
-added controls on screen
-added colors
/changelog]]
_ZOOM(75)
function main()
DEY=_EY()-EY
EY=_EY()
if DEY>3.14 then DEY=DEY-6.28 end
if DEY<-3.14 then DEY=DEY+6.28 end
Spin=(ANGLE-DEY)*500000
Forward=(SPEED+_VZ())*5000
Sideways=(STRAFE+_VX())*5000
JETXNE=(Forward-Spin)*4
JETXSW=-Forward-Spin
JETZNW=(-Sideways-Spin)*4
JETZSE=Sideways-Spin
JETXNW=(Forward+Spin)*4
JETXSE=-Forward+Spin
JETZNE=(Sideways+Spin)*4
JETZSW=-Sideways+Spin
JETYNW=(_H(NW)-0.6)*100+Forward*100
JETYSW=(_H(SW)-0.6)*100
JETYNE=(_H(NE)-0.6)*100+Forward*100
JETYSE=(_H(SE)-0.6)*100
if JETYNW>JETYSW
then
Max=JETYNW
Min=JETYSW
else
Max=JETYSW
Min=JETYNW
end
if JETYNE>Max then Max=JETYNE end
if JETYNE<Min then Min=JETYNE end
if JETYSE>Max then Max=JETYSE end
if JETYSE<Min then Min=JETYSE end
if Max-Min>200000
then
JETYNW=Min
JETYSW=Min
JETYNE=Min
JETYSE=Min
end
JETYNW=10*JETYNW
JETYNE=10*JETYNE
if GC==1 then GUN1=50000 end
if GC==3 then GUN2=50000 end
if GC==4 then GC=0 end
if _KEYDOWN(7)>0 then CC=CC+1 end
if _KEYDOWN(8)>0 then CC=CC-1 end
if CC==0 then COLOR=2960685 end
if CC==1 then COLOR=909090 end
if CC==2 then COLOR=9000000 end
if COLOR==2960685 then out(7,"Color = Black") end
if COLOR==909090 then out(7,"Color = Green") end
if COLOR==9000000 then out(7,"Color = Tan") end
out(2,"Arrow Keys = Drive")
out(3,"Z/C = Strafe")
out(4,"X = Guns")
out(5,"A/S = Color")
--[[changelog
v1(DanielLC)
-basic model
v2(JosefYurnov99)
-added cowling
-added 40k guns
v3(RA2lover)
-upgraded guns from 40k to 50k
-zoomed view out
-added changelog
v4(Fox Explorer)
-guns shoot at different TIMEs
-modifided controls
-added controls on screen
-added colors
v5(DanielLC)
-replaced each 50k gun with dual 7-barrel 115k gatling guns
-fixed the balance problems caused by gigantic guns
-increased turn speed
-I attempted (and failed) to fix the tilting of the guns while going forward. I left the GUNPITCH variables there in case anyone else wants to give it a go.
/changelog]]
_ZOOM(75)
function main()
DEY=_EY()-EY
EY=_EY()
if DEY>3.14 then DEY=DEY-6.28 end
if DEY<-3.14 then DEY=DEY+6.28 end
Spin=(ANGLE-DEY)*500000
Forward=(SPEED+_VZ())*5000
Sideways=(STRAFE+_VX())*5000
JETXNE=Forward-Spin
JETXSW=-Forward-Spin
JETZNW=-Sideways-Spin
JETZSE=Sideways-Spin
JETXNW=Forward+Spin
JETXSE=-Forward+Spin
JETZNE=Sideways+Spin
JETZSW=-Sideways+Spin
JETYNW=(_H(NW)-0.6)*400000
JETYNE=(_H(NE)-0.6)*400000
JETYSW=(_H(SW)-0.6)*100000
JETYSE=(_H(SE)-0.6)*100000
if Forward>0 then
JETYNW=JETYNW+Forward*8
JETYNE=JETYNE+Forward*8
else
JETYSW=JETYSW-Forward*2
JETYSE=JETYSE-Forward*2
end
if _KEYDOWN(7)>0 then CC=CC+1 end
if _KEYDOWN(8)>0 then CC=CC-1 end
if CC==0 then COLOR=2960685 end
if CC==1 then COLOR=909090 end
if CC==2 then COLOR=9000000 end
if COLOR==2960685 then out(7,"Color = Black") end
if COLOR==909090 then out(7,"Color = Green") end
if COLOR==9000000 then out(7,"Color = Tan") end
out(2,"Arrow Keys = Drive")
out(3,"Z/C = Strafe")
out(4,"X = Guns")
out(5,"A/S = Color")
if ANGLE0>-180 then ANGLE0=ANGLE0+30 end
if ANGLE0==0 then GUN0=800000 end
if ANGLE0>=180 then ANGLE0=-180 end
if FIRE==1 and INDEX==0 and TIME==0
then
ANGLE0=ANGLE0+30
INDEX=INDEX+1
TIME=3
end
if INDEX==6 then INDEX=0 end
if ANGLE1>-180 then ANGLE1=ANGLE1+30 end
if ANGLE1==0 then GUN1=800000 end
if ANGLE1>=180 then ANGLE1=-180 end
if FIRE==1 and INDEX==1 and TIME==0
then
ANGLE1=ANGLE1+30
INDEX=INDEX+1
TIME=3
end
if INDEX==6 then INDEX=0 end
if ANGLE2>-180 then ANGLE2=ANGLE2+30 end
if ANGLE2==0 then GUN2=800000 end
if ANGLE2>=180 then ANGLE2=-180 end
if FIRE==1 and INDEX==2 and TIME==0
then
ANGLE2=ANGLE2+30
INDEX=INDEX+1
TIME=3
end
if INDEX==6 then INDEX=0 end
if ANGLE3>-180 then ANGLE3=ANGLE3+30 end
if ANGLE3==0 then GUN3=800000 end
if ANGLE3>=180 then ANGLE3=-180 end
if FIRE==1 and INDEX==3 and TIME==0
then
ANGLE3=ANGLE3+30
INDEX=INDEX+1
TIME=3
end
if INDEX==6 then INDEX=0 end
if ANGLE4>-180 then ANGLE4=ANGLE4+30 end
if ANGLE4==0 then GUN4=800000 end
if ANGLE4>=180 then ANGLE4=-180 end
if FIRE==1 and INDEX==4 and TIME==0
then
ANGLE4=ANGLE4+30
INDEX=INDEX+1
TIME=3
end
if INDEX==6 then INDEX=0 end
if ANGLE5>-180 then ANGLE5=ANGLE5+30 end
if ANGLE5==0 then GUN5=800000 end
if ANGLE5>=180 then ANGLE5=-180 end
if FIRE==1 and INDEX==5 and TIME==0
then
ANGLE5=ANGLE5+30
INDEX=INDEX+1
TIME=3
end
if INDEX==6 then INDEX=0 end
end
end
}
DanielLC- Tank
- Posts : 78
Join date : 2010-10-23
Page 1 of 1
Permissions in this forum:
You cannot reply to topics in this forum