The New xLIB - An APP

[tr1p1ea]

Dont want to press it, ill just ask MV about it on IRC. I dont really mind if it isnt featured.

[kalan_vod]

I just can't see how a game which utilizes it gets featured, so the program should also.

[DJ_O]

@tr1p for me thats more other stuff that make me lose motivation (not only community stuff)

as for xLIB featuring I hope it will, its the greatest basic extension lib ever made and there is alerady 3 games made for it, if not more. I'll feature it for sure in Omnimaga news. Sometimes I think tr1p1ea himself should be featured too

[kalan_vod]

Sometimes I think tr1p1ea himself should be featured too

Yeah, lol.

[tr1p1ea]

ROFL! Imagine that ... if i won POTY i would have to wear a little sign around everywhere for all eternity .

I have 1 thing to fix and then ill upload to ticalc.org.

[dysfunction]

ROFL! Imagine that ... if i won POTY i would have to wear a little sign around everywhere for all eternity .

Especially since this was a program you didn't think anyone would ever use

[DJ_O]

ROFL! Imagine that ... if i won POTY i would have to wear a little sign around everywhere for all eternity .

I have 1 thing to fix and then ill upload to ticalc.org.

I meant featured because of your great support in the community (not only because of xLIB and desolate)

[kalan_vod]

Tr1p says he may add a xlib intro thingy like at omnimaga , sounds very cool to me.

[DJ_O]

would be cool ^^

EDIT: ffs why do my post HAVE to be posted 4 times when forums are slow? *deletes*

[kalan_vod]

would be cool ^^

EDIT: ffs why do my post HAVE to be posted 4 times when forums are slow? *deletes*

Yesterday at school it did the same for me .

[threefingeredguy]

It would be really funny if there was a Person of the Year. They could get an animated gif of themself tattoo'd on their arm. It would be sweet.

[kalan_vod]

Idk if I would get a tat of tr1p (have you seen him? O.o)!

[tr1p1ea]

Although i dont really like tattoo's, an animated one would be cool!

(Uploading to ticalc.org today ).

[kalan_vod]

w00t w00t! I can't wait to see it be the #1 downloaded file! did you speak to MV about getting it featured?

[tr1p1ea]

I dont care about that, just that all the people that want it get it ... and stop bugging me .

Ok, ROFL .. i have NO IDEA how i managed to come up with the old ADEMO:

Code: Select all

AxesOff
FnOff 
"VARS
"PLAYER VARS
8->X:8->Y
"MAP OFFSETTS
0->S:0->T
"MAP WDTH/HGHT
16->W:16->H
"INIT
prgmMAP1
Lbl M
"DRAW MAP
real(2,0,S,T,W,H,0,12,0,8,0,0,0
"DRAW PLAYER
real(1,X,Y,1,8,0,1,0,0,0,1
"KEYLOOP
Lbl K
getKey->K
If K=0:Goto K
"KEY STUFF
If K=45:Goto E
If K=25:Goto U
If K=34:Goto D
If K=24:Goto L
If K=26:Goto R
Goto K
"UP
Lbl U
If Y=0
Then
If [A]((Y/8)+T,(X/8)+S+1)!=0:Y+8->Y
If T>0:T-1->T
Goto M
End
If [A]((Y/8)+T,(X/8)+S+1)=0:Y-8->Y
Goto M
"DOWN
Lbl D
If Y=56
Then
If [A]((Y/8)+T+2,(X/8)+S+1)!=0:Y-8->Y
If T+8<H:T+1->T
Goto M
End
If [A]((Y/8)+T+2,(X/8)+S+1)=0:Y+8->Y
Goto M
"LEFT
Lbl L
If X=0
Then
If [A]((Y/8)+T+1,(X/8)+S)!=0:X+8->X
If S>0:S-1->S
Goto M
End
If [A]((Y/8)+T+1,(X/8)+S)=0:X-8->X
Goto M
"RIGHT
Lbl R
If X=88
Then
If [A]((Y/8)+T+1,(X/8)+S+2)!=0:X-8->X
If S+12<W:S+1->S
Goto M
End
If [A]((Y/8)+T+1,(X/8)+S+2)=0:X+8->X
Goto M
Lbl E
"CLEAR SCREEN
real(0
Return

I rewrote it, but im not a BASIC expert ... at least its smaller .

Code: Select all

AxesOff
FnOff 
1->X:1->Y
0->S:0->T
prgmMAP1
While 1
S+((X-S)=11)(X!=16)-((X-S)=0)(X!=–1->S
T+((Y-T)=7)(T!=16)-((Y-T)=0)(Y!=–1->T
real(2,0,S,T,16,16,0,12,0,8,0,0,8,0
real(1,8(X-S),8(Y-T),1,8,0,1,0,0,0,1
getKey->K
If K=45:Return
X+(K=26)(X!=15)-(K=24)(X!=0->N
Y+(K=34)(Y!=15)-(K=25)(Y!=0->O
If [A](O+1,N+1)=0
Then
N->X:O->Y
End
End

Any tips would be helpful .