GamezWorld.de - Forum

machst du bitte jetzt alle vergleiche so, das wird bestimmt irre spannend und lustig

Hmmmm liebe Freunde,

Vergesst ihr dabei aber nicht das "News" nur ein Randbereich sind? .... oder wollt ihr das man die News am besten jede Stunde updaten muss?

Nur wenn das auch eine sinnvolle auswirkung auf das Spielgeschehen hat macht das ja auch sinn?  = 13:00 gekaufte News hat um 14:00 schon viel weniger aktuallität und wirkt sich mit was weiss ich wieviel prozent auf die gesamtzuschauer aus .... so das es sich lohnt direkt wieder für 3.000 euro eine News zu kaufen?

Wie schauen die gedanken oder Spielweisen denn da genau aus?

liebe grüße
sushi

auch das habe ich ersteinmal nicht so gesehen,
da man ja mit Call-In recht gut geld machen kann.

Dadurch empfand ich das als ausreichend.

WICHTIG:

Ich habe jetzt aber meine Version auch noch nicht durchgespielt und getestet mit längere Spielzeit (Senderkauf) und so weiter .... das waren jetzt eisteinmal nur Werte die ich durch meine derzeitigen Erfahrungen mit dem Spiel so Kreirt habe.
(aus dem bauch herraus)

gruß
~sushi~

ps. wenn du sagst, das sei zu niedrig, dann ist das ersteinmal gut ... weil ... dann ist es nämlich nicht zu hoch ..... was für eine logik

*smile* das sind ja auch meine Testwerbespots "Weil Rauchen spaß macht" du erinnerst dich ?

da will ich ja nicht den ganzen anderen "kram" mit dabei haben sondern nur die von mir erstellten werbespots um dafür ein gefühl zu  bekommen um zu entscheiden welche werte wir brauchen .... was sinnvoll ist ...

was ich heute gesehen hatte, das eigentliche 12,5K (12.500) zuschauer aber echte 13.000 Zuschauer waren .... das liegt jetzt vielleicht wieder am runden ...

*grummel*
(habe ich mir jetzt noch nicht so genau angeschaut das - warum weshalb wieso - da ich ja jetzt ein bissel auch mit "Winzer Projekt" beschäftigt war)

gruß
sushi

Na mal sehen, gerade habe ich so ein bissel das gefühl das meine ganze herangehensweise schon wieder falsch ist mal abwarten ....

@Edit
ehm, ich wollte doch nie X mal zurück? im gegenteil, das sollte ja nie auftauchen .... aber du meinst wahrscheinlich, wenn das menü genau so heißt aber sich dieses in verschiedenen menüs/submenüs befindet und ich dann aber nach dem "namen" suche  ... dann wirds wohl blöde ...

oder meinst du das anders?

Deswegen denke ich, das ja Gast2 seine beschreibung den derzeitigen stand nicht wirklich berücksichtig oder seine eigenen Ideen mit dem Stand vermischt?

1) der unterschied bei den Abos ist, so hat es Ron geschrieben, das Nachrichten bei höherem Abolevel schneller eintreffen, daher die brisanz und aktuallität ja höher ist und man die nachricht eher hat (theoretisch - im spiel sind die nachrichten in den quoten ja auch noch nicht berücksichtigt etc.)

2) abgerechnet wurde bisher täglich?

und das war's im prinzip?

Gast2 bringt da in seinem beitrag eigene Ideen, das vermicht sich dann aber mit den diskusionspunkten wo es dann alles undeutlich wird (für mich zumindest)

3) Ron hat jetzt das Ändern des Abos auf 30 minuten IngameSpielzeit abgeändert, wenn Level höher als das gewählte level = differenz muss nachgezahlt werden - so habe ich das jetzt zumindest verstanden

gruß
~s~

Uff, mein Kopf Raucht noch mehr als bei Rons Verbesserungen zu meinem code *lach*
(oder, vielleicht wirkt das noch nach *g*)

