Author Topic: BatLib Demo Programs  (Read 36472 times)

0 Members and 1 Guest are viewing this topic.

Offline Hot_Dog

  • If you can't find a cat, look for its tail.
  • CoT Emeritus
  • LV11 Super Veteran (Next: 3000)
  • *
  • Posts: 2966
  • Rating: +445/-10
    • View Profile
Re: BatLib Demo Programs
« Reply #45 on: April 07, 2011, 01:02:42 pm »
Hehe, Scout, watch this:


Now THAT is awesome
There are people who can speak two languages, and they are called bilingual.  There are people who speak three languages and are therefore trilingual.  Then there are people who speak one language, and these people are called Americans.


Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: BatLib Demo Programs
« Reply #46 on: April 07, 2011, 01:03:48 pm »
Hehe, Scout, watch this:


Cool, but I prefer mine, I even optimized its code:

Code: [Select]
dim(40
Fill(0
While getKey!=15
Fill(9,A
DispGraph
Fill(9,A
A*2->A
If A>=256
1->A
Pause A
End
Stop

Good enough, I have an idea though, what if != really works, like the different sign, so that if people try to copy my code and for any other circumstances. What do you think?

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #47 on: April 07, 2011, 01:05:10 pm »
Hehe, all it does is draw inverted vertical lines, updates the screen and then reinverts so that the screen is back to normal, but it doesn't look like it :D That is why I don't make commands that automatically update the screen :) It makes graphics faster and nicer looking :)

EDIT:
Um, since it uses 2 bytes, I would rather not, Scout. Also, Pause A will cause it to cycle between fast and slow, but I guess that is an effect XD I forgot to add Pause 5 in mine. So where is the optimisation? (assuming I had added Pause 5)

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #48 on: April 08, 2011, 06:33:01 pm »
Okay, here is another demo program Sprite Editor. This one is made *mostly* in Recode and is different from the previous font editor/Sprite editor. Also, I put this in 6MHz mode and I added a Pause 5 to make a delay between key presses XD

Pretty much what it does is let you make 8x8 sprites and then it outputs a hex code for the sprite that can be used with BatLib, Celtic 3, Axe, and a few other programs. The code is output in Ans for easy use :) Have fun!


EDIT: Just remembered I never uploaded the screeny :/

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #49 on: April 09, 2011, 09:40:31 pm »
Okay, I have another mini game made. This is one I made a long time ago in BASIC, but I lost the code. Now I've remade it with BatLib and it is one of my favorite mini games :) Anyway, the idea is to match the image on the left to the image on the right. Thank of it like a pixel editor where your only option is Pxl-Change and it changes the surrounding pixels, too (and imagine that your pixels are 6x6, too, but that's beside the point XD) Anywho, here is the program and screeny:

Offline ztrumpet

  • The Rarely Active One
  • CoT Emeritus
  • LV13 Extreme Addict (Next: 9001)
  • *
  • Posts: 5712
  • Rating: +364/-4
  • If you see this, send me a PM. Just for fun.
    • View Profile
Re: BatLib Demo Programs
« Reply #50 on: April 09, 2011, 09:56:42 pm »
I call dibs on making that a game in my HGP. ^-^  (If you don't mind.)

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #51 on: April 09, 2011, 09:58:19 pm »
What is an HGP?

Offline ztrumpet

  • The Rarely Active One
  • CoT Emeritus
  • LV13 Extreme Addict (Next: 9001)
  • *
  • Posts: 5712
  • Rating: +364/-4
  • If you see this, send me a PM. Just for fun.
    • View Profile
Re: BatLib Demo Programs
« Reply #52 on: April 09, 2011, 09:59:20 pm »
My Homescreen Game Pack. :D  (points to sig)

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #53 on: April 09, 2011, 10:03:47 pm »
Ah, yeah, no problem :) Also, have you seen my MOVE! demo? That is another mini game that I made in BASIC originally (it was played on the homescreen, too :P )
http://ourl.ca/9009/186105

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #54 on: April 10, 2011, 09:09:53 pm »
Hehe, so ztrumpet managed to convince me to port Balltrix over to ReCode and though it isn't an exact port, I like it! I have two screenies, the first one made at 1% speed on the emulator (so that I could keep up) and the second one at 50% speed ;D As a note, this runs at 6MHz because if it ran at 15MHz... you'd be crazy trying to get to 45 points or more!

Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: BatLib Demo Programs
« Reply #55 on: April 11, 2011, 05:01:33 am »
Zeda: That's awesome! I'm looking at the source now, very good job!

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #56 on: April 11, 2011, 08:12:57 am »
Thanks, Scout ^-^ Feel free to ask questions about it and hopefully it gives you some ideas!

Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: BatLib Demo Programs
« Reply #57 on: April 11, 2011, 09:54:03 am »
Thanks, Scout ^-^ Feel free to ask questions about it and hopefully it gives you some ideas!

