编程C,C ++,Java,PHP,Ruby,图灵,VB
计算机科学加拿大 
编程C,C ++,Java,PHP,Ruby,图灵,VB  

用户名:   Password: 
 登记登记   
 [来源]高分阶级
指数 -> 编程,图灵 -> 提交意见书
查看上3d中奖规则主题 可打印的版本下载主题利率主题订阅本主题私人信息刷新页面 查看下3d中奖规则主题
作者 信息
[Gandalf]




邮政发布: 星期四2016年3月16日8:39 PM  帖子主题:[源]高分课程

每个好的游戏都需要高分,所以这里是一种实现它们的快速简便。

设置了该类,以便只有3d中奖规则I / O流打开。这有点凌乱,但应该没有错误。如果玩家名称中有3d中奖规则空间,它将用下划线替换,如果得分文件不存在,则创建3d中奖规则新的文件等。此外,如果您绑定了以前的高分,则您的速度将在下面之下。

源文件附带类,以及如何使用它的示例。随意使用和修改代码,只需将其作为您自己。 眨眼



updscoreclass.t.
 Description:
易于使用的高分课程。

下载
 Filename:  HighScoreClass.t
 Filesize:  2.71 KB
 Downloaded:  173 Time(s)

赞助
赞助
赞助
赞助
德洛斯




邮政发布: 2006年3月18日星期六11:54 PM  帖子主题:(没有主题)

出于一致性,为什么不将下划线重新转换为在翻译时到空格。此外,您需要3d中奖规则函数来返回高分阵列的内容,因为不是每个人都想要使用 输出数据。否则不会太糟糕。我曾经看过你是否可以使用递归来重新创建您的空格来强调FCN。我几乎是积极的。
Globetrotter.




邮政发布: 孙3月19日,2006年12:21 AM  帖子主题:(没有主题)

它可以常用递归来完成。这是3d中奖规则我在今天为另3d中奖规则项目编写的函数。虽然它在VB6中,但代码仍然是相关的

代码:

公共功能reployInstring.(valy strinppt作为字符串,byval strfind作为字符串,可选的byval stryplace作为string ="")
   将昏暗的strresult作为字符串
   暗淡的lewherringfound很久
   暗淡llengthInput长
   
   
    lLengthInput = Len(strInput)
   
    If lLengthInput > 0 Then
       lwherrestringfound = instr.(strInput, strFind)
       如果lwherestringfound = 0那么
           strresult = strinput.
        Else
            strResult = Mid(Strinput,1,Lwherrestringfound - 1)
           Strresult = strresult.& strReplace
           Strresult = strresult.& Mid(Strinput,LwherrestringFound + Len(strFind))
           
           strresult = repumbinstring.(Stresult,Strfind,Streplace) 'Some recursion
        End If
    End If
   
   replaceInstring = strresult.
结束功能


打印replaceInstring.("test_123", "_", " ")
[Gandalf]




邮政发布: 孙3月19日,2006年1:24 AM  帖子主题:(没有主题)

是的,这是我的版本:
代码:
/ ***
 *使用索引递归检查并替换字符串函数中的字母().
 */

FCN替换器(letR, letN, words : string) : string
    var i : int := index (words, letR)
    if i ~= 0 then
       结果替换器(letR, letN, words (1 .. i - 1) + letN + words (i + 1 .. *))
    end if
    result words
最终替换器

/ ***
 *递归检查并在没有索引的情况下替换字符串功能中的字母().
 *将字符串上的第3d中奖规则索引作为参数(notably, 1).
 */
FCN ReploadEltetters2.(letR, letN, words : string, i : int) : string
    if i <= length (words) & words (i) = letR then
       结果替换器2(letR, letN, words (1 .. i - 1) + letN + words (i + 1 .. *), i + 1)
    elsif i <= length (words) then
       结果替换器2(Letr,Letn,Lord,I + 1)
    end if
    result words
最终替换器2