Wie soll ich das verstehen? das ich das Level permanent ändern kann und nur dementsprechende News schalten kann? ... vormittags sollte nur level niedriger sein da das interesse an "klatsch" höher ist als abends? .... das ist mir nicht so ganz klar ....

dafür gibt es doch unterschiedliche kategorien an abos schon?

verstehe ich nicht so ganz.

@Rest

habe ich da etwas falsch verstanden, ich dachte das die Abos nur 1x täglich abgerechnet werden, wenn man level höher nimmt muss halt auch der höhere betrag gezahlt werden ...

Laut deiner beschreibung, habe ich eher das gefühl das eine Stündliche abrechnung stattfinden sollte .... oder ich habe das alles wirklich total ganz und gar nicht verstanden

völlig auf dem schlauch stehe

gruß
~s~

wobei der grundgedanken, das man das NewsSystem auch an das Wachsende "TVT-Imperium" anpassen könnte nicht verkehrt ist

Nachtrag:

@Gast2
ich habe das gefühl das du "Istzustand" und "deine Ideen" bei deiner erläuterung vermischt hast?

Okay, na 30 minuten sind ja okay oder?

Also ich kaufe auch Filme + CallIn, denn anfangs reichen die Filme ja einfach nicht um diese den ganzen Tag zu senden. Und auch  ich verbessere dann nach und nach die Filme um bessere und mehr Senden zu können, so das dann Call-In weniger wird. (so sollte es ja vielleicht auch normal sein, bei Call-In bleibe ich dabei das dies mindestens halbiert werden sollte und "Abnutzung" etwas mehr)

@Linux oops bei Werbeprämien

Ich habe das ebend nachgerechnet, es sieht so aus als das die DEV.xml nicht greifen würde.
Ich habe ja in meiner Variante den Faktor von 4x auf 1x geändert. Und die Mindestzuschauer/Mindestlohn von 7,5x (7.500) auf 1x (1.000) geändert.

Mehr kann ich da von meiner seite her nicht dazu sagen, da ich kein Linux habe

gruß
sushi

Rechenbeispiel:

Meine Version
0K 10x - profit 200 = x10 x 1 (Faktor) x 1(Mindestlohn) x 2 (Targetgroup) = 4000
25K 3x - profit 475 = x3  x 1 (Faktor) x 25(Minzusch./1.000) x 1 (Targetgroup) = 35.625 ~ 35.000

(da seit letzer version die zuschauerzahl zur berechnung nicht mehr gerundet wird, ist das endergebniss spielintern sogar kleiner als das berechnete - bzw. müsste man korreterweise noch die ungerundeten mindestzuschauer erst ausrechnen)

Original Version aber mit 4x Faktor, in DEV.xml steht sogar 5x drin und meine database
0K 10x - baseprice 200 = x10 x 4 (Faktor) x 7,5 (Mindestlohn) x 2 (Targetgroup) = 120.000
25K 3x - profit 475 = x3  x 4 (Faktor) x 25(Minzusch./1.000) x 1 (Targetgroup) = 142.500 ~ 150.000

HeeHee

naja, ich habe jetzt onClick ereignis bei mir mit in's TMenu gepackt da ist aber irgenwo was falsch, es funktioniert zwar, macht aber nicht das was ich wollte

hihi
~s~

Sooo,

Ich habe nun in TMenu weitere Methoden eingefügt
(dadurch brauche ich nun status und Ustatus nicht mehr)

Funktioniert auch fast schon .... aber das ganze Verschieben des Menüs ...
da muss ich mir etwas einfallen lassen das ganz anders zu lößen
(vielleicht ja durch die onClick sache etc. ...)

Das Weinbergmenü schließt sich ab und an direkt wieder wenn es angeklickt wird,
bestimmt weil das auch von der Programmlogik nicht ganz sauber ist.

