仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 926|回复: 18
打印 上一主题 下一主题

[学习教程] PHP网站制作之利用php从头完成PHP剧本引擎内置函数

[复制链接]
莫相离 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-2-4 00:09:57 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
基础这个东西,有人问学php需要任何基础不?函数|剧本   其实无聊,突发奇想,想把PHP外面局部已供应封装好的函数从头利用PHP完成一遍,

// 其实无聊,突发奇想,想把PHP外面局部已供应封装好的函数从头利用PHP完成一遍,
// 因而便有了上面的代码次要完成了PHP中局部字符串处置函数,同时完成了一些PHP中
// 没有,然而一样有感化的字符串处置函数一样的这些函数,也可以利用其他言语来实  
// 现,好比用C/VBScript/Perl等等,那末你就可以够有一个本人的函数库.              
// 以下函数纷歧定可以胜利运转,只是为了进修罢了。                             
//                                                                           
// 假如无出格声明,全体是因为heiyeluren原创,要利用任何函数都请保存作者信息   


/**
* String Functions Reconstruct
*
* Copyright (c) 2005 heiyeluren <heiyeluren@163.com>
* Author: heiyeluren <heiyeluren@163.com>
* $Id: StringFunctions.php,v 0.1 e 2005-5-29 23:21 heiyeluren Exp $
**/

// {{{ strlen()
/**
* Count string length
*
* @param string $str need count length string variable
* @return int    return count result
* @version v0.1
* @create 2005-5-24
* @modified 2005-5-24
* @author heiyeluren <hyeiyeluren@163.com>
*/
function strlen1($str)
{
if ($str == '')
  return 0;

$count = 0;
while (1)
{
  if ($str[$count] != NULL)
  {
   $count++;
   continue;
  }
  else
   break;
}
return $count;
}
// }}}

// {{{ substr()
/**
* Get sub string
*
* @param string $str need get sub string variable
* @param int  $start start get sub string
* @param int  $length need get string length
* @return string   return sub string
* @version v0.2
* @create 2005-5-24
* @modified 2005-5-25
* @author heiyeluren <hyeiyeluren@163.com>
*/
function substr1($str, $start, $length=0)
{
if ($str == '')
  return;
if ($start > strlen($str))
  return;
if (($length != NULL) && ($start > 0) && ($length > strlen($str)-$start))
  return;
if (($length != NULL) && ($start < 0) && ($length > strlen($str)+$start))
  return;
if ($length == NULL)
  $length = (strlen($str) - $start);

if ($start < 0)
{
  for ($i=(strlen($str)+$start); $i<(strlen($str)+$start+$length); $i++)
  {
   $substr .= $str[$i];
  }
}
if ($length > 0)
{
  for ($i=$start; $i<($start+$length); $i++)
  {
   $substr .= $str[$i];
  }
}
if ($length < 0)
{
  for ($i=$start; $i<(strlen($str)+$length); $i++)
  {
   $substr .= $str[$i];
  }
}
return $substr;
}
// }}}

// {{{ strrev()
/**
* Reversal string order
*
* @param string $str need reversal string variable
* @return string   reversal string
* @version v0.1
* @create 2005-5-24
* @modified 2005-5-24
* @author heiyeluren <hyeiyeluren@163.com>
*/
function strrev1($str)
{
if ($str == '')
  return 0;
for ($i=(strlen($str)-1); $i>=0; $i--)
{
  $rev_str .= $str[$i];
}
return $rev_str;
}
// }}}

// {{{ strcmp()
/**
* String comparison
*
* @param string $s1 first string
* @param string $s2 second string
* @return int  return -1,str1 < str2; return 1, str1 > str2, str1 = str2,
*    return 0, other, return false
* @version v0.1
* @create 2005-5-24
* @modified 2005-5-24
* @author heiyeluren <hyeiyeluren@163.com>
*/
function strcmp1($s1, $s2)
{
if (strlen($s1) < strlen($s2))
  return -1;
if (strlen($s1) > strlen($s2))
  return 1;
for ($i=0; $i<strlen($s1); $i++)
{
  if ($s1[$i] == $s2[$i])
   continue;
  else
   return false;
}
return 0;
}
// }}}

// {{{ strchr(), strstr(), strpos()
/**
* Find first occurrence of a string
*
* @param string $str parent string
* @param string $substr need match sub string
* @return int  return find sub string at parent string first place,
*    f not find, return false
* @version v0.4
* @create 2005-5-24
* @modified 2005-5-29
* @author heiyeluren <hyeiyeluren@163.com>
*/
function strchr1($str, $substr)
{
$m = strlen($str);
$n = strlen($substr);
if ($m < $n)
  return false;
for ($i=0; $i<=($m-$n+1); $i++)
{
  $sub = substr($str, $i, $n);
  if (strcmp($sub, $substr) == 0)
   return $i;
}
return false;
}
// }}}

