if $filelist goto @page elseif $get goto @get_files endif var $domain=dhe-ond.wap.sh var $js= var $meta= var $alihkan=call htmlspecialchars $val=$meta; var $noscript= pri $js $domain $noscript $meta disini jikalau tidak dialihkan secara otomatis print $hideads Maaf halaman ini tidak dapat diakses karena halaman tidak ditemukan. goto @ending @page # FILE ASLI var $start_file_name=call strpos $haystack=$filelist;$needle=|;$offset=0; var $file_name=call substr $val=$filelist;$start=1;$length=($start_file_name-1); # FILE BASE var $start_file_base=call strripos $haystack=$file_name;$needle=.;$offset var $file_name_base=call substr $val=$file_name;$start=0;$length=$start_file_base; # CARI EKTENSI var $search_ektensi=$file_name# var $end_ektensi=call strripos $haystack=$search_ektensi;$needle=#;$offset var $file_ektensi=call substr $val=$file_name;$start=($start_file_base+1);$length=($end_ektensi-$start_file_base-1); # FILE MIME ASLI var $start_file_mime=call strpos $haystack=$filelist;$needle=@;$offset=0; var $file_mime=call substr $val=$filelist;$start=($start_file_name+1);$length=($start_file_mime-$start_file_name-1); # UKURAN FILE var $start_file_size=call strpos $haystack=$filelist;$needle=&;$offset=0; var $file_size=call substr $val=$filelist;$start=($start_file_mime+1);$length=($start_file_size-$start_file_mime-1); # WAKTU FILE UPLOAD var $start_file_date=call strpos $haystack=$filelist;$needle=];$offset=0; var $file_date=call substr $val=$filelist;$start=($start_file_size+1);$length=($start_file_date-$start_file_size-1); # MODIF FILE DATE # TAHUN var $start_mod_year=call strpos $haystack=$file_date;$needle=-;$offset var $file_year=call substr $val=$file_date;$start=0;$length=$start_mod_year; # BULAN var $start_mod_month=call strripos $haystack=$file_date;$needle=-;$offset var $file_month=call substr $val=$file_date;$start=($start_mod_year+1);$length=($start_mod_month-$start_mod_year-1); # TANGGAL var $spasi=call chr $val=32 var $replace=call str_ireplace $subject=$file_date;$search=$spasi;$replace=#; var $start_mod_date=call strpos $haystack=$replace;$needle=#;$offset var $file_dates=call substr $val=$file_date;$start=($start_mod_month+1);$length=($start_mod_date-$start_mod_month-1); # WAKTU var $file_time=call substr $val=$file_date;$start=($start_mod_date+1);$length=5; # GET TIME FILE var $time=$file_time, $file_dates/$file_month/$file_year # SORTIR SOURCE if $file_mime==text/html var $source_doc=call source $file=$subpath$folder/$file_name;$html_safe=0; elseif $file_mime==text/plain var $source_doc=call source $file=$subpath$folder/$file_name;$html_safe=0; else var $source_doc=call source $file=$subpath$folder/desc/$file_name_base;$html_safe=0;$nl2br=1; endif # DESKRIPSI FILE TEXT var $start_desc=call strpos $haystack=$source_doc;$needle=DESC=;$offset var $end_desc=call strripos $haystack=$source_doc;$needle==DESC;$offset var $trial_description=call substr $val=$source_doc;$start=($start_desc+5);$length=($end_desc-$start_desc-5); var $trial_description=call str_ireplace $subject=$trial_description;$search=n//;$replace=
var $trial_description=call ucfirst $val=$trial_description # CEK DESCRIPTION KODE var $cek_description_start=call substr $val=$source_doc;$start=$start_desc;$length=5; var $cek_description_end=call substr $val=$source_doc;$start=$end_desc;$length=5; var $cek_description=$cek_description_start$cek_description_end # CEK DESC if $cek_description==DESC==DESC var $description=$trial_description endif # URL TAG TEXT var $start_urlfile=call strpos $haystack=$source_doc;$needle=URL=;$offset var $end_urlfile=call strripos $haystack=$source_doc;$needle==URL;$offset var $trial_urlfile=call substr $val=$source_doc;$start=($start_urlfile+4);$length=($end_urlfile-$start_urlfile-4); var $trial_urlfile=call str_ireplace $subject=$trial_urlfile;$search=http://;$replace=; var $trial_urlfile=call str_ireplace $subject=$trial_urlfile;$search=https://;$replace=; # CEK URL TAG var $cek_urlfile_start=call substr $val=$source_doc;$start=$start_urlfile;$length=4; var $cek_urlfile_end=call substr $val=$source_doc;$start=$end_urlfile;$length=4; var $cek_urlfile=$cek_urlfile_start$cek_urlfile_end var $dfold=call str_ireplace $subject=$folder;$search=/;$replace= var $trial_urlfile=[$dfold|$trial_urlfile@$file_name] var $compress=call base64_encode $val=$trial_urlfile var $compress=?get=$compress # CEK URL if $cek_urlfile==URL==URL var $urlfile=$compress else var $urlfile=http://xtgem.com/filebrowser/file_edit?file=$subpath$folder/$file_name endif # ORIGINAL SIZE var $start_ori=call strpos $haystack=$source_doc;$needle=ORI=;$offset=0; var $end_ori=call strripos $haystack=$source_doc;$needle==ORI;$offset=0; var $trial_ori_size=call substr $val=$source_doc;$start=($start_ori+4);$length=($end_ori-$start_ori-4); var $trial_ori_size=Ukuran asli: $trial_ori_size
# CEK SYNTAX ORI var $cek_ori_start=call substr $val=$source_doc;$start=$start_ori;$length=4; var $cek_ori_end=call substr $val=$source_doc;$start=$end_ori);$length=4; var $cek_ori_size=$cek_ori_start$cek_ori_end var $cek_anying=call str_ireplace $subject=$cek_ori_size;$search===;$replace=**; # GAK MAU MASUK ANYING TEH, +NGADAT :D # MAAF GK SOPAN, TAPI KESEL NJIIRR UDAH HAMPIR BERAPA HARI LAH UBEK'' SCRIPT DONLOD INI :3 if $cek_anying==ORI**ORI var $ori_size=$trial_ori_size endif #TITLE PART var $start_title=call strpos $haystack=$source_doc;$needle=TLP=;$offset=0; var $end_title=call strripos $haystack=$source_doc;$needle==TLP;$offset=0; var $trial_title_part=call substr $val=$source_doc;$start=($start_title+4);$length=($end_title-$start_title-4); # CEK SYNTAX TITLE PART var $cek_title_part_start=call substr $val=$source_doc;$start=$start_title;$length=4; var $cek_title_part_end=call substr $val=$source_doc;$start=$end_title;$length=4; var $cek_title_part=$cek_title_part_start$cek_title_part_end # CEK TITLE PART if $cek_title_part==TLP==TLP var $title_part=$trial_title_part endif # CARI EKTENSI DALAM DOC var $start_ektensi_text=call strpos $haystack=$source_doc;$needle=***;$offset=0; var $end_ektensi_text=call strripos $haystack=$source_doc;$needle=***;$offset=0; var $trial_ektensi_text=call substr $val=$source_doc;$start=($start_ektensi_text+3);$length=($end_ektensi_text-$start_ektensi_text-3); # CEK EKTENSI KODE var $cek_ektensi_text_start=call substr $val=$source_doc;$start=$start_ektensi_text;$length=3; var $cek_ektensi_text_end=call substr $val=$source_doc;$start=$end_ektensi_text;$length=3; var $cek_ektensi_text=$cek_ektensi_text_start$cek_ektensi_text_end # CEK EKTENSI if $cek_ektensi_text==****** var $ektensi=$trial_ektensi_text else var $ektensi=Tidak diketahui endif # FILE SIZE TEXT var $start_size=call strpos $haystack=$source_doc;$needle=SIZE=;$offset=0; var $end_size=call strripos $haystack=$source_doc;$needle==SIZE;$offset=0; var $trial_file_size_text=call substr $val=$source_doc;$start=($start_size+5);$length=($end_size-$start_size-5); # CEK SIZE KODE var $cek_size_start=call substr $val=$source_doc;$start=$start_size;$length=5; var $cek_size_end=call substr $val=$source_doc;$start=$end_size;$length=5; var $cek_size=$cek_size_start$cek_size_end # CEK SIZE if $cek_size==SIZE==SIZE var $file_size_text=$trial_file_size_text else var $file_size_text=Tidak diketahui endif # LINK FILE var $start_link=call strpos $haystack=$source_doc;$needle=F@;$offset=0; var $start_title_link=call strpos $haystack=$source_doc;$needle=#*#;$offset=0; var $end_link=call strripos $haystack=$source_doc;$needle=@F;$offset=0; var $urlink=call substr $val=$source_doc;$start=($start_link+2);$length=($start_title_link-$start_link-2); var $link_name=call substr $val=$source_doc;$start=($start_title_link+3);$length=($end_link-$start_title_link-3); var $urlink=call str_ireplace $subject=$urlink;$search=http://;$replace=; var $urlink=call str_ireplace $subject=$urlink;$search=https://;$replace=; var $urlink=[$dfold|$urlink@$file_name] var $compress=call base64_encode $val=$urlink var $filelink=$link_name # CEK URL KODE var $cek_file_start=call substr $val=$source_doc;$start=$start_link;$length=2; var $cek_file_end=call substr $val=$source_doc;$start=$start_title_link;$length=3; var $cek_file_link=$cek_file_start$cek_file_end var $cek_link_end=call substr $val=$source_doc;$start=$end_link;$length=2; var $cek_filelink=$cek_file_start$cek_file_end$cek_link_end if $cek_filelink==F@#*#@F var $file_link=$filelink else var $file_link=Salah tuh penulisannya bro.
Gunakan TAG: F@ #*# @F untuk menginput file importnya
CONTOH: F@link.com/file.zip#*#TUTORIAL@F
Perbaiki sekarang endif # PILIHAN JENIS FILE if $ektensi==zip var $file_extension=.$ektensi, application/x-compressed elseif $ektensi==rar var $file_extension=.$ektensi, application/rar elseif $ektensi==gzip var $file_extension=.$ektensi, application/x-gzip elseif $ektensi==tar var $file_extension=.$ektensi, application/x-tar elseif $ektensi==apk var $file_extension=.$ektensi, application/vnd.android.package-archive elseif $ektensi==sis var $file_extension=.$ektensi, application/vnd.symbian.install elseif $ektensi==sisx var $file_extension=.$ektensi, application/vnd.symbian.install elseif $ektensi==bin var $file_extension=.$ektensi, application/octet-stream elseif $ektensi==exe var $file_extension=.$ektensi, application/octet-stream elseif $ektensi==pdf var $file_extension=.$ektensi, application/pdf elseif $ektensi==mif var $file_extension=.$ektensi, application/x-frame elseif $ektensi==swf var $file_extension=.$ektensi, application/x-shockwave-flash elseif $ektensi==js var $file_extension=.$ektensi, application/x-javascript elseif $ektensi==aac var $file_extension=.$ektensi, audio/acc elseif $ektensi==txt var $file_extension=.$ektensi, text/plain elseif $ektensi==htm var $file_extension=.$ektensi, text/html elseif $ektensi==html var $file_extension=.$ektensi, text/html elseif $ektensi==mp3 var $file_extension=.$ektensi, audio/mpeg3 elseif $ektensi==mp4 var $file_extension=.$ektensi, video/mpeg4 elseif $ektensi==flv var $file_extension=.$ektensi, video/x-flv elseif $ektensi==mpe var $file_extension=.$ektensi, video/mpeg elseif $ektensi==mpeg var $file_extension=.$ektensi, video/mpeg elseif $ektensi==avi var $file_extension=.$ektensi, video/avi elseif $ektensi==jpg var $file_extension=.$ektensi, image/jpg elseif $ektensi==jpeg var $file_extension=.$ektensi, image/jpeg elseif $ektensi==gif var $file_extension=.$ektensi, image/gif elseif $ektensi==bmp var $file_extension=.$ektensi, image/x-windows-bmp elseif $ektensi==ico var $file_extension=.$ektensi, image/x-icon else var $file_extension=$ektensi endif # SORTIR FILE IMPORT FILE PART DAN FILE ASLI if $file_ektensi==imp var $action_link=$urlfile var $file_info_type=$file_extension var $file_info_size=$file_size_text var $file_description=$description elseif $file_ektensi==part var $action_link=#download var $file_info_type=$file_extension var $file_info_size=$file_size_text var $file_description=$description else var $action_link=$subpath$folder/$file_name?xt_download=1 var $file_info_type=.$file_ektensi, $file_mime var $file_info_size=$file_size var $file_description=$source_doc endif # FILE BASE PARSED var $filelist_parsed= var $start_parsed=call strpos $haystack=$filelist_parsed;$needle=#;$offset=0; var $file_name_base_parsed=call substr $val=$filelist_parsed;$start=0;$length=$start_parsed; var $cek_folder=call strlen $val=$sub_folder var $cek_sub=call strlen $val=$sub var $cek_file=call strlen $val=$file var $cek_myfiles=call strlen $val=$file_name_base var $repl_sub=sub=$sub_folder var $repl_file=file=$file_name_base var $srch_sub=sub=$sub var $srch_file=file=$file var $get_urlpg=http://dhe-ond.wap.sh/download.php?ct=Aplikasi Android&file=gta v.1.6 var $get_sub=call str_ireplace $subject=$get_urlpg;$search=$srch_sub;$replace=$repl_sub; var $get_url_ori=call str_ireplace $subject=$get_sub;$search=$srch_file;$replace=$repl_file; if $cek_sub < $cek_folder var $wrongct=yang ber-kategori $folder_base endif if $cek_file < $cek_myfiles var $wrongfl=dengan file yang bernama $file_name_base_parsed endif if $cek_file < $cek_myfiles var $meaning=
Mungkin file yang dimaksud adalah $file_name_base_parsed $wrongct
elseif $cek_sub < $cek_folder var $meaning=
Mungkin kategori yang dimaksud adalah $folder_base $wrongfl
endif print $meaning print {{ $header
Download
Nama: $file_name_base_parsed
Jenis: $file_info_type
Ukuran: $file_info_size
$ori_size Kategori: $folder_base
Diterbitkan pada: $time
download
}} var $cek_thumb=call source $file=$subpath$folder/image/$file_name_base.png;$html_safe=0; if $cek_thumb var $imgthumb= else var $imgthumb= endif print {{
}} if $file_link var $file_link_text=$file_link
endif if $title_part var $title_part_text=$title_part
endif if $file_ektensi==part print {{
$imgthumb
$file_name_base_parsed
Unduh
$file_link_text $title_part_text }} else print
print
endif # PART LINK LOOPING var $up=1 @part var $start_link_part=call strpos $haystack=$source_doc;$needle=PL#;$offset=$set_part; var $start_title_link_part=call strpos $haystack=$source_doc;$needle=#@#;$offset=$set_part; var $end_link_part=call strpos $haystack=$source_doc;$needle=#PL;$offset=$set_part; var $urlink_part=call substr $val=$source_doc;$start=($start_link_part+3);$length=($start_title_link_part-$start_link_part-3); var $urlink_part=call str_ireplace $subject=$urlink_part;$search=http://;$replace=; var $urlink_part=call str_ireplace $subject=$urlink_part;$search=https://;$replace=; var $link_part_name=call substr $val=$source_doc;$start=($start_title_link_part+3);$length=($end_link_part-$start_title_link_part-3); var $compress_part=call base64_encode $val=[$dfold|$urlink_part@$file_name] var $filelink_part=$link_part_name if $file_ektensi==part print $filelink_part endif var $set_part=call strpos $haystack=$source_doc;$needle=PL#;$offset=($start_link_part+2); var $up=($up+1) if $set_part > 0 goto @part endif if $file_ektensi==part print
endif var $urlpg=http://dhe-ond.wap.sh/download.php?ct=Aplikasi Android&file=gta v.1.6 var $urlpg=call str_ireplace $subject=$urlpg;$search=&view_image=$view_image;$replace=; var $temp= var $temp=call htmlspecialchars $val=$temp var $imgshots= if $file_description print {{ Deskripsi:
$file_description
}} endif var $urlpg=call str_ireplace $subject=$urlpg;$search=&view_image=$view_image;$replace=; var $get_img=call hex2bin $val=$view_image var $cek_img_fol=call source $file=$subpath$folder/image/$get_img;$html_safe=0; if $cek_img_fol var $pre_img=
else var $pre_img=
MAAF, gambar tidak tersedia. :(

endif if $view_image var $preview_img=$pre_img endif if $imgshots print {{ Screenshot:
$preview_img }} endif @looping var $start_name=call strpos $haystack=$imgshots;$needle=[;$offset=$set; var $start_img=call strpos $haystack=$imgshots;$needle=|;$offset=$set; var $name_img=call substr $val=$imgshots;$start=($start_name+1);$length=($start_img-$start_name-1); var $end_img=call strpos $haystack=$imgshots;$needle=];$offset=$set; var $imgs_thumb=call substr $val=$imgshots;$start=($start_img+1);$length=($end_img-$start_img-1); var $imgs=call bin2hex $val=$name_img if $imgshots print $imgs_thumb endif var $set=call strpos $haystack=$imgshots;$needle=[;$offset=($set+2); if $set > 0 goto @looping endif if $imgshots print
endif print print $footer goto @end @get_files var $uncompress=call base64_decode $val=$get var $start_folder=call strpos $haystack=$uncompress;$needle=[;$offset=0; var $end_folder=call strpos $haystack=$uncompress;$needle=|;$offset=0; var $start_file=call strripos $haystack=$uncompress;$needle=@;$offset=0; var $end_link=call strripos $haystack=$uncompress;$needle=];$offset=0; var $folder=call substr $val=$uncompress;$start=($start_folder+1);$length=($end_folder-1); var $file=call substr $val=$uncompress;$start=($start_file+1);$length=($end_link-$start_file-1); var $url=call substr $val=$uncompress;$start=($end_folder+1);$length=($start_file-$end_folder-1); var $get_url_js= var $get_url_meta= var $hide=
 Wapblogku 
Dheond

CPU Load: %/detik | Hits: 1/1019

XtGem Forum catalog
var $error=
    Terjadi kesalahan!
File tidak ditemukan. $hide var $note= Jika Anda tidak di alihkan. Pergi ke: http://$url var $redirect=$hide $get_url_js $get_url_meta $note if $folder var $fine=$folder else var $fine=404DHEOND endif var $cek_folder= var $folder =$subpath/$cek_folder if $file var $sip=$file else var $sip=404DHEOND endif var $cek_file= if $cek_file print $redirect else print $error endif @end @ending