I suck at Basic, as you can see, I could never do half of this.

Offline Xeda112358

  • they/them
  • Project Author
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 4678
  • Rating: +718/-6
  • Calc-u-lator, do doo doo do do do.
    • View Profile
Re: BatLib Demo Programs
« Reply #58 on: April 11, 2011, 08:50:26 pm »
Ah, well it is all ReCode, so there might be some optimisation tricks to find in there. Still, you seem to have a solid grasp of ReCode which is nice to know :) I'm glad ReCode isn't too crazy to use ;D

Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: BatLib Demo Programs
« Reply #59 on: April 12, 2011, 04:04:48 am »
I had an idea to change in Blockeat, however, unfortunately, I don't really get the code:

Code: [Select]
0
dim(40
Pause While getKey=9
Fill(0
Text(2,1,SELECT A DIFFICULTY:
Line(1,84,0,9,3
Text(10,0,EASY
Text(16,0,NORMAL
Text(22,0,HARD
0->A->B
While A!=8
Line(0,96,10+B*6,6,2
DispGraph
Line(0,96,10+B*6,6,2
Pause 5
getKey-1->A
A>=9
DS<(2
B
If A=0
+1
If A=3
-1
->B
B/3
Ans->B
End
1200-300*B->H
Fill(0
Text(0,0,LOADING...
DispGraph
Fill(0
95->A
While A
60->B
Line(A-4,3,B-4,3,1
B-5->B
DS<(2
A-5->A
End
6->A
While A
rand*rand
/17
5*1+Ans->C
rand*rand
/9
5*Ans->D
Line(C,5,D,15,1
A-1->A
End
6->A
While A
rand*rand
/15
5*1+Ans->C
rand*rand
/12
5*Ans->D
Line(C,15,D,5,1
A-1->A
End
0->D->G
3->C
While *D!=150
Line(A,5,B,5,0
Line(A+1,3,B,1,1
Line(A,5,B+1,1,1
Line(A+1,3,B+3,1,1
Pxl-On(B+2,A+4*C=2
If C=1
Pxl-On(B+2,A+4
If C=4
Line(A+1,4,B+2,1,1
Pxl-On(B+4,A
Pxl-On(B+4,A+4
DispGraph
Line(A,5,B,5,0
getKey-1->I
If I<4
I+1->C
A
If C=3
+5
If C=2
-5
->E
B
If C=1
+5
If C=4
-5
->F
If E=95
90->E
If E>=96
0->E
If F=60
55->F
If F>=65
0->F
If pxl-Test(F,E+2
A->E B->F
E!=A
If +F!=B
D+pxl-Test(F+2,E+2->D
E->A
F->B
G+1->G
I!=14
*G!=H
End
G->!Ans
D->!A
H->!B
Text(2,1,TIME UP!
Line(1,36,0,9,3
DispGraph
Pause While getKey!=9
Stop
ClrHome
Disp sub("LOSE!WIN! ",5(150=B)+1,5),"STEPS:",Ans,"BLOCKS:",A
Pause

Where is the main game loop? That's where I want to change stuff :S Thanks.