Mal sehen ob der Code überhaupt hier rein passt - das nicht das Forum sprengt

gruß
sushi

'
'
'My first BlitzMax program
'Title: Winzer Projekt
'Datum: 2014.04.05 - 06
'Autor: ~s~
'
'Using Dig Framework https://github.com/GWRon/Dig
'Using Dig Framework http://www.gamezworld.de/phpforum/viewtopic.php?id=13394
'
'
'

Import "base.util.helper.bmx" 'hilfsfunktionen
Import "base.util.event.bmx" 'mit neuem DigUpdate nicht noetig, hab das beim deltatimer vergessen :D
Import "base.util.deltatimer.bmx"

'Include BRL.PNGLoader


Graphics 800, 600, 0, 0

Global exitApp:int = FALSE 'spiel beenden?

Global bild_bg:TImage
Global bild_bgp1:TImage

'Global Ustatus:Int = - 1
Global MenuStatus:Int = 1

Global aktivesMenu:TMenu
Global hoverMenu:TMenu

Global Hauptmenu:TMenu[]
Global Stadtmenu:TMenu[]
Global Weinbergmenu:TMenu[]

Global Dummy:String



Type TPlayer
	Field Home:String
	Field Konto:Float
	Field Keller:TKeller
End Type

Type TKeller
	Field Flaschen:Int
	Field Lagerplatz:Int
End Type


Type TMenu
	Field x:Int
	Field y:Int
	Field b:Int
	Field h:Int
	Field name:String
'	Field status:Int
	
	Method Draw()
		If Not Self.IsActive() And Not Self.IsHover() Then
			SetColor(232, 222, 191)
		ElseIf Self.IsHover() And Not Self.IsActive() Then
			SetColor(223, 144, 26)
		ElseIf Self.IsActive() Then
			SetColor(243, 202, 11)
		EndIf
		DrawText(name, x, y)
		'Farbe wieder zuruecksetzen - nicht vergessen :D
		SetColor(255, 255, 255)
	End Method
	
	Method Update:Int()
		'standardmaessig ausschalten
		'status = 0
		
		'wenn die maus nicht drin ist - überprüfen ob Objekt hoverMenu ist
		If Not THelper.MouseIn(x, y, b, h) Then
			If hoverMenu = Self Then
				hoverMenu = Null
				Return False
			Else
				Return False
			EndIf
		EndIf

		'du kannst mit "self." explizit hinweisen, was du meinst
		'".status" (also nur punkt) wuerde  explizit eine "global" variable
		'ansprechen
		Self.SetHover()

		If MOUSEMANAGER.isDown(1) Then
			Self.SetActive()
		EndIf	
	End Method
	
	Method SetActive()
		aktivesMenu = Self
		MenuStatus = 1
	End Method

	Method SetHover()
		hoverMenu = Self
		MenuStatus = 1
	End Method
	
	Method IsActive:Int()
		Return (Self = aktivesMenu)
	End Method
	
	Method IsHover:Int()
		Return (Self = hoverMenu)
	End Method
	
End Type

Function MenuInit()
Local x, y, h, b:Int

	x = 75
	y = 180
	h = 19
	b = 120

	For i = 0 To 5
		Local NewMenu:TMenu
		NewMenu = New TMenu
		NewMenu.x = x
		NewMenu.y = y + (i * h)
		NewMenu.b = b
		NewMenu.h = h
'		NewMenu.status = 0
		Hauptmenu:+ [NewMenu]
	Next

	h = 19
	x = 75 + 10
	y = 180 + h
	b = 120

	
	For i = 0 To 6
		Local NewMenu1:TMenu
		NewMenu1 = New TMenu
		NewMenu1.x = x
		NewMenu1.y = y + (i * h)
		NewMenu1.b = b
		NewMenu1.h = h