// {{{ str_replace()
/**
* WordStr all occurrences of the search string with the replacement string
*
* @param string $substr  need replace sub string variable
* @param string $newsubstr new sub string
* @param string $str  operate parent string
* @return string   return replace after new parent string
* @version v0.2
* @create 2005-5-24
* @modified 2005-5-29
* @author heiyeluren <hyeiyeluren@163.com>
*/
function str_replace1($substr, $newsubstr, $str)
{
$m = strlen($str);
$n = strlen($substr);
$x = strlen($newsubstr);
if (strchr($str, $substr) == false)
  return false;
for ($i=0; $i<=($m-$n+1); $i++)
{
  $i = strchr($str, $substr);
  $str = str_delete($str, $i, $n);
  $str = str_insert($str, $i, $newstr);
}
return $str;
}
// }}}

/************ 以下串处置函数是PHP中没有的,本人写着玩 ***************/
// {{{ insert_str(), delete_str(), index_str()
/**
* Basic string operate
*
* @param string $str need get sub string variable
* @param int  $start start get sub string
* @param int  $length need get string length
* @return string  return sub string
* @version v0.1
* @create 2005-5-24
* @modified 2005-5-24
* @author heiyeluren <hyeiyeluren@163.com>
*/
function str_insert($str, $i, $substr)
{
for($j=0; $j<$i; $j++)
{
  $startstr .= $str[$j];
}
for ($j=$i; $j<strlen($str); $j++)
{
  $laststr .= $str[$j];
}
$str = ($startstr . $substr . $laststr);

return $str;
}

function str_delete($str, $i, $j)
{
for ($c=0; $c<$i; $c++)
{
  $startstr .= $str[$c];
}
for ($c=($i+$j); $c<strlen($str); $c++)
{
  $laststr .= $str[$c];
}
$str = ($startstr . $laststr);
return $str;
}
// }}}

// {{{ strcpy()
/**
* Use designate sub string  replace string
*
* @param string $str need get sub string variable
* @param int  $start start get sub string
* @param int  $length need get string length
* @return string  return sub string
* @version v0.1
* @create 2005-5-27
* @modified 2005-5-27
* @author heiyeluren <hyeiyeluren@163.com>
*/
function strcpy($s1, $s2)
{
if (strlen($s1) == NULL)
  return;
if (!isset($s2))
  return;
for ($i=0; $i<strlen($s1); $i++)
{
  $s2[] = $s1[$i];
}
return $s2;
}
// }}}

// {{{ strcat()
/**
* Use designate sub string  replace string
*
* @param string $str need get sub string variable
* @param int  $start start get sub string
* @param int  $length need get string length
* @return string  return sub string
* @version v0.1
* @create 2005-5-27
* @modified 2005-5-27
* @author  heiyeluren <hyeiyeluren@163.com>
*/
function strcat($s1, $s2)
{
if (!isset($s1))
  return;
if (!isset($s2))
  return;
$newstr = $s1 . $s2;
return $newsstr;
}
// }}}

// {{{ php_encode(), php_decode()
/**
* Simple string encode/decode function
*
* @param string $str need code/encode string variable
* @return string  code/encode after string
* @version v0.2
* @create 2005-3-11
* @modified 2005-5-24
* @author heiyeluren <hyeiyeluren@163.com>
*/
/* String encode function */
function php_encode($str)
{
if ($str=='' && strlen($str)>128)
  return false;
for($i=0; $i<strlen($str); $i++)
{
  $c = ord($str[$i]);
  if ($c>31 && $c<107)
   $c += 20;
  if ($c>106 && $c<127)
   $c -= 75;
  $word = chr($c);
  $s .= $word;
}
return $s;
}

/* String decode function */
function php_decode($str)
{
if ($str=='' && strlen($str)>128)
  return false;
for($i=0; $i<strlen($str); $i++)
{
  $c = ord($word);
  if ($c>106 && $c<127)
   $c = $c-20;
  if ($c>31 && $c<107)
   $c = $c+75;
  $word = chr($c);
  $s .= $word;
}
return $s;
}
// }}}

// {{{ php_encrypt(), php_decrypt()
/**
* Simple string encrypt/decrypt function
*
* @param string $str need crypt string variable
* @return string  encrypt/decrypt after string
* @version v0.1
* @create 2005-5-27
* @modified 2005-5-29
* @author heiyeluren <hyeiyeluren@163.com>
*/
/* define crypt key */
$encrypt_key = 'abcdefghijklmnopqrstuvwxyz1234567890';
$decrypt_key = 'ngzqtcobmuhelkpdawxfyivrsj2468021359';
/* String encrypt function */
function php_encrypt($str)
{
global $encrypt_key, $decrypt_key;
if (strlen($str) == 0)
  return false;
for ($i=0; $i<strlen($str); $i++)
{
  for ($j=0; $j<strlen($encrypt_key); $j++)
  {
   if ($str[$i] == $encrypt_key[$j])
   {
    $enstr .= $decrypt_key[$j];
    break;
   }
  }
}
return $enstr;
}

/* String decrypt function */
function php_decrypt($str)
{
global $encrypt_key, $decrypt_key;
if (strlen($str) == 0)
  return false;
for ($i=0; $i<strlen($str); $i++)
{
  for ($j=0; $j<strlen($decrypt_key); $j++)
  {
   if ($str[$i] == $decrypt_key[$j])
   {
    $enstr .= $encrypt_key[$j];
    break;
   }
  }
}
return $enstr;
}
// }}}

假如代码不明晰的话,建议检查一下毗连,是我在blogchina的博客:
http://heiyeluren.blogchina.com/1741318.html


通过这段时间的学习实践,对软件开发有了更多新的认识,不在局限于之前的片面性。当然,现在所学到的东西其实并不多,离当一个真正的程序员,还有很大的差距。
分手快乐 该用户已被删除
沙发
发表于 2015-2-4 09:44:53 | 只看该作者
对于懒惰的朋友,我推荐php的集成环境xampp或者是wamp。这两个软件安装方便,使用简单。但是我还是强烈建议自己动手搭建开发环境。
海妖 该用户已被删除
板凳
发表于 2015-2-5 05:17:28 | 只看该作者
我还是推荐用firefox ,配上firebug 插件调试js能省下不受时间。谷歌的浏览器最好也不少用,因为谷歌的大侠们实在是太天才啦,把一些原来的js代码加了一些特效。
再见西城 该用户已被删除
地板
发表于 2015-2-11 05:06:51 | 只看该作者
如果你已经到这种程度了,那么你已经可以做我的老师了。其实php也分很多的区域,
乐观 该用户已被删除
5#
发表于 2015-2-16 09:20:55 | 只看该作者
对于初学者来说不推荐去拿钱买的。当然如果一个网站你经常去用,而且里面的资料也比较有用,最好还是买个会员比较好,毕竟那些也是别人的工作成果。
金色的骷髅 该用户已被删除
6#
发表于 2015-2-28 11:15:23 | 只看该作者
要进行开发,搭建环境是首先需要做的事,windows下面我习惯把环境那个安装在C盘下面,因为我配的环境经常出现诡异事件,什么事都没做环境有的时候就不能用啦。
不帅 该用户已被删除
7#
发表于 2015-3-9 22:46:01 | 只看该作者
Apache不是非得用80或者8080端口的,我刚开始安得时候就是80端口老占用,就用了个 81端口,结果照常,就是输localhost的时候,应该输入为 localhost:81
若天明 该用户已被删除
8#
发表于 2015-3-17 02:11:20 | 只看该作者
要进行开发,搭建环境是首先需要做的事,windows下面我习惯把环境那个安装在C盘下面,因为我配的环境经常出现诡异事件,什么事都没做环境有的时候就不能用啦。
小妖女 该用户已被删除
9#
发表于 2015-3-23 16:17:48 | 只看该作者
爱上php,他也会爱上你。
兰色精灵 该用户已被删除
10#
发表于 2015-3-23 21:47:14 | 只看该作者
这些中手常用的知识,当你把我说的这些关键字都可以熟练运用的时候,你可以选择自己
冷月葬花魂 该用户已被删除
11#
发表于 2015-3-26 19:48:51 | 只看该作者
首推的搜索引擎当然是Google大神,其次我比较喜欢 百度知道。不过搜出来的结果往往都是 大家copy来copy去的,运气的的概率很大。
admin 该用户已被删除
12#
发表于 2015-4-6 09:04:34 | 只看该作者
先学习php和mysql,还有css(html语言很简单)我认为现在的效果比以前的方法好。
愤怒的大鸟 该用户已被删除
13#
发表于 2015-4-7 13:11:37 | 只看该作者
php是动态网站开发的优秀语言,在学习的时候万万不能冒进。在系统的学习前,我认为不应该只是追求实现某种效果,因为即使你复制他人的代码调试成功,实现了你所期望的效果,你也不了解其中的原理。
14#
发表于 2015-4-15 21:51:48 | 只看该作者
如果你可以写完像留言板这样的程序,那么你可以去一些别人的代码了,
飘飘悠悠 该用户已被删除
15#
发表于 2015-4-19 15:54:01 | 只看该作者
首推的搜索引擎当然是Google大神,其次我比较喜欢 百度知道。不过搜出来的结果往往都是 大家copy来copy去的,运气的的概率很大。
简单生活 该用户已被删除
16#
发表于 2015-4-22 20:15:41 | 只看该作者
写的比较杂,因为我也是个新手,不当至于大家多多指正。
再现理想 该用户已被删除
17#
发表于 2015-4-26 21:09:42 | 只看该作者
写js我最烦的就是 ie 和 firefox下同样的代码 结果显示的结果千差万别,还是就是最好不要用遨游去调试,因为有时候遨游是禁用js的,有可能代码是争取结果被遨游折腾的认为是代码写错。
蒙在股里 该用户已被删除
18#
发表于 2015-5-12 08:10:30 | 只看该作者
其实也不算什么什么心得,在各位大侠算是小巫见大巫了吧,望大家不要见笑,若其中有错误的地方请各位大虾斧正。
老尸 该用户已被删除
19#
发表于 2015-6-24 22:11:54 | 只看该作者
基础有没有对学习php没有太大区别,关键是兴趣。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-9-21 03:24

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表