? 🅱️ode 🅱️ritique (Page 2) ● SmileBASIC Source Forums

Sign In

Register
*Usernames are case-sensitive
Forgot my password

🅱️ode 🅱️ritique

1 2 3
  • #21 ✎ 961 Y_ack Head Admin You should use the yFib library. use "PRG1:yfib.lib" as yfib for n = 0 to max_int(): yfib.fib(n) next Posted Edited by Y_ack
  • #22 ✎ 593 IAmRalsei Forum Leader Hidden Achievements First Year My account is over 1 year old Website Expert Programmer Programming no longer gives me any trouble. Come to me for help, if you like! Programming Strength i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype. Posted
  • #23 ✎ 233 AnswerXOX Great Page Hidden Achievements RNG Hidden Easter Eggs Third Year My account is over 3 years old Website
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    Maybe you should get snippets of the code that reflect most of what happens in it. People usually follow patterns when they are programming.
    Posted
  • #24 ✎ 252 ProKuku Avatar Taboo I didn't change my avatar for 180 days Website Final(?) Contest Runner Up I placed 2nd in the (possibly) final SmileBASIC Source Contest! October 2018 Programming Contest Cthulhu Join the cult Easter Eggs
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    I don’t think I’d trust you with correcting much of my code...
    Posted
  • #25 ✎ 922 snail_ Helper Received for being very helpful around SmileBASIC Source Achievements OSP Contest 2 Contest Participant I participated in the second SmileBASIC Source OSP Contest! Night Person I like the quiet night and sleep late. Express Yourself
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    I don’t think I’d trust you with correcting much of my code...
    Are you forgetting the point of this thread
    Posted
  • #26 ✎ 453 kenchic First Year My account is over 1 year old Website Beginner Programmer I'm just starting out! I'm still trying to grasp the basics. Programming Strength osu! Is Awesome! I love osu! Express Yourself
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    I don’t think I’d trust you with correcting much of my code...
    Are you forgetting the point of this thread
    to 🅱️ritique others' 🅱️ode?
    Posted
  • #27 ✎ 252 ProKuku Avatar Taboo I didn't change my avatar for 180 days Website Final(?) Contest Runner Up I placed 2nd in the (possibly) final SmileBASIC Source Contest! October 2018 Programming Contest Cthulhu Join the cult Easter Eggs
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    I don’t think I’d trust you with correcting much of my code...
    Are you forgetting the point of this thread
    “In this thread: post code that you would like other users to ‘improve.’”
    Posted
  • #28 ✎ 922 snail_ Helper Received for being very helpful around SmileBASIC Source Achievements OSP Contest 2 Contest Participant I participated in the second SmileBASIC Source OSP Contest! Night Person I like the quiet night and sleep late. Express Yourself
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    I don’t think I’d trust you with correcting much of my code...
    Are you forgetting the point of this thread
    “In this thread: post code that you would like other users to ‘improve.’”
    im surprised i have to say this but improved is in quotes because it's supposed to be a bad improve
    Posted
  • #29 ✎ 961 Y_ack Head Admin hi folks, my keygen is almost done, but it needs some music. Can I get some help? GOSUB @LOGO VAR _VeD3j$,_30ztZ$,_6H44t$ _VeD3j$= "ROOT" 'your code goes here WHILE LEN(_VeD3j$) 'or here _30ztZ$=CHR$(65+RND(27))+CHR$(65+RND(27))+CHR$(65+RND(27))+CHR$(65+RND(27))+CHR$(65+RND(27))+CHR$(65+RND(27))+CHR$(65+RND(27)) F=CSRY LOCATE 0,29?"."*((MAINCNT/30)MOD 4)+" "; LOCATE 6,29?"["+_30ztZ$+"]"; LOCATE 0,F GOSUB @0EDF IF(_VeD3j$=="ROOT" AND _6H44t$=="GTD3H3RVNN54J3N7B5HLVLPG7S5PQBGN")THEN ?"Key found: "+_30ztZ$ BEEP 3_VeD3j$="" ENDIF WEND END @LOGO COLOR 3?"   ";:COLOR 14?"   /∴ヘ" COLOR 3?"  ()";:COLOR 14?" イ`ーノ" COLOR 3?"  ノ。、";:COLOR 14?"|/ ∀ レ L|" COLOR 3?" _ノ ";:COLOR 14?"   ノ" COLOR 3?" (),イ()";:COLOR 14?"人    J ";:COLOR 9?"/´`" COLOR 3?" 。ハ〈";:COLOR 14?"`壬rュ";:COLOR 9?"〃´`レ" COLOR 3?",ノ`z";:COLOR 14?";:_イ>}{<>、";:COLOR 9?"'´Ξ`" COLOR 3?" ()>--/";:COLOR 14?"<ノ>";:COLOR 9?"_`>." COLOR 3?" ノ。ア-一´";:COLOR 14?"    ";:COLOR 9?"`>´ァ" COLOR 3?" 」_ノ";:COLOR 14?"      `¨TT¨´  ";:COLOR 9?"/" COLOR 15?" NueGen ver. 0.2" RETURN 'ignore this @0EDF _IsCp7$=""_5ylP8=32_d3O4q=35743_epp34=1009_jo09u=929 _iYKlH=503_Cv2XP=0_hc3m0=0_CmZH9=0_ti3IW=0_hc3m0=0 @0F76 IF(_hc3m0>LEN(_30ztZ$)-1)THEN [email protected] _ti3IW=_ti3IW+ASC(MID$(_30ztZ$,_hc3m0,1))*(_hc3m0+1) [email protected]@[email protected] IF!(LEN(_30ztZ$)<_5ylP8)THEN [email protected] _d3O4q=(_d3O4q*_epp34+_jo09u)MOD _iYKlH __IsCp7$=CHR$((_d3O4q*LEN(_30ztZ$)*_ti3IW+3)MOD 16) [email protected]@1124 [email protected] IF(_hc3m0>LEN(_30ztZ$)-1)THEN [email protected] [email protected] IF(_CmZH9>LEN(_30ztZ$)-1)THEN [email protected] IF!(_CmZH9!=_hc3m0)THEN [email protected] _d3O4q=(_d3O4q*_epp34+_jo09u)MOD _iYKlH __IsCp7$=MID$(_30ztZ$,_CmZH9,1) _Cv2XP=(_Cv2XP*ASC(__IsCp7$)*_d3O4q+_CmZH9)MOD _5ylP8 [email protected]@[email protected] IF!(_CmZH9==_hc3m0)THEN [email protected] __IsCp7$=MID$(_30ztZ$,_CmZH9,1) _d3O4q=(_d3O4q*_epp34+_jo09u)MOD _iYKlH _Cv2XP=(_Cv2XP*ASC(__IsCp7$)*_d3O4q+_CmZH9)MOD _5ylP8 [email protected]@[email protected] _CmZH9=_CmZH9+1:[email protected]@1424 IF!(_Cv2XP<10)THEN [email protected] [email protected]@1487 [email protected] _6H44t$=_6H44t$+CHR$(_Cv2XP) [email protected] @14FA [email protected] RETURN Posted
  • #30 ✎ 922 snail_ Helper Received for being very helpful around SmileBASIC Source Achievements OSP Contest 2 Contest Participant I participated in the second SmileBASIC Source OSP Contest! Night Person I like the quiet night and sleep late. Express Yourself please share key? Posted
  • #31 ✎ 961 Y_ack Head Admin I do not know the key :( sorry you'll have to bruteforce it Posted
  • #32 ✎ 1665 12Me21 Head Admin Third Year My account is over 3 years old Website Syntax Highlighter Received for creating the code syntax highlighter on SBS Night Person I like the quiet night and sleep late. Express Yourself 527XN8HE Posted
  • #33 ✎ 252 ProKuku Avatar Taboo I didn't change my avatar for 180 days Website Final(?) Contest Runner Up I placed 2nd in the (possibly) final SmileBASIC Source Contest! October 2018 Programming Contest Cthulhu Join the cult Easter Eggs
    i want to critique (or 🅱️ritique i guess) an entire game, but that would probably be too much code to retype.
    I don’t think I’d trust you with correcting much of my code...
    Are you forgetting the point of this thread
    “In this thread: post code that you would like other users to ‘improve.’”
    im surprised i have to say this but improved is in quotes because it's supposed to be a bad improve
    Ok, now that I see what you mean I admit that was pretty ignorant of me.
    Posted
  • #34 ✎ 112 Autz64 End of 2017 Contest Participant I participated in the SmileBASIC Source End of 2017 Contest! Programming Contest Avatar Taboo I didn't change my avatar for 180 days Website Deep Sleep Hidden Website Random number oscillator. It should return N, 0 or -N. This is the best I got without using IFs: VAR N=5 RETURN N*((-1*(RND(2)==1))+(1*(RND(2)==1))) Posted
  • #35 ✎ 204 TheV360 Pokemon Is Awesome! I love Pokemon! Express Yourself First Day Joined on the very first day of SmileBASIC Source Website Night Person I like the quiet night and sleep late. Express Yourself
    Random number oscillator. It should return N, 0 or -N. This is the best I got without using IFs: VAR N=5 RETURN N*((-1*(RND(2)==1))+(1*(RND(2)==1)))
    Non-joke code critique (aka Not Getting The Joke): RETURN N*(RND(3)-1) Your version has a 2/4 chance of it being 0. My version has an equal 1/3 chance of either of the 3 options happening.
    Posted
  • #36 ✎ 961 Y_ack Head Admin DEF RNO(N) RANDOMIZE 0,420+RND(10) RETURN N*(RND(3)-1) END randomizes the rng seed for extra randomness. Tested on 3.5.2. RNG seed abuse, obviously. By default the sequence given by RND() is "random" With a seed, the random number generator can be made to produce the same sequence every time. This code, at least in 3.5.2, uses a series of seed values starting at 420 that all produce "2" for the first value. Since the function will always 're-initialize' the rng every time it is called, it's like asking for that first number every time. Posted
  • #37 ✎ 1665 12Me21 Head Admin Third Year My account is over 3 years old Website Syntax Highlighter Received for creating the code syntax highlighter on SBS Night Person I like the quiet night and sleep late. Express Yourself
    DEF RNO(N) RANDOMIZE 0,420+RND(10) RETURN N*(RND(3)-1) END randomizes the rng seed for extra randomness. Tested on 3.5.2.
    That's not random enough: DEF RNO2(N) VAR CHANNEL=RND(8) RANDOMIZE CHANNEL,420+RND(10) RETURN N*(RND(CHANNEL,3)-1) END Another good randomizer: RANDOMIZE 0 DEF RNO3(N) RANDOMIZE 0,RND(1000) RETURN N*(RND(3)-1) END
    Posted Edited by 12Me21
  • #38 ✎ 319 spaceturtles Video Games I like to play video games! Hobbies Avatar Block I didn't change my avatar for 30 days. Website Intermediate Programmer I can make programs, but I still have trouble here and there. Programming Strength
    DEF RNO(N) RANDOMIZE 0,420+RND(10) RETURN N*(RND(3)-1) END randomizes the rng seed for extra randomness. Tested on 3.5.2.
    That's not random enough: DEF RNO2(N) VAR CHANNEL=RND(8) RANDOMIZE CHANNEL,420+RND(10) RETURN N*(RND(CHANNEL,3)-1) END Another good randomizer: RANDOMIZE 0 DEF RNO3(N) RANDOMIZE 0,RND(1000) RETURN N*(RND(3)-1) END
    How about a random string generator?
    Posted
  • #39 ✎ 961 Y_ack Head Admin you have to submit some base code to 🅱️ritique Posted
  • #40 ✎ 1665 12Me21 Head Admin Third Year My account is over 3 years old Website Syntax Highlighter Received for creating the code syntax highlighter on SBS Night Person I like the quiet night and sleep late. Express Yourself DEF RANDOM_STRING$() RETURN RNDF() END Posted
1 2 3