'		NewMenu1.status = 0
		Stadtmenu:+ [NewMenu1]
	Next

	h = 19
	x = 75 + 10
	y = 180 + h * 2
	b = 120

	For i = 0 To 5
		Local NewMenu2:TMenu
		NewMenu2 = New TMenu
		NewMenu2.x = x
		NewMenu2.y = y + (i * h)
		NewMenu2.b = b
		NewMenu2.h = h
'		NewMenu2.status = 0
		Weinbergmenu:+ [NewMenu2]
	Next
	
	Hauptmenu[0].name = "Zur Stadt"
	Hauptmenu[1].name = "Weinberg"
	Hauptmenu[2].name = "Schuppen"
	Hauptmenu[3].name = "Lagerhaus"
	Hauptmenu[4].name = "Kellerei"
	Hauptmenu[5].name = "Wohnhaus"
	
	Stadtmenu[0].name = "Sabotage"
	Stadtmenu[1].name = "Bank"
	Stadtmenu[2].name = "Arbeitsamt"
	Stadtmenu[3].name = "Grosshandel"
	Stadtmenu[4].name = "Einzelhandel"
	Stadtmenu[5].name = "Rathaus/Amt"
	Stadtmenu[6].name = "Werbebuero"
	
	Weinbergmenu[0].name = "Weinbergmenu 1"
	Weinbergmenu[1].name = "Weinbergmenu 2"
	Weinbergmenu[2].name = "Weinbergmenu 3"
	Weinbergmenu[3].name = "Weinbergmenu 4"
	Weinbergmenu[4].name = "Weinbergmenu 5"
	Weinbergmenu[5].name = "Weinbergmenu 6"
	
End Function



Function MenuDraw()
Local x:Int = 75, y:Int = 180, h:Int = 19, b:Int = 120


	If Not MenuStatus = 1 Then Return False
	
	MenuStatus = - 1
	
	Print "Menue Zeichnen"
	SetColor(129, 8, 39)
	DrawRect(x, y, 130, 500)
	'Farbe wieder zuruecksetzen - nicht vergessen :D
	SetColor(255, 255, 255)

	'Hauptmenu in jedem Fall Zeichnen,
	'da es keine Bedingung gibt für die nicht mit IF abgeglichenen Menüs
	'das ist alles müll :)
	

	For Local i:Int = 0 To Hauptmenu.length - 1	
		Hauptmenu[i].x = x
		Hauptmenu[i].y = y + (i * h)
		Hauptmenu[i].Draw
	Next
	
	If aktivesMenu = Hauptmenu[0] Then
		SetColor(129, 8, 39)
		DrawRect(x, y, 130, 500)
		SetColor(255, 255, 255)
		x = 75
		y = 180

		Hauptmenu[0].Draw
		For Local k:Int = 0 To Stadtmenu.length - 1
			y = y + h
			'Stadtmenu Koordinaten müssen nicht geändert werden
			Stadtmenu[k].Draw()
		Next

		For Local a:Int = 1 To Hauptmenu.length - 1
			y = y + h
			Hauptmenu[a].y = y
			Hauptmenu[a].Draw		
		Next
	EndIf

	If aktivesMenu = Hauptmenu[1] Then
		SetColor(129, 8, 39)
		DrawRect(x, y, 130, 500)
		SetColor(255, 255, 255)
		x = 75
		y = 180

		Hauptmenu[0].Draw
		y = y + h
		Hauptmenu[1].y = y
		Hauptmenu[1].Draw
		
		For Local k1:Int = 0 To Weinbergmenu.length - 1
			y = y + h
			'Koordinaten müssen nicht geändert werden
			Weinbergmenu[k1].Draw()
		Next
		
		For Local a1:Int = 2 To Hauptmenu.length - 1
			y = y + h
			Hauptmenu[a1].y = y
			Hauptmenu[a1].Draw		
		Next
	EndIf
	
End Function






