All pastes #82467 Raw Edit

duccodude

public lua v1 · immutable
·published 2006-07-08 15:02 UTC
rendered paste body
bg = Image.load("BG.jpg")walking = {Image.load("HMR/r1.png"),Image.load("HMR/r2.png"),Image.load("HMR/r3.png"),Image.load("HMR/r4.png"),Image.load("HMR/r5.png"),Image.load("HMR/r6.png"),Image.load("HMR/r7.png"),Image.load("HMR/r8.png")}walkleft = {Image.load("HML/l1.png"),Image.load("HML/l2.png"),Image.load("HML/l3.png"),Image.load("HML/l3.png")}r0 = Image.load("HMR/r0.png")player_x = 5walk_num = 1walk_numl = 1action = "stand"walk_delay = 0walk_delayl = 0 function player_action() 	--walk	if action == "walk" thenwalk_delay = walk_delay + 1		screen:blit(player_x,178, walking[walk_num],true)if walk_delay == 8 thenwalk_delay = 0walk_num = walk_num + 1end 	if walk_num > table.getn(walking) then walk_num = 1 end  --walklif action == "walkl" thenwalk_delayl = walk_delayl + 1    screen:blit(player_x,178,walkleft[walk_numl],true)if walk_delayl == 8 thenwalk_delayl = 0walk_numl = walk_numl + 1endif walk_numl > table.getn(walkleft) then walk_numl = 1 endend	--stand	elseif action == "stand" then 		screen:blit(player_x,178, r0,true)endend while true doscreen:clear()pad = Controls.read()if pad:right() thenif action == "walk" thenplayer_x = player_x + 1 endaction = "walk"endif pad:left() thenif action == "walkl" thenplayer_x = player_x -1endaction = "walkl"end--Stand   	while not pad:right() and action == "walk" do	action = "stand"	break	endwhile not pad:left() and action == "walkl" doaction = "stand"breakendif player_x > 457 then player_x = 457 endif player_x < 3 then player_x = 3 endscreen:blit(0, 0, bg, 0, 0, bg:width(), bg:height(), false)	player_action()	screen.flip()	screen.waitVblankStart() end