Search found 86 matches

by mrminecrafttnt
Dec 01, 2018 11:01
Forum: General
Topic: Anticheating engine - how to improve this?
Replies: 4
Views: 478

Re: Anticheating engine - how to improve this?

New features: -some obusfactoring -error compension -returning random numbers when a cheat was detected in multiple cases -timer based anti debugging Good look to cheat this! :) type anticheat T as integer errorcompension as integer value(2) as integer key(2) as integer hash as integer declare sub s...
by mrminecrafttnt
Nov 26, 2018 7:29
Forum: General
Topic: Anticheating engine - how to improve this?
Replies: 4
Views: 478

Anticheating engine - how to improve this?

Hi i am actually improving my anticheating engine. Any ideas? :) It encrypts the orignal value and hashes this encrypted value after this. Good look to cheat.. :) type anticheat value as integer key as integer hash as integer declare sub set (v as integer) declare function get as integer end type su...
by mrminecrafttnt
Oct 28, 2018 15:01
Forum: Projects
Topic: The uncheatable Value
Replies: 0
Views: 525

The uncheatable Value

Simply try to use Cheatengine to change this value.. good look! :D type encoded_ubyte dim as ulongint ptr value dim as ulongint ptr key declare sub set (value as ubyte) declare function get as ubyte declare constructor declare destructor end type constructor encoded_ubyte key = new ulongint[1] value...
by mrminecrafttnt
Oct 26, 2018 13:23
Forum: Projects
Topic: FreebasicNetChat
Replies: 0
Views: 442

FreebasicNetChat

This one is an Idea to chat over an approved Networkfolder with read/write rights, simple encryption included.. ;) -Edit: some Bugs are already fixed ;) open "FBChat.dat" for binary as #1 sub write_msg(msg as string) dim as ushort length = len(msg) dim as ubyte buffer(length) for i as inte...
by mrminecrafttnt
Oct 22, 2018 9:03
Forum: Projects
Topic: Cubeeater [GAME]
Replies: 6
Views: 717

Re: Cubeeater [GAME]

Simple disable the border detection with

Code: Select all

 
 .
 .
 .
    with user
       ' if .x + .size > 640 then setmouse mx-.size,my
        'if .y + .size > 480 then setmouse mx,my-.size
  .
  .
  .
end with
by mrminecrafttnt
Oct 21, 2018 12:04
Forum: Projects
Topic: Cubeeater [GAME]
Replies: 6
Views: 717

Cubeeater [GAME]

Here is my first game :) You playing a red cube. User the mouse to eat other cubes. Have fun :) const level_incraser = .75 const beginnlevel = 1 type cube_2d x as double y as double c as integer size as double declare sub draw declare function is_hit(cube as cube_2d) as integer end type 'draws our c...
by mrminecrafttnt
Oct 20, 2018 22:55
Forum: Tips and Tricks
Topic: Collision detection circle <-> rectangle with position correction
Replies: 2
Views: 478

Re: Collision detection circle <-> rectangle with position correction

I made a little Minigame, based on your code with 2D cubes, have fun :D type cube_2d x as integer y as integer c as integer size as double declare sub draw declare function is_hit(cube as cube_2d) as integer end type 'draws our cube sub cube_2d.draw line(x,y)-(x+size,y+size),c,bf end sub 'checks if ...
by mrminecrafttnt
Oct 16, 2018 11:01
Forum: Projects
Topic: Sort of overselling this as a project... Arkanoid physics toy
Replies: 6
Views: 861

Re: Sort of overselling this as a project... Arkanoid physics toy

change dim Active_Screen as Integer dim Passive_Screen as Integer to dim Active_Screen as Integer = 1 dim Passive_Screen as Integer = 0 and if Active_Screen = 1 then Active_Screen = 0 else Active_Screen = 1 if Active_Screen = 1 then Passive_Screen = 0 else Passive_Screen = 1 to swap Active_Screen, P...
by mrminecrafttnt
Oct 14, 2018 22:33
Forum: Projects
Topic: A simple RPG Engine with Charakters, buyable Items, Inventory and a simple Fightsystem, written by me
Replies: 6
Views: 952