'spiellogik aktualisieren
Function UpdateWorld:int()
	'refresh mouse/keyboard
	MouseManager.ChangeStatus()
	KeyManager.ChangeStatus()

	For Local menu:TMenu = EachIn Hauptmenu
		menu.Update()
	Next
	
	If aktivesMenu = Hauptmenu[0] Then
		For Local menu2:TMenu = EachIn Stadtmenu
			menu2.Update()
		Next
	EndIf

	If aktivesMenu = Hauptmenu[1] Then
		For Local menu3:TMenu = EachIn Weinbergmenu
			menu3.Update()
		Next
	EndIf

	'spiel beendbar mit ESC
	If KeyManager.IsHit(KEY_ESCAPE) then exitApp = TRUE
End Function


Function RenderWorld:Int()
	DrawImage bild_bg, 0, 0
	DrawImage bild_bgp1, 15, 15

	SetColor(232, 222, 191)
	DrawText (Dummy, 280, 47)
	'Farbe wieder zuruecksetzen - nicht vergessen :D
	SetColor(255, 255, 255)

	MenuDraw()

	Flip 0 'alles gezeichnete "an die grafikkarte schicken"
End Function



'wir sagen dem deltatimer, was die update- und renderfunktionen sind
GetDeltaTimer()._funcUpdate = UpdateWorld
GetDeltaTimer()._funcRender = RenderWorld
'und dass wir 30 Logikupdates und 60 Renders pro Sekunde wollen
GetDeltaTimer().Init(30, 60)

'Sachen initialisieren
MenuInit()

Dummy = "Datum: Jan 1980     Ort: Weingut Sachsen     Konto: 100.000"
bild_bg = LoadImage ("bg_01.png")
bild_bgp1 = LoadImage ("bgp_weingut.png")


'game loop
Repeat
	'run the deltatimer's loop
	'which runs the hooked update/render function
	GetDeltaTimer().loop()

	
	'falls du mit events arbeitest - muessen die natuerlich hier
	'abgearbeitet werden
	'EventManager.update()
Until AppTerminate() Or exitApp


End

Nachtrag:
Ich bin ja auch bissel doof .... eigentlich kann ich doch das ganze "Verschieben" in der MenuDraw() auch einfacher machen ... dachte in eine Schleife mit Unterschleifen aber das wird dann auch wieder doof

Zeichne 1. Menüpunkt
    Prüfe ob erstes Menü aktiv dann Zeichne 
    Untermenü und erhöhe y koordinate ansonsten wird ja nix gemacht

Setze y Koordinate Menü 2 und Zeichne es
    Prüfe ob zweites Menü aktiv dann Zeichne 
    Untermenü und erhöhe y koordinate ansonsten wird ja nix gemacht

Setze y Koordinate Menü 3 und Zeichne es

usw. ... zwar nicht elegant aber müsste funzen
ist aber auch keine lößung

zum glück habe ich keine rauchmelder in der wohnung, die würden ordentlich allarm geben

Hmmm,

also das erste bei "Winzer" war ja jetzt das es für's erste ein "Klone" bleiben sollte ..... also "Screen" erstellen (auch das hätte ich mit DrawRect machen können) ....

und dann Halt das erste Handling im Spiel und das sind Menüs .... und darauf dann die Bildschirme also "Räume" .... etc. und so weiter ....

so war jetzt mein gedanke ....
Grundlegend ist doch ersteinmal der hauptaufbau (fenster, menü - steuerung) ?

Für das spiel letzten endes interessanter ist alles das was dahinter abläuft .... nur das kann es nicht wenn man es ja nicht steuern kann

Menüpunkte und Eventsystem ?
immer raus damit

nachtrag:

okay, dein nochmaliger nachtrag deines beitrags hat den noch etwas mehr erweitert und interessante aspekte beleuchtet

das muss ich erst noch kappieren

ich denke mal deine freundin ist nu auch da, dann bis bald