PicPointerPatch - Bild-ID durch Variable angeben

[Orange4]

... den ich auf der Hauptseite nicht finden kann. Hast du nen Link für mich?
Wäre natürlich gut wenn ich nicht Patches von x Personen drin hab und am Ende nicht mehr weiß, an wen ich mich wenden muss
Dann würde ich es mal mit deinem probieren.

[cilence]

Der Patch ist doch auf der Hauptseite: [RM200x] BetterAEP

*schauste hier*

€:

Das gibts nicht xD
Ich bin über Suchen gegangen und hab keinen Bindestrich gesetzt xD

Danke dir ^^

...

Bittesehr, ich helf doch immer gern.

[Orange4]

Das gibts nicht xD
Ich bin über Suchen gegangen und hab keinen Bindestrich gesetzt xD

Danke dir ^^

edit
Nanu das ist der von Miroku?
Egal ich probiers einfach mal ^^

[Cherry]

nein, nicht der von Miroku. Weiter unten, BetterAEP von Cherry.

Oder hier suchen: http://www.multimediaxis.de/showthread.php?t=105858 <<< immer einen Blick wert.

Direktlink hier: http://www.multimediaxis.de/showthread.php?t=107421

[Orange4]

Achso der heißt auch so.
Vielen Dank, ich werd mich am Wochenende wieder dransetzen

[lokipoki]

Sorry Cherry, aber ich meinte eigentlich deinen Patch (betteraep). Kann ich den eigentlich einfach so draufhauen?

Und:kannst du dir nochmal mein Code anschauen und mir sagen warum die Transparenz sich nicht aendert.

Ein GROSSES DANKE.

[Cherry]

@BetterAEP: Ja. Hier als IPS: http://cherrytree.at/misc/baep_ips.rar
@dein Code: hast du bei Transparenz auch 10006 eingestellt?

[lokipoki]

@dein Code: hast du bei Transparenz auch 10006 eingestellt?

...

Sorry, aber ich weis nicht was du damit meinst. Ich habe die Variabel 0006 benutzt. Wie man im screenshot sieht. Wenn du das meinst....

[Cherry]

Ja, dazu musst du 10006% Transparenz beim Show Picture einstellen (10000 + VarID).

[lokipoki]

Ja, dazu musst du 10006% Transparenz beim Show Picture einstellen (10000 + VarID).

...

Aber in deinem Demospiel benutzt du die variabel 0006 ...

[makenshi]

Aber in deinem Demospiel benutzt du die variabel 0006 ...

...

Das ist ja auch richtig so.
Was er dir versucht zu sagen, ist das du im Fenster wo du sonst die Transparenz einträgst, praktisch eine Referenznummer eintragen musst.
Diese ist so zusammengebaut: 10000 + VariablenID.
Die VariablenID steht direkt vor den Variablennamen.

z.B.:
Wenn du in das Feld wo man sonst die Transparenz in Prozent einträgt eine 10006 reinschreibst, dann wird der Transparenzwert aus der Variable 0006 ausgelsen.( 10000 + VariablenID 0006 = 10006 )
Wenn du 10110 einträgst, dann wird der Wert aus der Variable 0110 gelesen.
( 10000 + VariablenID 0110 = 10110 )

[Orange4]

So ich hab gesagt ich geb nochmal ne Rückmeldung wegen dem Patchen.
Also nachdem ich dann am Ende doch noch verstanden hab, wie man sie verwendet, funktionieren sie auch. Jetzt muss ich den PicPointer nurnoch in die Skripte einbinden (zumindest konnte ich schonmal ziemlich viel Skriptmüll entsorgen) xD

In jedem Fall ein dickes Dankeschön für die Hilfe (und die versprochene Packung Kekse =3), beide Patches klappen gut

[Cherry]

So ich hab gesagt ich geb nochmal ne Rückmeldung wegen dem Patchen.
Also nachdem ich dann am Ende doch noch verstanden hab, wie man sie verwendet, funktionieren sie auch.