Re: A simple RPG Engine with Charakters, buyable Items, Inventory and a simple Fightsystem, written by me

Can I do anything here besides pressing SPACE? Here is a little version with Healing and Hero Leveling and a little Quest Press [Space] to fight, [H] to get heal you self.. Actually i have so much to rewrite to get more Dynamic.. :) type Experience XP as Uinteger XP_Next as Uinteger Level as Uinteg...
by mrminecrafttnt
Oct 12, 2018 15:00
Forum: Projects
Topic: A simple RPG Engine with Charakters, buyable Items, Inventory and a simple Fightsystem, written by me
Replies: 6
Views: 952

Re: A simple RPG Engine with Charakters, buyable Items, Inventory and a simple Fightsystem, written by me

Yay! The crash i now removed but it does not that waht it should..^^
With:

Code: Select all

dim Items(any) as Item

Update:
OK! Engine errors are complete fixed. And the code is updated.
Let me know when you have more issuses..
by mrminecrafttnt
Oct 11, 2018 11:29
Forum: Projects
Topic: A simple RPG Engine with Charakters, buyable Items, Inventory and a simple Fightsystem, written by me
Replies: 6
Views: 952

A simple RPG Engine with Charakters, buyable Items, Inventory and a simple Fightsystem, written by me

type Item Itemname as string ItemType as string ItemID as Integer Amount as Integer Cost as Integer Damage as Integer end type type charakter Username as String Inventory(any) as Item HP as integer Damage as integer end type 'find an item in an itemtable function find_item(ItemName as string,ItemTa...
by mrminecrafttnt
Oct 09, 2018 22:18
Forum: Projects
Topic: FBChat
Replies: 0
Views: 554

FBChat

Hi there this is a very simple Chat programm for an shared folder. open "FBChat.dat" for binary as #1 sub write_msg(msg as string) dim as ushort length = len(msg) dim as ubyte buffer(length) for i as integer = 0 to length-1 buffer(i)=msg[i] next put #1,1,length put #1,,buffer() end sub fun...
by mrminecrafttnt
Sep 25, 2018 10:31
Forum: General
Topic: How to access to an ANY Arrey in a udt??
Replies: 4
Views: 325

Re: How to access to an ANY Arrey in a udt??

Here we go! I solve this so: type menu_item menuitemname as string menuitemadress as sub menuitembutton as ubyte declare sub runit end type type menu menuname as string dim as integer px,py declare sub add_item (itemname as string,menu_adress as sub ) declare sub open_menu items(any) as menu_item de...
by mrminecrafttnt
Sep 25, 2018 8:29
Forum: General
Topic: How to access to an ANY Arrey in a udt??
Replies: 4
Views: 325

How to access to an ANY Arrey in a udt??

I am just writing on an dynamic Menu engine but i get Illegal non-static member access, found 'items' in 'print cast(menu_item ptr,menu.items(i).menuitemname)' type menu_item menuitemname as string menuitemadress as sub ptr menubutton as ubyte declare sub set_menuitem (menutext as string,menu_adress...
by mrminecrafttnt
Aug 02, 2018 16:18
Forum: Tips and Tricks
Topic: Cheat prevetion for Ubytes
Replies: 24
Views: 2304

Cheat prevetion for Ubytes

type memorycell as ubyte cell : 1 as ubyte paritycell : 1 as ubyte read_write_state : 1 as ubyte protected_mode : 1 declare function rw_cell (value as ubyte = 0) as ubyte declare sub lock_cell declare sub unlock_cell declare sub write_mode declare sub read_mode end type function memorycell.rw_cell ...

Go to advanced search