ok ok اوكي اوكي
عرض للطباعة
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 والخ ؟
لم افهم قصدك بتحديد
وبدي درس عن كيفية القتال بالنظام الجانبي بوضع الضربات
يعني كيفية ترتيب الضربات بالسبرايت بالنظام الجانبي
كيف اضع فيديو لبداية العبة ارجــــــــــــــــــــــــــــــــــــو ارد
كاكاروت : حسنا فهمتكم انتظر قليلا
ماستر جيم : انتظر قليلا اخي
ماستر جيم :
سكربت العب بملف AVI في اربيجي ميكر :
انسخ الكود وضعه فوق main
=====================
قم بأنشاء ملف مرافق لملف لعبتك وجعل اسمه moviesكود: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)', '')
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
شخصيا انا مالي اي خبره عن النظام وما جربته لكن راح اشوف اخر نسخه له واشرحه لك
بدلة وبتظهر لي رسالة خطأ ؟؟في السكربت
الطريقة التي أتبعتها هي:
1.jpg وغيرت Splash01 وصارت 1.jpg
ولكن يحكي في مشكلة ب سكربت رقم 20 ؟؟
وشكراً على المساعدة
أونت غلطان لازم سطر 19 على كل حال هده الصورة أو لازم صيغة معينة ؟؟؟
http://img413.imageshack.us/img413/5286/untdfrdsg5.jpg
طيب شو هو النظاماقتباس:
وانا كنت أضارب مع نظام القتال الخطء T_T
إدا كان ABS ممكن ترفعلي إياه
طيب ممكن نشبك نظامان في نظام زي ABS مع CBS ؟؟
وأسف على الغلبة *_*
اخواني ماذى افعل لخرج الوحش معيـ
اخواني عندما اضع شجرة فب العبة يضهر لون ابيض على الجنيب