德洛斯,我将在明天添加其余的建议,除了返回高分辨率阵列的函数,因为这将要求我创建3d中奖规则玩家Data类型,以便有意义。如果您不想使用 要输出高分,可以简单地简单地更改过程(添加font.draws以及您想要的任何内容)。

*编辑*固定代码以使用要替换字母的任何组合。
[Gandalf]




邮政发布: 孙3月19日,2006年2:33 AM  帖子主题:(没有主题)

更新。

一些改进包括:
- 您现在可以指定InitsCoreFile程序中的高分内容中的元素量。
-underscores消失了,替换为您的原始输入,替换为空格。
为所有功能添加了评价。
-Recurnive替换器功能。 微笑
塞万提斯




邮政发布: 孙3月19日,2006年9:20 AM  帖子主题:(没有主题)

[Gandalf]写道:

代码:
/ ***
 *使用索引递归检查并替换字符串函数中的字母().
 */

FCN替换器(letR, letN, words : string) : string
    var i : int := index (words, letR)
    if i ~= 0 then
       结果替换器(letR, letN, words (1 .. i - 1) + letN + words (i + 1 .. *))
    end if
    result words
最终替换器

/ ***
 *递归检查并在没有索引的情况下替换字符串功能中的字母().
 *将字符串上的第3d中奖规则索引作为参数(notably, 1).
 */
FCN ReploadEltetters2.(letR, letN, words : string, i : int) : string
    if i <= length (words) & words (i) = letR then
       结果替换器2(letR, letN, words (1 .. i - 1) + letN + words (i + 1 .. *), i + 1)
    elsif i <= length (words) then
       结果替换器2(Letr,Letn,Lord,I + 1)
    end if
    result words
最终替换器2


我当然希望你使用第二个。第3d中奖规则远远低于每个角色的标准迭代。

对于第二个,为什么我们必须运行并比较两次长度函数?
代码:

FCN ReploadEltetters2.(letR, letN, words : string, i : int) : string
    if i <= length (words) then
        if words (i) = letR then
           结果替换器2(letR, letN, words (1 .. i - 1) + letN + words (i + 1 .. *), i + 1)
        else
           结果替换器2(Letr,Letn,Lord,I + 1)
        end if
    end if
    result words
最终替换器2

眨眼
德洛斯




邮政发布: 孙3月19日,2006年10:19 AM  帖子主题:(没有主题)

所以你不想返回数组呃?那么你怎么返回所述阵列的元素?您有几个选项:
- 几个单独的fcns,每个speate fcns都会返回玩家_name和player_score之一(针对指定的索引)
- 返回PlayerData的单个FCN(再次为指定的索引)
- 单个fcn返回单个player_name,delimiter,player_score(针对指定的索引)

这需要辅助FCN返回所讨论的数组的上限。为什么upper()可以做到这一点的单独fcn?我们希望保持高分阵列的私密,并以“只读”时尚......(我现在忘记了关键字,有人填写我?)

编辑:做了3d中奖规则快速背景检查,发现我指的是什么:
代码:

班级myclass.
  export main, cat

  var cat : string := "Aww, so cute!"

  proc main
    put cat
  end main
结束myclass.

var测试: ^ MyClass
新的myClass,测试

放测试 - > cat
测试 -> main
测试 -> cat := "Not a dog"  %**
测试 -> main

运行那个,你会在**抛出错误。图灵告诉您“CAT”没有资格改变,处于只读状态。遗憾的是,它不是!

顺便说一句:我知道你知道这一切,评论只是因为那些通过这个线程读的人试图了解更多关于课程的人
从上3d中奖规则显示帖子:   
   指数 -> 编程,图灵 -> 提交意见书
查看上3d中奖规则主题 告诉3d中奖规则朋友可打印的版本下载主题利率主题订阅本主题私人信息刷新页面 查看下3d中奖规则主题

11  [ 7 Posts ]
跳到:   


Style:  
搜索: