موضوع الطلبات و المساعدات RPG Makers

ok ok اوكي اوكي

فيصل
أريد مثال أوالطريقة التي أريد أن أثبت أنها لعبتي أو أنها صنعي من خلال لما أفتح اللعبة يظهر المصمم
متى صممت إلخ

طريقة الكيجن :

1- اولا قوم بتشغيل الكيجن !!
http://img144.imageshack.us/img144/8900/63982370ky6.png

2- قوم بتشغيل برنامج rpg maker xp وقوم بخيار already paid

http://img505.imageshack.us/img505/5147/31198604mx1.png

3-ثم قوم بخيار generate
http://img339.imageshack.us/img339/9949/14663025ks3.png

4- قوم بنسخ الكود الذي في الكيجن إلى step 1 في اربييج ميكر

(تذكر لاتغلق الكيجن ابدا)

http://img339.imageshack.us/img339/4757/56624481wu2.png

5- بعد ذلك قوم بخيار web في step2 ومن ثم قوم بخيار PrintURL

http://img339.imageshack.us/img339/8859/80448578vx7.png


6- قوم بنسخ الرابط المحدد بصورة كاملا

http://img505.imageshack.us/img505/8688/81562113vl0.png

7- بعد ذلك ارجع للكيجن وقوم بوضع الرابط كما في صورة (1) ومن ثم قم بخيار جينيريت (2) ومن ثم سوف يظهر لك كود قوم بنسخة مجددا (3)

(تذكر لاتغلق الكيجن ابدا)

http://img339.imageshack.us/img339/3526/45525211ks3.png

8- بعد نسخك لرابط ارجع إلى step 3 ومن ثم قم بوضع الكود
http://img339.imageshack.us/img339/5160/77306707rx3.png

9- بعد وضعك الكود قوم بختيار ok وثوف يظهر لك شكر على شرائك البرنامج
http://img505.imageshack.us/img505/7070/65216543oa6.png


تم وضع الكيجن مجددا في المرفقات ^^

اقتباس:

---

فيصل
أريد مثال أوالطريقة التي أريد أن أثبت أنها لعبتي أو أنها صنعي من خلال لما أفتح اللعبة يظهر المصمم
متى صممت إلخ

---

لم افهم هل قصدك وضع شعار عند للعب للعبة في بداية قبل ظهور title ؟

هذا يدخل من باب الفني ممكن ان تضع بيناتاك على title
مثلا تحت شعار تكتب بالفوتو شوب made by Kakarot والخ ؟

لم افهم قصدك بتحديد

اقتباس:

---

المشاركة الأصلية كتبت بواسطة PrinceOfSorrow

لم افهم هل قصدك وضع شعار عند للعب للعبة في بداية قبل ظهور title ؟

هذا يدخل من باب الفني ممكن ان تضع بيناتاك على title
مثلا تحت شعار تكتب بالفوتو شوب made by Kakarot والخ ؟

لم افهم قصدك بتحديد

---

يعني زي كدا بس مش بالفوتو
يعني

وبدي درس عن كيفية القتال بالنظام الجانبي بوضع الضربات
يعني كيفية ترتيب الضربات بالسبرايت بالنظام الجانبي

كيف اضع فيديو لبداية العبة ارجــــــــــــــــــــــــــــــــــــو ارد

كاكاروت : حسنا فهمتكم انتظر قليلا

ماستر جيم : انتظر قليلا اخي

ماستر جيم :

سكربت العب بملف AVI في اربيجي ميكر :

انسخ الكود وضعه فوق main


=====================

كود:

---

class Scene_Movie
##Copy this into a new section of your game.
##To play a file, move the avi file into a "movies" subdirectory (yourgame\data,
##yourgame\graphics, yourgame\movies).
##Then call "Scene_Movie.new(filename)" where filename is your movies actual filename
## (minus the .avi). exp Scene_Movie.new("???")
## If you want to play multiple movies in a row
##(for example before the game starts, maybe a "developed by", "produced by", "intro movie"
## set or something... Go to the "main" section of code and find the line "$scene = Scene_Title.new".
##Just after that line add:
##CODE
##Scene_Movie.new("dev_by")
##Scene_Movie.new("pro_by")
##Scene_Movie.new("intro")
##$scene = Scene_Movie.new("intro",8,false)assuming the filename of the intro movie is "intro.avi" and it's 8 seconds long.
##class Scene_Movie
def initialize(movie)
@readini = Win32API.new 'kernel32', 'GetPrivateProfileStringA', %w(p p p p l p), 'l'
@movie_name = Dir.getwd()+"\\Movies\\"+movie+".avi"
main
end

def main

game_name = "\0" * 256
@readini.call('Game','Title','',game_name,255,".\\ Game.ini")
game_name.delete!("\0")
@wnd = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)' ,'L')
@temp = @wnd.call(0,0,nil,game_name).to_s
movie = Win32API.new('winmm','mciSendString','%w(p,p,l,l)' ,'V')
movie.call("open \""+@movie_name+"\" alias FILE style 1073741824 parent " + @temp.to_s,0,0,0)
@message = Win32API.new('user32','SendMessage','%w(l,l,l,l)', 'V')

@detector = Win32API.new('user32','GetSystemMetrics','%w(l)',' L')
@width = @detector.call(0)
if @width == 640
fullscreen
Graphics.update
sleep(1)
Graphics.update
sleep(1)
Graphics.update
sleep(1)
end

status = " " * 255
movie.call("play FILE",0,0,0)
loop do
sleep(0.1)
@message.call(@temp.to_i,11,0,0)
Graphics.update
@message.call(@temp.to_i,11,1,0)
Input.update
movie.call("status FILE mode",status,255,0)
true_status = status.unpack("aaaa")
if true_status.to_s != "play"
break
end
if Input.trigger?(Input::B)
Input.update
break
end
end
movie.call("close FILE",0,0,0)
bail
end

def bail
if @width == 640
fullscreen
end
end
end

def fullscreen()

$full.call(18,0,0,0)
$full.call(13,0,0,0)
$full.call(18,0,2,0)
$full.call(13,0,2,0)
end
$full = Win32API.new('user32','keybd_event','%w(l,l,l,l)', '')

---

قم بأنشاء ملف مرافق لملف لعبتك وجعل اسمه movies

http://img509.imageshack.us/img509/6922/10mv2.png

بعد ذلك أذا اردت لعب بملف AVI قبل بدأ اللعبة مثل العاب فاينل فانتسي كعرض بداية قبل شاشة الرئيسية :

قوم بوضع الكود :

(".....") Scene_Movie.new

كما في صورة :
http://img208.imageshack.us/img208/8...vienamevh4.png

في (".....") ضع في الفراقات اسم ملف AVI

شخصيا لم يعمل معي كالسابق واعتقد والله اعلم انني لا املك امتداد AVI الصحيح !!

شكراا شكراا شكراا

كاكاروت هذا اسكربت استخدام الصور في بدايه الللعبه
احفظ الالعاب في ملف Titles الخاص باللعبه

كود:

---

#==============================================================================
# Scene_Splash
#--------------------------------------------------------------------------
# Script by Iambchop
#==============================================================================
class Scene_Splash
  #--------------------------------------------------------------------------
  def main
    $data_system = load_data("Data/System.rxdata")
    $game_system = Game_System.new
    # Play Theme03 BGM
    Audio.bgm_play("Audio/BGM/036-Dungeon02", 100, 100)
    # Initialize some transition stuff
    @show = true
    @hide = false
    @n = 0
    @splash_numb = 2
    @sprite1 = Sprite.new
    @sprite1.bitmap = RPG::Cache.title("Splash01")
    @sprite1.opacity = 0
    @sprite2 = Sprite.new
    @sprite2.bitmap = RPG::Cache.title("Splash02")
    @sprite2.opacity = 0
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @sprite1.dispose
    @sprite2.dispose
  end
  #--------------------------------------------------------------------------
  def update
    if Input.trigger?(Input::C)
      case @splash_numb
      when 1
        if @n > 128
          @show = false
          @hide = true
          transition
        end
      when 2
        if @n > 128
          @show = false
          @hide = true
          transition
        end
      end
    end
    transition
    @sprite1.update
    @sprite2.update
  end
  #-------------------------------------------------------------- 
  def transition
    if @show == true
      @n += 5
      if @n > 750
        @hide = true
        @show = false
        @n = 255
      end
    end
    if @hide == true
      @n -= 5
      if @n < 0
        @hide = false
        @show = true
        @splash_numb -= 1
        @n = 0
      end
    end
    case @splash_numb
    when 0
      $scene = Scene_Title.new
    when 1
      @sprite2.opacity = @n
    when 2
      @sprite1.opacity = @n
    end
  end
  #--------------------------------------------------------------------------
end

---

اذهب السطر 20 لتحدد اسم الصوره الاولى (استبدل Splash01 بالاسم)
23 لاسم الصوره الثانيه (استبدل Splash02 بالاسم)

اقتباس:

---

يعني كيفية ترتيب الضربات بالسبرايت بالنظام الجانبي

---

لآآآآآآآآآ ×_×
وانا كنت أضارب مع نظام القتال الخطء T_T
اوكي خلينا نبدأ من الصفر
نظام القتال الي تبحث عنه و نظام قتال الي صممته Ccoa واسمه CBS
شخصيا انا مالي اي خبره عن النظام وما جربته لكن راح اشوف اخر نسخه له واشرحه لك

اقتباس:

---

المشاركة الأصلية كتبت بواسطة .AJ.

كاكاروت هذا اسكربت استخدام الصور في بدايه الللعبه
احفظ الالعاب في ملف Titles الخاص باللعبه

كود:

---

#==============================================================================
# Scene_Splash
#--------------------------------------------------------------------------
# Script by Iambchop
#==============================================================================
class Scene_Splash
  #--------------------------------------------------------------------------
  def main
    $data_system = load_data("Data/System.rxdata")
    $game_system = Game_System.new
    # Play Theme03 BGM
    Audio.bgm_play("Audio/BGM/036-Dungeon02", 100, 100)
    # Initialize some transition stuff
    @show = true
    @hide = false
    @n = 0
    @splash_numb = 2
    @sprite1 = Sprite.new
    @sprite1.bitmap = RPG::Cache.title("Splash01")
    @sprite1.opacity = 0
    @sprite2 = Sprite.new
    @sprite2.bitmap = RPG::Cache.title("Splash02")
    @sprite2.opacity = 0
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @sprite1.dispose
    @sprite2.dispose
  end
  #--------------------------------------------------------------------------
  def update
    if Input.trigger?(Input::C)
      case @splash_numb
      when 1
        if @n > 128
          @show = false
          @hide = true
          transition
        end
      when 2
        if @n > 128
          @show = false
          @hide = true
          transition
        end
      end
    end
    transition
    @sprite1.update
    @sprite2.update
  end
  #-------------------------------------------------------------- 
  def transition
    if @show == true
      @n += 5
      if @n > 750
        @hide = true
        @show = false
        @n = 255
      end
    end
    if @hide == true
      @n -= 5
      if @n < 0
        @hide = false
        @show = true
        @splash_numb -= 1
        @n = 0
      end
    end
    case @splash_numb
    when 0
      $scene = Scene_Title.new
    when 1
      @sprite2.opacity = @n
    when 2
      @sprite1.opacity = @n
    end
  end
  #--------------------------------------------------------------------------
end

---

اذهب السطر 20 لتحدد اسم الصوره الاولى (استبدل Splash01 بالاسم)

23 لاسم الصوره الثانيه (استبدل Splash02 بالاسم)

---

بدلة وبتظهر لي رسالة خطأ ؟؟في السكربت
الطريقة التي أتبعتها هي:
1.jpg وغيرت Splash01 وصارت 1.jpg
ولكن يحكي في مشكلة ب سكربت رقم 20 ؟؟

وشكراً على المساعدة
أونت غلطان لازم سطر 19 على كل حال هده الصورة أو لازم صيغة معينة ؟؟؟

http://img413.imageshack.us/img413/5286/untdfrdsg5.jpg

اقتباس:

---

وانا كنت أضارب مع نظام القتال الخطء T_T

