View Full Version : i wanted to see if i could create a game for android
m0nde
07-14-2013, 10:03 AM
the game's called "OH MY GOD, CAG!"
you're caught a surreal cag dreamscape :(
if you move it plays "A Horse With No Name" and the music stops when you stop
if you press the mouse button it whinnys
http://www.youtube.com/watch?v=sFMK2N1gtp4
m0nde
07-14-2013, 10:05 AM
it's running at 1920 x 1048 so i guess that's why it fucked up streaming
i'll post my source code and post links to the executable soon
rubycalaber
07-14-2013, 10:10 AM
I make these noises to myself whenever I see anyone post the name "cag" http://vocaroo.com/i/s0UeVgTVj5tm
rubycalaber
07-14-2013, 10:11 AM
I love being me, I'm only ever a few milliseconds away from hearing something funny whenever I want to by just opening my mouth and letting comedy come out
m0nde
07-14-2013, 10:12 AM
it's in some shit basic in this thing called AGK
it allows you to do cross platform stuff
SetDisplayAspect( 4.0/3.0 )
dim spriteArray[100]
` load media
loadImage(6,"cone.png")
loadImage(1,"horsehead.png")
loadImage(2,"me.png")
loadImage(3,"me3.png")
loadImage(4,"me2.png")
loadImage(5,"me1.png")
loadSound(1,"bubbles.wav")
loadSound(2,"whinny.wav")
loadSound(3,"whinny2.wav")
loadSound(4,"gallop.wav")
loadSound(5,"trot.wav")
loadMusic(1,"horse_with_no_name.mp3")
playMusic(1,1)
` create arrogant cunting paki
frame = 2
paki = createSprite(0)
AddSpriteAnimationFrame(paki, 2)
AddSpriteAnimationFrame(paki, 3)
AddSpriteAnimationFrame(paki, 4)
AddSpriteAnimationFrame(paki, 5)
setSpriteSize(paki,6,-1)
setSpriteOffset(paki,3,getSpriteHeight(paki)/2)
setSpritePositionByOffset(paki,50,50)
setSpriteDepth(paki,50)
fixSpriteToScreen(paki,1)
` create sprite array with parallax scrolling
for s=1 to 100
` create a sprite using either a cone or a horsehead
pic=random(0,1)
if pic=0
spr = createSprite(1)
else
spr = createSprite(6)
endif
` get a random depth, color and alpha
d = random(1,100)
r = random(0,255)
g = random(0,255)
b = random(0,255)
if pic=0
a = random(128,255)
else
a=random(192,255)
endif
` set the sprite size and depth
setSpriteDepth(spr,d)
setSpriteSize(spr,random(1.0,20.0)-(d/random(20.0,100.0)),-1)
setSpriteColor(spr,r,g,b,a)
` set it at a random position in our world
setSpritePosition(spr,random(0,100),random(0,100))
` add to the array
spriteArray[s] = spr
next
` oh my god
do
` view offset
vx# = getViewOffsetX()
vy# = getViewOffsetY()
` 100 sprites
for s=1 to 100
spr = spriteArray[s]
d# = getSpriteDepth(spr)
`set sprite offsets based on the view offset
Xoff# = -(d#-100.0)*0.01*vx#
Yoff# = -(d#-100.0)*0.01*vy#
setSpriteOffset(spr,Xoff#,Yoff#)
`check it
wx# = getSpriteX(spr)
wy# = getSpriteY(spr)
sx# = worldToScreenX(wx#)
sy# = worldToScreenY(wy#)
`if not a new position
if sx#<0 then setSpritePosition(spr,wx#+100,wy#)
if sx#>100 then setSpritePosition(spr,wx#-100,wy#)
if sy#<0 then setSpritePosition(spr,wx#,wy#+100)
if sy#>100 then setSpritePosition(spr,wx#,wy#-100)
next
` adjust the view and orientation of the paki
x# = getDirectionX()
y# = -getDirectionY()*0.2
a# = getSpriteAngle(paki)
setSpriteAngle(paki,a#+x#)
setViewOffset(getViewOffsetX()+y#*cos(90-a#),getViewOffsetY()-y#*sin(90-a#)*getDisplayAspect())
` animate the paki
if abs(y#)>0.1
if GetMusicExists(1)
resumemusic()
else
playmusic(1)
endif
frame = frame+1
print("c-c-c-c-c-c")
if frame>4 then frame=2
print("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa")
print("gg")
else
pausemusic()
frame = 1
print("oh my god!")
text=random(1,3)
if text=1 then print("i'm going to puke...")
print("")
if text=2 then print("ffffffffffffffffuuuu")
print("")
if text=3 then print("i can't even hear what she's saying!")
print("")
endif
setSpriteFrame(paki,frame)
if GetPointerPressed()=1
playsound(3)
endif
sync()
loop
m0nde
07-14-2013, 10:13 AM
record yourself screaming "CAAAAAAAAAAAAAAAAAAAAAAAAAAAAAG" and i'll add it to the game
timmy
07-14-2013, 10:16 AM
I make these noises to myself whenever I see anyone post the name "cag" http://vocaroo.com/i/s0UeVgTVj5tm
you have some serious autism son you might wanna to get it checked out
timmy
07-14-2013, 10:17 AM
monde couldnt write a game app to save his marriage
Camoron
07-14-2013, 10:18 AM
I only scream her true name and even then I'm down to only a few times a week after waking from a night terror.
rubycalaber
07-14-2013, 10:21 AM
record yourself screaming "CAAAAAAAAAAAAAAAAAAAAAAAAAAAAAG" and i'll add it to the game
http://vocaroo.com/i/s0ht4CyqblYp
timmy
07-14-2013, 10:23 AM
http://vocaroo.com/i/s0ht4CyqblYp
have you considered therapy?
rubycalaber
07-14-2013, 10:27 AM
have you considered therapy?
http://vocaroo.com/i/s0U9PG6IunA7
m0nde
07-14-2013, 10:46 AM
okay modified it
loadSound(1,"cag_scream.wav")
loadSound(2,"whinny2.wav")
and
if GetPointerPressed()=1
playsound(random(1,2))
endif
fanfare
07-14-2013, 03:00 PM
wow nice monde
rootbeer
07-14-2013, 03:02 PM
monde create a server for minecraft instead
Use ratio to target for android resolutions.
Gentleman Doli
07-14-2013, 03:08 PM
m0nde will you teach me how to be cool like you
Gentleman Doli
07-14-2013, 03:09 PM
im writing a program for android too m0nde, its called angry bird 2: you wouldnt like me when im angrey,
funny, horse head and cone tits
Gentleman Doli
07-14-2013, 03:14 PM
m0nde likes
Leeroy Jenkins
by Leeroy Jenkins
35,568,549 views
Camoron
07-14-2013, 04:53 PM
i fail to see how this qualifies as a game
m0nde
07-14-2013, 05:24 PM
okay, better physics, learning this shitty language
now i'm going to add some actual points and thing
SetDisplayAspect( 16.0/10.0 )
dim spriteArray[100]
alpha=128
SetRawMouseVisible(0)
` load media
bkgd = CreateSprite(loadImage("horsegirl.jpg"))
SetSpriteSize(bkgd,110,-1)
fixSpritetoScreen(bkgd,1)
setSpriteDepth(bkgd,255)
loadImage(2,"horsehead.png")
loadImage(3,"cone.png")
loadImage(4,"me.png")
loadImage(5,"me3.png")
loadImage(6,"me2.png")
loadImage(7,"me1.png")
loadImage(8,"lizard.png")
loadImage(9,"lizard2.png")
loadImage(10,"lizard3.png")
loadImage(11,"lizard4.png")
loadImage(12,"lizard5.png")
loadImage(13,"lizard6.png")
loadImage(14,"lizard7.png")
loadImage(15,"lizard8.png")
loadImage(16,"lizard9.png")
loadSound(1,"cag_scream.wav")
loadSound(2,"whinny2.wav")
loadMusic(1,"horse_with_no_name.mp3")
playMusic(1,1)
` create arrogant cunting paki
frame = 2
paki = createSprite(0)
for fr=4 to 7
AddSpriteAnimationFrame(paki, fr)
next
setSpriteSize(paki,10,-1)
setSpriteOffset(paki,3,getSpriteHeight(paki)/2)
setSpritePositionByOffset(paki,50,50)
setSpriteDepth(paki,50)
fixSpriteToScreen(paki,1)
`create lizard
lizard = createSprite(0)
for fr=8 to 16
AddSpriteAnimationFrame(lizard, fr)
next
setSpriteSize(lizard,10,-1)
setSpriteOffset(lizard,3,getSpriteHeight(lizard)/2)
setSpritePositionByOffset(lizard,GetPointerX()+random(5,10),GetPointerY()-random(5,10))
setSpriteDepth(lizard,random(0,50))
fixSpriteToScreen(lizard,1)
PlaySprite(lizard,10,1,8,16)
` create sprite array with parallax scrolling
for s=1 to 100
` create a sprite using either a cone or a horsehead
spr = createSprite(random(2,3))
` get a random depth, color and alpha
d = random(1,100)
r = random(0,255)
g = random(0,255)
b = random(0,255)
if pic=0
a = random(128,255)
else
a = random(192,255)
endif
` set the sprite size and depth
setSpriteDepth(spr,d)
setSpriteSize(spr,random(1.0,20.0)-(d/random(15.0,200.0)),-1)
setSpriteColor(spr,r,g,b,alpha)
setSpriteColor(bkgd,255,255,255,alpha)
if ( direction = 0 )
alpha = alpha - 1
if ( alpha < 0 )
direction = 1
endif
endif
if ( direction = 0 )
alpha = alpha + 1
if ( alpha > 255 )
direction = 0
endif
endif
SetSpriteAngle (spr,angle)
angle=angle+1
SetSpriteSize (spr, GetSpriteWidth(spr) -1, GetSpriteHeight (spr) -1)
` set it at a random position in our world
setSpritePosition(spr,random(0,100),random(0,100))
` add to the array
spriteArray[s] = spr
next
` oh my god
do
` view offset
vx# = getViewOffsetX()
lizardx# = getSpriteX(lizard)
vy# = getViewOffsetY()
lizardy# = getSpriteY(lizard)
` 100 sprites
for s=1 to 100
spr = spriteArray[s]
d# = getSpriteDepth(spr)
`set sprite offsets based on the view offset
Xoff# = -(d#-100.0)*0.01*vx#
Yoff# = -(d#-100.0)*0.01*vy#
setSpriteOffset(spr,Xoff#,Yoff#)
`check it
wx# = getSpriteX(spr)
wy# = getSpriteY(spr)
sx# = worldToScreenX(wx#)
sy# = worldToScreenY(wy#)
`if not a new position
if sx#<0 then setSpritePosition(spr,wx#+100,wy#)
if sx#>100 then setSpritePosition(spr,wx#-100,wy#)
if sy#<0 then setSpritePosition(spr,wx#,wy#+100)
if sy#>100 then setSpritePosition(spr,wx#,wy#-100)
next
` adjust the view and orientation of the paki
x# = getDirectionX()
y# = -getDirectionY()*0.2
a# = getSpriteAngle(paki)
setSpriteAngle(paki,a#+x#)
setViewOffset(getViewOffsetX()+y#*cos(90-a#),getViewOffsetY()-y#*sin(90-a#)*getDisplayAspect())
setSpritePositionByOffset(lizard,GetPointerX(),GetPointerY())
` animate the paki and lizard
if abs(y#)>0.1
if GetMusicExists(1)
resumemusic()
else
playmusic(1)
endif
frame = frame+0.75
if frame>4 then frame=2
else
pausemusic()
frame = 1
print("oh my god!")
text=random(1,3)
if text=1 then print("i'm going to puke...")
print("")
if text=2 then print("ffffffffffffffffuuuu")
print("")
if text=3 then print("i can't even hear what she's saying!")
print("")
endif
setSpriteFrame(paki,frame)
if GetRawMouseLeftPressed()=1
playsound(1)
c=c+1
a=a+1
g=g+1
createtext(c,"c-c-c-c-c-c")
createtext(a,"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa")
createtext(g,"gg")
settextposition(c,wx#,wy#)
settextposition(a,wx#,wy#+gettexttotalheight(c))
settextposition(g,wx#,wy#+gettexttotalheight(c)+gettexttotalheight(a))
endif
if GetRawMouseLeftReleased()=1 then playsound(2)
if GetRawMouseRightPressed()=1
spr = GetSpriteHit (wx#,wy#)
createparticles(getpointerx(),getpointery())
endif
sync()
loop
m0nde
07-14-2013, 07:17 PM
okay, created some goals now
created a 3D space with land mines and a target
you have to reach that point by following the intensity of the background and the music volume
you can use your lizard to fight off enemies
working on particle effects now
m0nde
07-15-2013, 06:52 AM
exporting to html5
m0nde
07-15-2013, 07:20 AM
supports shit basic and c++
i only have the trial version which only has the basic thing in it
Heh, did you study all game builder softwares?
m0nde
07-15-2013, 07:33 AM
these two are much easier than game creation studio or some others i've found
i prefer code to a gui, idk why
timmy
07-15-2013, 09:55 AM
too bad you cant have a marriage in code but instead its in real life gui
Autistic Spectrum
07-15-2013, 10:14 AM
i dated an old cobol program once,it controlled the traffic lights in my city, we grew apart, but man it was pretty great while it lasted
Powered by vBulletin® Version 4.2.5 Copyright © 2024 vBulletin Solutions Inc. All rights reserved.