Page 2 of 3 FirstFirst 123 LastLast
Results 11 to 20 of 23

Thread: Changing vars, BYREF like

  1. #11

    Re: Changing vars, BYREF like

    Thanks for the support of thinBasic. Dogwaffle is a commercial app right?

  2. #12

    Re: Changing vars, BYREF like

    Yes, Project Dogwaffle Pro is a commercial up.
    But there's also a free version, here:
    http://www.thebest3d.com/dogwaffle/free/index.html

    It's obviously a bit older and limited, but the basic features are there, and tBDW works with it too.

    Bye!

  3. #13

    Re: Changing vars, BYREF like

    Cool, then I can check it out. Thanks for the info.

  4. #14
    Super Moderator Petr Schreiber's Avatar
    Join Date
    Aug 2005
    Location
    Brno - Czech Republic
    Posts
    7,128
    Rep Power
    732

    Re: Changing vars, BYREF like

    Hi Mark0,

    I have tried your module and it works good !
    I think there will be lot of fun experimenting with images


    Bye,
    Petr
    Learn 3D graphics with ThinBASIC, learn TBGL!
    Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB

  5. #15

    Re: Changing vars, BYREF like

    Thanks all, for the info & support!

    TheBest3D already added a link to tBDW, so thinBasic is now mentioned also in ther 3rd-party plugins page:

    http://www.thebest3d.com/dogwaffle/3...ins/index.html

    Bye!

  6. #16
    Super Moderator Petr Schreiber's Avatar
    Join Date
    Aug 2005
    Location
    Brno - Czech Republic
    Posts
    7,128
    Rep Power
    732

    Re: Changing vars, BYREF like

    Hi Mark0,

    this is nice. It is interesting to watch how innocent formulas can destroy image :
    [code=thinbasic]
    MODULE "tBDW"

    dim x, y as long
    dim r, g, b as long

    for y = 0 to %TBDW_HEIGHT - 1
    for x = 0 to %TBDW_WIDTH - 1
    TBDW_GETRGB(x, y, r, g, b)
    r = 128+sin(r/40)*127
    g = 128-sin(g/40)*127
    b = 128+cos(b/40)*127
    TBDW_SETRGB(x, y, r, g, b)
    next
    TBDW_Progress(y / %TBDW_HEIGHT * 100)
    next
    [/code]

    Bye,
    Petr
    Learn 3D graphics with ThinBASIC, learn TBGL!
    Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB

  7. #17
    Super Moderator Petr Schreiber's Avatar
    Join Date
    Aug 2005
    Location
    Brno - Czech Republic
    Posts
    7,128
    Rep Power
    732

    Re: Changing vars, BYREF like

    Mark0,

    just one idea...
    When I run the script and DogWaffle is not on it correctly pops up message it should be opened, but then it tries to continue with script.

    What about something like TBDW_IsDogWaffleOpen ?
    then we could react on this situation in any appropiate way like:
    [code=thinbasic]
    IF TBDW_IsDogWaffleOpen = 0 THEN
    MSGBOX (0, "You need to have DogWaffle running, try again")
    Stop
    END IF
    [/code]

    What do you think ?


    Petr
    Learn 3D graphics with ThinBASIC, learn TBGL!
    Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB

  8. #18

    Re: Changing vars, BYREF like

    I had already added a more meaningful (I hope) message / warning, but a function will probably be better. Thanks for the suggestion!

    Bye!

  9. #19
    thinBasic MVPs kryton9's Avatar
    Join Date
    Nov 2006
    Location
    Naples, Florida & Duluth, Georgia
    Age
    67
    Posts
    3,869
    Rep Power
    404

    Re: Changing vars, BYREF like

    Quote Originally Posted by Psch
    Hi Mark0,

    this is nice. It is interesting to watch how innocent formulas can destroy image :
    Bye,
    Petr
    Petr how did you use your script? Or did you load a picture and run it thru dogwaffle somehow?
    Acer Notebook: Win 10 Home 64 Bit, Core i7-4702MQ @ 2.2Ghz, 12 GB RAM, nVidia GTX 760M and Intel HD 4600
    Raspberry Pi 3: Raspbian OS use for Home Samba Server and Test HTTP Server

  10. #20
    Super Moderator Petr Schreiber's Avatar
    Join Date
    Aug 2005
    Location
    Brno - Czech Republic
    Posts
    7,128
    Rep Power
    732

    Re: Changing vars, BYREF like

    Hi kryton,

    you just have to install DogWaffle and make it run.
    In this program you will open new image, doesn't matter which size.
    Then try to draw something in.

    After this you just launch the thinBasic script for example from Windows Explorer or anything else.
    Mark0s module will do the work like finding the window and operating the bitmap.


    Bye,
    Petr
    Learn 3D graphics with ThinBASIC, learn TBGL!
    Windows 10 64bit - Intel Core i5-3350P @ 3.1GHz - 16 GB RAM - NVIDIA GeForce GTX 1050 Ti 4GB

Page 2 of 3 FirstFirst 123 LastLast

Similar Threads

  1. byref or not byref that is the question.
    By Michael Clease in forum Module SDK (Power Basic version)
    Replies: 2
    Last Post: 04-11-2010, 02:55

Members who have read this thread: 0

There are no members to list at the moment.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •