Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 Music in background for my game
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
Blackfire




PostPosted: Fri May 08, 2009 9:51 am   Post subject: Music in background for my game

What is the problem you are having?
Getting music in the background


The file is called CG.MIDI
Its in
H:\My Documents\TIK201\PaddleBall
All i know is Music.PlayFileLoop ("CG.MIDI")
is this the right way and where would it go, if it inst right, what is the right way and where would it go?



Turing:


%*************************************%
%              Ryan Moore             %
%            PaddleBall game          %
%"You must hit the ball on the paddle"%
%        "Beat the high score"        %
%*************************************%
%
var hitpoint : int



var yn : string
% BALL
var x : int
var xdir : int
var y : int
var ydir : int
% Paddle
var x2 : int
var key : string (1) % The key
var num : int % hold the ASCII number key
var x3 : int % x
loop
cls
    x2 := 100
hitpoint:=0

    num := 0
    x := 50
    y := 330
    xdir := 5
    ydir := 5

    View.Update
    Pic.ScreenLoad ("PB.BMP", 400, 15, picCopy)


    % Outside Border/ Inside Border
    %Inside Red Border
    drawbox (10, 10, 320, 399, 12)
    drawbox (19, 18, 311, 391, 12)
    drawfill (15, 15, 12, 12)
    % Red Border for Score
    drawbox (410, 170, 610, 390, 12)
    drawbox (400, 160, 620, 400, 12)
    drawfill (405, 165, 12, 12)
    % Red border for Icon
    drawbox (405, 100, 615, 20, 12)
    drawbox (390, 0, 630, 110, 12)
    drawfill (400, 10, 12, 12)
    % Outside Black
    drawfill (340, 240, 7, 12)



loop


        drawfillbox (x2, 20, x2 + 50, 30, 17) % Paddle
        drawfilloval (x, y, 10, 10, 27) % draw the ball
        exit when y < 30
        View.Update
        delay (10)
        drawfilloval (x, y, 10, 10, 0) % erase the ball
        drawfillbox (x2, 20, x2 + 50, 30, 0) % Erase paddle
        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
        if hasch then % if a key has been pressed
            getch (key) % get the key
            num := ord (key) % get the key's ASCII code
        end if

        if num = 203 and x2 > 25 then % if pressed left arrow key
            x2 := x2 - 20
        elsif num = 205 and x2 + 50 < 305 then % if pressed right arrow key
            x2 := x2 + 20

        end if
        num := 0
        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
        if x >= 300 then % if hit right side
            xdir := -3 % change direction to go left (negative)
        elsif x <= 30 then % if hit left side
            xdir := 3 % change direction to go right (positive)

        end if

        if y >= 380 then % if hit top side
            ydir := -3 % change direction to go down (negative)
        elsif y <= 40 and x >= x2 and x <= x2 + 50 and y > 30 then % if hit bottom side
            ydir := 3 % change direction to go up (positive)
            locate ( 4,70)
            put ("score")..
hitpoint:= hitpoint + 1
locate (5,70)
put hitpoint ..
        end if

        % actually moves the ball
        x := x + xdir
        y := y + ydir



    end loop
    View.Set ("nooffscreenonly")

locate (1,1)
    put "Do you want to play again? (y/n)"
    get yn
    exit when yn = "n"
end loop


Sponsor
Sponsor
Sponsor
sponsor
Kharybdis




PostPosted: Fri May 08, 2009 10:49 am   Post subject: RE:Music in background for my game

Look up the 'fork' command.
Dusk Eagle




PostPosted: Fri May 08, 2009 2:26 pm   Post subject: Re: Music in background for my game

Yes, this is the one time it's ok to use processes in Turing. For all other activities, it is shunned upon, but for music it works just fine. You'll also need to look up the Music module.
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 3 Posts ]
Jump to:   


Style:  
Search: