]> Dogcows Code - chaz/yoink/blobdiff - data/scenes/Classic.lua
new convenient script methods
[chaz/yoink] / data / scenes / Classic.lua
index 963db84f3b7e6f9ec3576be9012b63911b17f3fc..75ea02a54c99777b02e3e60585403f30ca4da6d4 100644 (file)
@@ -1,7 +1,14 @@
 
--- Scene: Classic Yoink
--- created by Neil Carter
--- converted to Lua by Charles McGarvey
+LogInfo("-----",
+               "Scene: Classic",
+               "Created by Neil Carter",
+               "Converted to Lua by Charles McGarvey",
+               "-----")
+
+--for key,value in pairs(_G) do print(key, value) end
+meh = Blah:new()
+meh:sayHello()
+print(meh:myStr(3.1415))
 
 -- Scene API:
 --
@@ -23,12 +30,12 @@ SetBounds({-5, 0, -6}, {45, 15, 7})
 
 
 -- Left end tower block
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 
 -- Front
 
 ResetTransform()
-Translate(-5, 0, 5)
+Translate(-5, 0, 2)
 SetTexture("TowerBlock1")
 DrawTilemap({
        width = 5,
@@ -52,7 +59,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(Y, 90)
-Translate(0, 0, 5)
+Translate(0, 0, 2)
 DrawTilemap({
        width = 5,
        surface = RIGHT,
@@ -76,7 +83,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(X, 90)
-Translate(-5, 15, 0)
+Translate(-5, 15, -3)
 DrawTilemap({
        width = 5,
        surface = TOP,
@@ -87,12 +94,13 @@ DrawTilemap({
        3,      3,      3,      3,      3})
 
 -- Leftmost background tower block
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                
 -- Front
 
 if detail > LOW then
        ResetTransform()
+       Translate(0, 0, -3)
        DrawTilemap({
                width = 7,
                2,      2,      2,      2,      2,      2,      2,
@@ -108,7 +116,7 @@ if detail > LOW then
 
        ResetTransform()
        Rotate(Y, 90)
-       Translate(7, 0, 0)
+       Translate(7, 0, -3)
        DrawTilemap({
                width = 6,
                2,      2,      2,      2,      2,      2,
@@ -124,7 +132,7 @@ if detail > LOW then
 
        ResetTransform()
        Rotate(X, 90)
-       Translate(-2, 8, -6)
+       Translate(-2, 8, -9)
        DrawTilemap({
                width = 9,
                3,      3,      3,      3,      3,      3,      3,      3,      3,
@@ -136,13 +144,13 @@ if detail > LOW then
 end
 
 -- Foreground building with pitched roof
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                
 -- Left wall
 
 ResetTransform()
 Rotate(Y, -90)
-Translate(10, 0, 1)
+Translate(10, 0, -2)
 SetTexture("Building")
 DrawTilemap({
        width = 4,
@@ -157,7 +165,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(Y, -90)
-Translate(13, 0, 1)
+Translate(13, 0, -2)
 DrawTilemap({
        width = 4,
        surface = RIGHT,
@@ -170,7 +178,7 @@ DrawTilemap({
 -- Front wall
 
 ResetTransform()
-Translate(10, 0, 5)
+Translate(10, 0, 2)
 DrawTilemap({
        width = 3,
        15,     7,      16,
@@ -182,7 +190,7 @@ DrawTilemap({
 ResetTransform()
 Rotate(X, 135)
 Scale(1, 1.5, 1.5)
-Translate(10, 5, 3)
+Translate(10, 5, 0)
 DrawTilemap({
        width = 3,
        13,     13,     13,
@@ -191,28 +199,30 @@ DrawTilemap({
 -- Finial
 
 ResetTransform()
-Translate(10, 5, 3)
+Translate(10, 5, -0.00001)
 DrawTilemap({
        width = 3,
        18,     18,     18})
 
 -- Cheaty invisible platform
+-- This draws nothing but creates a platform on the roof for walking.
 
 ResetTransform()
-Translate(10, 4, 3)
+Rotate(X, 90)
+Translate(10, 5, 0)
 DrawTilemap({
        width = 3,
        surface = TOP,
        -1,     -1,     -1})
 
 -- The ground
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                
 -- Courtyard
 
 ResetTransform()
 Rotate(X, 90)
-Translate(-3, 0, 0)
+Translate(-3, 0, -3)
 SetTexture("Scenery")
 DrawTilemap({
        width = 13,
@@ -230,7 +240,7 @@ DrawTilemap({
 if detail > MEDIUM then
        ResetTransform()
        Scale(8, 1, 1)
-       Translate(1, -0.5, 5)
+       Translate(1, -0.5, 2)
        DrawTile({
                2,
                u_scale = 8})
@@ -239,7 +249,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(8, 1, 1)
-       Translate(1, -0.5, 1)
+       Translate(1, -0.5, -2)
        DrawTile({
                2,
                u_scale = 8
@@ -250,7 +260,7 @@ if detail > MEDIUM then
        ResetTransform()
        Scale(4, 1, 1)
        Rotate(Y, -90)
-       Translate(1, -0.5, 1)
+       Translate(1, -0.5, -2)
        DrawTile({
                2,
                u_scale = 4
@@ -261,7 +271,7 @@ if detail > MEDIUM then
        ResetTransform()
        Scale(4, 1, 1)
        Rotate(Y, -90)
-       Translate(9, -0.5, 1)
+       Translate(9, -0.5, -2)
        DrawTile({
                2,
                u_scale = 4
@@ -271,7 +281,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(11, 1, 1)
-       Translate(7, 0, 0)
+       Translate(7, 0, -3)
        DrawTile({
                4,
                u_scale = 11
@@ -279,13 +289,13 @@ if detail > MEDIUM then
 end
 
 -- Background building with pitched roof
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                
 -- Front wall
 
 if detail > LOW then
        ResetTransform()
-       Translate(19, 0, 0)
+       Translate(19, 0, -3)
        SetTexture("Building")
        DrawTilemap({
                width = 4,
@@ -300,7 +310,7 @@ if detail > LOW then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(19, 0, -3)
+       Translate(19, 0, -6)
        DrawTilemap({
                width = 3,
                15,     1,      16,
@@ -312,7 +322,7 @@ if detail > LOW then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(23, 0, -3)
+       Translate(23, 0, -6)
        DrawTilemap({
                width = 3,
                15,     0,      16,
@@ -326,7 +336,7 @@ if detail > LOW then
        Rotate(X, 135)
        Scale(1, 1.5, 1.5)
        Rotate(Y, -90)
-       Translate(21, 6, -3)
+       Translate(21, 6, -6)
        DrawTilemap({
                width = 3,
                13,     13,     13,
@@ -338,7 +348,7 @@ if detail > LOW then
        Rotate(X, -135)
        Scale(1, 1.5, 1.5)
        Rotate(Y, -90)
-       Translate(21, 6, -3)
+       Translate(21, 6, -6)
        DrawTilemap({
                width = 3,
                13,     13,     13,
@@ -348,20 +358,20 @@ if detail > LOW then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(21, 6, -3)
+       Translate(21, 6, -6)
        DrawTilemap({
                width = 3,
                18,     18,     18})
 end
 
 -- More ground to the right
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                
 -- Ground under house
 
 ResetTransform()
 Rotate(X, 90)
-Translate(10, 0, 0)
+Translate(10, 0, -3)
 SetTexture("Scenery")
 DrawTilemap({
        width = 3,
@@ -378,7 +388,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(X, 90)
-Translate(13, 0, 0)
+Translate(13, 0, -3)
 DrawTilemap({
        width = 8,
        surface = TOP,
@@ -395,7 +405,7 @@ DrawTilemap({
 if detail > MEDIUM then
        ResetTransform()
        Scale(12, 1, 1)
-       Translate(14, -0.5, 5)
+       Translate(14, -0.5, 2)
        DrawTile({
                2,
                u_scale = 12
@@ -405,7 +415,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(4, 1, 1)
-       Translate(14, -0.5, 1)
+       Translate(14, -0.5, -2)
        DrawTile({
                2,
                u_scale = 4
@@ -414,7 +424,7 @@ if detail > MEDIUM then
        -- Front grass next to door
 
        ResetTransform()
-       Translate(13, -0.5, 3)
+       Translate(13, -0.5, 0)
        DrawTile({
                2,
                u_scale = 1
@@ -423,7 +433,7 @@ if detail > MEDIUM then
        -- Back grass next to door
 
        ResetTransform()
-       Translate(13, -0.5, 2)
+       Translate(13, -0.5, -1)
        DrawTile({
                2,
                u_scale = 1
@@ -433,7 +443,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(14, -0.5, 1)
+       Translate(14, -0.5, -2)
        DrawTilemap({
                width = 4,
                2,      -1,     2,      2})
@@ -442,7 +452,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(18, -0.5, 0)
+       Translate(18, -0.5, -3)
        DrawTile({
                2,
                u_scale = 1
@@ -452,7 +462,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(24, -0.5, 0)
+       Translate(24, -0.5, -3)
        DrawTile({
                2,
                u_scale = 1
@@ -462,7 +472,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(4, 1, 1)
-       Translate(19, -0.5, 4)
+       Translate(19, -0.5, 1)
        DrawTile({
                2,
                u_scale = 4
@@ -472,7 +482,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(4, 1, 1)
-       Translate(19, -0.5, 2)
+       Translate(19, -0.5, -1)
        DrawTile({
                2,
                u_scale = 4
@@ -483,7 +493,7 @@ if detail > MEDIUM then
        ResetTransform()
        Scale(2, 1, 1)
        Rotate(Y, -90)
-       Translate(19, -0.5, 2)
+       Translate(19, -0.5, -1)
        DrawTile({
                2,
                u_scale = 2
@@ -494,7 +504,7 @@ if detail > MEDIUM then
        ResetTransform()
        Scale(2, 1, 1)
        Rotate(Y, -90)
-       Translate(23, -0.5, 2)
+       Translate(23, -0.5, -1)
        DrawTile({
                2,
                u_scale = 2
@@ -505,7 +515,7 @@ end
 
 ResetTransform()
 Rotate(X, 90)
-Translate(21, 0, 0)
+Translate(21, 0, -3)
 DrawTilemap({
        width = 7,
        surface = TOP,
@@ -522,7 +532,7 @@ DrawTilemap({
 if detail > MEDIUM then
        ResetTransform()
        Scale(4, 1, 1)
-       Translate(24, 0, 0)
+       Translate(24, 0, -3)
        DrawTile({
                4,
                u_scale = 4
@@ -532,7 +542,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(4, 1, 1)
-       Translate(24, -0.5, 1)
+       Translate(24, -0.5, -2)
        DrawTile({
                2,
                u_scale = 4
@@ -543,7 +553,7 @@ if detail > MEDIUM then
        ResetTransform()
        Scale(2, 1, 1)
        Rotate(Y, -90)
-       Translate(26, -0.5, 5)
+       Translate(26, -0.5, 2)
        DrawTile({
                2,
                u_scale = 2
@@ -554,7 +564,7 @@ if detail > MEDIUM then
        ResetTransform()
        Scale(2, 1, 1)
        Rotate(Y, -90)
-       Translate(35, -0.5, 5)
+       Translate(35, -0.5, 2)
        DrawTile({
                2,
                u_scale = 2
@@ -564,7 +574,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(5, 1, 1)
-       Translate(35, -0.5, 5)
+       Translate(35, -0.5, 2)
        DrawTile({
                2,
                u_scale = 5
@@ -574,7 +584,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Scale(6, 1, 1)
-       Translate(34, -0.5, 1)
+       Translate(34, -0.5, -2)
        DrawTile({
                2,
                u_scale = 6
@@ -584,7 +594,7 @@ if detail > MEDIUM then
 
        ResetTransform()
        Rotate(Y, -90)
-       Translate(34, -0.5, 0)
+       Translate(34, -0.5, -3)
        DrawTile({
                2,
                u_scale = 1
@@ -595,7 +605,7 @@ end
 
 ResetTransform()
 Rotate(X, 90)
-Translate(28, 0, 4)
+Translate(28, 0, 1)
 DrawTilemap({
        width = 5,
        surface = TOP,
@@ -607,7 +617,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(X, 90)
-Translate(33, 0, 0)
+Translate(33, 0, -3)
 DrawTilemap({
        width = 10,
        surface = TOP,
@@ -620,12 +630,12 @@ DrawTilemap({
        0,      1,      1,      1,      1,      1,      1,      -1,     -1,     -1})
 
 -- Right foreground tower block
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                
 -- Front
 
 ResetTransform()
-Translate(28, 0, 4)
+Translate(28, 0, 1)
 SetTexture("TowerBlock1")
 DrawTilemap({
        width = 5,
@@ -641,7 +651,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(Y, 90)
-Translate(33, 0, 4)
+Translate(33, 0, 1)
 DrawTilemap({
        width = 6,
        surface = RIGHT,
@@ -657,7 +667,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(Y, 90)
-Translate(28, 0, 4)
+Translate(28, 0, 1)
 DrawTilemap({
        width = 6,
        surface = LEFT,
@@ -673,7 +683,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(X, 90)
-Translate(28, 7, -2)
+Translate(28, 7, -5)
 DrawTilemap({
        width = 5,
        surface = TOP,
@@ -685,12 +695,12 @@ DrawTilemap({
        3,      3,      3,      3,      3})
 
 -- Right end tower block
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 
 -- Front
 
 ResetTransform()
-Translate(40, 0, 5)
+Translate(40, 0, 2)
 DrawTilemap({
        width = 5,
        2,      2,      2,      2,      2,
@@ -713,7 +723,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(Y, 90)
-Translate(40, 0, 5)
+Translate(40, 0, 2)
 DrawTilemap({
        width = 5,
        surface = LEFT,
@@ -737,7 +747,7 @@ DrawTilemap({
 
 ResetTransform()
 Rotate(X, 90)
-Translate(40, 15, 0)
+Translate(40, 15, -3)
 DrawTilemap({
        width = 5,
        surface = TOP,
@@ -748,11 +758,11 @@ DrawTilemap({
        3,      3,      3,      3,      3})
 
 -- Background
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 
 ResetTransform()
-Translate(-0.3, -0.17, -28)
-Scale(100, 50, 1)
+Translate(-0.3, -0.3, -35)
+Scale(105, 52, 1)
 SetTexture("BackgroundFar")
 DrawTile()
 
@@ -763,7 +773,7 @@ DrawTile({
 })
 
 -- Trees
--- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 
 SetTexture("Trees")
 
@@ -772,21 +782,20 @@ SetTexture("Trees")
 if detail > LOW then
        ResetTransform()
        Scale(3)
-       Translate(7.75, -0.1, 0.5)
+       Translate(7.75, -0.1, -2.5)
        DrawTile(1)
 end
 
 -- Center courtyard
 
 ResetTransform()
---Translate(610, -2.5, 85)
 Scale(3)
-Translate(19, -0.1, 2.5)
+Translate(19, -0.1, -0.5)
 DrawTile(0)
 
 ResetTransform()
 Scale(3)
-Translate(20.25, -0.1, 3.5)
+Translate(20.25, -0.1, 0.5)
 DrawTile(1)
 
 -- Right courtyard
@@ -794,27 +803,22 @@ DrawTile(1)
 if detail > LOW then
        ResetTransform()
        Scale(3)
-       Translate(34, -0.1, 0.25)
+       Translate(34, -0.1, -2.75)
        DrawTile(1)
 
        ResetTransform()
        Scale(3)
-       Translate(36, -0.1, -0.5)
+       Translate(36, -0.1, -3.5)
        DrawTile(0)
 
        ResetTransform()
        Scale(3)
-       Translate(37, -0.1, 0.75)
+       Translate(37, -0.1, -2.25)
        DrawTile(1)
 end
 
 
 
-function GetZCoord(x, y)
-       return 3
-end
-
-
 -- Functions:
 -- DisplayText(text, seconds)
 -- Yield(seconds)
@@ -827,23 +831,27 @@ end
 -- BeginNewWave()
 
 -- Events:
+-- Think() is called periodically
 -- BadGuyDied(enemy)
--- PlayedDied(player)
--- SceneLoaded()
+-- HeroineDied(player)
 
 -- Globals:
 -- numberOfBadGuys
 
 
+--do
+       --SpawnHeroine({5, 5})
+       --local waveNum = BeginNewWave()
+       --PopulateScene(waveNum)
+--end
+
+
 -- Events
 ---------
 
 Event = {}
 
-function Event:SceneLoaded()
-       SpawnHeroine({500, 500})
-       local waveNum = BeginNewWave()
-       PopulateScene(waveNum)
+function Event:Think()
 end
 
 function Event:BadGuyDied(enemy)
@@ -885,10 +893,13 @@ function PopulateScene(waveNum)
 end
 
 function RandomSpawnPlace()
-       return {500, 500}
+       return {5, 5}
 end
 
 function RandomSkillLevel()
        return "dumb"
 end
 
+
+-- vim: ts=4 sw=4 tw=80
+
This page took 0.037542 seconds and 4 git commands to generate.