...

Das ist meistens so

Jetzt muss ich den PicPointer nurnoch in die Skripte einbinden (zumindest konnte ich schonmal ziemlich viel Skriptmüll entsorgen) xD

...

Freut mich!

In jedem Fall ein dickes Dankeschön für die Hilfe (und die versprochene Packung Kekse =3), beide Patches klappen gut

...

Und wo sind die Kekse jetzt bitte^^?

mfG Cherry

[Orange4]

(wobei es ja eigentlich "ate" heißen müsste xD)

Bei dem Versuch die Kekse rüberzuschicken hab ich schon mein DVD Laufwerk geschrottet xD

[lokipoki]

Ok habs jetzt verstanden.

Aber:

Ich kann da einfach nicht mehr als 100 bzw. 3stellig Nummer eingeben. Woran liegt das denn?

[Cherry]

Daran, dass du es im Ressource Hacker nicht auf 100000 geändert hast. Siehe Readme.

[lokipoki]

Doch hab ich gemacht. Alle auf 100000 gestellt...

[Cherry]

Ganz offensichtlich nicht die richtige. Kuck nochmal - die, die bei "MaxValue = " unter "Transparency" steht.

[lokipoki]

Ganz offensichtlich nicht die richtige. Kuck nochmal - die, die bei "MaxValue = " unter "Transparency" steht.

...

Ich habs nochmal ueberprueft. Alle drei Werte sind auf 100000!!! Wie du es beschrieben hast.

Kannst du mir vielleicht eine RPG.exe Kopie schicken?

[Cherry]

Hier einfach die Ressourcen:

Code:

inherited FormEvCmd11110: TFormEvCmd11110
  Caption = 'Show Picture'
  ClientHeight = 361
  ClientWidth = 353
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object TabControl1: TTabControl
    Left = 8
    Top = 8
    Width = 337
    Height = 313
    TabOrder = 0
    TabStop = False
    object GroupBox1: TFakeGroupBox
      Left = 8
      Top = 8
      Width = 89
      Height = 41
      Caption = 'Pic. Number'
      TabOrder = 0
      object DialEdit1: TDialEdit
        Left = 8
        Top = 15
        Width = 73
        Height = 20
        MaxValue = 100000
        MinValue = 1
        TabOrder = 0
        Value = 1
        OnChange = DialEdit1Change
      end
    end
    object GroupBox2: TFakeGroupBox
      Left = 104
      Top = 8
      Width = 225
      Height = 41
      Caption = 'Select Picture'
      TabOrder = 1
      object DashBox1: TDashBox
        Left = 8
        Top = 15
        Width = 209
        Height = 20
        ParentColor = False
        TabOrder = 0
        TabStop = True
        OnClick = DashBox1Click
      end
    end
    object GroupBox3: TFakeGroupBox
      Left = 8
      Top = 56
      Width = 321
      Height = 153
      Caption = 'Show Position (Centre Coord.)'
      TabOrder = 2
      object LabelA1X: TLabel
        Left = 104
        Top = 20
        Width = 13
        Height = 12
        Caption = 'X :'
      end
      object LabelA1Y: TLabel
        Left = 104
        Top = 44
        Width = 13
        Height = 12
        Caption = 'Y :'
      end
      object LabelA2X: TLabel
        Left = 104
        Top = 72
        Width = 13
        Height = 12
        Caption = 'X :'
      end
      object LabelA2Y: TLabel
        Left = 104
        Top = 96
        Width = 13
        Height = 12
        Caption = 'Y :'
      end
      object Bevel1: TBevel
        Left = 8
        Top = 112
        Width = 305
        Height = 9
        Shape = bsBottomLine
      end
      object RadioButtonA1: TRadioButton
        Left = 8
        Top = 18
        Width = 85
        Height = 17
        Caption = 'Position'
        TabOrder = 0
        OnClick = RadioButtonAClick
      end
      object RadioButtonA2: TRadioButton
        Tag = 1
        Left = 8
        Top = 70
        Width = 85
        Height = 17
        Caption = 'By Variable'
        TabOrder = 1
        OnClick = RadioButtonAClick
      end
      object DialEditA1X: TDialEdit
        Left = 128
        Top = 16
        Width = 73
        Height = 20
        MaxValue = 960
        MinValue = -640
        TabOrder = 2
        Value = 160
        OnChange = DialEditA1XChange
      end
      object DialEditA1Y: TDialEdit
        Left = 128
        Top = 40
        Width = 73
        Height = 20
        MaxValue = 720
        MinValue = -480
        TabOrder = 3
        Value = 120
        OnChange = DialEditA1YChange
      end
      object DashBoxA2X: TDashBox
        Left = 128
        Top = 68
        Width = 177
        Height = 20
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 4
        TabStop = True
        OnClick = DashBoxA2XClick
      end
      object DashBoxA2Y: TDashBox
        Left = 128
        Top = 92
        Width = 177
        Height = 20
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 5
        TabStop = True
        OnClick = DashBoxA2YClick
      end
      object CheckBox1: TCheckBox
        Left = 8
        Top = 128
        Width = 305
        Height = 17
        Caption = 'Move with Map'
        TabOrder = 6
        OnClick = CheckBox1Click
      end
    end
    object GroupBox6: TFakeGroupBox
      Left = 216
      Top = 216
      Width = 113
      Height = 41
      Caption = 'Transparent Colour'
      TabOrder = 3
      object RadioButtonB1: TRadioButton
        Left = 8
        Top = 17
        Width = 45
        Height = 17
        Caption = 'Stir'
        TabOrder = 0
        OnClick = RadioButtonBClick
      end
      object RadioButtonB2: TRadioButton
        Tag = 1
        Left = 60
        Top = 17
        Width = 45
        Height = 17
        Caption = 'None'
        TabOrder = 1
        OnClick = RadioButtonBClick
      end
    end
    object GroupBox7: TFakeGroupBox
      Left = 8
      Top = 264
      Width = 321
      Height = 41
      Caption = 'Additional Effect:'
      TabOrder = 4
      object DashBox2: TDashBox
        Left = 8
        Top = 15
        Width = 305
        Height = 20
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 0
        TabStop = True
        OnClick = DashBox2Click
      end
    end
    object GroupBox4: TFakeGroupBox
      Left = 8
      Top = 216
      Width = 97
      Height = 41
      Caption = 'Magnification'
      TabOrder = 5
      object Label1: TLabel
        Left = 77
        Top = 20
        Width = 12
        Height = 12
        Caption = '%'
      end
      object DialEdit2: TDialEdit
        Left = 8
        Top = 15
        Width = 65
        Height = 20
        Increment = 5
        MaxValue = 100000
        MinValue = 0
        TabOrder = 0
        Value = 100
        OnChange = DialEdit2Change
      end
    end
    object GroupBox5: TFakeGroupBox
      Left = 112
      Top = 216
      Width = 97
      Height = 41
      Caption = 'Transparency'
      TabOrder = 6
      object Label2: TLabel
        Left = 77
        Top = 20
        Width = 12
        Height = 12
        Caption = '%'
      end
      object DialEdit3: TDialEdit
        Left = 8
        Top = 15
        Width = 65
        Height = 20
        Increment = 5
        MaxValue = 100000
        MinValue = 0
        TabOrder = 0
        Value = 0
        OnChange = DialEdit3Change
      end
    end
  end
  object ButtonOk: TButton
    Left = 64
    Top = 328
    Width = 89
    Height = 25
    Caption = '&Ok'
    Default = True
    ModalResult = 1
    TabOrder = 1
    OnClick = ButtonOkClick
  end
  object ButtonCancel: TButton
    Left = 160
    Top = 328
    Width = 89
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object ButtonHelp: TButton
    Left = 256
    Top = 328
    Width = 89
    Height = 25
    Cancel = True
    Caption = '&Help'
    TabOrder = 3
    OnClick = ButtonHelpClick
  end
end

Code:

inherited FormEvCmd11120: TFormEvCmd11120
  Caption = 'Move Picture'
  ClientHeight = 377
  ClientWidth = 353
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object TabControl1: TTabControl
    Left = 8
    Top = 8
    Width = 337
    Height = 329
    TabOrder = 0
    TabStop = False
    object GroupBox1: TFakeGroupBox
      Left = 8
      Top = 8
      Width = 89
      Height = 41
      Caption = 'Pic. Number'
      TabOrder = 0
      object DialEdit1: TDialEdit
        Left = 8
        Top = 15
        Width = 73
        Height = 20
        MaxValue = 100000
        MinValue = 1
        TabOrder = 0
        Value = 1
        OnChange = DialEdit1Change
      end
    end
    object GroupBox2: TFakeGroupBox
      Left = 104
      Top = 8
      Width = 225
      Height = 41
      TabOrder = 1
    end
    object GroupBox3: TFakeGroupBox
      Left = 8
      Top = 56
      Width = 321
      Height = 121
      Caption = 'Place Position (Centre Coord.)'
      TabOrder = 2
      object LabelA1X: TLabel
        Left = 104
        Top = 20
        Width = 13
        Height = 12
        Caption = 'X :'
      end
      object LabelA1Y: TLabel
        Left = 104
        Top = 44
        Width = 13
        Height = 12
        Caption = 'Y :'
      end
      object LabelA2X: TLabel
        Left = 104
        Top = 72
        Width = 13
        Height = 12
        Caption = 'X :'
      end
      object LabelA2Y: TLabel
        Left = 104
        Top = 96
        Width = 13
        Height = 12
        Caption = 'Y :'
      end
      object RadioButtonA1: TRadioButton
        Left = 8
        Top = 18
        Width = 85
        Height = 17
        Caption = 'Position'
        TabOrder = 0
        OnClick = RadioButtonAClick
      end
      object RadioButtonA2: TRadioButton
        Tag = 1
        Left = 8
        Top = 70
        Width = 85
        Height = 17
        Caption = 'By Variable'
        TabOrder = 1
        OnClick = RadioButtonAClick
      end
      object DialEditA1X: TDialEdit
        Left = 128
        Top = 16
        Width = 73
        Height = 20
        MaxValue = 960
        MinValue = -640
        TabOrder = 2
        Value = 160
        OnChange = DialEditA1XChange
      end
      object DialEditA1Y: TDialEdit
        Left = 128
        Top = 40
        Width = 73
        Height = 20
        MaxValue = 720
        MinValue = -480
        TabOrder = 3
        Value = 120
        OnChange = DialEditA1YChange
      end
      object DashBoxA2X: TDashBox
        Left = 128
        Top = 68
        Width = 177
        Height = 20
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 4
        TabStop = True
        OnClick = DashBoxA2XClick
      end
      object DashBoxA2Y: TDashBox
        Left = 128
        Top = 92
        Width = 177
        Height = 20
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 5
        TabStop = True
        OnClick = DashBoxA2YClick
      end
    end
    object GroupBox4: TFakeGroupBox
      Left = 8
      Top = 184
      Width = 97
      Height = 41
      Caption = 'Magnification'
      TabOrder = 3
      object Label6: TLabel
        Left = 77
        Top = 20
        Width = 12
        Height = 12
        Caption = '%'
      end
      object DialEdit2: TDialEdit
        Left = 8
        Top = 15
        Width = 65
        Height = 20
        Increment = 5
        MaxValue = 100000
        MinValue = 0
        TabOrder = 0
        Value = 100
        OnChange = DialEdit2Change
      end
    end
    object GroupBox5: TFakeGroupBox
      Left = 112
      Top = 184
      Width = 97
      Height = 41
      Caption = 'Transparency'
      TabOrder = 4
      object Label14: TLabel
        Left = 77
        Top = 20
        Width = 12
        Height = 12
        Caption = '%'
      end
      object DialEdit3: TDialEdit
        Left = 8
        Top = 15
        Width = 65
        Height = 20
        Increment = 5
        MaxValue = 100000
        MinValue = 0
        TabOrder = 0
        Value = 0
        OnChange = DialEdit3Change
      end
    end
    object GroupBox6: TFakeGroupBox
      Left = 216
      Top = 184
      Width = 113
      Height = 41
      TabOrder = 5
    end
    object GroupBox7: TFakeGroupBox
      Left = 8
      Top = 232
      Width = 321
      Height = 41
      Caption = 'Additional Effect:'
      TabOrder = 6
      object DashBox2: TDashBox
        Left = 8
        Top = 15
        Width = 305
        Height = 20
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 0
        TabStop = True
        OnClick = DashBox2Click
      end
    end
    object GroupBox8: TFakeGroupBox
      Left = 8
      Top = 280
      Width = 137
      Height = 41
      Caption = 'Movement Time'
      TabOrder = 7
      object Label1: TLabel
        Left = 85
        Top = 19
        Width = 42
        Height = 12
        Caption = 'x0.1 Sec'
      end
      object DialEdit4: TDialEdit
        Left = 8
        Top = 15
        Width = 73
        Height = 20
        MaxValue = 1000
        MinValue = 0
        TabOrder = 0
        Value = 10
        OnChange = DialEdit4Change
      end
    end
    object GroupBox9: TFakeGroupBox
      Left = 152
      Top = 280
      Width = 177
      Height = 41
      Caption = 'Options'
      TabOrder = 8
      object CheckBox1: TCheckBox
        Left = 8
        Top = 16
        Width = 161
        Height = 17
        Caption = 'Wait Until Done'
        TabOrder = 0
        OnClick = CheckBox1Click
      end
    end
  end
  object ButtonOk: TButton
    Left = 64
    Top = 344
    Width = 89
    Height = 25
    Caption = '&Ok'
    Default = True
    ModalResult = 1
    TabOrder = 1
    OnClick = ButtonOkClick
  end
  object ButtonCancel: TButton
    Left = 160
    Top = 344
    Width = 89
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object ButtonHelp: TButton
    Left = 256
    Top = 344
    Width = 89
    Height = 25
    Cancel = True
    Caption = '&Help'
    TabOrder = 3
    OnClick = ButtonHelpClick
  end
end

Code:

inherited FormEvCmd11130: TFormEvCmd11130
  Caption = 'Erase Pic'
  ClientHeight = 105
  ClientWidth = 313
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object TabControl1: TTabControl
    Left = 8
    Top = 8
    Width = 297
    Height = 57
    TabOrder = 0
    TabStop = False
    object GroupBox1: TFakeGroupBox
      Left = 8
      Top = 8
      Width = 89
      Height = 41
      Caption = 'Pic. Number'
      TabOrder = 0
      object DialEdit1: TDialEdit
        Left = 8
        Top = 15
        Width = 73
        Height = 20
        MaxValue = 100000
        MinValue = 1
        TabOrder = 0
        Value = 1
        OnChange = DialEdit1Change
      end
    end
    object GroupBox2: TFakeGroupBox
      Left = 104
      Top = 8
      Width = 185
      Height = 41
      TabOrder = 1
    end
  end
  object ButtonOk: TButton
    Left = 24
    Top = 72
    Width = 89
    Height = 25
    Caption = '&Ok'
    Default = True
    ModalResult = 1
    TabOrder = 1
    OnClick = ButtonOkClick
  end
  object ButtonCancel: TButton
    Left = 120
    Top = 72
    Width = 89
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object ButtonHelp: TButton
    Left = 216
    Top = 72
    Width = 89
    Height = 25
    Cancel = True
    Caption = '&Help'
    TabOrder = 3
    OnClick = ButtonHelpClick
  end
end