---

طيب شو هو النظام
إدا كان ABS ممكن ترفعلي إياه
طيب ممكن نشبك نظامان في نظام زي ABS مع CBS ؟؟

وأسف على الغلبة *_*

اخواني ماذى افعل لخرج الوحش معيـ
اخواني عندما اضع شجرة فب العبة يضهر لون ابيض على الجنيب

اقتباس:

---

المشاركة الأصلية كتبت بواسطة PrinceOfSorrow

ماستر جيم :

سكربت العب بملف AVI في اربيجي ميكر :

انسخ الكود وضعه فوق main

=====================

كود:

---

class Scene_Movie
##Copy this into a new section of your game.
##To play a file, move the avi file into a "movies" subdirectory (yourgame\data,
##yourgame\graphics, yourgame\movies).
##Then call "Scene_Movie.new(filename)" where filename is your movies actual filename
## (minus the .avi). exp Scene_Movie.new("???")
## If you want to play multiple movies in a row
##(for example before the game starts, maybe a "developed by", "produced by", "intro movie"
## set or something... Go to the "main" section of code and find the line "$scene = Scene_Title.new".
##Just after that line add:
##CODE
##Scene_Movie.new("dev_by")
##Scene_Movie.new("pro_by")
##Scene_Movie.new("intro")
##$scene = Scene_Movie.new("intro",8,false)assuming the filename of the intro movie is "intro.avi" and it's 8 seconds long.
##class Scene_Movie
def initialize(movie)
@readini = Win32API.new 'kernel32', 'GetPrivateProfileStringA', %w(p p p p l p), 'l'
@movie_name = Dir.getwd()+"\\Movies\\"+movie+".avi"
main
end

def main

game_name = "\0" * 256
@readini.call('Game','Title','',game_name,255,".\\ Game.ini")
game_name.delete!("\0")
@wnd = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)' ,'L')
@temp = @wnd.call(0,0,nil,game_name).to_s
movie = Win32API.new('winmm','mciSendString','%w(p,p,l,l)' ,'V')
movie.call("open \""+@movie_name+"\" alias FILE style 1073741824 parent " + @temp.to_s,0,0,0)
@message = Win32API.new('user32','SendMessage','%w(l,l,l,l)', 'V')

@detector = Win32API.new('user32','GetSystemMetrics','%w(l)',' L')
@width = @detector.call(0)
if @width == 640
fullscreen
Graphics.update
sleep(1)
Graphics.update
sleep(1)
Graphics.update
sleep(1)
end

status = " " * 255
movie.call("play FILE",0,0,0)
loop do
sleep(0.1)
@message.call(@temp.to_i,11,0,0)
Graphics.update
@message.call(@temp.to_i,11,1,0)
Input.update
movie.call("status FILE mode",status,255,0)
true_status = status.unpack("aaaa")
if true_status.to_s != "play"
break
end
if Input.trigger?(Input::B)
Input.update
break
end
end
movie.call("close FILE",0,0,0)
bail
end

def bail
if @width == 640
fullscreen
end
end
end

def fullscreen()

$full.call(18,0,0,0)
$full.call(13,0,0,0)
$full.call(18,0,2,0)
$full.call(13,0,2,0)
end
$full = Win32API.new('user32','keybd_event','%w(l,l,l,l)', '')

---

قم بأنشاء ملف مرافق لملف لعبتك وجعل اسمه movies

http://img509.imageshack.us/img509/6922/10mv2.png

بعد ذلك أذا اردت لعب بملف AVI قبل بدأ اللعبة مثل العاب فاينل فانتسي كعرض بداية قبل شاشة الرئيسية :

قوم بوضع الكود :

(".....") Scene_Movie.new

كما في صورة :
http://img208.imageshack.us/img208/8...vienamevh4.png

في (".....") ضع في الفراقات اسم ملف AVI

شخصيا لم يعمل معي كالسابق واعتقد والله اعلم انني لا املك امتداد AVI الصحيح !!

---

إنت قصدك نحط الكود فوق main نفسها يعني بنفس السكربت ول فوقها وتحت كل السكربت ؟؟